945 lines
20 KiB
C
945 lines
20 KiB
C
/*
|
|
* A braille interface to unix tty terminals
|
|
*
|
|
* Authors: Hadi Bargi Rangin bargi@dots.physics.orst.edu
|
|
* Bill Barry barryb@dots.physics.orst.edu
|
|
*
|
|
* Copyright (c) 1995 by Science Access Project, Oregon State University.
|
|
*
|
|
*
|
|
* This program 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 3, or (at your option)
|
|
* any later version.
|
|
*
|
|
* This program 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 (see the file COPYING); if not, see
|
|
* https://www.gnu.org/licenses/, or contact Free Software Foundation, Inc.,
|
|
* 51 Franklin Street, Fifth Floor, Boston, MA 02111-1301 USA
|
|
*
|
|
****************************************************************
|
|
*/
|
|
|
|
#include <stdio.h>
|
|
#include <fcntl.h>
|
|
#include <sys/stat.h>
|
|
|
|
#include "config.h"
|
|
#include "screen.h"
|
|
#include "extern.h"
|
|
#include "braille.h"
|
|
|
|
#ifdef HAVE_BRAILLE
|
|
|
|
|
|
extern int bd_init_powerbraille_40 __P((void));
|
|
extern int bd_init_powerbraille_80 __P((void));
|
|
extern int bd_init_navigator_40 __P((void));
|
|
|
|
extern struct layer *flayer;
|
|
extern struct display *displays, *display;
|
|
extern char *rc_name;
|
|
|
|
|
|
|
|
|
|
/* global variables */
|
|
|
|
struct braille_display bd;
|
|
|
|
struct bd_type {
|
|
char *name;
|
|
int (*init) __P((void));
|
|
};
|
|
|
|
static struct bd_type bd_typelist[] =
|
|
{
|
|
{"powerbraille_40", bd_init_powerbraille_40},
|
|
{"powerbraille_80", bd_init_powerbraille_80},
|
|
{"navigator_40" , bd_init_navigator_40}
|
|
};
|
|
|
|
static void position_braille_cursor __P((void));
|
|
static int initialize_braille_display_type __P((char *));
|
|
static int open_braille_device __P(());
|
|
static int load_braille_table __P((char *));
|
|
static void bd_signal __P((void));
|
|
static void bd_bc_left __P((void));
|
|
static void bd_bc_right __P((void));
|
|
static void bd_bc_up __P((void));
|
|
static void bd_bc_down __P((void));
|
|
static void bd_upper_left __P((void));
|
|
static void bd_upper_right __P((void));
|
|
static void bd_lower_left __P((void));
|
|
static void bd_lower_right __P((void));
|
|
static int bd_do_search __P((int, int, int));
|
|
static void bd_normalize __P((int, int));
|
|
static void bd_readev_fn __P((struct event *, char *));
|
|
static void bd_writeev_fn __P((struct event *, char *));
|
|
static void bd_selectev_fn __P((struct event *, char *));
|
|
|
|
static unsigned char btable_local [] =
|
|
{
|
|
0xC8,0xC1,0xC3,0xC9,0xD9,0xD1,0xCB,0xDB,
|
|
0xD3,0xCA,0xDA,0xC5,0xC7,0xCD,0xDD,0xD5,
|
|
0xCF,0xDF,0xD7,0xCE,0xDE,0xE5,0xE7,0xFA,
|
|
0xED,0xFD,0xF5,0xEA,0xF3,0xFB,0xD8,0xF8,
|
|
0x00,0x2E,0x10,0x3C,0x2B,0x29,0x2F,0x04,
|
|
0x37,0x3E,0x21,0x2C,0x20,0x24,0x28,0x0C,
|
|
0x34,0x02,0x06,0x12,0x32,0x22,0x16,0x36,
|
|
0x26,0x14,0x31,0x30,0x23,0x3F,0x1C,0x39,
|
|
0x48,0x41,0x43,0x49,0x59,0x51,0x4B,0x5B,
|
|
0x53,0x4A,0x5A,0x45,0x47,0x4D,0x5D,0x55,
|
|
0x4F,0x5F,0x57,0x4E,0x5E,0x65,0x67,0x7A,
|
|
0x6D,0x7D,0x75,0x6A,0x73,0x7B,0x58,0x38,
|
|
0x08,0x01,0x03,0x09,0x19,0x11,0x0B,0x1B,
|
|
0x13,0x0A,0x1A,0x05,0x07,0x0D,0x1D,0x15,
|
|
0x0F,0x1F,0x17,0x0E,0x1E,0x25,0x27,0x3A,
|
|
0x2D,0x3D,0x35,0x2A,0x33,0x3B,0x18,0x78,
|
|
0x88,0x81,0x83,0x89,0x99,0x91,0x8B,0x9B,
|
|
0x93,0x8A,0x9A,0x85,0x87,0x8D,0x9D,0x95,
|
|
0x8F,0x9F,0x97,0x8E,0x9E,0xA5,0xA7,0xBA,
|
|
0xAD,0xBD,0xB5,0xAA,0xB3,0xBB,0x98,0xB8,
|
|
0x40,0x6E,0x50,0x7C,0x6B,0x69,0x6F,0x44,
|
|
0x77,0x7E,0x61,0x6C,0x60,0x64,0x68,0x4C,
|
|
0x74,0x42,0x46,0x52,0x72,0x62,0x56,0x76,
|
|
0x66,0x54,0x71,0x70,0x63,0x7F,0x5C,0x79,
|
|
0xC0,0xEE,0xD0,0xFC,0xEB,0xE9,0xEF,0xC4,
|
|
0xF7,0xFE,0xE1,0xEC,0xE0,0xE4,0xE8,0xCC,
|
|
0xF4,0xC2,0xC6,0xD2,0xF2,0xE2,0xD6,0xF6,
|
|
0xE6,0xD4,0xF1,0xF0,0xE3,0xFF,0xDC,0xF9,
|
|
0x80,0xAE,0x90,0xBC,0xAB,0xA9,0xAF,0x84,
|
|
0xB7,0xBE,0xA1,0xAC,0xA0,0xA4,0xA8,0x8C,
|
|
0xB4,0x82,0x86,0x92,0xB2,0xA2,0x96,0xB6,
|
|
0xA6,0x94,0xB1,0xB0,0xA3,0xBF,0x9C,0xB9
|
|
};
|
|
|
|
void
|
|
InitBraille()
|
|
{
|
|
bd.bd_start_braille=0;
|
|
bd.bd_port = 0;
|
|
bd.bd_braille_table = SaveStr("internal us-braille.tbl");
|
|
bd.bd_type = 0;
|
|
bd.bd_baud = 9600;
|
|
bd.bd_bell = 1;
|
|
bd.bd_eightdot = 1;
|
|
bd.bd_info = 0;
|
|
bd.bd_link = 1;
|
|
bd.bd_ncells = 0;
|
|
bd.bd_width = 0;
|
|
bd.bd_ncrc = 1;
|
|
bd.bd_scroll = 1;
|
|
bd.bd_skip = 0;
|
|
bd.bd_using_braille = 0;
|
|
bd.bd_obuflen = 0;
|
|
bd.bd_fd = -1;
|
|
bcopy((char *)btable_local, bd.bd_btable, 256);
|
|
}
|
|
|
|
static int
|
|
initialize_braille_display_type(s)
|
|
char *s;
|
|
{
|
|
int i;
|
|
|
|
for (i = 0; i < sizeof(bd_typelist)/sizeof(*bd_typelist); i++)
|
|
if (!strcmp(s, bd_typelist[i].name))
|
|
break;
|
|
if (i == sizeof(bd_typelist)/sizeof(*bd_typelist))
|
|
{
|
|
Msg(0, "No entry for bd_type: %s ", s);
|
|
return -1;
|
|
}
|
|
bd.bd_type = bd_typelist[i].name;
|
|
if ((*bd_typelist[i].init)())
|
|
return -1;
|
|
|
|
if (!bd.bd_width)
|
|
bd.bd_width = bd.bd_ncells;
|
|
|
|
return 0;
|
|
}
|
|
|
|
void
|
|
StartBraille()
|
|
{
|
|
bd.bd_dpy = displays;
|
|
|
|
debug("StartBraille called\n");
|
|
evdeq(&bd.bd_readev);
|
|
evdeq(&bd.bd_writeev);
|
|
evdeq(&bd.bd_selectev);
|
|
bd.bd_using_braille = 0;
|
|
|
|
if (!bd.bd_start_braille)
|
|
return;
|
|
|
|
if (bd.bd_type == 0 || bd.bd_port == 0)
|
|
return;
|
|
|
|
if (bd.bd_fd < 0 && open_braille_device())
|
|
{
|
|
Msg(0, "bd_port turned off");
|
|
free(bd.bd_port);
|
|
bd.bd_port = 0;
|
|
return;
|
|
}
|
|
|
|
/* check if braille display is connected and turned on */
|
|
if (bd.bd_response_test())
|
|
{
|
|
Msg(0, "Make sure that braille display is connected and turned on. ");
|
|
Msg(0, "start_braille turned off");
|
|
bd.bd_start_braille = 0;
|
|
}
|
|
else
|
|
{
|
|
bd.bd_using_braille = 1;
|
|
bd.bd_readev.fd = bd.bd_writeev.fd = bd.bd_fd;
|
|
bd.bd_readev.type = EV_READ;
|
|
bd.bd_writeev.type = EV_WRITE;
|
|
bd.bd_selectev.type = EV_ALWAYS;
|
|
bd.bd_readev.data = bd.bd_writeev.data = bd.bd_selectev.data = (char *)&bd;
|
|
bd.bd_readev.handler = bd_readev_fn;
|
|
bd.bd_writeev.handler = bd_writeev_fn;
|
|
bd.bd_selectev.handler = bd_selectev_fn;
|
|
evenq(&bd.bd_readev);
|
|
bd.bd_writeev.condpos = &bd.bd_obuflen;
|
|
bd.bd_writeev.condneg = 0;
|
|
evenq(&bd.bd_writeev);
|
|
bd.bd_selectev.pri = -20;
|
|
evenq(&bd.bd_selectev);
|
|
}
|
|
}
|
|
|
|
|
|
static int
|
|
load_braille_table(tablename)
|
|
char *tablename;
|
|
{
|
|
int i, j, c, p;
|
|
FILE *fp;
|
|
char buffer[80], a[10];
|
|
|
|
if ((fp = secfopen(tablename, "r")) == 0)
|
|
{
|
|
Msg(errno, "Braille table not found: %s ", tablename);
|
|
return -1;
|
|
}
|
|
bzero(bd.bd_btable, 256);
|
|
/* format:
|
|
* Dec Hex Braille Description
|
|
* 7 07 (12-45--8) BEL
|
|
*/
|
|
while (fgets(buffer, sizeof(buffer), fp))
|
|
{
|
|
if (buffer[0] == '#')
|
|
continue;
|
|
sscanf(buffer,"%d %x %8s", &i, &j, a);
|
|
if (i < 0 || i > 255)
|
|
continue;
|
|
for (j=1, p=1, c=0; j<9; j++, p*=2)
|
|
if (a[j] == '0' + j)
|
|
c += p;
|
|
bd.bd_btable[i] = c;
|
|
}
|
|
fclose(fp);
|
|
return 0;
|
|
}
|
|
|
|
|
|
static int
|
|
open_braille_device(s)
|
|
char *s;
|
|
{
|
|
char str[256];
|
|
|
|
sprintf(str, "%d cs8 -istrip ixon ixoff", bd.bd_baud);
|
|
bd.bd_fd = OpenTTY(bd.bd_port, str);
|
|
if (bd.bd_fd == -1)
|
|
{
|
|
Msg(errno, "open comm port failed: %s ", bd.bd_port);
|
|
return -1;
|
|
}
|
|
fcntl(bd.bd_fd, F_SETFL, FNBLOCK);
|
|
return 0;
|
|
}
|
|
|
|
|
|
static void
|
|
position_braille_cursor()
|
|
{
|
|
int sx = bd.bd_sx;
|
|
int bx = BD_FORE->w_bd_x;
|
|
int eol = BD_FORE->w_width;
|
|
int w = bd.bd_width;
|
|
|
|
if (bd.bd_scroll)
|
|
bx = sx - w + bd.bd_ncrc; /* keep rc centered in window */
|
|
else
|
|
bx = w * (int)(sx / w); /* increase bc in integral steps */
|
|
|
|
if (bx > eol - w)
|
|
bx = eol - w;
|
|
if (bx < 0)
|
|
bx = 0;
|
|
BD_FORE->w_bd_x = bx;
|
|
BD_FORE->w_bd_y = bd.bd_sy;
|
|
}
|
|
|
|
|
|
void
|
|
RefreshBraille()
|
|
{
|
|
int i, y, xs, xe;
|
|
int cursor_pos;
|
|
|
|
if (!bd.bd_using_braille)
|
|
return;
|
|
if (!BD_FORE)
|
|
return;
|
|
bcopy(bd.bd_line, bd.bd_oline, bd.bd_ncells);
|
|
bd.bd_refreshing = 1;
|
|
flayer = bd.bd_dpy->d_forecv->c_layer;
|
|
bd.bd_sx = flayer->l_x;
|
|
bd.bd_sy = flayer->l_y;
|
|
display = bd.bd_dpy;
|
|
if ((D_obufp != D_obuf) && bd.bd_link)
|
|
{
|
|
/* jump to real cursor */
|
|
debug("calling position_braille_cursor\n");
|
|
position_braille_cursor();
|
|
}
|
|
bclear(bd.bd_line, bd.bd_ncells);
|
|
|
|
y = BD_FORE->w_bd_y;
|
|
xs = BD_FORE->w_bd_x;
|
|
|
|
if (bd.bd_info & 1)
|
|
{
|
|
sprintf(bd.bd_line, "%02d%02d", (BD_FORE->w_bd_x + 1) % 100, (BD_FORE->w_bd_y + 1) % 100);
|
|
bd.bd_line[4] = ' ';
|
|
}
|
|
if (bd.bd_info & 2)
|
|
{
|
|
sprintf(bd.bd_line + bd.bd_ncells - 4, "%02d%02d",(bd.bd_sx +1) % 100, (bd.bd_sy +1) % 100);
|
|
}
|
|
|
|
xe = xs + bd.bd_width - 1;
|
|
|
|
if (xs > flayer->l_width - 1)
|
|
xs = flayer->l_width - 1;
|
|
if (xe > flayer->l_width - 1)
|
|
xe = flayer->l_width - 1;
|
|
|
|
if (D_status)
|
|
{
|
|
sprintf(bd.bd_line, "**%-*.*s", bd.bd_ncells - 2, bd.bd_ncells - 2, D_status_lastmsg ? D_status_lastmsg : "unknown msg");
|
|
xs = xe = -1;
|
|
}
|
|
else if (xs <= xe)
|
|
{
|
|
LayRedisplayLine(-1, xs, xe, 1);
|
|
LayRedisplayLine(y, xs, xe, 1);
|
|
}
|
|
|
|
debug1("Braille: got >%s<\n", bd.bd_line);
|
|
|
|
bd.bd_refreshing = 0;
|
|
|
|
if (y == bd.bd_sy && xs <= bd.bd_sx && bd.bd_sx <= xe)
|
|
cursor_pos = bd.bd_sx - xs + (bd.bd_info & 1 ? 4 : 0);
|
|
else
|
|
cursor_pos = bd.bd_ncells;
|
|
for (i = 0; i < bd.bd_ncells; i++)
|
|
if (bd.bd_line[i] != bd.bd_oline[i])
|
|
break;
|
|
if (bd.bd_cursorpos != cursor_pos || i < bd.bd_ncells)
|
|
bd.write_line_braille(bd.bd_line, bd.bd_ncells, cursor_pos);
|
|
bd.bd_cursorpos = cursor_pos;
|
|
}
|
|
|
|
|
|
/**********************************************************************
|
|
*
|
|
*/
|
|
|
|
/*
|
|
* So, why is there a Flush() down below? The reason is simple: the
|
|
* cursor warp (if bd_link is on) checks the obuf to see if something
|
|
* happened. If there would be no Flush, screen would warp the
|
|
* bd cursor if a bd movement command tries to ring the bell.
|
|
* (In other words: this is a gross hack!)
|
|
*/
|
|
static void
|
|
bd_signal()
|
|
{
|
|
if (!bd.bd_bell)
|
|
return;
|
|
display = bd.bd_dpy;
|
|
if (D_obufp != D_obuf)
|
|
AddCStr(D_BL);
|
|
else
|
|
{
|
|
AddCStr(D_BL);
|
|
Flush(0);
|
|
}
|
|
}
|
|
|
|
static int
|
|
bd_do_search(y, xs, xe)
|
|
int y, xs, xe;
|
|
{
|
|
int oy = BD_FORE->w_bd_y;
|
|
|
|
if (!bd.bd_skip) /* no skip mode, found it */
|
|
{
|
|
if (xs > xe)
|
|
return 0;
|
|
bd.bd_searchmin = xs;
|
|
bd.bd_searchmax = xe;
|
|
return 1;
|
|
}
|
|
flayer = bd.bd_dpy->d_forecv->c_layer;
|
|
bd.bd_searchmax = -1;
|
|
bd.bd_searchmin = flayer->l_width;
|
|
if (xs <= xe)
|
|
{
|
|
BD_FORE->w_bd_y = y; /* stupid hack */
|
|
bd.bd_refreshing = bd.bd_searching = 1;
|
|
bd.bd_searchstart = xs;
|
|
bd.bd_searchend = xe;
|
|
LayRedisplayLine(-1, xs, xe, 1);
|
|
LayRedisplayLine(y, xs, xe, 1);
|
|
bd.bd_refreshing = bd.bd_searching = 0;
|
|
BD_FORE->w_bd_y = oy;
|
|
}
|
|
return bd.bd_searchmax >= 0;
|
|
}
|
|
|
|
static void
|
|
bd_normalize(x, y)
|
|
int x, y;
|
|
{
|
|
if (x > BD_FORE->w_width - bd.bd_width)
|
|
x = BD_FORE->w_width - bd.bd_width;
|
|
if (x < 0)
|
|
x = 0;
|
|
if (y < 0)
|
|
{
|
|
bd_signal();
|
|
y = 0;
|
|
}
|
|
if (y >= BD_FORE->w_height)
|
|
{
|
|
bd_signal();
|
|
y = BD_FORE->w_height - 1;
|
|
}
|
|
if (x != BD_FORE->w_bd_x || y != BD_FORE->w_bd_y)
|
|
bd.bd_moved = 1;
|
|
BD_FORE->w_bd_x = x;
|
|
BD_FORE->w_bd_y = y;
|
|
}
|
|
|
|
static void
|
|
bd_bc_left()
|
|
{
|
|
int bx = BD_FORE->w_bd_x, by = BD_FORE->w_bd_y;
|
|
int ex;
|
|
|
|
ex = bx - 1;
|
|
bx = 0;
|
|
for (; by >= 0; by--)
|
|
{
|
|
if (bd_do_search(by, 0, ex))
|
|
{
|
|
if (!bd.bd_skip && by != BD_FORE->w_bd_y)
|
|
bd_signal();
|
|
bx = bd.bd_searchmax + 1 - bd.bd_width;
|
|
break;
|
|
}
|
|
ex = BD_FORE->w_width - 1;
|
|
}
|
|
bd_normalize(bx, by);
|
|
}
|
|
|
|
static void
|
|
bd_bc_right()
|
|
{
|
|
int bx = BD_FORE->w_bd_x, by = BD_FORE->w_bd_y;
|
|
int sx;
|
|
|
|
sx = bx + bd.bd_width;
|
|
bx = BD_FORE->w_width - bd.bd_width;
|
|
for (; by < BD_FORE->w_height; by++)
|
|
{
|
|
if (bd_do_search(by, sx, BD_FORE->w_width - 1))
|
|
{
|
|
if (!bd.bd_skip && by != BD_FORE->w_bd_y)
|
|
bd_signal();
|
|
bx = bd.bd_searchmin;
|
|
break;
|
|
}
|
|
sx = 0;
|
|
}
|
|
bd_normalize(bx, by);
|
|
}
|
|
|
|
static void
|
|
bd_bc_up()
|
|
{
|
|
int bx = BD_FORE->w_bd_x, by = BD_FORE->w_bd_y;
|
|
|
|
for (by--; by >= 0; by--)
|
|
if (bd_do_search(by, bx, bx + bd.bd_width - 1))
|
|
break;
|
|
bd_normalize(bx, by);
|
|
}
|
|
|
|
static void
|
|
bd_bc_down()
|
|
{
|
|
int bx = BD_FORE->w_bd_x, by = BD_FORE->w_bd_y;
|
|
|
|
for (by++; by < BD_FORE->w_height; by++)
|
|
if (bd_do_search(by, bx, bx + bd.bd_width - 1))
|
|
break;
|
|
bd_normalize(bx, by);
|
|
}
|
|
|
|
|
|
static void
|
|
bd_upper_left()
|
|
{
|
|
bd_normalize(0, 0);
|
|
}
|
|
|
|
|
|
static void
|
|
bd_upper_right()
|
|
{
|
|
bd_normalize(BD_FORE->w_width - bd.bd_width, 0);
|
|
}
|
|
|
|
|
|
static void
|
|
bd_lower_left()
|
|
{
|
|
bd_normalize(0, BD_FORE->w_height - 1);
|
|
}
|
|
|
|
|
|
static void
|
|
bd_lower_right()
|
|
{
|
|
bd_normalize(BD_FORE->w_width - bd.bd_width, BD_FORE->w_height -1);
|
|
}
|
|
|
|
/**********************************************************************
|
|
*
|
|
*/
|
|
|
|
|
|
static void
|
|
bd_check(x, c)
|
|
int x, c;
|
|
{
|
|
if (c == ' ')
|
|
return;
|
|
if (x < bd.bd_searchstart || x > bd.bd_searchend)
|
|
return;
|
|
if (x > bd.bd_searchmax)
|
|
bd.bd_searchmax = x;
|
|
if (x < bd.bd_searchmin)
|
|
bd.bd_searchmin = x;
|
|
}
|
|
|
|
|
|
|
|
/*ARGSUSED*/
|
|
void
|
|
BGotoPos(la, x, y)
|
|
struct layer *la;
|
|
int x, y;
|
|
{
|
|
}
|
|
|
|
/*ARGSUSED*/
|
|
void
|
|
BCDisplayLine(la, ml, y, xs, xe, isblank)
|
|
struct layer *la;
|
|
struct mline *ml;
|
|
int y, xs, xe;
|
|
int isblank;
|
|
{
|
|
int x;
|
|
int sx, ex;
|
|
char *l;
|
|
|
|
if (y != BD_FORE->w_bd_y)
|
|
return;
|
|
if (bd.bd_searching)
|
|
{
|
|
for (x = xs; x <= xe; x++)
|
|
bd_check(x, ml->image[x]);
|
|
return;
|
|
}
|
|
l = bd.bd_line;
|
|
sx = BD_FORE->w_bd_x;
|
|
ex = sx + bd.bd_width - 1;
|
|
if (bd.bd_info & 1)
|
|
l += 4;
|
|
for (x = xs; x <= xe; x++)
|
|
if (x >= sx && x <= ex)
|
|
l[x - sx] = ml->image[x];
|
|
}
|
|
|
|
/*ARGSUSED*/
|
|
void
|
|
BPutChar(la, c, x, y)
|
|
struct layer *la;
|
|
struct mchar *c;
|
|
int x, y;
|
|
{
|
|
int sx, ex;
|
|
char *l;
|
|
|
|
if (y != BD_FORE->w_bd_y)
|
|
return;
|
|
if (bd.bd_searching)
|
|
{
|
|
bd_check(x, c->image);
|
|
return;
|
|
}
|
|
l = bd.bd_line;
|
|
sx = BD_FORE->w_bd_x;
|
|
ex = sx + bd.bd_width - 1;
|
|
if (bd.bd_info & 1)
|
|
l += 4;
|
|
if (x >= sx && x <= ex)
|
|
l[x - sx] = c->image;
|
|
}
|
|
|
|
/*ARGSUSED*/
|
|
void
|
|
BPutStr(la, s, n, r, x, y)
|
|
struct layer *la;
|
|
char *s;
|
|
int n;
|
|
struct mchar *r;
|
|
int x, y;
|
|
{
|
|
int sx, ex;
|
|
char *l;
|
|
|
|
if (y != BD_FORE->w_bd_y)
|
|
return;
|
|
if (bd.bd_searching)
|
|
{
|
|
for (; n > 0; n--, s++, x++)
|
|
bd_check(x, *s);
|
|
return;
|
|
}
|
|
l = bd.bd_line;
|
|
sx = BD_FORE->w_bd_x;
|
|
ex = sx + bd.bd_width - 1;
|
|
if (bd.bd_info & 1)
|
|
l += 4;
|
|
for (; n > 0; n--, s++, x++)
|
|
if (x >= sx && x <= ex)
|
|
l[x - sx] = *s;
|
|
}
|
|
|
|
|
|
|
|
/**********************************************************************
|
|
*
|
|
*/
|
|
|
|
static char *infonames[] = {"none", "bc", "sc", "bc+sc"};
|
|
|
|
void
|
|
DoBrailleAction(act, msgok)
|
|
struct action *act;
|
|
int msgok;
|
|
{
|
|
int nr, dosig;
|
|
int n, l, o;
|
|
char *s, **args;
|
|
struct stat st;
|
|
|
|
nr = act->nr;
|
|
args = act->args;
|
|
dosig = display && !*rc_name;
|
|
|
|
switch(nr)
|
|
{
|
|
case RC_BD_BELL:
|
|
if (ParseSwitch(act, &bd.bd_bell) || !msgok)
|
|
{
|
|
bd_signal();
|
|
break;
|
|
}
|
|
Msg(0, bd.bd_bell ? "bd_bell is on." : "bd_bell is off.");
|
|
break;
|
|
|
|
case RC_BD_EIGHTDOT:
|
|
if (ParseSwitch(act, &bd.bd_eightdot) || !msgok)
|
|
break;
|
|
Msg(0, "switched to %d-dots system.", bd.bd_eightdot ? 8 : 6);
|
|
break;
|
|
|
|
case RC_BD_INFO:
|
|
n = bd.bd_info;
|
|
if (*args)
|
|
{
|
|
if (strlen(*args) == 4)
|
|
n = args[0][n] - '0';
|
|
else if (ParseNum(act, &n))
|
|
break;
|
|
}
|
|
if (n < 0 || n > 3)
|
|
{
|
|
Msg(0, "Out of range; 0 <= bd_info >= 3 ");
|
|
break;
|
|
}
|
|
/* bd_width at the beginning is unknown */
|
|
if (bd.bd_width == 0)
|
|
break;
|
|
|
|
o = (bd.bd_info * 2 + 2) & 12;
|
|
l = (n * 2 + 2) & 12;
|
|
if (l >= bd.bd_ncells)
|
|
{
|
|
Msg(0, "bd_info is too large for braille display.");
|
|
break;
|
|
}
|
|
if (l >= bd.bd_width + o)
|
|
{
|
|
Msg(0, "bd_info is too large for bd_width.");
|
|
break;
|
|
}
|
|
bd.bd_width += o - l;
|
|
bd.bd_info = n;
|
|
|
|
if (msgok)
|
|
Msg(0, "bd_info is %s.", infonames[n]);
|
|
position_braille_cursor();
|
|
break;
|
|
|
|
case RC_BD_LINK:
|
|
if (*args == 0 && bd.bd_moved)
|
|
bd.bd_link = 0;
|
|
if (ParseSwitch(act, &bd.bd_link))
|
|
break;
|
|
if (bd.bd_link)
|
|
{
|
|
bd.bd_moved = 0;
|
|
if (dosig)
|
|
bd_signal();
|
|
position_braille_cursor();
|
|
}
|
|
if (msgok)
|
|
Msg(0, bd.bd_link ? "bd_link is on." : "bd_link is off.");
|
|
break;
|
|
|
|
case RC_BD_SKIP:
|
|
if (ParseSwitch(act, &bd.bd_skip))
|
|
break;
|
|
if (bd.bd_skip && dosig)
|
|
bd_signal();
|
|
if (msgok)
|
|
Msg(0, bd.bd_skip ? "bd_skip is on." : "bd_skip is off.");
|
|
break;
|
|
|
|
case RC_BD_SCROLL:
|
|
if (ParseSwitch(act, &bd.bd_scroll) || !msgok)
|
|
{
|
|
position_braille_cursor();
|
|
break;
|
|
}
|
|
Msg(0, bd.bd_scroll ? "bd_scroll is on." : "bd_scroll is off.");
|
|
break;
|
|
|
|
case RC_BD_NCRC:
|
|
n = bd.bd_ncrc;
|
|
if (*args)
|
|
{
|
|
if (args[0][0] == '+')
|
|
n = (n + atoi(*args + 1)) % bd.bd_width + 1;
|
|
else if (args[0][0] == '-')
|
|
n = (n - atoi(*args + 1)) % bd.bd_width + 1;
|
|
else if (ParseNum(act, &n))
|
|
break;
|
|
}
|
|
if (n < 1 || n > bd.bd_width)
|
|
{
|
|
Msg(0, "Out of range; 1 <= bd_ncrc >= %d", bd.bd_width);
|
|
break;
|
|
}
|
|
bd.bd_ncrc = n;
|
|
if (msgok)
|
|
Msg(0, "bd_ncrc status is: %d ", bd.bd_ncrc);
|
|
position_braille_cursor();
|
|
break;
|
|
|
|
case RC_BD_BRAILLE_TABLE:
|
|
s = 0;
|
|
if (*args)
|
|
{
|
|
if (ParseSaveStr(act, &s))
|
|
break;
|
|
if (load_braille_table(s))
|
|
{
|
|
free(s);
|
|
break;
|
|
}
|
|
if (bd.bd_braille_table)
|
|
free(bd.bd_braille_table);
|
|
bd.bd_braille_table = s;
|
|
}
|
|
if (msgok)
|
|
Msg(0, "bd_braille_table is: %s ", bd.bd_braille_table);
|
|
break;
|
|
|
|
case RC_BD_PORT:
|
|
s = 0;
|
|
if (*args)
|
|
{
|
|
if (ParseSaveStr(act, &s))
|
|
break;
|
|
|
|
if (stat(s, &st) || !S_ISCHR(st.st_mode) || access(s, R_OK|W_OK))
|
|
{
|
|
Msg(0, "Cannot access braille device port %s", s);
|
|
free(s);
|
|
break;
|
|
}
|
|
if (bd.bd_fd >= 0)
|
|
close(bd.bd_fd);
|
|
bd.bd_fd = -1;
|
|
if (bd.bd_port)
|
|
free(bd.bd_port);
|
|
bd.bd_port = s;
|
|
}
|
|
if (msgok)
|
|
Msg(0, "bd_port is: %s ", bd.bd_port ? bd.bd_port : "not set");
|
|
StartBraille();
|
|
break;
|
|
|
|
case RC_BD_TYPE:
|
|
s = 0;
|
|
if (*args)
|
|
if (ParseSaveStr(act, &s) || initialize_braille_display_type(s))
|
|
break;
|
|
if (msgok)
|
|
Msg(0, "bd_type is: %s ", bd.bd_type ? bd.bd_type : "not set");
|
|
StartBraille();
|
|
break;
|
|
|
|
case RC_BD_START_BRAILLE:
|
|
if (ParseSwitch(act, &bd.bd_start_braille))
|
|
break;
|
|
if (msgok)
|
|
Msg(0, bd.bd_start_braille ? "bd_start_braille is on." : "bd_start_braille is off.");
|
|
StartBraille();
|
|
break;
|
|
|
|
case RC_BD_WIDTH:
|
|
n = bd.bd_width;
|
|
if (*args)
|
|
{
|
|
if (ParseNum(act, &n))
|
|
break;
|
|
}
|
|
if (n <= 0)
|
|
{
|
|
Msg(0, "Invalid value for bd_width: %d ", n);
|
|
break;
|
|
}
|
|
l = (bd.bd_info * 2 + 2) & 12;
|
|
if (n > bd.bd_ncells - l || n < l)
|
|
{
|
|
Msg(0, "bd_info is too large for bd_width.");
|
|
break;
|
|
}
|
|
bd.bd_width = n;
|
|
if (msgok)
|
|
Msg(0, "bd_width is: %d ", bd.bd_width);
|
|
break;
|
|
|
|
case RC_BD_BC_LEFT:
|
|
bd_bc_left();
|
|
break;
|
|
|
|
case RC_BD_BC_RIGHT:
|
|
bd_bc_right();
|
|
break;
|
|
|
|
case RC_BD_BC_UP:
|
|
bd_bc_up();
|
|
break;
|
|
|
|
case RC_BD_BC_DOWN:
|
|
bd_bc_down();
|
|
break;
|
|
|
|
case RC_BD_UPPER_LEFT:
|
|
bd_upper_left();
|
|
break;
|
|
|
|
case RC_BD_UPPER_RIGHT:
|
|
bd_upper_right();
|
|
break;
|
|
|
|
case RC_BD_LOWER_LEFT:
|
|
bd_lower_left();
|
|
break;
|
|
|
|
case RC_BD_LOWER_RIGHT:
|
|
bd_lower_right();
|
|
break;
|
|
|
|
default:
|
|
break;
|
|
}
|
|
}
|
|
|
|
static void
|
|
bd_readev_fn(ev, data)
|
|
struct event *ev;
|
|
char *data;
|
|
{
|
|
bd.buttonpress();
|
|
}
|
|
|
|
static void
|
|
bd_writeev_fn(ev, data)
|
|
struct event *ev;
|
|
char *data;
|
|
{
|
|
int len;
|
|
|
|
if (bd.bd_obuflen == 0)
|
|
return;
|
|
if ((len = write(bd.bd_fd, bd.bd_obuf, bd.bd_obuflen)) < 0)
|
|
len = bd.bd_obuflen; /* dead braille display */
|
|
if ((bd.bd_obuflen -= len))
|
|
bcopy(bd.bd_obuf + len, bd.bd_obuf, bd.bd_obuflen);
|
|
}
|
|
|
|
static void
|
|
bd_selectev_fn(ev, data)
|
|
struct event *ev;
|
|
char *data;
|
|
{
|
|
RefreshBraille();
|
|
}
|
|
|
|
#endif /* HAVE_BRAILLE */
|