/* $Id: drv_T6963.c,v 1.15 2005/05/05 08:36:12 reinelt Exp $
*
* new style driver for T6963-based displays
*
* Copyright (C) 2003 Michael Reinelt <reinelt@eunet.at>
* Copyright (C) 2004 The LCD4Linux Team <lcd4linux-devel@users.sourceforge.net>
*
* 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.
*
*
* $Log: drv_T6963.c,v $
* Revision 1.15 2005/05/05 08:36:12 reinelt
* changed SELECT to SLCTIN
*
* Revision 1.14 2005/01/18 06:30:23 reinelt
* added (C) to all copyright statements
*
* Revision 1.13 2004/12/22 20:24:02 reinelt
* T6963 fix for displays > 8 rows
*
* Revision 1.12 2004/06/26 12:04:59 reinelt
*
* uh-oh... the last CVS log message messed up things a lot...
*
* Revision 1.11 2004/06/26 09:27:21 reinelt
*
* added '-W' to CFLAGS
* changed all C++ comments to C ones
* cleaned up a lot of signed/unsigned mistakes
*
* Revision 1.10 2004/06/20 10:09:54 reinelt
*
* 'const'ified the whole source
*
* Revision 1.9 2004/06/17 06:23:39 reinelt
*
* hash handling rewritten to solve performance issues
*
* Revision 1.8 2004/06/09 06:40:29 reinelt
*
* splash screen for T6963 driver
*
* Revision 1.7 2004/06/06 06:51:59 reinelt
*
* do not display end splash screen if quiet=1
*
* Revision 1.6 2004/06/02 09:41:19 reinelt
*
* prepared support for startup splash screen
*
* Revision 1.5 2004/06/01 06:45:30 reinelt
*
* some Fixme's processed
* documented some code
*
* Revision 1.4 2004/02/24 05:55:04 reinelt
*
* X11 driver ported
*
* Revision 1.3 2004/02/22 17:35:41 reinelt
* some fixes for generic graphic driver and T6963
* removed ^M from plugin_imon (Nico, are you editing under Windows?)
*
* Revision 1.2 2004/02/18 06:39:20 reinelt
* T6963 driver for graphic displays finished
*
* Revision 1.1 2004/02/15 21:43:43 reinelt
* T6963 driver nearly finished
* framework for graphic displays done
* i2c_sensors patch from Xavier
* some more old generation files removed
*
*/
/*
*
* exported fuctions:
*
* struct DRIVER drv_T6963
*
*/
#include "config.h"
#include <stdlib.h>
#include <stdio.h>
#include <string.h>
#include <errno.h>
#include <unistd.h>
#include <termios.h>
#include <fcntl.h>
#include <sys/time.h>
#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_graphic.h"
#include "drv_generic_parport.h"
#ifdef WITH_DMALLOC
#include <dmalloc.h>
#endif
static char Name[]="T6963";
static int Model;
typedef struct {
int type;
char *name;
} MODEL;
static MODEL Models[] = {
{ 0x01, "generic" },
{ 0xff, "Unknown" }
};
static unsigned char SIGNAL_CE;
static unsigned char SIGNAL_CD;
static unsigned char SIGNAL_RD;
static unsigned char SIGNAL_WR;
unsigned char *Buffer1, *Buffer2;
static int bug=0;
/****************************************/
/*** hardware dependant functions ***/
/****************************************/
/* perform normal status check */
static void drv_T6_status1 (void)
{
int n;
/* turn off data line drivers */
drv_generic_parport_direction (1);
/* lower CE and RD */
drv_generic_parport_control (SIGNAL_CE | SIGNAL_RD, 0);
/* Access Time: 150 ns */
ndelay(150);
/* wait for STA0=1 and STA1=1 */
n=0;
do {
rep_nop();
if (++n>1000) {
debug("hang in status1");
bug=1;
break;
}
} while ((drv_generic_parport_read() & 0x03) != 0x03);
/* rise RD and CE */
drv_generic_parport_control (SIGNAL_RD | SIGNAL_CE, SIGNAL_RD | SIGNAL_CE);
/* Output Hold Time: 50 ns */
ndelay(50);
/* turn on data line drivers */
drv_generic_parport_direction (0);
}
/* perform status check in "auto mode" */
static void drv_T6_status2 (void)
{
int n;
/* turn off data line drivers */
drv_generic_parport_direction (1);
/* lower RD and CE */
drv_generic_parport_control (SIGNAL_RD | SIGNAL_CE, 0);
/* Access Time: 150 ns */
ndelay(150);
/* wait for STA3=1 */
n=0;
do {
rep_nop();
if (++n>1000) {
debug("hang in status2");
bug=1;
break;
}
} while ((drv_generic_parport_read() & 0x08) != 0x08);
/* rise RD and CE */
drv_generic_parport_control (SIGNAL_RD | SIGNAL_CE, SIGNAL_RD | SIGNAL_CE);
/* Output Hold Time: 50 ns */
ndelay(50);
/* turn on data line drivers */
drv_generic_parport_direction (0);
}
static void drv_T6_write_cmd (const unsigned char cmd)
{
/* wait until the T6963 is idle */
drv_T6_status1();
/* put data on DB1..DB8 */
drv_generic_parport_data (cmd);
/* lower WR and CE */
drv_generic_parport_control (SIGNAL_WR | SIGNAL_CE, 0);
/* Pulse width */
ndelay(80);
/* rise WR and CE */
drv_generic_parport_control (SIGNAL_WR | SIGNAL_CE, SIGNAL_WR | SIGNAL_CE);
/* Data Hold Time */
ndelay(40);
}
static void drv_T6_write_data (const unsigned char data)
{
/* wait until the T6963 is idle */
drv_T6_status1();
/* put data on DB1..DB8 */
drv_generic_parport_data (data);
/* lower C/D */
drv_generic_parport_control (SIGNAL_CD, 0);
/* C/D Setup Time */
ndelay(20);
/* lower WR and CE */
drv_generic_parport_control (SIGNAL_WR | SIGNAL_CE, 0);
/* Pulse Width */
ndelay(80);
/* rise WR and CE */
drv_generic_parport_control (SIGNAL_WR | SIGNAL_CE, SIGNAL_WR | SIGNAL_CE);
/* Data Hold Time */
ndelay(40);
/* rise CD */
drv_generic_parport_control (SIGNAL_CD, SIGNAL_CD);
}
static void drv_T6_write_auto (const unsigned char data)
{
/* wait until the T6963 is idle */
drv_T6_status2();
/* put data on DB1..DB8 */
drv_generic_parport_data (data);
/* lower C/D */
drv_generic_parport_control (SIGNAL_CD, 0);
/* C/D Setup Time */
ndelay(20);
/* lower WR and CE */
drv_generic_parport_control (SIGNAL_WR | SIGNAL_CE, 0);
/* Pulse Width */
ndelay(80);
/* rise WR and CE */
drv_generic_parport_control (SIGNAL_WR | SIGNAL_CE, SIGNAL_WR | SIGNAL_CE);
/* Data Hold Time */
ndelay(40);
/* rise CD */
drv_generic_parport_control (SIGNAL_CD, SIGNAL_CD);
}
#if 0 /* not used */
static void drv_T6_send_byte (const unsigned char cmd, const unsigned char data)
{
drv_T6_write_data(data);
drv_T6_write_cmd(cmd);
}
#endif
static void drv_T6_send_word (const unsigned char cmd, const unsigned short data)
{
drv_T6_write_data(data&0xff);
drv_T6_write_data(data>>8);
drv_T6_write_cmd(cmd);
}
static void drv_T6_clear(const unsigned short addr, const int len)
{
int i;
drv_T6_send_word (0x24, addr); /* Set Adress Pointer */
drv_T6_write_cmd(0xb0); /* Set Data Auto Write */
for (i=0; i<len; i++) {
drv_T6_write_auto(0);
if (bug) {
bug=0;
debug("bug occured at byte %d of %d", i, len);
}
}
drv_T6_status2();
drv_T6_write_cmd(0xb2); /* Auto Reset */
}
static void drv_T6_copy(const unsigned short addr, const unsigned char *data, const int len)
{
int i;
drv_T6_send_word (0x24, 0x0200+addr); /* Set Adress Pointer */
drv_T6_write_cmd(0xb0); /* Set Data Auto Write */
for (i=0; i<len; i++) {
drv_T6_write_auto(*(data++));
if (bug) {
bug=0;
debug("bug occured at byte %d of %d, addr=%d", i, len, addr);
}
}
drv_T6_status2();
drv_T6_write_cmd(0xb2); /* Auto Reset */
}
static void drv_T6_blit(const int row, const int col, const int height, const int width)
{
int i, j, e, m;
int r, c;
for (r = row; r < row + height; r++) {
for (c = col; c < col + width; c++) {
unsigned char mask = 1 << (XRES - 1 - c % XRES);
if (drv_generic_graphic_FB[r * LCOLS + c]) {
/* set bit */
Buffer1[(r * DCOLS + c) / XRES] |= mask;
} else {
/* clear bit */
Buffer1[(r * DCOLS + c) / XRES] &= ~mask;
}
}
}
/* upper half */
/* max address */
if (row + height - 1 < 64) {
m = ((row + height - 1) * DCOLS + col + width) / XRES;
} else {
m = ( 64 * DCOLS + col + width) / XRES;
}
for (i = (row * DCOLS + col) / XRES; i <= m; i++) {
if (Buffer1[i] == Buffer2[i]) continue;
for (j = i, e = 0; i <= m; i++) {
if (Buffer1[i] == Buffer2[i]) {
if (++e > 4) break;
} else {
e = 0;
}
}
memcpy (Buffer2 + j, Buffer1 + j, i - j - e + 1);
drv_T6_copy (j, Buffer1 + j, i - j - e + 1);
}
/* lower half */
/* max address */
m = ((row + height - 1) * DCOLS + col + width) / XRES;
for (i = (64 * DCOLS + col) / XRES; i <= m; i++) {
if (Buffer1[i] == Buffer2[i]) continue;
for (j = i, e = 0; i <= m; i++) {
if (Buffer1[i] == Buffer2[i]) {
if (++e > 4) break;
} else {
e = 0;
}
}
memcpy (Buffer2 + j, Buffer1 + j, i - j - e + 1);
drv_T6_copy (j, Buffer1 + j, i - j - e + 1);
}
}
static int drv_T6_start (const char *section)
{
char *model, *s;
int rows, TROWS, TCOLS;
model=cfg_get(section, "Model", "generic");
if (model!=NULL && *model!='\0') {
int i;
for (i=0; Models[i].type!=0xff; i++) {
if (strcasecmp(Models[i].name, model)==0) break;
}
if (Models[i].type==0xff) {
error ("%s: %s.Model '%s' is unknown from %s", Name, section, model, cfg_source());
return -1;
}
Model=i;
info ("%s: using model '%s'", Name, Models[Model].name);
} else {
error ("%s: empty '%s.Model' entry from %s", Name, section, cfg_source());
return -1;
}
/* read display size from config */
s=cfg_get(section, "Size", NULL);
if (s==NULL || *s=='\0') {
error ("%s: no '%s.Size' entry from %s", Name, section, cfg_source());
return -1;
}
DROWS = -1;
DCOLS = -1;
if (sscanf(s, "%dx%d", &DCOLS, &DROWS)!=2 || DCOLS<1 || DROWS<1) {
error ("%s: bad Size '%s' from %s", Name, s, cfg_source());
return -1;
}
s=cfg_get(section, "Font", "6x8");
if (s==NULL || *s=='\0') {
error ("%s: no '%s.Font' entry from %s", Name, section, cfg_source());
return -1;
}
XRES = -1;
YRES = -1;
if (sscanf(s, "%dx%d", &XRES, &YRES)!=2 || XRES<1 || YRES<1) {
error ("%s: bad Font '%s' from %s", Name, s, cfg_source());
return -1;
}
/* Fixme: provider other fonts someday... */
if (XRES!=6 && YRES!=8) {
error ("%s: bad Font '%s' from %s (only 6x8 at the moment)", Name, s, cfg_source());
return -1;
}
TROWS=DROWS/YRES; /* text rows */
TCOLS=DCOLS/XRES; /* text cols */
Buffer1=malloc(TCOLS*DROWS);
if (Buffer1==NULL) {
error ("%s: framebuffer #1 could not be allocated: malloc() failed", Name);
return -1;
}
debug ("malloc buffer 2 (%d*%d)=%d", TCOLS, DROWS, TCOLS*DROWS);
Buffer2=malloc(TCOLS*DROWS);
if (Buffer2==NULL) {
error ("%s: framebuffer #2 could not be allocated: malloc() failed", Name);
return -1;
}
memset(Buffer1,0,TCOLS*DROWS*sizeof(*Buffer1));
memset(Buffer2,0,TCOLS*DROWS*sizeof(*Buffer2));
if (drv_generic_parport_open(section, Name) != 0) {
error ("%s: could not initialize parallel port!", Name);
return -1;
}
if ((SIGNAL_CE=drv_generic_parport_wire_ctrl ("CE", "STROBE"))==0xff) return -1;
if ((SIGNAL_CD=drv_generic_parport_wire_ctrl ("CD", "SLCTIN"))==0xff) return -1;
if ((SIGNAL_RD=drv_generic_parport_wire_ctrl ("RD", "AUTOFD"))==0xff) return -1;
if ((SIGNAL_WR=drv_generic_parport_wire_ctrl ("WR", "INIT") )==0xff) return -1;
/* rise CE, CD, RD and WR */
drv_generic_parport_control (SIGNAL_CE | SIGNAL_CD | SIGNAL_RD | SIGNAL_WR,
SIGNAL_CE | SIGNAL_CD | SIGNAL_RD | SIGNAL_WR);
/* set direction: write */
drv_generic_parport_direction (0);
/* initialize display */
drv_T6_send_word (0x40, 0x0000); /* Set Text Home Address */
drv_T6_send_word (0x41, TCOLS); /* Set Text Area */
drv_T6_send_word (0x42, 0x0200); /* Set Graphic Home Address */
drv_T6_send_word (0x43, TCOLS); /* Set Graphic Area */
drv_T6_write_cmd (0x80); /* Mode Set: OR mode, Internal CG RAM mode */
drv_T6_send_word (0x22, 0x0002); /* Set Offset Register */
drv_T6_write_cmd (0x98); /* Set Display Mode: Curser off, Text off, Graphics on */
drv_T6_write_cmd (0xa0); /* Set Cursor Pattern: 1 line cursor */
drv_T6_send_word (0x21, 0x0000); /* Set Cursor Pointer to (0,0) */
/* clear display */
/* upper half */
rows=TROWS>8?8:TROWS;
drv_T6_clear(0x0000, TCOLS*rows); /* clear text area */
drv_T6_clear(0x0200, TCOLS*rows*8); /* clear graphic area */
/* lower half */
if (TROWS>8) {
rows=TROWS-8;
drv_T6_clear(0x8000, TCOLS*rows); /* clear text area #2 */
drv_T6_clear(0x8200, TCOLS*rows*8); /* clear graphic area #2 */
}
return 0;
}
/****************************************/
/*** plugins ***/
/****************************************/
/* none at the moment... */
/****************************************/
/*** widget callbacks ***/
/****************************************/
/* using drv_generic_graphic_draw(W) */
/* using drv_generic_graphic_icon_draw(W) */
/* using drv_generic_graphic_bar_draw(W) */
/****************************************/
/*** exported functions ***/
/****************************************/
/* list models */
int drv_T6_list (void)
{
int i;
for (i=0; Models[i].type!=0xff; i++) {
printf ("%s ", Models[i].name);
}
return 0;
}
/* initialize driver & display */
int drv_T6_init (const char *section, const int quiet)
{
WIDGET_CLASS wc;
int ret;
/* real worker functions */
drv_generic_graphic_real_blit = drv_T6_blit;
/* start display */
if ((ret=drv_T6_start (section))!=0)
return ret;
/* initialize generic graphic driver */
if ((ret=drv_generic_graphic_init(section, Name))!=0)
return ret;
if (!quiet) {
char buffer[40];
qprintf(buffer, sizeof(buffer), "%s %dx%d", Name, DCOLS, DROWS);
if (drv_generic_graphic_greet (buffer, NULL)) {
sleep (3);
drv_generic_graphic_clear();
}
}
/* register text widget */
wc=Widget_Text;
wc.draw=drv_generic_graphic_draw;
widget_register(&wc);
/* register icon widget */
wc=Widget_Icon;
wc.draw=drv_generic_graphic_icon_draw;
widget_register(&wc);
/* register bar widget */
wc=Widget_Bar;
wc.draw=drv_generic_graphic_bar_draw;
widget_register(&wc);
/* register plugins */
/* none at the moment... */
return 0;
}
/* close driver & display */
int drv_T6_quit (const int quiet) {
info("%s: shutting down.", Name);
drv_generic_graphic_clear();
if (!quiet) {
drv_generic_graphic_greet ("goodbye!", NULL);
}
drv_generic_graphic_quit();
drv_generic_parport_close();
if (Buffer1) {
free (Buffer1);
Buffer1=NULL;
}
if (Buffer2) {
free (Buffer2);
Buffer2=NULL;
}
return (0);
}
DRIVER drv_T6963 = {
name: Name,
list: drv_T6_list,
init: drv_T6_init,
quit: drv_T6_quit,
};