2 * (C) Copyright 2004 Intracom S.A.
3 * Pantelis Antoniou <panto@intracom.gr>
5 * See file CREDITS for list of people who contributed to this
8 * This program is free software; you can redistribute it and/or
9 * modify it under the terms of the GNU General Public License as
10 * published by the Free Software Foundation; either version 2 of
11 * the License, or (at your option) any later version.
13 * This program is distributed in the hope that it will be useful,
14 * but WITHOUT ANY WARRANTY; without even the implied warranty of
15 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
16 * GNU General Public License for more details.
18 * You should have received a copy of the GNU General Public License
19 * along with this program; if not, write to the Free Software
20 * Foundation, Inc., 59 Temple Place, Suite 330, Boston,
27 * A phone based console
29 * Virtual display of 80x24 characters.
30 * The actual display is much smaller and panned to show the virtual one.
31 * Input is made by a numeric keypad utilizing the input method of
32 * mobile phones. Sorry no T9 lexicons...
39 #include <linux/types.h>
44 /*************************************************************************************************/
49 #define REFRESH_HZ (CFG_HZ/50) /* refresh every 20ms */
50 #define BLINK_HZ (CFG_HZ/2) /* cursor blink every 500ms */
52 /*************************************************************************************************/
54 #define DISPLAY_BACKLIT_PORT ((volatile immap_t *)CFG_IMMR)->im_ioport.iop_pcdat
55 #define DISPLAY_BACKLIT_MASK 0x0010
57 /*************************************************************************************************/
59 #define KP_STABLE_HZ (CFG_HZ/100) /* stable for 10ms */
60 #define KP_REPEAT_DELAY_HZ (CFG_HZ/4) /* delay before repeat 250ms */
61 #define KP_REPEAT_HZ (CFG_HZ/20) /* repeat every 50ms */
62 #define KP_FORCE_DELAY_HZ (CFG_HZ/2) /* key was force pressed */
63 #define KP_IDLE_DELAY_HZ (CFG_HZ/2) /* key was released and idle */
65 #if CONFIG_NETPHONE_VERSION == 1
66 #define KP_SPI_RXD_PORT (((volatile immap_t *)CFG_IMMR)->im_ioport.iop_pcdat)
67 #define KP_SPI_RXD_MASK 0x0008
69 #define KP_SPI_TXD_PORT (((volatile immap_t *)CFG_IMMR)->im_ioport.iop_pcdat)
70 #define KP_SPI_TXD_MASK 0x0004
72 #define KP_SPI_CLK_PORT (((volatile immap_t *)CFG_IMMR)->im_ioport.iop_pcdat)
73 #define KP_SPI_CLK_MASK 0x0001
74 #elif CONFIG_NETPHONE_VERSION == 2
75 #define KP_SPI_RXD_PORT (((volatile immap_t *)CFG_IMMR)->im_cpm.cp_pbdat)
76 #define KP_SPI_RXD_MASK 0x00000008
78 #define KP_SPI_TXD_PORT (((volatile immap_t *)CFG_IMMR)->im_cpm.cp_pbdat)
79 #define KP_SPI_TXD_MASK 0x00000004
81 #define KP_SPI_CLK_PORT (((volatile immap_t *)CFG_IMMR)->im_cpm.cp_pbdat)
82 #define KP_SPI_CLK_MASK 0x00000002
85 #define KP_CS_PORT (((volatile immap_t *)CFG_IMMR)->im_cpm.cp_pedat)
86 #define KP_CS_MASK 0x00000010
88 #define KP_SPI_RXD() (KP_SPI_RXD_PORT & KP_SPI_RXD_MASK)
90 #define KP_SPI_TXD(x) \
93 KP_SPI_TXD_PORT |= KP_SPI_TXD_MASK; \
95 KP_SPI_TXD_PORT &= ~KP_SPI_TXD_MASK; \
98 #define KP_SPI_CLK(x) \
101 KP_SPI_CLK_PORT |= KP_SPI_CLK_MASK; \
103 KP_SPI_CLK_PORT &= ~KP_SPI_CLK_MASK; \
106 #define KP_SPI_CLK_TOGGLE() (KP_SPI_CLK_PORT ^= KP_SPI_CLK_MASK)
108 #define KP_SPI_BIT_DELAY() /* no delay */
113 KP_CS_PORT |= KP_CS_MASK; \
115 KP_CS_PORT &= ~KP_CS_MASK; \
121 #define KP_ROWS_MASK ((1 << KP_ROWS) - 1)
122 #define KP_COLS_MASK ((1 << KP_COLS) - 1)
125 #define SCAN_FILTER 1
127 #define SCAN_COL_FILTER 3
130 #define KP_F1 0 /* leftmost dot (tab) */
131 #define KP_F2 1 /* middle left dot */
132 #define KP_F3 2 /* up */
133 #define KP_F4 3 /* middle right dot */
134 #define KP_F5 4 /* rightmost dot */
135 #define KP_F6 5 /* C */
136 #define KP_F7 6 /* left */
137 #define KP_F8 7 /* down */
138 #define KP_F9 8 /* right */
139 #define KP_F10 9 /* enter */
140 #define KP_F11 10 /* R */
141 #define KP_F12 11 /* save */
142 #define KP_F13 12 /* redial */
143 #define KP_F14 13 /* speaker */
144 #define KP_F15 14 /* unused */
145 #define KP_F16 15 /* unused */
147 #define KP_RELEASE -1 /* key depressed */
148 #define KP_FORCE -2 /* key was pressed for more than force hz */
149 #define KP_IDLE -3 /* key was released and idle */
164 /*************************************************************************************************/
166 static int curs_disabled;
167 static int curs_col, curs_row;
168 static int disp_col, disp_row;
170 static int width, height;
172 /* the simulated vty buffer */
173 static char vty_buf[ROWS * COLS];
174 static char last_visible_buf[ROWS * COLS]; /* worst case */
175 static char *last_visible_curs_ptr;
176 static int last_visible_curs_rev;
177 static int blinked_state;
178 static int last_input_mode;
179 static int refresh_time;
180 static int blink_time;
181 static char last_fast_punct;
182 static int last_tab_indicator = -1;
184 /*************************************************************************************************/
190 static int input_mode;
191 static char fast_punct;
192 static int tab_indicator;
193 static const char *fast_punct_list = ",.:;*";
195 static const char *input_mode_txt[] = { "abc", "ABC", "123" };
197 static const char *punct = ".,!;?'\"-()@/:_+&%*=<>$[]{}\\~^#|";
198 static const char *whspace = " 0\n";
199 /* per mode character select (for 2-9) */
200 static const char *digits_sel[2][8] = {
222 /*****************************************************************************/
224 static void update(void);
225 static void ensure_visible(int col, int row, int dx, int dy);
227 static void console_init(void)
236 input_mode = IM_SMALL;
238 last_fast_punct = '\0';
239 refresh_time = REFRESH_HZ;
240 blink_time = BLINK_HZ;
244 memset(vty_buf, ' ', sizeof(vty_buf));
246 memset(last_visible_buf, ' ', sizeof(last_visible_buf));
247 last_visible_curs_ptr = NULL;
248 last_input_mode = -1;
249 last_visible_curs_rev = 0;
254 width = sed156x_text_width;
255 height = sed156x_text_height - 1;
258 /*****************************************************************************/
260 void phone_putc(const char c);
262 /*****************************************************************************/
264 static int queued_char = -1;
265 static int enabled = 0;
267 /*****************************************************************************/
270 int phone_start(void)
278 queued_char = 'U' - '@';
281 DISPLAY_BACKLIT_PORT &= ~DISPLAY_BACKLIT_MASK;
294 DISPLAY_BACKLIT_PORT |= DISPLAY_BACKLIT_MASK;
299 void phone_puts(const char *s)
301 int count = strlen(s);
309 return queued_char >= 0 ? 1 : 0;
325 /*****************************************************************************/
327 int drv_phone_init(void)
329 device_t console_dev;
333 * Force console i/o to serial ?
335 if ((penv = getenv("console")) != NULL && strcmp(penv, "serial") == 0)
340 memset(&console_dev, 0, sizeof(console_dev));
341 strcpy(console_dev.name, "phone");
342 console_dev.ext = DEV_EXT_VIDEO; /* Video extensions */
343 console_dev.flags = DEV_FLAGS_OUTPUT | DEV_FLAGS_INPUT | DEV_FLAGS_SYSTEM;
344 console_dev.start = phone_start;
345 console_dev.stop = phone_stop;
346 console_dev.putc = phone_putc; /* 'putc' function */
347 console_dev.puts = phone_puts; /* 'puts' function */
348 console_dev.tstc = phone_tstc; /* 'tstc' function */
349 console_dev.getc = phone_getc; /* 'getc' function */
351 if (device_register(&console_dev) == 0)
359 int drv_phone_use_me(void)
364 static void kp_do_poll(void);
366 void phone_console_do_poll(void)
374 blink_time -= PHONE_CONSOLE_POLL_HZ;
375 if (blink_time <= 0) {
376 blink_time += BLINK_HZ;
377 if (last_visible_curs_ptr) {
378 i = last_visible_curs_ptr - last_visible_buf;
379 x = i % width; y = i / width;
380 sed156x_reverse_at(x, y, 1);
381 last_visible_curs_rev ^= 1;
386 refresh_time -= PHONE_CONSOLE_POLL_HZ;
387 if (refresh_time <= 0) {
388 refresh_time += REFRESH_HZ;
395 static int last_scancode = -1;
396 static int forced_scancode = 0;
397 static int input_state = -1;
398 static int input_scancode = -1;
399 static int input_selected_char = -1;
400 static char input_covered_char;
402 static void putchar_at_cursor(char c)
404 vty_buf[curs_row * COLS + curs_col] = c;
405 ensure_visible(curs_col, curs_row, 1, 1);
408 static char getchar_at_cursor(void)
410 return vty_buf[curs_row * COLS + curs_col];
413 static void queue_input_char(char c)
421 static void terminate_input(void)
426 if (input_selected_char >= 0)
427 queue_input_char(input_selected_char);
430 input_selected_char = -1;
431 putchar_at_cursor(input_covered_char);
434 blink_time = BLINK_HZ;
438 static void handle_enabled_scancode(int scancode)
441 int new_disp_col, new_disp_row;
447 /* key was released */
455 switch (last_scancode) {
457 if (input_mode == IM_NUMBER) {
458 input_mode = IM_CAPITAL;
459 /* queue backspace to erase # */
460 queue_input_char('\b');
462 input_mode = IM_NUMBER;
469 case '2': case '3': case '4': case '5':
470 case '6': case '7': case '8': case '9':
475 input_selected_char = last_scancode;
476 putchar_at_cursor((char)input_selected_char);
487 /* release and idle */
495 /* change input mode */
497 if (last_scancode == '#') /* no repeat */
500 if (input_mode == IM_NUMBER) {
501 input_scancode = scancode;
503 input_selected_char = scancode;
504 input_covered_char = getchar_at_cursor();
505 putchar_at_cursor((char)input_selected_char);
510 if (input_mode == IM_SMALL)
511 input_mode = IM_CAPITAL;
513 input_mode = IM_SMALL;
520 if (last_scancode == scancode)
523 if (input_state >= 0)
526 input_scancode = fast_punct;
528 input_selected_char = input_scancode;
529 input_covered_char = getchar_at_cursor();
530 putchar_at_cursor((char)input_selected_char);
536 case '2': case '3': case '4': case '5':
537 case '6': case '7': case '8': case '9':
540 if (last_scancode == scancode)
543 if (input_mode == IM_NUMBER) {
544 input_scancode = scancode;
546 input_selected_char = scancode;
547 input_covered_char = getchar_at_cursor();
548 putchar_at_cursor((char)input_selected_char);
553 if (input_state >= 0 && input_scancode != scancode)
556 if (input_state < 0) {
558 input_scancode = scancode;
560 input_covered_char = getchar_at_cursor();
566 else if (scancode == '1')
569 sel = digits_sel[input_mode][scancode - '2'];
570 c = *(sel + input_state);
576 input_selected_char = (int)c;
577 putchar_at_cursor((char)input_selected_char);
582 /* move visible display */
583 case KP_F3: case KP_F8: case KP_F7: case KP_F9:
585 new_disp_col = disp_col;
586 new_disp_row = disp_row;
591 if (new_disp_row <= 0)
598 if (new_disp_row >= ROWS - height)
605 if (new_disp_col <= 0)
612 if (new_disp_col >= COLS - width)
619 if (disp_col == new_disp_col && disp_row == new_disp_row)
622 disp_col = new_disp_col;
623 disp_row = new_disp_row;
628 case KP_F6: /* backspace */
629 /* inputing something; no backspace sent, just cancel input */
630 if (input_state >= 0) {
631 input_selected_char = -1; /* cancel */
635 queue_input_char('\b');
638 case KP_F10: /* enter */
639 /* inputing something; first cancel input */
640 if (input_state >= 0)
642 queue_input_char('\r');
645 case KP_F11: /* R -> Ctrl-C (abort) */
646 if (input_state >= 0)
648 queue_input_char('C' - 'Q'); /* ctrl-c */
651 case KP_F5: /* F% -> Ctrl-U (clear line) */
652 if (input_state >= 0)
654 queue_input_char('U' - 'Q'); /* ctrl-c */
658 case KP_F1: /* tab */
659 /* inputing something; first cancel input */
660 if (input_state >= 0)
662 queue_input_char('\t');
665 case KP_F2: /* change fast punct */
666 sel = strchr(fast_punct_list, fast_punct);
668 sel = &fast_punct_list[0];
671 sel = &fast_punct_list[0];
679 if (scancode != KP_FORCE && scancode != KP_IDLE) /* don't record forced or idle scancode */
680 last_scancode = scancode;
683 static void scancode_action(int scancode)
686 if (scancode == KP_RELEASE)
687 printf(" RELEASE\n");
688 else if (scancode == KP_FORCE)
690 else if (scancode == KP_IDLE)
692 else if (scancode < 32)
693 printf(" F%d", scancode + 1);
695 printf(" %c", (char)scancode);
700 handle_enabled_scancode(scancode);
704 if (scancode == KP_FORCE && last_scancode == '*')
707 last_scancode = scancode;
710 /**************************************************************************************/
712 /* update the display; make sure to update only the differences */
713 static void update(void)
716 char *s, *e, *t, *r, *b, *cp;
718 if (input_mode != last_input_mode)
719 sed156x_output_at(sed156x_text_width - 3, sed156x_text_height - 1, input_mode_txt[input_mode], 3);
721 if (tab_indicator != last_tab_indicator)
722 sed156x_output_at(0, sed156x_text_height - 1, "\\t", 2);
724 if (fast_punct != last_fast_punct)
725 sed156x_output_at(4, sed156x_text_height - 1, &fast_punct, 1);
728 curs_col < disp_col || curs_col >= (disp_col + width) ||
729 curs_row < disp_row || curs_row >= (disp_row + height)) {
732 cp = last_visible_buf + (curs_row - disp_row) * width + (curs_col - disp_col);
735 /* printf("(%d,%d) (%d,%d) %s\n", curs_col, curs_row, disp_col, disp_row, cp ? "YES" : "no"); */
737 /* clear previous cursor */
738 if (last_visible_curs_ptr && last_visible_curs_rev == 0) {
739 i = last_visible_curs_ptr - last_visible_buf;
740 sed156x_reverse_at(i % width, i / width, 1);
743 b = vty_buf + disp_row * COLS + disp_col;
744 t = last_visible_buf;
745 for (i = 0; i < height; i++) {
748 /* update only the differences */
750 while (s < e && *s == *t) {
754 if (s == e) /* no more */
759 while (s < e && *s != *t)
763 sed156x_output_at(r - b, i, r, s - r);
772 last_visible_curs_ptr = cp;
773 i = last_visible_curs_ptr - last_visible_buf;
774 sed156x_reverse_at(i % width, i / width, 1);
775 last_visible_curs_rev = 0;
777 last_visible_curs_ptr = NULL;
780 last_input_mode = input_mode;
781 last_fast_punct = fast_punct;
782 last_tab_indicator = tab_indicator;
785 /* ensure visibility; the trick is to minimize the screen movement */
786 static void ensure_visible(int col, int row, int dx, int dy)
788 int x1, y1, x2, y2, a1, b1, a2, b2;
790 /* clamp visible region */
812 /* move to easier to use vars */
813 x1 = disp_col; y1 = disp_row;
814 x2 = x1 + width; y2 = y1 + height;
816 a2 = a1 + dx; b2 = b1 + dy;
818 /* printf("(%d,%d) - (%d,%d) : (%d, %d) - (%d, %d)\n", x1, y1, x2, y2, a1, b1, a2, b2); */
821 /* move to the right */
828 } else if (a1 < x1) {
829 /* move to the left */
846 } else if (b1 < y1) {
856 /* printf("(%d,%d) - (%d,%d) : (%d, %d) - (%d, %d)\n", x1, y1, x2, y2, a1, b1, a2, b2); */
859 if (disp_col == x1 && disp_row == y1)
866 /**************************************************************************************/
868 static void newline(void)
871 if (curs_row + 1 < ROWS)
874 memmove(vty_buf, vty_buf + COLS, COLS * (ROWS - 1));
875 memset(vty_buf + (ROWS - 1) * COLS, ' ', COLS);
879 void phone_putc(const char c)
883 if (input_mode != -1) {
884 input_selected_char = -1;
891 blink_time = BLINK_HZ;
894 case 13: /* ignore */
897 case '\n': /* next line */
899 ensure_visible(curs_col, curs_row, 1, 1);
913 ensure_visible(curs_col, curs_row, 1, 1);
916 case 8: /* backspace */
921 /* make sure that we see a couple of characters before */
923 ensure_visible(curs_col - 4, curs_row, 4, 1);
925 ensure_visible(curs_col, curs_row, 1, 1);
929 default: /* draw the char */
930 putchar_at_cursor(c);
935 if (curs_col + 1 < COLS)
940 ensure_visible(curs_col, curs_row, 1, 1);
946 blink_time = BLINK_HZ;
950 /**************************************************************************************/
952 static inline unsigned int kp_transfer(unsigned int val)
959 KP_SPI_TXD(val & 0x80);
973 unsigned int kp_data_transfer(unsigned int val)
977 val = kp_transfer(val);
983 unsigned int kp_get_col_mask(unsigned int row_mask)
985 unsigned int val, col_mask;
987 val = 0x80 | (row_mask & 0x7F);
988 (void)kp_data_transfer(val);
989 #if CONFIG_NETPHONE_VERSION == 1
990 col_mask = kp_data_transfer(val) & 0x0F;
991 #elif CONFIG_NETPHONE_VERSION == 2
992 col_mask = ((volatile immap_t *)CFG_IMMR)->im_cpm.cp_pedat & 0x0f;
993 /* XXX FUCK FUCK FUCK FUCK FUCK!!!! */
994 col_mask = ((col_mask & 0x08) >> 3) | /* BKBR1 */
995 ((col_mask & 0x04) << 1) | /* BKBR2 */
996 (col_mask & 0x02) | /* BKBR3 */
997 ((col_mask & 0x01) << 2); /* BKBR4 */
1000 /* printf("col_mask(row_mask = 0x%x) -> col_mask = 0x%x\n", row_mask, col_mask); */
1005 /**************************************************************************************/
1007 static const int kp_scancodes[KP_ROWS * KP_COLS] = {
1008 KP_F1, KP_F3, KP_F4, KP_F2,
1009 KP_F6, KP_F8, KP_F9, KP_F7,
1010 KP_1, KP_3, KP_F11, KP_2,
1011 KP_4, KP_6, KP_F12, KP_5,
1012 KP_7, KP_9, KP_F13, KP_8,
1013 KP_STAR, KP_HASH, KP_F14, KP_0,
1014 KP_F5, KP_F15, KP_F16, KP_F10,
1017 static const int kp_repeats[KP_ROWS * KP_COLS] = {
1027 static int kp_state = SCAN;
1028 static int kp_last_col_mask;
1029 static int kp_cur_row, kp_cur_col;
1030 static int kp_scancode;
1031 static int kp_stable;
1032 static int kp_repeat;
1033 static int kp_repeat_time;
1034 static int kp_force_time;
1035 static int kp_idle_time;
1037 static void kp_do_poll(void)
1039 unsigned int col_mask;
1044 if (kp_idle_time > 0) {
1045 kp_idle_time -= PHONE_CONSOLE_POLL_HZ;
1046 if (kp_idle_time <= 0)
1047 scancode_action(KP_IDLE);
1050 col_mask = kp_get_col_mask(KP_ROWS_MASK);
1051 if (col_mask == KP_COLS_MASK)
1052 break; /* nothing */
1053 kp_last_col_mask = col_mask;
1055 kp_state = SCAN_FILTER;
1059 col_mask = kp_get_col_mask(KP_ROWS_MASK);
1060 if (col_mask != kp_last_col_mask) {
1065 kp_stable += PHONE_CONSOLE_POLL_HZ;
1066 if (kp_stable < KP_STABLE_HZ)
1071 kp_state = SCAN_COL;
1073 (void)kp_get_col_mask(1 << kp_cur_row);
1077 col_mask = kp_get_col_mask(1 << kp_cur_row);
1078 if (col_mask == KP_COLS_MASK) {
1079 if (++kp_cur_row >= KP_ROWS) {
1083 kp_get_col_mask(1 << kp_cur_row);
1086 kp_last_col_mask = col_mask;
1088 kp_state = SCAN_COL_FILTER;
1091 case SCAN_COL_FILTER:
1092 col_mask = kp_get_col_mask(1 << kp_cur_row);
1093 if (col_mask != kp_last_col_mask || col_mask == KP_COLS_MASK) {
1098 kp_stable += PHONE_CONSOLE_POLL_HZ;
1099 if (kp_stable < KP_STABLE_HZ)
1102 for (col = 0; col < KP_COLS; col++)
1103 if ((col_mask & (1 << col)) == 0)
1107 kp_scancode = kp_scancodes[kp_cur_row * KP_COLS + kp_cur_col];
1108 kp_repeat = kp_repeats[kp_cur_row * KP_COLS + kp_cur_col];
1111 kp_repeat_time = KP_REPEAT_DELAY_HZ;
1112 kp_force_time = KP_FORCE_DELAY_HZ;
1114 scancode_action(kp_scancode);
1119 col_mask = kp_get_col_mask(1 << kp_cur_row);
1120 if (col_mask != kp_last_col_mask) {
1122 scancode_action(KP_RELEASE);
1123 kp_idle_time = KP_IDLE_DELAY_HZ;
1128 kp_repeat_time -= PHONE_CONSOLE_POLL_HZ;
1129 if (kp_repeat_time <= 0) {
1130 kp_repeat_time += KP_REPEAT_HZ;
1131 scancode_action(kp_scancode);
1135 if (kp_force_time > 0) {
1136 kp_force_time -= PHONE_CONSOLE_POLL_HZ;
1137 if (kp_force_time <= 0)
1138 scancode_action(KP_FORCE);