1: /* robin.с */
2:
3: #include <sys/poll.h>
4: #include <errno.h>
5: #include <fcntl.h>
6: #include <popt.h>
7: #include <stdio.h>
8: #include <stdlib.h>
9: #include <signal.h>
10: #include <string.h> /* для strerror() */
11: #include <termios.h>
12: #include <unistd.h>
13:
14: void die(int exitcode, const char *error, const char *addl) {
15: if (error) fprintf(stderr, '%s: %s
', error, addl);
16: exit(exitcode);
17: }
18:
19: speed_t symbolic_speed(int speednum) {
20: if (speednum >= 460800) return B460800;
21: if (speednum >= 230400) return B230400;
22: if (speednum >= 115200) return B115200;
23: if (speednum >= 57600) return B57600;
24: if (speednum >= 38400) return B38400;
25: if (speednum >= 19200) return B19200;
26: if (speednum >= 9600) return B9600;
27: if (speednum >= 4800) return B4800;
28: if (speednum >= 2400) return B2400;
29: if (speednum >= 1800) return B1800;
30: if (speednum >= 1200) return B1200;
31: if (speednum >= 600) return B600;
32: if (speednum >= 300) return B300;
33: if (speednum >= 200) return B200;
34: if (speednum >= 150) return B150;
35: if (speednum >= 134) return B134;
36: if (speednum >= 110) return B110;
37: if (speednum >= 75) return B75;
38: return B50;
39: }
40:
41: /* Это нужно для области видимости в пределах файла, так что
42: * их можно будет использовать в обработчиках сигналов */
43: /* старые настройки порта termios для восстановления */
44: static struct termios pots;
45: /* старые настройки stdout/stdin termios для восстановления */
46: static struct termios sots;
47: /* файловый дескриптор порта */
48: int pf;
49:
50: /* восстановить первоначальные настройки терминала при выходе */
51: void cleanup_termios(int signal) {
52: tcsetattr(pf, TCSANOW, &pots);
53: tcsetattr(STDIN_FILENO, TCSANOW, &sots);
54: exit(0);
55: }
56:
57: /* обработать одиночный управляющий символ */
58: void send_escape(int fd, char c) {
59: switch (c) {
60: case 'q':
61: /* восстановить настройки termios и выйти */
62: cleanup_termios(0);
63: break;
64: case 'b':
65: /* послать символ разрыва*/
66: tcsendbreak(fd, 0);
67: break;
68: default:
69: /* пропустить символ */
70: /* 'C- C-' sends 'C-' */
71: write(fd, &c, 1);
72: break;
73: }
74: return;
75: }
76:
77: /* обработать управляющие символы, записывая их в вывод */
78: void cook_buf(int fd, char * buf, int num) {
79: int current = 0;
80: static int in_escape = 0;
81:
82: if (in_escape) {
83: /* cook_buf последний раз вызывался с незавершенной
84: управляющей последовательностью */
85: send_escape(fd, buf[0]);
86: num--;
87: buf++;
88: in_escape = 0;
89: }
90: while (current < num) {
91: # define CTRLCHAR(c) ((c)-0x40)
92: while ((current < num) && (buf[current] != CTRLCHAR('W')))
93: current++;
94: if (current) write (fd, buf, current);
95: if (current < num) {
96: /* найден управляющий символ */
97: current++;
98: if (current >= num) {
99: /*интерпретировать первый символ следующей последовательности*/
