1
/* $Id: drv_BeckmannEgle.c 840 2007-09-09 12:17:42Z michael $
2
* $URL: https://ssl.bulix.org/svn/lcd4linux/trunk/drv_BeckmannEgle.c $
4
* driver for Beckmann+Egle "Mini Terminals" and "Compact Terminals"
5
* Copyright (C) 2000 Michael Reinelt <michael@reinelt.co.at>
6
* Copyright (C) 2004 The LCD4Linux Team <lcd4linux-devel@users.sourceforge.net>
8
* This file is part of LCD4Linux.
10
* LCD4Linux is free software; you can redistribute it and/or modify
11
* it under the terms of the GNU General Public License as published by
12
* the Free Software Foundation; either version 2, or (at your option)
15
* LCD4Linux is distributed in the hope that it will be useful,
16
* but WITHOUT ANY WARRANTY; without even the implied warranty of
17
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
18
* GNU General Public License for more details.
20
* You should have received a copy of the GNU General Public License
21
* along with this program; if not, write to the Free Software
22
* Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
30
* struct DRIVER drv_BeckmannEgle
47
#include "widget_text.h"
48
#include "widget_icon.h"
49
#include "widget_bar.h"
51
#include "drv_generic_text.h"
52
#include "drv_generic_serial.h"
57
static char Name[] = "Beckmann+Egle";
69
static MODEL Models[] = {
72
{"MT16x1", 1, 16, 1, 0},
73
{"MT16x2", 2, 16, 1, 1},
74
{"MT16x4", 4, 16, 1, 2},
75
{"MT20x1", 1, 20, 1, 3},
76
{"MT20x2", 2, 20, 1, 4},
77
{"MT20x4", 4, 20, 1, 5},
78
{"MT24x1", 1, 24, 1, 6},
79
{"MT24x2", 2, 24, 1, 7},
80
{"MT32x1", 1, 32, 1, 8},
81
{"MT32x2", 2, 32, 1, 9},
82
{"MT40x1", 1, 40, 1, 10},
83
{"MT40x2", 2, 40, 1, 11},
84
{"MT40x4", 4, 40, 1, 12},
87
{"CT20x4", 4, 20, 2, 0},
98
/****************************************/
99
/*** hardware dependant functions ***/
100
/****************************************/
102
static void drv_BuE_clear(void)
106
drv_generic_serial_write(ESC "&#", 3); /* clear display */
109
drv_generic_serial_write(ESC "LL", 3); /* clear display */
115
static void drv_BuE_MT_write(const int row, const int col, const char *data, const int len)
117
char cmd[] = ESC "[y;xH";
122
drv_generic_serial_write(cmd, 6);
123
drv_generic_serial_write(data, len);
127
static void drv_BuE_MT_defchar(const int ascii, const unsigned char *matrix)
130
char cmd[22] = ESC "&T"; /* enter transparent mode */
132
cmd[3] = '\0'; /* write cmd */
133
cmd[4] = 0x40 | 8 * ascii; /* write CGRAM */
135
for (i = 0; i < 8; i++) {
136
cmd[2 * i + 5] = '\1'; /* write data */
137
cmd[2 * i + 6] = matrix[i] & 0x1f; /* character bitmap */
139
cmd[21] = '\377'; /* leave transparent mode */
141
drv_generic_serial_write(cmd, 22);
145
static void drv_BuE_CT_write(const int row, const int col, const char *data, const int len)
147
char cmd[] = ESC "LCzs\001";
148
cmd[3] = (char) row + 1;
149
cmd[4] = (char) col + 1;
151
drv_generic_serial_write(cmd, 6);
152
drv_generic_serial_write(data, len);
157
static void drv_BuE_CT_defchar(const int ascii, const unsigned char *matrix)
160
char cmd[13] = ESC "LZ"; /* set custom char */
162
/* number of user-defined char (0..7) */
163
cmd[3] = (char) ascii - CHAR0;
165
/* ASCII code to replace */
166
cmd[4] = (char) ascii;
168
for (i = 0; i < 8; i++) {
169
cmd[i + 5] = matrix[i] & 0x1f;
172
drv_generic_serial_write(cmd, 13);
176
static int drv_BuE_CT_contrast(int contrast)
178
static char Contrast = 7;
179
char cmd[4] = ESC "LKn";
181
/* -1 is used to query the current contrast */
193
drv_generic_serial_write(cmd, 4);
199
static int drv_BuE_CT_backlight(int backlight)
201
static char Backlight = 0;
202
char cmd[4] = ESC "LBn";
204
/* -1 is used to query the current backlight */
212
Backlight = backlight;
216
drv_generic_serial_write(cmd, 4);
222
static int drv_BuE_CT_gpo(int num, int val)
224
static int GPO[8] = { -1, -1, -1, -1, -1, -1, -1, -1 };
225
char cmd[4] = ESC "Pnx";
232
/* -1 is used to query the current GPO */
245
drv_generic_serial_write(cmd, 4);
251
static int drv_BuE_CT_gpi(int num)
253
char cmd[4] = ESC "?Pn";
262
drv_generic_serial_write(cmd, 4);
266
if (drv_generic_serial_read(buffer, 4) != 4) {
267
error("%s: error reading port %d", Name, num);
275
static int drv_BuE_CT_adc(void)
279
drv_generic_serial_write(ESC "?A", 3);
283
if ((drv_generic_serial_read(buffer, 4) != 4) || (buffer[0] != 'A') || (buffer[1] != ':')
285
error("%s: error reading ADC", Name);
289
/* 10 bit value: 8 bit high, 2 bit low */
290
return 4 * (unsigned char) buffer[2] + (unsigned char) buffer[3];
294
static int drv_BuE_CT_pwm(int val)
297
char cmd[4] = ESC "Adm";
299
/* -1 is used to query the current PWM */
310
cmd[3] = val == 0 ? 1 : 2;
311
drv_generic_serial_write(cmd, 4);
317
static int drv_BuE_MT_start(const char *section)
319
char cmd[] = ESC "&sX";
321
/* CSTOPB: 2 stop bits */
322
if (drv_generic_serial_open(section, Name, CSTOPB) < 0)
325
cmd[4] = Models[Model].type;
326
drv_generic_serial_write(cmd, 4); /* select display type */
327
drv_generic_serial_write(ESC "&D", 3); /* cursor off */
333
static int drv_BuE_CT_start(const char *section)
339
if (drv_generic_serial_open(section, Name, 0) < 0)
343
/* restart terminal */
344
drv_generic_serial_write(ESC "Kr", 3);
348
/* Fixme: the CT does not return a serial number in byte mode */
349
/* set parameter mode 'decimal' */
350
drv_generic_serial_write(ESC "KM\073", 4);
353
drv_generic_serial_write(ESC "?V", 3);
355
if ((len = drv_generic_serial_read(buffer, -1 * (int) sizeof(buffer))) > 0) {
357
if (sscanf(buffer, "V:%d.%d,%d;", &v, &r, &s) != 3) {
358
error("%s: error parsing display identification <%*s>", Name, len, buffer);
360
info("%s: display identified as version %d.%d, S/N %d", Name, v, r, s);
364
/* set parameter mode 'byte' */
365
drv_generic_serial_write(ESC "KM\072", 4);
367
/* the CT20x4 can control smaller displays, too */
368
size = cfg_get(section, "Size", NULL);
369
if (size != NULL && *size != '\0') {
371
char cmd[6] = ESC "LArc";
372
if (sscanf(size, "%dx%d", &c, &r) != 2 || r < 1 || c < 1) {
373
error("%s: bad %s.Size '%s' from %s", Name, section, size, cfg_source());
376
info("%s: display size: %d rows %d columns", Name, r, c);
377
/* set display size */
380
drv_generic_serial_write(cmd, 5);
386
if (cfg_number(section, "Contrast", 7, 0, 15, &i) > 0) {
387
drv_BuE_CT_contrast(i);
391
if (cfg_number(section, "Backlight", 0, 0, 1, &i) > 0) {
392
drv_BuE_CT_backlight(i);
396
/* identify modules */
398
for (i = 0; i < 8; i++) {
399
char cmd[5] = ESC "K?Pn";
401
drv_generic_serial_write(cmd, 5); /* query I/O port */
403
if ((len = drv_generic_serial_read(buffer, 4)) == 4) {
406
if (buffer[3] == 8) {
408
type = "CT 20x4 internal port";
410
error("%s: internal error: port 0 type %d should be type 8", Name, buffer[3]);
415
case 1: /* Key Module */
416
type = "XM-KEY-2x4-LED";
418
case 8: /* I/O Module */
421
case 9: /* I/O Module */
424
case 15: /* nothing */
426
default: /* unhandled */
432
info("%s: Port %d: %s", Name, i, type);
434
error("%s: internal error: port %d unknown type %d", Name, i, cmd[3]);
437
error("%s: error fetching type of port %d", Name, i);
445
static int drv_BuE_start(const char *section)
450
model = cfg_get(section, "Model", NULL);
451
if (model == NULL && *model == '\0') {
452
error("%s: no '%s.Model' entry from %s", Name, section, cfg_source());
456
for (i = 0; Models[i].name != NULL; i++) {
457
if (strcasecmp(Models[i].name, model) == 0)
461
if (Models[i].name == NULL) {
462
error("%s: %s.Model '%s' is unknown from %s", Name, section, model, cfg_source());
467
Protocol = Models[Model].protocol;
469
info("%s: using model '%s'", Name, Models[Model].name);
471
/* initialize global variables */
472
DROWS = Models[Model].rows;
473
DCOLS = Models[Model].cols;
478
ret = drv_BuE_MT_start(section);
481
ret = drv_BuE_CT_start(section);
494
/****************************************/
496
/****************************************/
498
static void plugin_contrast(RESULT * result, const int argc, RESULT * argv[])
504
contrast = drv_BuE_CT_contrast(-1);
505
SetResult(&result, R_NUMBER, &contrast);
508
contrast = drv_BuE_CT_contrast(R2N(argv[0]));
509
SetResult(&result, R_NUMBER, &contrast);
512
error("%s::contrast(): wrong number of parameters", Name);
513
SetResult(&result, R_STRING, "");
518
static void plugin_backlight(RESULT * result, const int argc, RESULT * argv[])
524
backlight = drv_BuE_CT_backlight(-1);
525
SetResult(&result, R_NUMBER, &backlight);
528
backlight = drv_BuE_CT_backlight(R2N(argv[0]));
529
SetResult(&result, R_NUMBER, &backlight);
532
error("%s::backlight(): wrong number of parameters", Name);
533
SetResult(&result, R_STRING, "");
538
static void plugin_gpo(RESULT * result, const int argc, RESULT * argv[])
544
gpo = drv_BuE_CT_gpo(R2N(argv[0]), -1);
545
SetResult(&result, R_NUMBER, &gpo);
548
gpo = drv_BuE_CT_gpo(R2N(argv[0]), R2N(argv[1]));
549
SetResult(&result, R_NUMBER, &gpo);
552
error("%s::gpo(): wrong number of parameters", Name);
553
SetResult(&result, R_STRING, "");
558
static void plugin_gpi(RESULT * result, RESULT * arg1)
562
gpi = drv_BuE_CT_gpi(R2N(arg1));
563
SetResult(&result, R_NUMBER, &gpi);
567
static void plugin_adc(RESULT * result)
571
adc = drv_BuE_CT_adc();
572
SetResult(&result, R_NUMBER, &adc);
576
static void plugin_pwm(RESULT * result, const int argc, RESULT * argv[])
582
pwm = drv_BuE_CT_pwm(-1);
583
SetResult(&result, R_NUMBER, &pwm);
586
pwm = drv_BuE_CT_pwm(R2N(argv[0]));
587
SetResult(&result, R_NUMBER, &pwm);
590
error("%s::pwm(): wrong number of parameters", Name);
591
SetResult(&result, R_STRING, "");
596
/****************************************/
597
/*** widget callbacks ***/
598
/****************************************/
600
/* using drv_generic_text_draw(W) */
601
/* using drv_generic_text_icon_draw(W) */
602
/* using drv_generic_text_bar_draw(W) */
605
/****************************************/
606
/*** exported functions ***/
607
/****************************************/
611
int drv_BuE_list(void)
615
for (i = 0; Models[i].name != NULL; i++) {
616
printf("%s ", Models[i].name);
622
/* initialize driver & display */
623
int drv_BuE_init(const char *section, const int quiet)
628
info("%s: %s", Name, "$Rev: 840 $");
631
if ((ret = drv_BuE_start(section)) != 0) {
635
/* display preferences */
636
XRES = 5; /* pixel width of one char */
637
YRES = 8; /* pixel height of one char */
638
CHARS = 8; /* number of user-defineable characters */
640
/* real worker functions */
643
CHAR0 = 0; /* ASCII of first user-defineable char */
644
GOTO_COST = 6; /* number of bytes a goto command requires */
645
drv_generic_text_real_write = drv_BuE_MT_write;
646
drv_generic_text_real_defchar = drv_BuE_MT_defchar;
649
CHAR0 = 128; /* ASCII of first user-defineable char */
650
GOTO_COST = 6; /* number of bytes a goto command requires */
651
drv_generic_text_real_write = drv_BuE_CT_write;
652
drv_generic_text_real_defchar = drv_BuE_CT_defchar;
658
qprintf(buffer, sizeof(buffer), "%s %s", Name, Models[Model].name);
659
if (drv_generic_text_greet(buffer, "www.bue.com")) {
665
/* initialize generic text driver */
666
if ((ret = drv_generic_text_init(section, Name)) != 0)
669
/* initialize generic icon driver */
670
if ((ret = drv_generic_text_icon_init()) != 0)
673
/* initialize generic bar driver */
674
if ((ret = drv_generic_text_bar_init(0)) != 0)
677
/* add fixed chars to the bar driver */
678
drv_generic_text_bar_add_segment(0, 0, 255, 32); /* ASCII 32 = blank */
679
drv_generic_text_bar_add_segment(255, 255, 255, 255); /* ASCII 255 = block */
681
/* register text widget */
683
wc.draw = drv_generic_text_draw;
684
widget_register(&wc);
686
/* register icon widget */
688
wc.draw = drv_generic_text_icon_draw;
689
widget_register(&wc);
691
/* register bar widget */
693
wc.draw = drv_generic_text_bar_draw;
694
widget_register(&wc);
696
/* register plugins */
697
AddFunction("LCD::contrast", -1, plugin_contrast);
698
AddFunction("LCD::backlight", -1, plugin_backlight);
699
AddFunction("LCD::gpo", -1, plugin_gpo);
700
AddFunction("LCD::gpi", 1, plugin_gpi);
701
AddFunction("LCD::adc", 0, plugin_adc);
702
AddFunction("LCD::pwm", -1, plugin_pwm);
708
/* close driver & display */
709
int drv_BuE_quit(const int quiet)
712
info("%s: shutting down.", Name);
714
drv_generic_text_quit();
721
drv_generic_text_greet("goodbye!", NULL);
724
drv_generic_serial_close();
730
DRIVER drv_BeckmannEgle = {
732
.list = drv_BuE_list,
733
.init = drv_BuE_init,
734
.quit = drv_BuE_quit,