/* wirz-sli.c -- Source file for LCDproc Wirz SLI driver Copyright (C) 1999 Horizon Technologies-http://horizon.pair.com/ Written by Bryan Rittmeyer - Released under GPL LCD info: http://www.wirz.com/sli/ */ #include #include #include #include #include #include #include #include "lcd.h" #include "wirz-sli.h" #include "drv_base.h" #include "../../shared/debug.h" #include "../../shared/str.h" static int custom=0; typedef enum { hbar = 1, vbar = 2, bign = 4, beat = 8 } custom_type; static int fd; static char lastframe[32]; lcd_logical_driver *sli; ///////////////////////////////////////////////////////////////// // Opens com port and sets baud correctly... // int sli_init(lcd_logical_driver *driver, char *args) { char *argv[64]; int argc; struct termios portset; int i; int tmp; char out[2]; char device[256] = "/dev/lcd"; int speed=B19200; sli = driver; //debug("sli_init: Args(all): %s\n", args); argc = get_args(argv, args, 64); /* for(i=0; i argc) { fprintf(stderr, "sli_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, "sli_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 if(tmp==38400) speed=B38400; else if(tmp==57600) speed=B57600; else if(tmp==115200) speed=B115200; else { fprintf(stderr, "sli_init: %s argument must be 1200, 2400, 9600, 19200, 38400, 57600, or 115200. Using default value (19200).\n", argv[i]); } } else if(0 == strcmp(argv[i], "-h") || 0 == strcmp(argv[i], "--help")) { printf("LCDproc Wirz SLI LCD driver\n" "\t-d\t--device\tSelect the output device to use [/dev/lcd]\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, "sli_init: failed (%s)\n", strerror(errno)); return -1; } //else fprintf(stderr, "sli_init: opened device %s\n", device); tcgetattr(fd, &portset); // This is necessary in Linux, but does not exist in irix. #ifndef IRIX cfmakeraw(&portset); #endif cfsetospeed(&portset, speed); tcsetattr(fd, TCSANOW, &portset); /* Initialize SLI using autobaud detection, and then turn off cursor and clear screen */ usleep(150000); /* 150ms delay to allow SLI to power on */ out[0]=13; /* CR for SLI autobaud */ write(fd, out, 1); usleep(3000); /* 3ms delay.. wait for it to autobaud */ out[0]=0x0FE; out[1]=0x00C; /* No cursor */ write(fd, out, 2); out[0]=0x0FE; out[1]=0x001; /* Clear LCD, not sure if this belongs here */ write(fd, out, 2); if(!driver->framebuf) { fprintf(stderr, "sli_init: No frame buffer.\n"); driver->close(); return -1; } // Set LCD parameters (I use a 16x2 LCD) -- small but still useful // Its also much cheaper than the higher quality Matrix Orbital modules // Currently, $30 for interface kit and 16x2 non-backlit LCD... driver->wid = 15; driver->hgt = 2; // Set the functions the driver supports... driver->clear = (void *)-1; driver->string = (void *)-1; driver->chr = (void *)-1; driver->vbar = sli_vbar; driver->init_vbar = sli_init_vbar; driver->hbar = sli_hbar; driver->init_hbar = sli_init_hbar; driver->num = (void *)-1; driver->init_num = (void *)-1; driver->init = sli_init; driver->close = sli_close; driver->flush = sli_flush; driver->flush_box = sli_flush_box; driver->contrast = (void *)-1; driver->backlight = (void *)-1; driver->set_char = sli_set_char; driver->icon = sli_icon; driver->draw_frame = sli_draw_frame; driver->getkey = (void *)-1; return fd; } /* Clean-up */ void sli_close() { close(fd); if(sli->framebuf) free(sli->framebuf); sli->framebuf = NULL; } void sli_flush() { sli_draw_frame(lcd.framebuf); } /* no bounds checking is done in MtxOrb.c (which I shamelessly ripped) this is bad imho, so I added it.. may remove later speed is not a huge issue though, this isnt a device driver or anything ;) */ void sli_flush_box(int lft, int top, int rgt, int bot) { int y; char out[2]; /* Why does the matrix driver allocate so much here? */ /* simple bounds checking */ if((top>lcd.hgt)|(bot>lcd.hgt)) return; if((lft>lcd.wid)|(rgt>lcd.wid)) return; // printf("Flush (%i,%i)-(%i,%i)\n", lft, top, rgt, bot); /* I like having hex, everywhere and all the time */ for(y=top; y<=bot; y++) { if(y==1) sprintf(out, "%c%c", 0x0FE, 0x080+lft); if(y==2) sprintf(out, "%c%c", 0x0FE, 0x0C0+lft); write(fd, out, 0x002); write(fd, lcd.framebuf+(y*lcd.wid)+lft, rgt-lft+1); } } ///////////////////////////////////////////////////////////////// // Prints a character on the lcd display, at position (x,y). The // upper-left is (1,1), and the lower right should be (20,4). // void sli_chr(int x, int y, char c) { y--; x--; lcd.framebuf[(y*lcd.wid) + x] = c; } ///////////////////////////////////////////////////////////////// // Sets up for vertical bars. Call before lcd.vbar() // /* Because of the way we do this (custom characters in CGRAM) we can't have both horizontal and vertical bars at once... this also appears to be a limitation of the Matrix Orbital modules so I will assume that all client coders know about it I think it would be cool to use triangular stuff for the non-full characters, so that you can do both bar types at once.. maybe I will release a new version of the SLI driver that attempts this */ void sli_init_vbar() { char a[] = { 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 b[] = { 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, 1,1,1,1,1, }; char c[] = { 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, 1,1,1,1,1, }; char d[] = { 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, 1,1,1,1,1, }; char e[] = { 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, 1,1,1,1,1, }; char f[] = { 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, 1,1,1,1,1, }; char g[] = { 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, 1,1,1,1,1, }; if(custom!=vbar) { sli_set_char(1,a); sli_set_char(2,b); sli_set_char(3,c); sli_set_char(4,d); sli_set_char(5,e); sli_set_char(6,f); sli_set_char(7,g); custom=vbar; } } ///////////////////////////////////////////////////////////////// // Inits horizontal bars... // void sli_init_hbar() { char a[] = { 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,0,0,0,0, }; char b[] = { 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,0,0,0, }; char c[] = { 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,0,0, }; char d[] = { 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, 1,1,1,1,0, }; if(custom!=hbar) { sli_set_char(1,a); sli_set_char(2,b); sli_set_char(3,c); sli_set_char(4,d); custom=hbar; } } ///////////////////////////////////////////////////////////////// // Draws a vertical bar... // /* It would be cool if you could start a vertical bar at any y like the horizontal bar routine can start at any x... but since we only have 2 lines anyway this is rather pointless for me to add */ void sli_vbar(int x, int len) { char map[9] = {32, 1, 2, 3, 4, 5, 6, 7, 255 }; int y; for(y=lcd.hgt; y > 0 && len>0; y--) { if(len >= lcd.cellhgt) sli_chr(x, y, 255); else sli_chr(x, y, map[len]); len -= lcd.cellhgt; } } ///////////////////////////////////////////////////////////////// // Draws a horizontal bar to the right. // void sli_hbar(int x, int y, int len) { char map[6] = { 32, 1, 2, 3, 4, 255 }; for(; x<=lcd.wid && len>0; x++) { if(len >= lcd.cellwid) sli_chr(x,y,255); else sli_chr(x, y, map[len]); len -= lcd.cellwid; } } ///////////////////////////////////////////////////////////////// // Sets a custom character from 0-7... // // For input, values > 0 mean "on" and values <= 0 are "off". // // The input is just an array of characters... // void sli_set_char(int n, char *dat) { char out[2]; int row, col; int letter; /* SLI also has 8 user definable characters */ if(n < 0 || n > 7) return; if(!dat) return; /* Move cursor to CGRAM */ out[0]=0x0FE; out[1]=0x040+8*n; write(fd, out, 2); for(row=0; row 0); } letter|=0x020; /* SLI can't accept CR, LF, etc in this character! */ write(fd, &letter, 1); } /* Move cursor back to DDRAM */ out[0]=0x0FE; out[1]=0x080; write(fd, out, 2); } void sli_icon(int which, char dest) { 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, }, }; if(custom==bign) custom=beat; sli_set_char(dest, &icons[which][0]); } ///////////////////////////////////////////////////////////// // Blasts a single frame onscreen, to the lcd... // // Input is a character array, sized lcd.wid*lcd.hgt // void sli_draw_frame(char *dat) { char out[2]; /* Again, why does the Matrix driver allocate so much here? */ int y; if(!dat) return; /* out[0]=0x0FE; out[1]=0x001; write(fd, out, 2); */ /* Don't update if we have no new data this keeps me from getting a migraine (just like those copyleft penguin mints... mmmmmm) */ // if (!strncmp(dat,lastframe,32)) /* Nothing has changed */ // return; /* Do the actual refresh */ out[0]=0x0FE; out[1]=0x080; write(fd, out, 2); write(fd, &dat[0], 16); usleep(10); write(fd, &dat[16],15); // strncpy(lastframe,dat,32); // Update lastframe... }