/* Code file for BayRAD driver * for LCDproc LCD software * by Nathan Yawn, yawn@emacinc.com * 3/24/01 */ #include #include #include #include #include #include #include #include #ifdef HAVE_CONFIG_H # include "config.h" #endif #if TIME_WITH_SYS_TIME # include # include #else # if HAVE_SYS_TIME_H # include # else # include # endif #endif #ifdef SOLARIS # include #endif #include "lcd.h" #include "bayrad.h" //#include "drv_base.h" #include "shared/str.h" ////////////////////////////////////////////////////////////////////////// ////////////////////// Base "class" to derive from /////////////////////// ////////////////////////////////////////////////////////////////////////// static int fd; static int width = 0; static int height = 0; static int cellwidth = 5; static int cellheight = 8; static char *framebuf = NULL; ///////////////////////////////////////////////////////////// /* Declare a bunch of global, static custom character data */ ///////////////////////////////////////////////////////////// char bar_up[7][5*8] = { { 0,0,0,0,0, // char u1[] = 0,0,0,0,0, 0,0,0,0,0, 0,0,0,0,0, 0,0,0,0,0, 0,0,0,0,0, 0,0,0,0,0, 1,1,1,1,1, }, { 0,0,0,0,0, // char u2[] = 0,0,0,0,0, 0,0,0,0,0, 0,0,0,0,0, 0,0,0,0,0, 0,0,0,0,0, 1,1,1,1,1, 1,1,1,1,1, },{ 0,0,0,0,0, // char u3[] = 0,0,0,0,0, 0,0,0,0,0, 0,0,0,0,0, 0,0,0,0,0, 1,1,1,1,1, 1,1,1,1,1, 1,1,1,1,1, },{ 0,0,0,0,0, // char u4[] = 0,0,0,0,0, 0,0,0,0,0, 0,0,0,0,0, 1,1,1,1,1, 1,1,1,1,1, 1,1,1,1,1, 1,1,1,1,1, },{ 0,0,0,0,0, // char u5[] = 0,0,0,0,0, 0,0,0,0,0, 1,1,1,1,1, 1,1,1,1,1, 1,1,1,1,1, 1,1,1,1,1, 1,1,1,1,1, },{ 0,0,0,0,0, // char u6[] = 0,0,0,0,0, 1,1,1,1,1, 1,1,1,1,1, 1,1,1,1,1, 1,1,1,1,1, 1,1,1,1,1, 1,1,1,1,1, },{ 0,0,0,0,0, // char u7[] = 1,1,1,1,1, 1,1,1,1,1, 1,1,1,1,1, 1,1,1,1,1, 1,1,1,1,1, 1,1,1,1,1, 1,1,1,1,1, },}; char bar_down[7][5*8] = { /* Presently, this is not used */ { 1,1,1,1,1, // char d1[] = 0,0,0,0,0, 0,0,0,0,0, 0,0,0,0,0, 0,0,0,0,0, 0,0,0,0,0, 0,0,0,0,0, 0,0,0,0,0, },{ 1,1,1,1,1, // char d2[] = 1,1,1,1,1, 0,0,0,0,0, 0,0,0,0,0, 0,0,0,0,0, 0,0,0,0,0, 0,0,0,0,0, 0,0,0,0,0, },{ 1,1,1,1,1, // char d3[] = 1,1,1,1,1, 1,1,1,1,1, 0,0,0,0,0, 0,0,0,0,0, 0,0,0,0,0, 0,0,0,0,0, 0,0,0,0,0, },{ 1,1,1,1,1, // char d4[] = 1,1,1,1,1, 1,1,1,1,1, 1,1,1,1,1, 0,0,0,0,0, 0,0,0,0,0, 0,0,0,0,0, 0,0,0,0,0, },{ 1,1,1,1,1, // char d5[] = 1,1,1,1,1, 1,1,1,1,1, 1,1,1,1,1, 1,1,1,1,1, 0,0,0,0,0, 0,0,0,0,0, 0,0,0,0,0, },{ 1,1,1,1,1, // char d6[] = 1,1,1,1,1, 1,1,1,1,1, 1,1,1,1,1, 1,1,1,1,1, 1,1,1,1,1, 0,0,0,0,0, 0,0,0,0,0, },{ 1,1,1,1,1, // char d7[] = 1,1,1,1,1, 1,1,1,1,1, 1,1,1,1,1, 1,1,1,1,1, 1,1,1,1,1, 1,1,1,1,1, 0,0,0,0,0, },}; char bar_right[4][5*8] = { { 1,0,0,0,0, // char r1[] = 1,0,0,0,0, 1,0,0,0,0, 1,0,0,0,0, 1,0,0,0,0, 1,0,0,0,0, 1,0,0,0,0, 1,0,0,0,0, },{ 1,1,0,0,0, // char r2[] = 1,1,0,0,0, 1,1,0,0,0, 1,1,0,0,0, 1,1,0,0,0, 1,1,0,0,0, 1,1,0,0,0, 1,1,0,0,0, },{ 1,1,1,0,0, // char r3[] = 1,1,1,0,0, 1,1,1,0,0, 1,1,1,0,0, 1,1,1,0,0, 1,1,1,0,0, 1,1,1,0,0, 1,1,1,0,0, },{ 1,1,1,1,0, // char r4[] = 1,1,1,1,0, 1,1,1,1,0, 1,1,1,1,0, 1,1,1,1,0, 1,1,1,1,0, 1,1,1,1,0, 1,1,1,1,0, },}; char bar_left[4][5*8] = { /* Presently, this is not used. */ { 0,0,0,0,1, // char l1[] = 0,0,0,0,1, 0,0,0,0,1, 0,0,0,0,1, 0,0,0,0,1, 0,0,0,0,1, 0,0,0,0,1, 0,0,0,0,1, },{ 0,0,0,1,1, // char l2[] = 0,0,0,1,1, 0,0,0,1,1, 0,0,0,1,1, 0,0,0,1,1, 0,0,0,1,1, 0,0,0,1,1, 0,0,0,1,1, },{ 0,0,1,1,1, // char l3[] = 0,0,1,1,1, 0,0,1,1,1, 0,0,1,1,1, 0,0,1,1,1, 0,0,1,1,1, 0,0,1,1,1, 0,0,1,1,1, },{ 0,1,1,1,1, // char l4[] = 0,1,1,1,1, 0,1,1,1,1, 0,1,1,1,1, 0,1,1,1,1, 0,1,1,1,1, 0,1,1,1,1, 0,1,1,1,1, },}; char icons[3][5*8] = { { 1,1,1,1,1, // Empty Heart 1,0,1,0,1, 0,0,0,0,0, 0,0,0,0,0, 0,0,0,0,0, 1,0,0,0,1, 1,1,0,1,1, 1,1,1,1,1, }, { 1,1,1,1,1, // Filled Heart 1,0,1,0,1, 0,1,0,1,0, 0,1,1,1,0, 0,1,1,1,0, 1,0,1,0,1, 1,1,0,1,1, 1,1,1,1,1, }, { 0,0,0,0,0, // Ellipsis 0,0,0,0,0, 0,0,0,0,0, 0,0,0,0,0, 0,0,0,0,0, 0,0,0,0,0, 0,0,0,0,0, 1,0,1,0,1, }, }; // Vars for the server core MODULE_EXPORT char * api_version = API_VERSION; MODULE_EXPORT int stay_in_foreground = 1; MODULE_EXPORT int supports_multiple = 0; MODULE_EXPORT char *symbol_prefix = "bayrad_"; //////////////////////////////////////////////////////////// // init() should set up any device-specific stuff, and // point all the function pointers. int bayrad_init(Driver *drvthis, char *args) { char device[256]; int speed=B9600; char *argv[64]; int argc; int i; struct termios portset; int tmp; //printf("bayrad_init()\n"); strcpy(device, "/dev/lcd"); width = 20; height = 2; framebuf = malloc(width * height); if(!framebuf) { bayrad_close(drvthis); fprintf(stderr, "\nError: unable to create BayRAD framebuffer.\n"); return -1; } memset(framebuf, ' ', width * height); //cellheight = 5; //cellwidth = 8; /*-----------------------------------------------------*/ //fprintf(stderr, "bayrad_init: Args(all): %s\n", args); argc = get_args(argv, args, 64); /* for(i=0; i argc) { fprintf(stderr, "bayrad_init: %s requires an argument\n", argv[i]); return -1; } strcpy(device, argv[++i]); } else if(0 == strcmp(argv[i], "-s") || 0 == strcmp(argv[i], "--speed")) { if(i + 1 > argc) { fprintf(stderr, "bayrad_init: %s requires an argument\n", argv[i]); return -1; } tmp = atoi(argv[++i]); if(tmp==1200) speed=B1200; else if(tmp==2400) speed=B2400; else if(tmp==9600) speed=B9600; else if(tmp==19200) speed=B19200; else { fprintf(stderr, "bayrad_init: %s argument must be 1200, 2400, 9600 or 19200. Using default value.\n", argv[i]); } } else if(0 == strcmp(argv[i], "-h") || 0 == strcmp(argv[i], "--help")) { printf("LCDproc EMAC BayRAD LCD driver\n" "\t-d\t--device\tSelect the output device to use [/dev/lcd]\n" /*"\t-t\t--type\t\tSelect the LCD type (size) [20x2]\n"*/ "\t-s\t--speed\t\tSet the communication speed [19200]\n" "\t-h\t--help\t\tShow this help information\n"); return -1; } else { printf("Invalid parameter: %s\n", argv[i]); } } // Set up io port correctly, and open it... fd = open(device, O_RDWR | O_NOCTTY | O_NDELAY); if (fd == -1) { fprintf(stderr, "bayrad_init: failed (%s)\n", strerror(errno)); return -1; } //else fprintf(stderr, "bayrad_init: opened device %s\n", device); tcflush(fd, TCIOFLUSH); // We use RAW mode #ifdef HAVE_CFMAKERAW // The easy way cfmakeraw( &portset ); #else // The hard way portset.c_iflag &= ~( IGNBRK | BRKINT | PARMRK | ISTRIP | INLCR | IGNCR | ICRNL | IXON ); portset.c_oflag &= ~OPOST; portset.c_lflag &= ~( ECHO | ECHONL | ICANON | ISIG | IEXTEN ); portset.c_cflag &= ~( CSIZE | PARENB | CRTSCTS ); portset.c_cflag |= CS8 | CREAD | CLOCAL ; #endif portset.c_cc[VTIME] = 0; // Don't use the timer, no workee portset.c_cc[VMIN] = 1; // Need at least 1 char // Set port speed cfsetospeed(&portset, B9600); cfsetispeed(&portset, B0); // Do it... tcsetattr(fd, TCSANOW, &portset); tcflush(fd, TCIOFLUSH); /*------------------------------------*/ /*** Open the port write-only, then fork off a process that reads chars ?!!? ***/ /* Reset and clear the BayRAD */ write(fd, "\x80\x86\x00\x1a\x1e", 5); // sync,reset to type 0, clear screen, home // Set variables for server drvthis->api_version = api_version; drvthis->stay_in_foreground = &stay_in_foreground; drvthis->supports_multiple = &supports_multiple; // Set the functions the driver supports drvthis->clear = bayrad_clear; drvthis->string = bayrad_string; drvthis->chr = bayrad_chr; drvthis->old_vbar = bayrad_vbar; drvthis->init_vbar = bayrad_init_vbar; drvthis->old_hbar = bayrad_hbar; drvthis->init_hbar = bayrad_init_hbar; //drvthis->num = NULL; //bayrad_num; //drvthis->init_num = NULL; //bayrad_init_num; drvthis->init = bayrad_init; drvthis->close = bayrad_close; drvthis->flush = bayrad_flush; drvthis->backlight = bayrad_backlight; drvthis->set_char = bayrad_set_char; drvthis->old_icon = bayrad_icon; drvthis->getkey = bayrad_getkey; return 0; } // Below here, you may use either lcd.framebuf or drvthis->framebuf.. // lcd.framebuf will be set to the appropriate buffer before calling // your driver. MODULE_EXPORT void bayrad_close(Driver * drvthis) { //fprintf(stderr, "\nClosing BayRAD.\n"); write(fd, "\x8e\x00", 2); // Backlight OFF if(framebuf) free(framebuf); framebuf = NULL; close(fd); } ///////////////////////////////////////////////////////////////// // Returns the display width // MODULE_EXPORT int bayrad_width(Driver * drvthis) { return width; } ///////////////////////////////////////////////////////////////// // Returns the display height // MODULE_EXPORT int bayrad_height(Driver * drvthis) { return height; } ///////////////////////////////////////////////////////////////// // Clears the LCD screen // MODULE_EXPORT void bayrad_clear(Driver * drvthis) { memset(framebuf, ' ', width * height); } ////////////////////////////////////////////////////////////////// // Flushes all output to the lcd... // MODULE_EXPORT void bayrad_flush(Driver * drvthis) { //fprintf(stderr, "\nBayRAD flush"); write(fd, "\x80\x1e", 2); //sync, home write(fd, framebuf, 20); write(fd, "\x1e\x0a", 2); //home, LF write(fd, framebuf+20, 20); return; } ///////////////////////////////////////////////////////////////// // Prints a string on the lcd display, at position (x,y). The // upper-left is (1,1), and the lower right should be (20,4). // MODULE_EXPORT void bayrad_string(Driver * drvthis, int x, int y, char string[]) { int i; unsigned char c; //fprintf(stderr, "\nPutting string %s at %i, %i", string, x, y); x -= 1; // Convert 1-based coords to 0-based... y -= 1; for(i=0; string[i]; i++) { // Check for buffer overflows... if((y*width) + x + i > (width*height)) break; c = (unsigned char) string[i]; if(c> 0x7F && c < 0x98) { //c &= 0x7F; fprintf(stderr, "\nIllegal char %#x requested in bayrad_string()!\n", c); c = ' '; } if(c < 8) /* The custom characters are mapped at 0x98 - 0x9F, */ c += 0x98; /* as 0x07 makes a beep instead of printing a character */ framebuf[(y*width) + x + i] = c; } } ///////////////////////////////////////////////////////////////// // Prints a character on the lcd display, at position (x,y). The // upper-left is (1,1), and the lower right should be (20,2). // MODULE_EXPORT void bayrad_chr(Driver * drvthis, int x, int y, char c) { unsigned char ch; //fprintf(stderr, "\nPutting char %c (%#x) at %i, %i", c, c, x, y); y--; x--; ch = (unsigned char) c; if(ch > 0x7F && ch < 0x98) { fprintf(stderr, "\nIllegal char %#x requested in bayrad_chr()!\n", ch); ch = ' '; } /* No shifting the custom chars here, so bayrad_chr() can beep */ framebuf[(y*width) + x] = ch; } ////////////////////////////////////////////////////////////////////// // Turns the lcd backlight on or off... // MODULE_EXPORT void bayrad_backlight(Driver * drvthis, int on) { /* This violates the LCDd driver model, but it does leave the * backlight control entirely in the hands of the user via * BayRAd buttons, which is nice, since the backlights have * a finite lifespan... */ if(on) {; //write(fd, "\x8e\x0f", 2); //fprintf(stderr, "Backlight ON\n"); } else {; //write(fd, "\x8e\x00", 2); //fprintf(stderr, "Backlight OFF\n"); } } ////////////////////////////////////////////////////////////////////// // Tells the driver to get ready for vertical bargraphs. // MODULE_EXPORT void bayrad_init_vbar(Driver * drvthis) { //printf("Init Vertical bars.\n"); bayrad_set_char(drvthis, 1, bar_up[0]); bayrad_set_char(drvthis, 2, bar_up[1]); bayrad_set_char(drvthis, 3, bar_up[2]); bayrad_set_char(drvthis, 4, bar_up[3]); bayrad_set_char(drvthis, 5, bar_up[4]); bayrad_set_char(drvthis, 6, bar_up[5]); bayrad_set_char(drvthis, 7, bar_up[6]); return; } ////////////////////////////////////////////////////////////////////// // Tells the driver to get ready for horizontal bargraphs. // MODULE_EXPORT void bayrad_init_hbar(Driver * drvthis) { //printf("Init Horizontal bars.\n"); bayrad_set_char(drvthis, 1, bar_right[0]); bayrad_set_char(drvthis, 2, bar_right[1]); bayrad_set_char(drvthis, 3, bar_right[2]); bayrad_set_char(drvthis, 4, bar_right[3]); return; } ////////////////////////////////////////////////////////////////////// // Tells the driver to get ready for big numbers, if possible. // MODULE_EXPORT void bayrad_init_num(Driver * drvthis) { // printf("Big Numbers.\n"); } ////////////////////////////////////////////////////////////////////// // Draws a big (4-row) number. // MODULE_EXPORT void bayrad_num(Driver * drvthis, int x, int num) { // printf("BigNum(%i, %i)\n", x, num); } ////////////////////////////////////////////////////////////////////// // Changes the font data of character n. // MODULE_EXPORT void bayrad_set_char(Driver * drvthis, int n, char *dat) { char out[4]; int row, col; char letter; //fprintf(stderr, "\nSet char %i", n); if(n < 0 || n > 7) /* Do we want to the aliased indexes as well (0x98 - 0x9F?) */ return; if(!dat) return; n = 0x40 + (n * 8); /* Set n to the proper location in CG RAM */ /* Set the LCD to accept data for rewrite-able char n */ snprintf(out, sizeof(out), "\x88%c", n); write(fd, out, 2); for(row=0; row 0); } write(fd, &letter, 1); } /* return the LCD to normal operation */ write(fd, "\x80", 1); return; } ///////////////////////////////////////////////////////////////// // Draws a vertical bar, from the bottom of the screen up. // MODULE_EXPORT void bayrad_vbar(Driver * drvthis, int x, int len) { int y = 2; //fprintf(stderr, "\nVbar at %i, length %i", x, len); if(len >= cellheight) { bayrad_chr(drvthis, x, y, 0xFF); len -= cellheight; y = 1; } if(!len) return; if(len > cellheight) { bayrad_chr(drvthis, x, y, '^'); /* Show we've gone off the chart */ return; } /* init_vbar sets custom chars 1 - 7. Height 8 is char 0xFF. */ if(len == 8) bayrad_chr(drvthis, x, y, 0xFF); else bayrad_chr(drvthis, x, y, (len+0x98)); return; } ///////////////////////////////////////////////////////////////// // Draws a horizontal bar to the right. // MODULE_EXPORT void bayrad_hbar(Driver * drvthis, int x, int y, int len) { //fprintf(stderr, "\nHbar at %i,%i; length %i", x, y, len); while((x <= cellwidth) && (len > 0)) { if(len < cellwidth) { bayrad_chr(drvthis, x, y, 0x98 + len); break; } bayrad_chr(drvthis, x, y, 0xFF); len -= cellwidth; x++; } return; } ///////////////////////////////////////////////////////////////// // Sets character 0 to an icon... // MODULE_EXPORT void bayrad_icon(Driver * drvthis, int which, char dest) { //printf("Char %i set to icon %i\n", dest, which); bayrad_set_char(drvthis, dest, &icons[which][0]); return; } ////////////////////////////////////////////////////////////////////// // Tries to read a character from an input device... // // Return 0 for "nothing available". // MODULE_EXPORT char bayrad_getkey(Driver * drvthis) { fd_set brfdset; struct timeval twait; char readchar; int retval; //fprintf(stderr, "\nBayRAD getkey..."); /* Check for incoming data. Turn backlight ON/OFF as needed */ /* This is strictly custom, as LCDd doesn't do anything */ /* with received keypad characters. */ FD_ZERO(&brfdset); FD_SET(fd, &brfdset); twait.tv_sec = 0; twait.tv_usec = 0; if(select(fd+1, &brfdset, NULL, NULL, &twait)) { retval = read(fd, &readchar, 1); if(retval > 0) { //fprintf(stderr, "Received char %c", readchar); if(readchar == 'Y') { write(fd, "\x8e\x0f", 2); } else if(readchar == 'N') { write(fd, "\x8e\x00", 2); } } /* if read returned data */ else { /* Read error */ fprintf(stderr, "\nRead error in BayRAD getchar."); } } /* if select */ else { ;//fprintf(stderr, "No BayRAD data present."); } return readchar; }