/* 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 /////////////////////// ////////////////////////////////////////////////////////////////////////// lcd_logical_driver *bayrad; static int fd; ///////////////////////////////////////////////////////////// /* 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, }, }; //////////////////////////////////////////////////////////// // init() should set up any device-specific stuff, and // point all the function pointers. int bayrad_init(struct lcd_logical_driver *driver, char *args) { char device[256]; int speed=B9600; char *argv[64]; int argc; int i; struct termios portset; int tmp; //printf("bayrad_init()\n"); bayrad = driver; strcpy(device, "/dev/lcd"); driver->wid = 20; driver->hgt = 2; // You must use driver->framebuf here, but may use lcd.framebuf later. if(!driver->framebuf) driver->framebuf = malloc(driver->wid * driver->hgt); if(!driver->framebuf) { bayrad_close(); fprintf(stderr, "\nError: unable to create BayRAD framebuffer.\n"); return -1; } memset(driver->framebuf, ' ', driver->wid*driver->hgt); driver->cellwid = 5; driver->cellhgt = 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 driver->clear = bayrad_clear; driver->string = bayrad_string; driver->chr = bayrad_chr; driver->vbar = bayrad_vbar; driver->init_vbar = bayrad_init_vbar; driver->hbar = bayrad_hbar; driver->init_hbar = bayrad_init_hbar; //driver->num = NULL; //bayrad_num; //driver->init_num = NULL; //bayrad_init_num; driver->init = bayrad_init; driver->close = bayrad_close; driver->flush = bayrad_flush; driver->flush_box = bayrad_flush_box; //driver->contrast = NULL; driver->backlight = bayrad_backlight; driver->set_char = bayrad_set_char; driver->icon = bayrad_icon; driver->draw_frame = bayrad_draw_frame; driver->getkey = bayrad_getkey; return fd; } // Below here, you may use either lcd.framebuf or driver->framebuf.. // lcd.framebuf will be set to the appropriate buffer before calling // your driver. void bayrad_close() { if(bayrad->framebuf != NULL) free(bayrad->framebuf); bayrad->framebuf = NULL; write(fd, "\x8e\x00", 2); // Backlight OFF //fprintf(stderr, "\nClosing BayRAD.\n"); close(fd); } ///////////////////////////////////////////////////////////////// // Clears the LCD screen // void bayrad_clear() { memset(bayrad->framebuf, ' ', bayrad->wid*bayrad->hgt); } ////////////////////////////////////////////////////////////////// // Flushes all output to the lcd... // void bayrad_flush() { //fprintf(stderr, "\nBayRAD flush"); write(fd, "\x80\x1e", 2); //sync, home write(fd, bayrad->framebuf, 20); write(fd, "\x1e\x0a", 2); //home, LF write(fd, bayrad->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). // void bayrad_string(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*bayrad->wid) + x + i > (bayrad->wid*bayrad->hgt)) 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 */ bayrad->framebuf[(y*bayrad->wid) + 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). // void bayrad_chr(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 */ bayrad->framebuf[(y*bayrad->wid) + x] = ch; } ////////////////////////////////////////////////////////////////////// // Turns the lcd backlight on or off... // void bayrad_backlight(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. // void bayrad_init_vbar() { //printf("Init Vertical bars.\n"); bayrad_set_char(1, bar_up[0]); bayrad_set_char(2, bar_up[1]); bayrad_set_char(3, bar_up[2]); bayrad_set_char(4, bar_up[3]); bayrad_set_char(5, bar_up[4]); bayrad_set_char(6, bar_up[5]); bayrad_set_char(7, bar_up[6]); return; } ////////////////////////////////////////////////////////////////////// // Tells the driver to get ready for horizontal bargraphs. // void bayrad_init_hbar() { //printf("Init Horizontal bars.\n"); bayrad_set_char(1, bar_right[0]); bayrad_set_char(2, bar_right[1]); bayrad_set_char(3, bar_right[2]); bayrad_set_char(4, bar_right[3]); return; } ////////////////////////////////////////////////////////////////////// // Tells the driver to get ready for big numbers, if possible. // void bayrad_init_num() { // printf("Big Numbers.\n"); } ////////////////////////////////////////////////////////////////////// // Draws a big (4-row) number. // void bayrad_num(int x, int num) { // printf("BigNum(%i, %i)\n", x, num); } ////////////////////////////////////////////////////////////////////// // Changes the font data of character n. // void bayrad_set_char(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; rowcellhgt; row++) { letter = 0; for(col=0; colcellwid; col++) { letter <<= 1; letter |= (dat[(row*bayrad->cellwid) + col] > 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. // void bayrad_vbar(int x, int len) { int y = 2; //fprintf(stderr, "\nVbar at %i, length %i", x, len); if(len >= bayrad->cellhgt) { bayrad_chr(x, y, 0xFF); len -= bayrad->cellhgt; y = 1; } if(!len) return; if(len > bayrad->cellhgt) { bayrad_chr(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(x, y, 0xFF); else bayrad_chr(x, y, (len+0x98)); return; } ///////////////////////////////////////////////////////////////// // Draws a horizontal bar to the right. // void bayrad_hbar(int x, int y, int len) { //fprintf(stderr, "\nHbar at %i,%i; length %i", x, y, len); while((x <= bayrad->wid) && (len > 0)) { if(len < bayrad->cellwid) { bayrad_chr(x, y, 0x98 + len); break; } bayrad_chr(x, y, 0xFF); len -= bayrad->cellwid; x++; } return; } ///////////////////////////////////////////////////////////////// // Sets character 0 to an icon... // void bayrad_icon(int which, char dest) { //printf("Char %i set to icon %i\n", dest, which); bayrad_set_char(dest, &icons[which][0]); return; } ////////////////////////////////////////////////////////////////////// // Send a rectangular area to the display. // // I've just called bayrad_flush() because there's not much point yet // in flushing less than the entire framebuffer. // void bayrad_flush_box(int lft, int top, int rgt, int bot) { bayrad_flush(); } ////////////////////////////////////////////////////////////////////// // Draws the framebuffer on the display. // void bayrad_draw_frame(char *dat) { //fprintf(stderr, "\nBayRAD draw frame"); write(fd, "\x80\x1e", 2); // NOP, home write(fd, bayrad->framebuf, 20); write(fd, "\n", 1); write(fd, bayrad->framebuf+20, 20); } ////////////////////////////////////////////////////////////////////// // Tries to read a character from an input device... // // Return 0 for "nothing available". // char bayrad_getkey() { 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; }