/* $Id$ * $URL$ * * LCD4Linux driver for 4D Systems Display Graphics Modules * * Copyright (C) 2008 Sven Killig * Modified from sample code by: * Copyright (C) 2005 Michael Reinelt * Copyright (C) 2005, 2006, 2007 The LCD4Linux Team * * This file is part of LCD4Linux. * * LCD4Linux is free software; you can redistribute it and/or modify * it under the terms of the GNU General Public License as published by * the Free Software Foundation; either version 2, or (at your option) * any later version. * * LCD4Linux is distributed in the hope that it will be useful, * but WITHOUT ANY WARRANTY; without even the implied warranty of * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the * GNU General Public License for more details. * * You should have received a copy of the GNU General Public License * along with this program; if not, write to the Free Software * Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA. * */ /* * * exported fuctions: * * struct DRIVER drv_D4D * */ #include "config.h" #include #include #include #include #include #include #include #include #include "debug.h" #include "cfg.h" #include "qprintf.h" #include "udelay.h" #include "plugin.h" #include "widget.h" #include "widget_text.h" #include "widget_icon.h" #include "widget_bar.h" #include "drv.h" #include "drv_generic_text.h" #include "drv_generic_graphic.h" #include "drv_generic_serial.h" static char Name[] = "D4D"; char NAME_[20]; int FONT = 1, MODE = 0, EXTRA = 0, SECTOR = 0, SECTOR_SIZE, NOPOWERCYCLE = 0; /* int CONTRAST_; */ #define address_mmsb(variable) ((variable >> 24) & 0xFF) #define address_mlsb(variable) ((variable >> 16) & 0xFF) #define address_lmsb(variable) ((variable >> 8) & 0xFF) #define address_llsb(variable) (variable & 0xFF) #define address_hi(variable) ((variable >> 16) & 0xFF) #define address_mid(variable) ((variable >> 8) & 0xFF) #define address_lo(variable) (variable & 0xFF) #define msb(variable) ((variable >> 8) & 0xFF) #define lsb(variable) (variable & 0xFF) RGBA FG_COL_ = {.R = 0x00,.G = 0x00,.B = 0x00,.A = 0xff }; RGBA BG_COL_ = {.R = 0xff,.G = 0xff,.B = 0xff,.A = 0xff }; short int FG_COLOR, BG_COLOR; int RGB_24to16(int red, int grn, int blu) { return (((red >> 3) << 11) | ((grn >> 2) << 5) | (blu >> 3)); } int RGB_24to8(int red, int grn, int blu) { return (((red >> 5) << 5) | ((grn >> 5) << 2) | (blu >> 6)); } /****************************************/ /*** hardware dependant functions ***/ /****************************************/ static int drv_D4D_open(const char *section) { int fd; fd = drv_generic_serial_open(section, Name, 0); if (fd < 0) return -1; fcntl(fd, F_SETFL, 0); /* blocking read */ return 0; } static int drv_D4D_close(void) { drv_generic_serial_close(); return 0; } static void drv_D4D_receive_ACK() { char ret[1]; w

# Funciona correctamente en Las Palmas de Gran Canaria (24-4-2007)
# T freq bw fec_hi fec_lo mod transmission-mode guard-interval hierarchy
T 786000000 8MHz 2/3 NONE QAM64 8k 1/4 NONE    # Canal 60: TVE1, TVE2, 24H TVE, Clan/TVE, RNE, RNEC, RNE3, Lanzadera, EPG, Digitext, Meteo, Bolsa, Trafico, Empleat
T 826000000 8MHz 2/3 NONE QAM64 8k 1/4 NONE    # Canal 65: TV C, TV C2
T 834000000 8MHz 2/3 NONE QAM64 8k 1/4 NONE    # Canal 66: Net TV, Teledeporte, Veo TV1, SETenVeo, Radio Intereconomía Lanzadera, EPG, Digitext, Meteo, Bolsa, Trafico, Empleat
T 842000000 8MHz 2/3 NONE QAM64 8k 1/4 NONE    # Canal 67: CNN+, Cuatro, La Sexta 1, 40 Latino TV, EPG Soge V2 5
T 850000000 8MHz 2/3 NONE QAM64 8k 1/4 NONE    # Canal 68: Fly Music, Punto Radio, Tele 5, Tele 5 Estrellas, Tele 5 Sport
T 858000000 8MHz 2/3 NONE QAM64 8k 1/4 NONE    # Canal 69: Antena 3, Antena.Neox, Antena.Nova, Telehit, Onda Cero, Europa FM, Onda Melodia, A3Lanzadera, A3Portal, EPGA3, A3Ticker

return -1; } } DCOLS = res[0]; DROWS = res[1]; cfg_number(section, "Mode", 0, 0, 16, &MODE); s = cfg_get(section, "Font", NULL); if (s == NULL || *s == '\0') { error("%s: no '%s.Font' entry from %s", Name, section, cfg_source()); return -1; } if (sscanf(s, "%dx%d", &xres_cfg, &yres_cfg) < 1 || xres_cfg < 0) { error("%s: bad %s.Font '%s' from %s", Name, section, s, cfg_source()); free(s); return -1; } if (yres_cfg == -1) { /* font on SD card */ SECTOR = xres_cfg * 512; char setAddress[] = { '@', 'A', address_mmsb(SECTOR), address_mlsb(SECTOR), address_lmsb(SECTOR), address_llsb(SECTOR) }; drv_D4D_send(setAddress, sizeof(setAddress)); char answer1[1]; char readByte[] = { '@', 'r' }; drv_D4D_send_nowait(readByte, sizeof(readByte)); drv_generic_serial_read(answer1, sizeof(answer1)); XRES = answer1[0]; drv_D4D_send_nowait(readByte, sizeof(readByte)); drv_generic_serial_read(answer1, sizeof(answer1)); YRES = answer1[0]; SECTOR = xres_cfg + 1; SECTOR_SIZE = ceil((double) XRES * (double) YRES * 2.0 / 512.0); } else { XRES = xres_cfg; YRES = yres_cfg; } if (MODE == 0) { color = cfg_get(section, "foreground", "ffffff"); if (color2RGBA(color, &FG_COL_) < 0) { error("%s: ignoring illegal color '%s'", Name, color); } if (color) free(color); FG_COLOR = RGB_24to16(FG_COL_.R, FG_COL_.G, FG_COL_.B); color = cfg_get(section, "background", "000000"); if (color2RGBA(color, &BG_COL_) < 0) { error("%s: ignoring illegal color '%s'", Name, color); } if (color) free(color); BG_COLOR = RGB_24to16(BG_COL_.R, BG_COL_.G, BG_COL_.B); DCOLS = DCOLS / XRES; DROWS = DROWS / YRES; switch (yres_cfg) { /* font in ROM */ case 8: switch (xres_cfg) { case 6: FONT = 0; break; case 8: FONT = 1; break; default: error("%s: unknown width in %s.Font '%s' from %s", Name, section, s, cfg_source()); return -1; }; break; case 12: FONT = 2; break; case 16: FONT = 3; break; case -1: break; default: error("%s: unknown height in %s.Font '%s' from %s", Name, section, s, cfg_source()); return -1; } } info("XRES=%i, YRES=%i; DCOLS=%i, DROWS=%d; FONT=%d, SECTOR=%i, SECTOR_SIZE=%i\n", XRES, YRES, DCOLS, DROWS, FONT, SECTOR, SECTOR_SIZE); cfg_number(section, "NoPowerCycle", 0, 1, 65536, &NOPOWERCYCLE); if (!NOPOWERCYCLE) { char powerOn[] = { 'Y', 3, 1 }; drv_D4D_send(powerOn, sizeof(powerOn)); /*char background[] = {'B', msb(BG_COLOR), lsb(BG_COLOR)}; drv_D4D_send(background, sizeof(background)); */ } char opaque[] = { 'O', 1 }; drv_D4D_send(opaque, sizeof(opaque)); char penSize[] = { 'p', 0 }; drv_D4D_send(penSize, sizeof(penSize)); if (!MODE) { unsigned char buffer[] = { 0x18, 0x24, 0x24, 0x18, 0, 0, 0, 0 }; /* degree */ drv_D4D_defchar(CHAR0, buffer); CHARS--; CHAR0++; } if (cfg_number(section, "Contrast", 0, 0, 255, &contrast) > 0) { drv_D4D_contrast(contrast); } drv_D4D_clear(); return 0; } int drv_D4D_text_draw(WIDGET * W) { short int FG_COLOR_old = FG_COLOR, BG_COLOR_old = BG_COLOR; int ret; RGBA fg, bg; fg = W->fg_valid ? W->fg_color : FG_COL_; bg = W->bg_valid ? W->bg_color : BG_COL_; FG_COLOR = RGB_24to16(fg.R, fg.G, fg.B); BG_COLOR = RGB_24to16(bg.R, bg.G, bg.B); ret = drv_generic_text_draw(W); FG_COLOR = FG_COLOR_old; BG_COLOR = BG_COLOR_old; return ret; } int lastVal[40 * 40 * 2]; /* ToDo: MAX_WIDGETS*2 */ int drv_D4D_bar_draw(WIDGET * W) { /* optimizations: - draw filled rectangles instead of user defined bar characters - cache last values */ WIDGET_BAR *Bar = W->data; int row, col, len, res, max, val1, val2; DIRECTION dir; STYLE style; row = W->row; col = W->col; dir = Bar->direction; style = Bar->style; len = Bar->length; res = dir & (DIR_EAST | DIR_WEST) ? XRES : YRES; max = len * res; val1 = Bar->val1 * (double) (max); val2 = Bar->val2 * (double) (max); if (val1 < 1) val1 = 1; else if (val1 > max) val1 = max; if (val2 < 1) val2 = 1; else if (val2 > max) val2 = max; short int FG_COLOR_old = FG_COLOR, BG_COLOR_old = BG_COLOR; RGBA fg, bg; fg = W->fg_valid ? W->fg_color : FG_COL_; bg = W->bg_valid ? W->bg_color : BG_COL_; FG_COLOR = RGB_24to16(fg.R, fg.G, fg.B); BG_COLOR = RGB_24to16(bg.R, bg.G, bg.B); char cmd[9]; cmd[0] = 'r'; int val[2]; val[0] = val1; val[1] = val2; int i, vals; int lastValIndex0 = row * DCOLS + col; int cells = DROWS * DCOLS; if (val1 == val2 && lastVal[lastValIndex0] == lastVal[lastValIndex0 + cells]) vals = 1; else vals = 2; for (i = 0; i < vals; i++) { int lastValIndex = lastValIndex0 + cells * (i /*+1 */ ); int y1 = row * YRES + (YRES / 2) * i; cmd[2] = msb(y1); cmd[3] = lsb(y1); int y2 = y1 + (YRES) / vals - 1; cmd[5] = msb(y2); cmd[6] = lsb(y2); if (val[i] > lastVal[lastValIndex]) { cmd[1] = col * XRES + lastVal[lastValIndex]; cmd[4] = cmd[1] + val[i] - lastVal[lastValIndex] - 1; cmd[7] = msb(FG_COLOR); cmd[8] = lsb(FG_COLOR); drv_D4D_send_extra(cmd, sizeof(cmd), 2, 5); } else if (val[i] < lastVal[lastValIndex]) { cmd[1] = col * XRES + val[i] - 1 + 1; cmd[4] = cmd[1] + lastVal[lastValIndex] - val[i]; cmd[7] = msb(BG_COLOR); cmd[8] = lsb(BG_COLOR); drv_D4D_send_extra(cmd, sizeof(cmd), 2, 5); } lastVal[lastValIndex] = val[i]; } FG_COLOR = FG_COLOR_old; BG_COLOR = BG_COLOR_old; return 0; } /****************************************/ /*** plugins ***/ /****************************************/ static void plugin_contrast(RESULT * result, RESULT * arg1) { double contrast; contrast = drv_D4D_contrast(R2N(arg1)); SetResult(&result, R_NUMBER, &contrast); } /****************************************/ /*** widget callbacks ***/ /****************************************/ /* using drv_generic_text_draw(W) */ /* using drv_generic_text_icon_draw(W) */ /* using drv_generic_text_bar_draw(W) */ /* using drv_generic_gpio_draw(W) */ /****************************************/ /*** exported functions ***/ /****************************************/ int drv_D4D_list(void) { printf("4D Systems Display Graphics Modules"); return 0; } int drv_D4D_init(const char *section, const int quiet) { /* error("drv_D4D_init()"); */ WIDGET_CLASS wc; int ret; info("%s: %s", Name, "$Rev$"); if ((ret = drv_D4D_start(section)) != 0) return ret; if (EXTRA) CHARS = 64; else CHARS = 32; CHAR0 = 128; GOTO_COST = 7; if (MODE) { drv_generic_graphic_real_blit = drv_D4D_blit; } else { drv_generic_text_real_write = drv_D4D_write; drv_generic_text_real_defchar = drv_D4D_defchar; } if (!quiet) { char buffer[40]; qprintf(buffer, sizeof(buffer), "%s %dx%d", NAME_, DCOLS, DROWS); if (MODE) { if (drv_generic_graphic_greet(buffer, "www.4dsystems.com.au")) { sleep(3); drv_generic_graphic_clear(); } } else { if (drv_generic_text_greet(buffer, "www.4dsystems.com.au")) { sleep(3); drv_D4D_clear(); } } } if (MODE) { if ((ret = drv_generic_graphic_init(section, Name)) != 0) return ret; } else { if ((ret = drv_generic_text_init(section, Name)) != 0) return ret; if ((ret = drv_generic_text_icon_init()) != 0) return ret; if ((ret = drv_generic_text_bar_init(0)) != 0) return ret; drv_generic_text_bar_add_segment(0, 0, 255, 32); wc = Widget_Text; wc.draw = drv_D4D_text_draw; widget_register(&wc); wc = Widget_Icon; wc.draw = drv_generic_text_icon_draw; widget_register(&wc); wc = Widget_Bar; wc.draw = drv_D4D_bar_draw; widget_register(&wc); } AddFunction("LCD::contrast", 1, plugin_contrast); return 0; } int drv_D4D_quit(const int quiet) { /* error("drv_D4D_quit()"); */ info("%s: shutting down.", Name); if (MODE == 0) drv_generic_text_quit(); if (!NOPOWERCYCLE) { drv_D4D_clear(); } if (!quiet) { if (MODE) drv_generic_graphic_greet("goodbye!", NULL); else drv_generic_text_greet("goodbye!", NULL); } /* fade */ /*int i; for(i=CONTRAST_;i>=0;i--) { drv_D4D_contrast(i); usleep(1000); } */ if (MODE) drv_generic_graphic_quit(); if (!NOPOWERCYCLE) { char powerDown[] = { 'Y', 3, 0 }; drv_D4D_send(powerDown, sizeof(powerDown)); } debug("closing connection"); drv_D4D_close(); return (0); } DRIVER drv_D4D = { .name = Name, .list = drv_D4D_list, .init = drv_D4D_init, .quit = drv_D4D_quit, };