]>
Commit | Line | Data |
---|---|---|
1 | /* Gtermios.c handwritten module for mc. | |
2 | ||
3 | Copyright (C) 2010-2024 Free Software Foundation, Inc. | |
4 | Contributed by Gaius Mulley <gaius@glam.ac.uk>. | |
5 | ||
6 | This file is part of GNU Modula-2. | |
7 | ||
8 | GNU Modula-2 is free software; you can redistribute it and/or modify | |
9 | it under the terms of the GNU General Public License as published by | |
10 | the Free Software Foundation; either version 3, or (at your option) | |
11 | any later version. | |
12 | ||
13 | GNU Modula-2 is distributed in the hope that it will be useful, but | |
14 | WITHOUT ANY WARRANTY; without even the implied warranty of | |
15 | MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU | |
16 | General Public License for more details. | |
17 | ||
18 | You should have received a copy of the GNU General Public License | |
19 | along with GNU Modula-2; see the file COPYING3. If not see | |
20 | <http://www.gnu.org/licenses/>. */ | |
21 | ||
22 | #include "config.h" | |
23 | #include "system.h" | |
24 | ||
25 | #include "gm2-libs-host.h" | |
26 | ||
27 | #ifdef HAVE_TERMIOS_H | |
28 | # include <termios.h> | |
29 | #endif | |
30 | ||
31 | #ifdef TERMIOS_NEEDS_XOPEN_SOURCE | |
32 | #define _XOPEN_SOURCE | |
33 | #endif | |
34 | ||
35 | #if defined(__cplusplus) | |
36 | #define EXTERN extern "C" | |
37 | #else | |
38 | #define EXTERN | |
39 | #endif | |
40 | ||
41 | #define EXPORT(X) termios##_##X | |
42 | ||
43 | typedef enum { | |
44 | vintr, | |
45 | vquit, | |
46 | verase, | |
47 | vkill, | |
48 | veof, | |
49 | vtime, | |
50 | vmin, | |
51 | vswtc, | |
52 | vstart, | |
53 | vstop, | |
54 | vsusp, | |
55 | veol, | |
56 | vreprint, | |
57 | vdiscard, | |
58 | vwerase, | |
59 | vlnext, | |
60 | veol2 | |
61 | } ControlChar; | |
62 | ||
63 | typedef enum { | |
64 | /* input flag bits. */ | |
65 | ignbrk, | |
66 | ibrkint, | |
67 | ignpar, | |
68 | iparmrk, | |
69 | inpck, | |
70 | istrip, | |
71 | inlcr, | |
72 | igncr, | |
73 | icrnl, | |
74 | iuclc, | |
75 | ixon, | |
76 | ixany, | |
77 | ixoff, | |
78 | imaxbel, | |
79 | /* output flag bits. */ | |
80 | opost, | |
81 | olcuc, | |
82 | onlcr, | |
83 | ocrnl, | |
84 | onocr, | |
85 | onlret, | |
86 | ofill, | |
87 | ofdel, | |
88 | onl0, | |
89 | onl1, | |
90 | ocr0, | |
91 | ocr1, | |
92 | ocr2, | |
93 | ocr3, | |
94 | otab0, | |
95 | otab1, | |
96 | otab2, | |
97 | otab3, | |
98 | obs0, | |
99 | obs1, | |
100 | off0, | |
101 | off1, | |
102 | ovt0, | |
103 | ovt1, | |
104 | /* baud rate. */ | |
105 | b0, | |
106 | b50, | |
107 | b75, | |
108 | b110, | |
109 | b135, | |
110 | b150, | |
111 | b200, | |
112 | b300, | |
113 | b600, | |
114 | b1200, | |
115 | b1800, | |
116 | b2400, | |
117 | b4800, | |
118 | b9600, | |
119 | b19200, | |
120 | b38400, | |
121 | b57600, | |
122 | b115200, | |
123 | b240400, | |
124 | b460800, | |
125 | b500000, | |
126 | b576000, | |
127 | b921600, | |
128 | b1000000, | |
129 | b1152000, | |
130 | b1500000, | |
131 | b2000000, | |
132 | b2500000, | |
133 | b3000000, | |
134 | b3500000, | |
135 | b4000000, | |
136 | maxbaud, | |
137 | crtscts, | |
138 | /* character size. */ | |
139 | cs5, | |
140 | cs6, | |
141 | cs7, | |
142 | cs8, | |
143 | cstopb, | |
144 | cread, | |
145 | parenb, | |
146 | parodd, | |
147 | hupcl, | |
148 | clocal, | |
149 | /* local flags. */ | |
150 | lisig, | |
151 | licanon, | |
152 | lxcase, | |
153 | lecho, | |
154 | lechoe, | |
155 | lechok, | |
156 | lechonl, | |
157 | lnoflsh, | |
158 | ltopstop, | |
159 | lechoctl, | |
160 | lechoprt, | |
161 | lechoke, | |
162 | lflusho, | |
163 | lpendin, | |
164 | liexten | |
165 | } Flag; | |
166 | ||
167 | int | |
168 | doSetUnset (tcflag_t *bitset, unsigned int mask, int value) | |
169 | { | |
170 | if (value) | |
171 | (*bitset) |= mask; | |
172 | else | |
173 | (*bitset) &= (~mask); | |
174 | return 1; | |
175 | } | |
176 | ||
177 | ||
178 | #ifdef __cplusplus | |
179 | extern "C" { | |
180 | #endif | |
181 | ||
182 | /* InitTermios - new data structure. */ | |
183 | ||
184 | void * | |
185 | EXPORT (InitTermios) (void) | |
186 | { | |
187 | struct termios *p = (struct termios *)malloc (sizeof (struct termios)); | |
188 | ||
189 | memset (p, 0, sizeof (struct termios)); | |
190 | return p; | |
191 | } | |
192 | ||
193 | /* KillTermios - delete data structure. */ | |
194 | ||
195 | void * | |
196 | EXPORT (KillTermios) (struct termios *p) | |
197 | { | |
198 | free (p); | |
199 | return NULL; | |
200 | } | |
201 | ||
202 | /* tcsnow - return the value of TCSANOW. */ | |
203 | ||
204 | int | |
205 | EXPORT (tcsnow) (void) | |
206 | { | |
207 | return TCSANOW; | |
208 | } | |
209 | ||
210 | /* tcsdrain - return the value of TCSADRAIN. */ | |
211 | ||
212 | int | |
213 | EXPORT (tcsdrain) (void) | |
214 | { | |
215 | return TCSADRAIN; | |
216 | } | |
217 | ||
218 | /* tcsflush - return the value of TCSAFLUSH. */ | |
219 | ||
220 | int | |
221 | EXPORT (tcsflush) (void) | |
222 | { | |
223 | return TCSAFLUSH; | |
224 | } | |
225 | ||
226 | /* cfgetospeed - return output baud rate. */ | |
227 | ||
228 | int | |
229 | EXPORT (cfgetospeed) (struct termios *t) | |
230 | { | |
231 | return cfgetospeed (t); | |
232 | } | |
233 | ||
234 | /* cfgetispeed - return input baud rate. */ | |
235 | ||
236 | int | |
237 | EXPORT (cfgetispeed) (struct termios *t) | |
238 | { | |
239 | return cfgetispeed (t); | |
240 | } | |
241 | ||
242 | /* cfsetospeed - set output baud rate. */ | |
243 | ||
244 | int | |
245 | EXPORT (cfsetospeed) (struct termios *t, unsigned int b) | |
246 | { | |
247 | return cfsetospeed (t, b); | |
248 | } | |
249 | ||
250 | /* cfsetispeed - set input baud rate. */ | |
251 | ||
252 | int | |
253 | EXPORT (cfsetispeed) (struct termios *t, unsigned int b) | |
254 | { | |
255 | return cfsetispeed (t, b); | |
256 | } | |
257 | ||
258 | /* cfsetspeed - set input and output baud rate. */ | |
259 | ||
260 | int | |
261 | EXPORT (cfsetspeed) (struct termios *t, unsigned int b) | |
262 | { | |
263 | int val = cfsetispeed (t, b); | |
264 | if (val == 0) | |
265 | return cfsetospeed (t, b); | |
266 | cfsetospeed (t, b); | |
267 | return val; | |
268 | } | |
269 | ||
270 | /* tcgetattr - get state of, fd, into, t. */ | |
271 | ||
272 | int | |
273 | EXPORT (tcgetattr) (int fd, struct termios *t) | |
274 | { | |
275 | return tcgetattr (fd, t); | |
276 | } | |
277 | ||
278 | /* tcsetattr - set state of, fd, to, t, using option. */ | |
279 | ||
280 | int | |
281 | EXPORT (tcsetattr) (int fd, int option, struct termios *t) | |
282 | { | |
283 | return tcsetattr (fd, option, t); | |
284 | } | |
285 | ||
286 | /* cfmakeraw - sets the terminal to raw mode. */ | |
287 | ||
288 | void | |
289 | EXPORT (cfmakeraw) (struct termios *t) | |
290 | { | |
291 | #if defined(HAVE_CFMAKERAW) | |
292 | return cfmakeraw (t); | |
293 | #endif | |
294 | } | |
295 | ||
296 | /* tcsendbreak - send zero bits for duration. */ | |
297 | ||
298 | int | |
299 | EXPORT (tcsendbreak) (int fd, int duration) | |
300 | { | |
301 | return tcsendbreak (fd, duration); | |
302 | } | |
303 | ||
304 | /* tcdrain - waits for pending output to be written on, fd. */ | |
305 | ||
306 | int | |
307 | EXPORT (tcdrain) (int fd) | |
308 | { | |
309 | return tcdrain (fd); | |
310 | } | |
311 | ||
312 | /* tcflushi - flush input. */ | |
313 | ||
314 | int | |
315 | EXPORT (tcflushi) (int fd) | |
316 | { | |
317 | #if defined(TCIFLUSH) | |
318 | return tcflush (fd, TCIFLUSH); | |
319 | #else | |
320 | return 1; | |
321 | #endif | |
322 | } | |
323 | ||
324 | /* tcflusho - flush output. */ | |
325 | ||
326 | int | |
327 | EXPORT (tcflusho) (int fd) | |
328 | { | |
329 | #if defined(TCOFLUSH) | |
330 | return tcflush (fd, TCOFLUSH); | |
331 | #else | |
332 | return 1; | |
333 | #endif | |
334 | } | |
335 | ||
336 | /* tcflushio - flush input and output. */ | |
337 | ||
338 | int | |
339 | EXPORT (tcflushio) (int fd) | |
340 | { | |
341 | #if defined(TCIOFLUSH) | |
342 | return tcflush (fd, TCIOFLUSH); | |
343 | #else | |
344 | return 1; | |
345 | #endif | |
346 | } | |
347 | ||
348 | /* tcflowoni - restart input on, fd. */ | |
349 | ||
350 | int | |
351 | EXPORT (tcflowoni) (int fd) | |
352 | { | |
353 | #if defined(TCION) | |
354 | return tcflow (fd, TCION); | |
355 | #else | |
356 | return 1; | |
357 | #endif | |
358 | } | |
359 | ||
360 | /* tcflowoffi - stop input on, fd. */ | |
361 | ||
362 | int | |
363 | EXPORT (tcflowoffi) (int fd) | |
364 | { | |
365 | #if defined(TCIOFF) | |
366 | return tcflow (fd, TCIOFF); | |
367 | #else | |
368 | return 1; | |
369 | #endif | |
370 | } | |
371 | ||
372 | /* tcflowono - restart output on, fd. */ | |
373 | ||
374 | int | |
375 | EXPORT (tcflowono) (int fd) | |
376 | { | |
377 | #if defined(TCOON) | |
378 | return tcflow (fd, TCOON); | |
379 | #else | |
380 | return 1; | |
381 | #endif | |
382 | } | |
383 | ||
384 | /* tcflowoffo - stop output on, fd. */ | |
385 | ||
386 | int | |
387 | EXPORT (tcflowoffo) (int fd) | |
388 | { | |
389 | #if defined(TCOOFF) | |
390 | return tcflow (fd, TCOOFF); | |
391 | #else | |
392 | return 1; | |
393 | #endif | |
394 | } | |
395 | ||
396 | /* GetFlag - sets a flag value from, t, in, b, and returns TRUE if, | |
397 | t, supports, f. */ | |
398 | ||
399 | int | |
400 | EXPORT (GetFlag) (struct termios *t, Flag f, int *b) | |
401 | { | |
402 | switch (f) | |
403 | { | |
404 | ||
405 | case ignbrk: | |
406 | #if defined(IGNBRK) | |
407 | *b = ((t->c_iflag & IGNBRK) == IGNBRK); | |
408 | return 1; | |
409 | #else | |
410 | return 0; | |
411 | #endif | |
412 | case ibrkint: | |
413 | #if defined(BRKINT) | |
414 | *b = ((t->c_iflag & BRKINT) == BRKINT); | |
415 | return 1; | |
416 | #else | |
417 | return 0; | |
418 | #endif | |
419 | case ignpar: | |
420 | #if defined(IGNPAR) | |
421 | *b = ((t->c_iflag & IGNPAR) == IGNPAR); | |
422 | return 1; | |
423 | #else | |
424 | return 0; | |
425 | #endif | |
426 | case iparmrk: | |
427 | #if defined(PARMRK) | |
428 | *b = ((t->c_iflag & PARMRK) == PARMRK); | |
429 | return 1; | |
430 | #else | |
431 | return 0; | |
432 | #endif | |
433 | case inpck: | |
434 | #if defined(INPCK) | |
435 | *b = ((t->c_iflag & INPCK) == INPCK); | |
436 | return 1; | |
437 | #else | |
438 | return 0; | |
439 | #endif | |
440 | case istrip: | |
441 | #if defined(ISTRIP) | |
442 | *b = ((t->c_iflag & ISTRIP) == ISTRIP); | |
443 | return 1; | |
444 | #else | |
445 | return 0; | |
446 | #endif | |
447 | case inlcr: | |
448 | #if defined(INLCR) | |
449 | *b = ((t->c_iflag & INLCR) == INLCR); | |
450 | return 1; | |
451 | #else | |
452 | return 0; | |
453 | #endif | |
454 | case igncr: | |
455 | #if defined(IGNCR) | |
456 | *b = ((t->c_iflag & IGNCR) == IGNCR); | |
457 | return 1; | |
458 | #else | |
459 | return 0; | |
460 | #endif | |
461 | case icrnl: | |
462 | #if defined(ICRNL) | |
463 | *b = ((t->c_iflag & ICRNL) == ICRNL); | |
464 | return 1; | |
465 | #else | |
466 | return 0; | |
467 | #endif | |
468 | case iuclc: | |
469 | #if defined(IUCLC) | |
470 | *b = ((t->c_iflag & IUCLC) == IUCLC); | |
471 | return 1; | |
472 | #else | |
473 | return 0; | |
474 | #endif | |
475 | case ixon: | |
476 | #if defined(IXON) | |
477 | *b = ((t->c_iflag & IXON) == IXON); | |
478 | return 1; | |
479 | #else | |
480 | return 0; | |
481 | #endif | |
482 | case ixany: | |
483 | #if defined(IXANY) | |
484 | *b = ((t->c_iflag & IXANY) == IXANY); | |
485 | return 1; | |
486 | #else | |
487 | return 0; | |
488 | #endif | |
489 | case ixoff: | |
490 | #if defined(IXOFF) | |
491 | *b = ((t->c_iflag & IXOFF) == IXOFF); | |
492 | return 1; | |
493 | #else | |
494 | return 0; | |
495 | #endif | |
496 | case imaxbel: | |
497 | #if defined(IMAXBEL) | |
498 | *b = ((t->c_iflag & IMAXBEL) == IMAXBEL); | |
499 | return 1; | |
500 | #else | |
501 | return 0; | |
502 | #endif | |
503 | case opost: | |
504 | #if defined(OPOST) | |
505 | *b = ((t->c_oflag & OPOST) == OPOST); | |
506 | return 1; | |
507 | #else | |
508 | return 0; | |
509 | #endif | |
510 | case olcuc: | |
511 | #if defined(OLCUC) | |
512 | *b = ((t->c_oflag & OLCUC) == OLCUC); | |
513 | return 1; | |
514 | #else | |
515 | return 0; | |
516 | #endif | |
517 | case onlcr: | |
518 | #if defined(ONLCR) | |
519 | *b = ((t->c_oflag & ONLCR) == ONLCR); | |
520 | return 1; | |
521 | #else | |
522 | return 0; | |
523 | #endif | |
524 | case ocrnl: | |
525 | #if defined(OCRNL) | |
526 | *b = ((t->c_oflag & OCRNL) == OCRNL); | |
527 | return 1; | |
528 | #else | |
529 | return 0; | |
530 | #endif | |
531 | case onocr: | |
532 | #if defined(ONOCR) | |
533 | *b = ((t->c_oflag & ONOCR) == ONOCR); | |
534 | return 1; | |
535 | #else | |
536 | return 0; | |
537 | #endif | |
538 | case onlret: | |
539 | #if defined(ONLRET) | |
540 | *b = ((t->c_oflag & ONLRET) == ONLRET); | |
541 | return 1; | |
542 | #else | |
543 | return 0; | |
544 | #endif | |
545 | case ofill: | |
546 | #if defined(OFILL) | |
547 | *b = ((t->c_oflag & OFILL) == OFILL); | |
548 | return 1; | |
549 | #else | |
550 | return 0; | |
551 | #endif | |
552 | case ofdel: | |
553 | #if defined(OFDEL) | |
554 | *b = ((t->c_oflag & OFDEL) == OFDEL); | |
555 | return 1; | |
556 | #else | |
557 | return 0; | |
558 | #endif | |
559 | case onl0: | |
560 | #if defined(NL0) | |
561 | *b = ((t->c_oflag & NL0) == NL0); | |
562 | return 1; | |
563 | #else | |
564 | return 0; | |
565 | #endif | |
566 | case onl1: | |
567 | #if defined(NL1) | |
568 | *b = ((t->c_oflag & NL1) == NL1); | |
569 | return 1; | |
570 | #else | |
571 | return 0; | |
572 | #endif | |
573 | case ocr0: | |
574 | #if defined(CR0) | |
575 | *b = ((t->c_oflag & CR0) == CR0); | |
576 | return 1; | |
577 | #else | |
578 | return 0; | |
579 | #endif | |
580 | case ocr1: | |
581 | #if defined(CR1) | |
582 | *b = ((t->c_oflag & CR1) == CR1); | |
583 | return 1; | |
584 | #else | |
585 | return 0; | |
586 | #endif | |
587 | case ocr2: | |
588 | #if defined(CR2) | |
589 | *b = ((t->c_oflag & CR2) == CR2); | |
590 | return 1; | |
591 | #else | |
592 | return 0; | |
593 | #endif | |
594 | case ocr3: | |
595 | #if defined(CR3) | |
596 | *b = ((t->c_oflag & CR3) == CR3); | |
597 | return 1; | |
598 | #else | |
599 | return 0; | |
600 | #endif | |
601 | case otab0: | |
602 | #if defined(TAB0) | |
603 | *b = ((t->c_oflag & TAB0) == TAB0); | |
604 | return 1; | |
605 | #else | |
606 | return 0; | |
607 | #endif | |
608 | case otab1: | |
609 | #if defined(TAB1) | |
610 | *b = ((t->c_oflag & TAB1) == TAB1); | |
611 | return 1; | |
612 | #else | |
613 | return 0; | |
614 | #endif | |
615 | case otab2: | |
616 | #if defined(TAB2) | |
617 | *b = ((t->c_oflag & TAB2) == TAB2); | |
618 | return 1; | |
619 | #else | |
620 | return 0; | |
621 | #endif | |
622 | case otab3: | |
623 | #if defined(TAB3) | |
624 | *b = ((t->c_oflag & TAB3) == TAB3); | |
625 | return 1; | |
626 | #else | |
627 | return 0; | |
628 | #endif | |
629 | case obs0: | |
630 | #if defined(BS0) | |
631 | *b = ((t->c_oflag & BS0) == BS0); | |
632 | return 1; | |
633 | #else | |
634 | return 0; | |
635 | #endif | |
636 | case obs1: | |
637 | #if defined(BS1) | |
638 | *b = ((t->c_oflag & BS1) == BS1); | |
639 | return 1; | |
640 | #else | |
641 | return 0; | |
642 | #endif | |
643 | case off0: | |
644 | #if defined(FF0) | |
645 | *b = ((t->c_oflag & FF0) == FF0); | |
646 | return 1; | |
647 | #else | |
648 | return 0; | |
649 | #endif | |
650 | case off1: | |
651 | #if defined(FF1) | |
652 | *b = ((t->c_oflag & FF1) == FF1); | |
653 | return 1; | |
654 | #else | |
655 | return 0; | |
656 | #endif | |
657 | case ovt0: | |
658 | #if defined(VT0) | |
659 | *b = ((t->c_oflag & VT0) == VT0); | |
660 | return 1; | |
661 | #else | |
662 | return 0; | |
663 | #endif | |
664 | case ovt1: | |
665 | #if defined(VT1) | |
666 | *b = ((t->c_oflag & VT1) == VT1); | |
667 | return 1; | |
668 | #else | |
669 | return 0; | |
670 | #endif | |
671 | case b0: | |
672 | #if defined(B0) | |
673 | *b = ((t->c_cflag & B0) == B0); | |
674 | return 1; | |
675 | #else | |
676 | return 0; | |
677 | #endif | |
678 | case b50: | |
679 | #if defined(B50) | |
680 | *b = ((t->c_cflag & B50) == B50); | |
681 | return 1; | |
682 | #else | |
683 | return 0; | |
684 | #endif | |
685 | case b75: | |
686 | #if defined(B75) | |
687 | *b = ((t->c_cflag & B75) == B75); | |
688 | return 1; | |
689 | #else | |
690 | return 0; | |
691 | #endif | |
692 | case b110: | |
693 | #if defined(B110) | |
694 | *b = ((t->c_cflag & B110) == B110); | |
695 | return 1; | |
696 | #else | |
697 | return 0; | |
698 | #endif | |
699 | case b135: | |
700 | #if defined(B134) | |
701 | *b = ((t->c_cflag & B134) == B134); | |
702 | return 1; | |
703 | #else | |
704 | return 0; | |
705 | #endif | |
706 | case b150: | |
707 | #if defined(B150) | |
708 | *b = ((t->c_cflag & B150) == B150); | |
709 | return 1; | |
710 | #else | |
711 | return 0; | |
712 | #endif | |
713 | case b200: | |
714 | #if defined(B200) | |
715 | *b = ((t->c_cflag & B200) == B200); | |
716 | return 1; | |
717 | #else | |
718 | return 0; | |
719 | #endif | |
720 | case b300: | |
721 | #if defined(B300) | |
722 | *b = ((t->c_cflag & B300) == B300); | |
723 | return 1; | |
724 | #else | |
725 | return 0; | |
726 | #endif | |
727 | case b600: | |
728 | #if defined(B600) | |
729 | *b = ((t->c_cflag & B600) == B600); | |
730 | return 1; | |
731 | #else | |
732 | return 0; | |
733 | #endif | |
734 | case b1200: | |
735 | #if defined(B1200) | |
736 | *b = ((t->c_cflag & B1200) == B1200); | |
737 | return 1; | |
738 | #else | |
739 | return 0; | |
740 | #endif | |
741 | case b1800: | |
742 | #if defined(B1800) | |
743 | *b = ((t->c_cflag & B1800) == B1800); | |
744 | return 1; | |
745 | #else | |
746 | return 0; | |
747 | #endif | |
748 | case b2400: | |
749 | #if defined(B2400) | |
750 | *b = ((t->c_cflag & B2400) == B2400); | |
751 | return 1; | |
752 | #else | |
753 | return 0; | |
754 | #endif | |
755 | case b4800: | |
756 | #if defined(B4800) | |
757 | *b = ((t->c_cflag & B4800) == B4800); | |
758 | return 1; | |
759 | #else | |
760 | return 0; | |
761 | #endif | |
762 | case b9600: | |
763 | #if defined(B9600) | |
764 | *b = ((t->c_cflag & B9600) == B9600); | |
765 | return 1; | |
766 | #else | |
767 | return 0; | |
768 | #endif | |
769 | case b19200: | |
770 | #if defined(B19200) | |
771 | *b = ((t->c_cflag & B19200) == B19200); | |
772 | return 1; | |
773 | #else | |
774 | return 0; | |
775 | #endif | |
776 | case b38400: | |
777 | #if defined(B38400) | |
778 | *b = ((t->c_cflag & B38400) == B38400); | |
779 | return 1; | |
780 | #else | |
781 | return 0; | |
782 | #endif | |
783 | case b57600: | |
784 | #if defined(B57600) | |
785 | *b = ((t->c_cflag & B57600) == B57600); | |
786 | return 1; | |
787 | #else | |
788 | return 0; | |
789 | #endif | |
790 | case b115200: | |
791 | #if defined(B115200) | |
792 | *b = ((t->c_cflag & B115200) == B115200); | |
793 | return 1; | |
794 | #else | |
795 | return 0; | |
796 | #endif | |
797 | case b240400: | |
798 | #if defined(B230400) | |
799 | *b = ((t->c_cflag & B230400) == B230400); | |
800 | return 1; | |
801 | #else | |
802 | return 0; | |
803 | #endif | |
804 | case b460800: | |
805 | #if defined(B460800) | |
806 | *b = ((t->c_cflag & B460800) == B460800); | |
807 | return 1; | |
808 | #else | |
809 | return 0; | |
810 | #endif | |
811 | case b500000: | |
812 | #if defined(B500000) | |
813 | *b = ((t->c_cflag & B500000) == B500000); | |
814 | return 1; | |
815 | #else | |
816 | return 0; | |
817 | #endif | |
818 | case b576000: | |
819 | #if defined(B576000) | |
820 | *b = ((t->c_cflag & B576000) == B576000); | |
821 | return 1; | |
822 | #else | |
823 | return 0; | |
824 | #endif | |
825 | case b921600: | |
826 | #if defined(B921600) | |
827 | *b = ((t->c_cflag & B921600) == B921600); | |
828 | return 1; | |
829 | #else | |
830 | return 0; | |
831 | #endif | |
832 | case b1000000: | |
833 | #if defined(B1000000) | |
834 | *b = ((t->c_cflag & B1000000) == B1000000); | |
835 | return 1; | |
836 | #else | |
837 | return 0; | |
838 | #endif | |
839 | case b1152000: | |
840 | #if defined(B1152000) | |
841 | *b = ((t->c_cflag & B1152000) == B1152000); | |
842 | return 1; | |
843 | #else | |
844 | return 0; | |
845 | #endif | |
846 | case b1500000: | |
847 | #if defined(B1500000) | |
848 | *b = ((t->c_cflag & B1500000) == B1500000); | |
849 | return 1; | |
850 | #else | |
851 | return 0; | |
852 | #endif | |
853 | case b2000000: | |
854 | #if defined(B2000000) | |
855 | *b = ((t->c_cflag & B2000000) == B2000000); | |
856 | return 1; | |
857 | #else | |
858 | return 0; | |
859 | #endif | |
860 | case b2500000: | |
861 | #if defined(B2500000) | |
862 | *b = ((t->c_cflag & B2500000) == B2500000); | |
863 | return 1; | |
864 | #else | |
865 | return 0; | |
866 | #endif | |
867 | case b3000000: | |
868 | #if defined(B3000000) | |
869 | *b = ((t->c_cflag & B3000000) == B3000000); | |
870 | return 1; | |
871 | #else | |
872 | return 0; | |
873 | #endif | |
874 | case b3500000: | |
875 | #if defined(B3500000) | |
876 | *b = ((t->c_cflag & B3500000) == B3500000); | |
877 | return 1; | |
878 | #else | |
879 | return 0; | |
880 | #endif | |
881 | case b4000000: | |
882 | #if defined(B4000000) | |
883 | *b = ((t->c_cflag & B4000000) == B4000000); | |
884 | return 1; | |
885 | #else | |
886 | return 0; | |
887 | #endif | |
888 | case maxbaud: | |
889 | #if defined(__MAX_BAUD) | |
890 | *b = ((t->c_cflag & __MAX_BAUD) == __MAX_BAUD); | |
891 | return 1; | |
892 | #else | |
893 | return 0; | |
894 | #endif | |
895 | case crtscts: | |
896 | #if defined(CRTSCTS) | |
897 | *b = ((t->c_cflag & CRTSCTS) == CRTSCTS); | |
898 | return 1; | |
899 | #else | |
900 | return 0; | |
901 | #endif | |
902 | case cs5: | |
903 | #if defined(CS5) | |
904 | *b = ((t->c_cflag & CS5) == CS5); | |
905 | return 1; | |
906 | #else | |
907 | return 0; | |
908 | #endif | |
909 | case cs6: | |
910 | #if defined(CS6) | |
911 | *b = ((t->c_cflag & CS6) == CS6); | |
912 | return 1; | |
913 | #else | |
914 | return 0; | |
915 | #endif | |
916 | case cs7: | |
917 | #if defined(CS7) | |
918 | *b = ((t->c_cflag & CS7) == CS7); | |
919 | return 1; | |
920 | #else | |
921 | return 0; | |
922 | #endif | |
923 | case cs8: | |
924 | #if defined(CS8) | |
925 | *b = ((t->c_cflag & CS8) == CS8); | |
926 | return 1; | |
927 | #else | |
928 | return 0; | |
929 | #endif | |
930 | case cstopb: | |
931 | #if defined(CSTOPB) | |
932 | *b = ((t->c_cflag & CSTOPB) == CSTOPB); | |
933 | return 1; | |
934 | #else | |
935 | return 0; | |
936 | #endif | |
937 | case cread: | |
938 | #if defined(CREAD) | |
939 | *b = ((t->c_cflag & CREAD) == CREAD); | |
940 | return 1; | |
941 | #else | |
942 | return 0; | |
943 | #endif | |
944 | case parenb: | |
945 | #if defined(PARENB) | |
946 | *b = ((t->c_cflag & PARENB) == PARENB); | |
947 | return 1; | |
948 | #else | |
949 | return 0; | |
950 | #endif | |
951 | case parodd: | |
952 | #if defined(PARODD) | |
953 | *b = ((t->c_cflag & PARODD) == PARODD); | |
954 | return 1; | |
955 | #else | |
956 | return 0; | |
957 | #endif | |
958 | case hupcl: | |
959 | #if defined(HUPCL) | |
960 | *b = ((t->c_cflag & HUPCL) == HUPCL); | |
961 | return 1; | |
962 | #else | |
963 | return 0; | |
964 | #endif | |
965 | case clocal: | |
966 | #if defined(CLOCAL) | |
967 | *b = ((t->c_cflag & CLOCAL) == CLOCAL); | |
968 | return 1; | |
969 | #else | |
970 | return 0; | |
971 | #endif | |
972 | case lisig: | |
973 | #if defined(ISIG) | |
974 | *b = ((t->c_lflag & ISIG) == ISIG); | |
975 | return 1; | |
976 | #else | |
977 | return 0; | |
978 | #endif | |
979 | case licanon: | |
980 | #if defined(ICANON) | |
981 | *b = ((t->c_lflag & ICANON) == ICANON); | |
982 | return 1; | |
983 | #else | |
984 | return 0; | |
985 | #endif | |
986 | case lxcase: | |
987 | #if defined(XCASE) | |
988 | *b = ((t->c_lflag & XCASE) == XCASE); | |
989 | return 1; | |
990 | #else | |
991 | return 0; | |
992 | #endif | |
993 | case lecho: | |
994 | #if defined(ECHO) | |
995 | *b = ((t->c_lflag & ECHO) == ECHO); | |
996 | return 1; | |
997 | #else | |
998 | return 0; | |
999 | #endif | |
1000 | case lechoe: | |
1001 | #if defined(ECHOE) | |
1002 | *b = ((t->c_lflag & ECHOE) == ECHOE); | |
1003 | return 1; | |
1004 | #else | |
1005 | return 0; | |
1006 | #endif | |
1007 | case lechok: | |
1008 | #if defined(ECHOK) | |
1009 | *b = ((t->c_lflag & ECHOK) == ECHOK); | |
1010 | return 1; | |
1011 | #else | |
1012 | return 0; | |
1013 | #endif | |
1014 | case lechonl: | |
1015 | #if defined(ECHONL) | |
1016 | *b = ((t->c_lflag & ECHONL) == ECHONL); | |
1017 | return 1; | |
1018 | #else | |
1019 | return 0; | |
1020 | #endif | |
1021 | case lnoflsh: | |
1022 | #if defined(NOFLSH) | |
1023 | *b = ((t->c_lflag & NOFLSH) == NOFLSH); | |
1024 | return 1; | |
1025 | #else | |
1026 | return 0; | |
1027 | #endif | |
1028 | case ltopstop: | |
1029 | #if defined(TOSTOP) | |
1030 | *b = ((t->c_lflag & TOSTOP) == TOSTOP); | |
1031 | return 1; | |
1032 | #else | |
1033 | return 0; | |
1034 | #endif | |
1035 | case lechoctl: | |
1036 | #if defined(ECHOCTL) | |
1037 | *b = ((t->c_lflag & ECHOCTL) == ECHOCTL); | |
1038 | return 1; | |
1039 | #else | |
1040 | return 0; | |
1041 | #endif | |
1042 | case lechoprt: | |
1043 | #if defined(ECHOPRT) | |
1044 | *b = ((t->c_lflag & ECHOPRT) == ECHOPRT); | |
1045 | return 1; | |
1046 | #else | |
1047 | return 0; | |
1048 | #endif | |
1049 | case lechoke: | |
1050 | #if defined(ECHOKE) | |
1051 | *b = ((t->c_lflag & ECHOKE) == ECHOKE); | |
1052 | return 1; | |
1053 | #else | |
1054 | return 0; | |
1055 | #endif | |
1056 | case lflusho: | |
1057 | #if defined(FLUSHO) | |
1058 | *b = ((t->c_lflag & FLUSHO) == FLUSHO); | |
1059 | return 1; | |
1060 | #else | |
1061 | return 0; | |
1062 | #endif | |
1063 | case lpendin: | |
1064 | #if defined(PENDIN) | |
1065 | *b = ((t->c_lflag & PENDIN) == PENDIN); | |
1066 | return 1; | |
1067 | #else | |
1068 | return 0; | |
1069 | #endif | |
1070 | case liexten: | |
1071 | #if defined(IEXTEN) | |
1072 | *b = ((t->c_lflag & IEXTEN) == IEXTEN); | |
1073 | return 1; | |
1074 | #else | |
1075 | return 0; | |
1076 | #endif | |
1077 | } | |
1078 | return 0; | |
1079 | } | |
1080 | ||
1081 | /* SetFlag - sets a flag value in, t, to, b, and returns TRUE if this | |
1082 | flag value is supported. */ | |
1083 | ||
1084 | int | |
1085 | EXPORT (SetFlag) (struct termios *t, Flag f, int b) | |
1086 | { | |
1087 | switch (f) | |
1088 | { | |
1089 | case ignbrk: | |
1090 | #if defined(IGNBRK) | |
1091 | return doSetUnset (&t->c_iflag, IGNBRK, b); | |
1092 | #else | |
1093 | return 0; | |
1094 | #endif | |
1095 | case ibrkint: | |
1096 | #if defined(BRKINT) | |
1097 | return doSetUnset (&t->c_iflag, BRKINT, b); | |
1098 | #else | |
1099 | return 0; | |
1100 | #endif | |
1101 | case ignpar: | |
1102 | #if defined(IGNPAR) | |
1103 | return doSetUnset (&t->c_iflag, IGNPAR, b); | |
1104 | #else | |
1105 | return 0; | |
1106 | #endif | |
1107 | case iparmrk: | |
1108 | #if defined(PARMRK) | |
1109 | return doSetUnset (&t->c_iflag, PARMRK, b); | |
1110 | #else | |
1111 | return 0; | |
1112 | #endif | |
1113 | case inpck: | |
1114 | #if defined(INPCK) | |
1115 | return doSetUnset (&t->c_iflag, INPCK, b); | |
1116 | #else | |
1117 | return 0; | |
1118 | #endif | |
1119 | case istrip: | |
1120 | #if defined(ISTRIP) | |
1121 | return doSetUnset (&t->c_iflag, ISTRIP, b); | |
1122 | #else | |
1123 | return 0; | |
1124 | #endif | |
1125 | case inlcr: | |
1126 | #if defined(INLCR) | |
1127 | return doSetUnset (&t->c_iflag, INLCR, b); | |
1128 | #else | |
1129 | return 0; | |
1130 | #endif | |
1131 | case igncr: | |
1132 | #if defined(IGNCR) | |
1133 | return doSetUnset (&t->c_iflag, IGNCR, b); | |
1134 | #else | |
1135 | return 0; | |
1136 | #endif | |
1137 | case icrnl: | |
1138 | #if defined(ICRNL) | |
1139 | return doSetUnset (&t->c_iflag, ICRNL, b); | |
1140 | #else | |
1141 | return 0; | |
1142 | #endif | |
1143 | case iuclc: | |
1144 | #if defined(IUCLC) | |
1145 | return doSetUnset (&t->c_iflag, IUCLC, b); | |
1146 | #else | |
1147 | return 0; | |
1148 | #endif | |
1149 | case ixon: | |
1150 | #if defined(IXON) | |
1151 | return doSetUnset (&t->c_iflag, IXON, b); | |
1152 | #else | |
1153 | return 0; | |
1154 | #endif | |
1155 | case ixany: | |
1156 | #if defined(IXANY) | |
1157 | return doSetUnset (&t->c_iflag, IXANY, b); | |
1158 | #else | |
1159 | return 0; | |
1160 | #endif | |
1161 | case ixoff: | |
1162 | #if defined(IXOFF) | |
1163 | return doSetUnset (&t->c_iflag, IXOFF, b); | |
1164 | #else | |
1165 | return 0; | |
1166 | #endif | |
1167 | case imaxbel: | |
1168 | #if defined(IMAXBEL) | |
1169 | return doSetUnset (&t->c_iflag, IMAXBEL, b); | |
1170 | #else | |
1171 | return 0; | |
1172 | #endif | |
1173 | case opost: | |
1174 | #if defined(OPOST) | |
1175 | return doSetUnset (&t->c_oflag, OPOST, b); | |
1176 | #else | |
1177 | return 0; | |
1178 | #endif | |
1179 | case olcuc: | |
1180 | #if defined(OLCUC) | |
1181 | return doSetUnset (&t->c_oflag, OLCUC, b); | |
1182 | #else | |
1183 | return 0; | |
1184 | #endif | |
1185 | case onlcr: | |
1186 | #if defined(ONLCR) | |
1187 | return doSetUnset (&t->c_oflag, ONLCR, b); | |
1188 | #else | |
1189 | return 0; | |
1190 | #endif | |
1191 | case ocrnl: | |
1192 | #if defined(OCRNL) | |
1193 | return doSetUnset (&t->c_oflag, OCRNL, b); | |
1194 | #else | |
1195 | return 0; | |
1196 | #endif | |
1197 | case onocr: | |
1198 | #if defined(ONOCR) | |
1199 | return doSetUnset (&t->c_oflag, ONOCR, b); | |
1200 | #else | |
1201 | return 0; | |
1202 | #endif | |
1203 | case onlret: | |
1204 | #if defined(ONLRET) | |
1205 | return doSetUnset (&t->c_oflag, ONLRET, b); | |
1206 | #else | |
1207 | return 0; | |
1208 | #endif | |
1209 | case ofill: | |
1210 | #if defined(OFILL) | |
1211 | return doSetUnset (&t->c_oflag, OFILL, b); | |
1212 | #else | |
1213 | return 0; | |
1214 | #endif | |
1215 | case ofdel: | |
1216 | #if defined(OFDEL) | |
1217 | return doSetUnset (&t->c_oflag, OFDEL, b); | |
1218 | #else | |
1219 | return 0; | |
1220 | #endif | |
1221 | case onl0: | |
1222 | #if defined(NL0) | |
1223 | return doSetUnset (&t->c_oflag, NL0, b); | |
1224 | #else | |
1225 | return 0; | |
1226 | #endif | |
1227 | case onl1: | |
1228 | #if defined(NL1) | |
1229 | return doSetUnset (&t->c_oflag, NL1, b); | |
1230 | #else | |
1231 | return 0; | |
1232 | #endif | |
1233 | case ocr0: | |
1234 | #if defined(CR0) | |
1235 | return doSetUnset (&t->c_oflag, CR0, b); | |
1236 | #else | |
1237 | return 0; | |
1238 | #endif | |
1239 | case ocr1: | |
1240 | #if defined(CR1) | |
1241 | return doSetUnset (&t->c_oflag, CR1, b); | |
1242 | #else | |
1243 | return 0; | |
1244 | #endif | |
1245 | case ocr2: | |
1246 | #if defined(CR2) | |
1247 | return doSetUnset (&t->c_oflag, CR2, b); | |
1248 | #else | |
1249 | return 0; | |
1250 | #endif | |
1251 | case ocr3: | |
1252 | #if defined(CR3) | |
1253 | return doSetUnset (&t->c_oflag, CR3, b); | |
1254 | #else | |
1255 | return 0; | |
1256 | #endif | |
1257 | case otab0: | |
1258 | #if defined(TAB0) | |
1259 | return doSetUnset (&t->c_oflag, TAB0, b); | |
1260 | #else | |
1261 | return 0; | |
1262 | #endif | |
1263 | case otab1: | |
1264 | #if defined(TAB1) | |
1265 | return doSetUnset (&t->c_oflag, TAB1, b); | |
1266 | #else | |
1267 | return 0; | |
1268 | #endif | |
1269 | case otab2: | |
1270 | #if defined(TAB2) | |
1271 | return doSetUnset (&t->c_oflag, TAB2, b); | |
1272 | #else | |
1273 | return 0; | |
1274 | #endif | |
1275 | case otab3: | |
1276 | #if defined(TAB3) | |
1277 | return doSetUnset (&t->c_oflag, TAB3, b); | |
1278 | #else | |
1279 | return 0; | |
1280 | #endif | |
1281 | case obs0: | |
1282 | #if defined(BS0) | |
1283 | return doSetUnset (&t->c_oflag, BS0, b); | |
1284 | #else | |
1285 | return 0; | |
1286 | #endif | |
1287 | case obs1: | |
1288 | #if defined(BS1) | |
1289 | return doSetUnset (&t->c_oflag, BS1, b); | |
1290 | #else | |
1291 | return 0; | |
1292 | #endif | |
1293 | case off0: | |
1294 | #if defined(FF0) | |
1295 | return doSetUnset (&t->c_oflag, FF0, b); | |
1296 | #else | |
1297 | return 0; | |
1298 | #endif | |
1299 | case off1: | |
1300 | #if defined(FF1) | |
1301 | return doSetUnset (&t->c_oflag, FF1, b); | |
1302 | #else | |
1303 | return 0; | |
1304 | #endif | |
1305 | case ovt0: | |
1306 | #if defined(VT0) | |
1307 | return doSetUnset (&t->c_oflag, VT0, b); | |
1308 | #else | |
1309 | return 0; | |
1310 | #endif | |
1311 | case ovt1: | |
1312 | #if defined(VT1) | |
1313 | return doSetUnset (&t->c_oflag, VT1, b); | |
1314 | #else | |
1315 | return 0; | |
1316 | #endif | |
1317 | case b0: | |
1318 | #if defined(B0) | |
1319 | return doSetUnset (&t->c_cflag, B0, b); | |
1320 | #else | |
1321 | return 0; | |
1322 | #endif | |
1323 | case b50: | |
1324 | #if defined(B50) | |
1325 | return doSetUnset (&t->c_cflag, B50, b); | |
1326 | #else | |
1327 | return 0; | |
1328 | #endif | |
1329 | case b75: | |
1330 | #if defined(B75) | |
1331 | return doSetUnset (&t->c_cflag, B75, b); | |
1332 | #else | |
1333 | return 0; | |
1334 | #endif | |
1335 | case b110: | |
1336 | #if defined(B110) | |
1337 | return doSetUnset (&t->c_cflag, B110, b); | |
1338 | #else | |
1339 | return 0; | |
1340 | #endif | |
1341 | case b135: | |
1342 | #if defined(B134) | |
1343 | return doSetUnset (&t->c_cflag, B134, b); | |
1344 | #else | |
1345 | return 0; | |
1346 | #endif | |
1347 | case b150: | |
1348 | #if defined(B150) | |
1349 | return doSetUnset (&t->c_cflag, B150, b); | |
1350 | #else | |
1351 | return 0; | |
1352 | #endif | |
1353 | case b200: | |
1354 | #if defined(B200) | |
1355 | return doSetUnset (&t->c_cflag, B200, b); | |
1356 | #else | |
1357 | return 0; | |
1358 | #endif | |
1359 | case b300: | |
1360 | #if defined(B300) | |
1361 | return doSetUnset (&t->c_cflag, B300, b); | |
1362 | #else | |
1363 | return 0; | |
1364 | #endif | |
1365 | case b600: | |
1366 | #if defined(B600) | |
1367 | return doSetUnset (&t->c_cflag, B600, b); | |
1368 | #else | |
1369 | return 0; | |
1370 | #endif | |
1371 | case b1200: | |
1372 | #if defined(B1200) | |
1373 | return doSetUnset (&t->c_cflag, B1200, b); | |
1374 | #else | |
1375 | return 0; | |
1376 | #endif | |
1377 | case b1800: | |
1378 | #if defined(B1800) | |
1379 | return doSetUnset (&t->c_cflag, B1800, b); | |
1380 | #else | |
1381 | return 0; | |
1382 | #endif | |
1383 | case b2400: | |
1384 | #if defined(B2400) | |
1385 | return doSetUnset (&t->c_cflag, B2400, b); | |
1386 | #else | |
1387 | return 0; | |
1388 | #endif | |
1389 | case b4800: | |
1390 | #if defined(B4800) | |
1391 | return doSetUnset (&t->c_cflag, B4800, b); | |
1392 | #else | |
1393 | return 0; | |
1394 | #endif | |
1395 | case b9600: | |
1396 | #if defined(B9600) | |
1397 | return doSetUnset (&t->c_cflag, B9600, b); | |
1398 | #else | |
1399 | return 0; | |
1400 | #endif | |
1401 | case b19200: | |
1402 | #if defined(B19200) | |
1403 | return doSetUnset (&t->c_cflag, B19200, b); | |
1404 | #else | |
1405 | return 0; | |
1406 | #endif | |
1407 | case b38400: | |
1408 | #if defined(B38400) | |
1409 | return doSetUnset (&t->c_cflag, B38400, b); | |
1410 | #else | |
1411 | return 0; | |
1412 | #endif | |
1413 | case b57600: | |
1414 | #if defined(B57600) | |
1415 | return doSetUnset (&t->c_cflag, B57600, b); | |
1416 | #else | |
1417 | return 0; | |
1418 | #endif | |
1419 | case b115200: | |
1420 | #if defined(B115200) | |
1421 | return doSetUnset (&t->c_cflag, B115200, b); | |
1422 | #else | |
1423 | return 0; | |
1424 | #endif | |
1425 | case b240400: | |
1426 | #if defined(B230400) | |
1427 | return doSetUnset (&t->c_cflag, B230400, b); | |
1428 | #else | |
1429 | return 0; | |
1430 | #endif | |
1431 | case b460800: | |
1432 | #if defined(B460800) | |
1433 | return doSetUnset (&t->c_cflag, B460800, b); | |
1434 | #else | |
1435 | return 0; | |
1436 | #endif | |
1437 | case b500000: | |
1438 | #if defined(B500000) | |
1439 | return doSetUnset (&t->c_cflag, B500000, b); | |
1440 | #else | |
1441 | return 0; | |
1442 | #endif | |
1443 | case b576000: | |
1444 | #if defined(B576000) | |
1445 | return doSetUnset (&t->c_cflag, B576000, b); | |
1446 | #else | |
1447 | return 0; | |
1448 | #endif | |
1449 | case b921600: | |
1450 | #if defined(B921600) | |
1451 | return doSetUnset (&t->c_cflag, B921600, b); | |
1452 | #else | |
1453 | return 0; | |
1454 | #endif | |
1455 | case b1000000: | |
1456 | #if defined(B1000000) | |
1457 | return doSetUnset (&t->c_cflag, B1000000, b); | |
1458 | #else | |
1459 | return 0; | |
1460 | #endif | |
1461 | case b1152000: | |
1462 | #if defined(B1152000) | |
1463 | return doSetUnset (&t->c_cflag, B1152000, b); | |
1464 | #else | |
1465 | return 0; | |
1466 | #endif | |
1467 | case b1500000: | |
1468 | #if defined(B1500000) | |
1469 | return doSetUnset (&t->c_cflag, B1500000, b); | |
1470 | #else | |
1471 | return 0; | |
1472 | #endif | |
1473 | case b2000000: | |
1474 | #if defined(B2000000) | |
1475 | return doSetUnset (&t->c_cflag, B2000000, b); | |
1476 | #else | |
1477 | return 0; | |
1478 | #endif | |
1479 | case b2500000: | |
1480 | #if defined(B2500000) | |
1481 | return doSetUnset (&t->c_cflag, B2500000, b); | |
1482 | #else | |
1483 | return 0; | |
1484 | #endif | |
1485 | case b3000000: | |
1486 | #if defined(B3000000) | |
1487 | return doSetUnset (&t->c_cflag, B3000000, b); | |
1488 | #else | |
1489 | return 0; | |
1490 | #endif | |
1491 | case b3500000: | |
1492 | #if defined(B3500000) | |
1493 | return doSetUnset (&t->c_cflag, B3500000, b); | |
1494 | #else | |
1495 | return 0; | |
1496 | #endif | |
1497 | case b4000000: | |
1498 | #if defined(B4000000) | |
1499 | return doSetUnset (&t->c_cflag, B4000000, b); | |
1500 | #else | |
1501 | return 0; | |
1502 | #endif | |
1503 | case maxbaud: | |
1504 | #if defined(__MAX_BAUD) | |
1505 | return doSetUnset (&t->c_cflag, __MAX_BAUD, b); | |
1506 | #else | |
1507 | return 0; | |
1508 | #endif | |
1509 | case crtscts: | |
1510 | #if defined(CRTSCTS) | |
1511 | return doSetUnset (&t->c_cflag, CRTSCTS, b); | |
1512 | #else | |
1513 | return 0; | |
1514 | #endif | |
1515 | case cs5: | |
1516 | #if defined(CS5) | |
1517 | return doSetUnset (&t->c_cflag, CS5, b); | |
1518 | #else | |
1519 | return 0; | |
1520 | #endif | |
1521 | case cs6: | |
1522 | #if defined(CS6) | |
1523 | return doSetUnset (&t->c_cflag, CS6, b); | |
1524 | #else | |
1525 | return 0; | |
1526 | #endif | |
1527 | case cs7: | |
1528 | #if defined(CS7) | |
1529 | return doSetUnset (&t->c_cflag, CS7, b); | |
1530 | #else | |
1531 | return 0; | |
1532 | #endif | |
1533 | case cs8: | |
1534 | #if defined(CS8) | |
1535 | return doSetUnset (&t->c_cflag, CS8, b); | |
1536 | #else | |
1537 | return 0; | |
1538 | #endif | |
1539 | case cstopb: | |
1540 | #if defined(CSTOPB) | |
1541 | return doSetUnset (&t->c_cflag, CSTOPB, b); | |
1542 | #else | |
1543 | return 0; | |
1544 | #endif | |
1545 | case cread: | |
1546 | #if defined(CREAD) | |
1547 | return doSetUnset (&t->c_cflag, CREAD, b); | |
1548 | #else | |
1549 | return 0; | |
1550 | #endif | |
1551 | case parenb: | |
1552 | #if defined(PARENB) | |
1553 | return doSetUnset (&t->c_cflag, PARENB, b); | |
1554 | #else | |
1555 | return 0; | |
1556 | #endif | |
1557 | case parodd: | |
1558 | #if defined(PARODD) | |
1559 | return doSetUnset (&t->c_cflag, PARODD, b); | |
1560 | #else | |
1561 | return 0; | |
1562 | #endif | |
1563 | case hupcl: | |
1564 | #if defined(HUPCL) | |
1565 | return doSetUnset (&t->c_cflag, HUPCL, b); | |
1566 | #else | |
1567 | return 0; | |
1568 | #endif | |
1569 | case clocal: | |
1570 | #if defined(CLOCAL) | |
1571 | return doSetUnset (&t->c_cflag, CLOCAL, b); | |
1572 | #else | |
1573 | return 0; | |
1574 | #endif | |
1575 | case lisig: | |
1576 | #if defined(ISIG) | |
1577 | return doSetUnset (&t->c_lflag, ISIG, b); | |
1578 | #else | |
1579 | return 0; | |
1580 | #endif | |
1581 | case licanon: | |
1582 | #if defined(ICANON) | |
1583 | return doSetUnset (&t->c_lflag, ICANON, b); | |
1584 | #else | |
1585 | return 0; | |
1586 | #endif | |
1587 | case lxcase: | |
1588 | #if defined(XCASE) | |
1589 | return doSetUnset (&t->c_lflag, XCASE, b); | |
1590 | #else | |
1591 | return 0; | |
1592 | #endif | |
1593 | case lecho: | |
1594 | #if defined(ECHO) | |
1595 | return doSetUnset (&t->c_lflag, ECHO, b); | |
1596 | #else | |
1597 | return 0; | |
1598 | #endif | |
1599 | case lechoe: | |
1600 | #if defined(ECHOE) | |
1601 | return doSetUnset (&t->c_lflag, ECHOE, b); | |
1602 | #else | |
1603 | return 0; | |
1604 | #endif | |
1605 | case lechok: | |
1606 | #if defined(ECHOK) | |
1607 | return doSetUnset (&t->c_lflag, ECHOK, b); | |
1608 | #else | |
1609 | return 0; | |
1610 | #endif | |
1611 | case lechonl: | |
1612 | #if defined(ECHONL) | |
1613 | return doSetUnset (&t->c_lflag, ECHONL, b); | |
1614 | #else | |
1615 | return 0; | |
1616 | #endif | |
1617 | case lnoflsh: | |
1618 | #if defined(NOFLSH) | |
1619 | return doSetUnset (&t->c_lflag, NOFLSH, b); | |
1620 | #else | |
1621 | return 0; | |
1622 | #endif | |
1623 | case ltopstop: | |
1624 | #if defined(TOSTOP) | |
1625 | return doSetUnset (&t->c_lflag, TOSTOP, b); | |
1626 | #else | |
1627 | return 0; | |
1628 | #endif | |
1629 | case lechoctl: | |
1630 | #if defined(ECHOCTL) | |
1631 | return doSetUnset (&t->c_lflag, ECHOCTL, b); | |
1632 | #else | |
1633 | return 0; | |
1634 | #endif | |
1635 | case lechoprt: | |
1636 | #if defined(ECHOPRT) | |
1637 | return doSetUnset (&t->c_lflag, ECHOPRT, b); | |
1638 | #else | |
1639 | return 0; | |
1640 | #endif | |
1641 | case lechoke: | |
1642 | #if defined(ECHOKE) | |
1643 | return doSetUnset (&t->c_lflag, ECHOKE, b); | |
1644 | #else | |
1645 | return 0; | |
1646 | #endif | |
1647 | case lflusho: | |
1648 | #if defined(FLUSHO) | |
1649 | return doSetUnset (&t->c_lflag, FLUSHO, b); | |
1650 | #else | |
1651 | return 0; | |
1652 | #endif | |
1653 | case lpendin: | |
1654 | #if defined(PENDIN) | |
1655 | return doSetUnset (&t->c_lflag, PENDIN, b); | |
1656 | #else | |
1657 | return 0; | |
1658 | #endif | |
1659 | case liexten: | |
1660 | #if defined(IEXTEN) | |
1661 | return doSetUnset (&t->c_lflag, IEXTEN, b); | |
1662 | #else | |
1663 | return 0; | |
1664 | #endif | |
1665 | } | |
1666 | return 0; | |
1667 | } | |
1668 | ||
1669 | /* GetChar - sets a CHAR, ch, value from, t, and returns TRUE if this | |
1670 | value is supported. */ | |
1671 | ||
1672 | int | |
1673 | EXPORT (GetChar) (struct termios *t, ControlChar c, char *ch) | |
1674 | { | |
1675 | switch (c) | |
1676 | { | |
1677 | ||
1678 | case vintr: | |
1679 | #if defined(VINTR) | |
1680 | *ch = t->c_cc[VINTR]; | |
1681 | return 1; | |
1682 | #else | |
1683 | return 0; | |
1684 | #endif | |
1685 | case vquit: | |
1686 | #if defined(VQUIT) | |
1687 | *ch = t->c_cc[VQUIT]; | |
1688 | return 1; | |
1689 | #else | |
1690 | return 0; | |
1691 | #endif | |
1692 | case verase: | |
1693 | #if defined(VERASE) | |
1694 | *ch = t->c_cc[VERASE]; | |
1695 | return 1; | |
1696 | #else | |
1697 | return 0; | |
1698 | #endif | |
1699 | case vkill: | |
1700 | #if defined(VKILL) | |
1701 | *ch = t->c_cc[VKILL]; | |
1702 | return 1; | |
1703 | #else | |
1704 | return 0; | |
1705 | #endif | |
1706 | case veof: | |
1707 | #if defined(VEOF) | |
1708 | *ch = t->c_cc[VEOF]; | |
1709 | return 1; | |
1710 | #else | |
1711 | return 0; | |
1712 | #endif | |
1713 | case vtime: | |
1714 | #if defined(VTIME) | |
1715 | *ch = t->c_cc[VTIME]; | |
1716 | return 1; | |
1717 | #else | |
1718 | return 0; | |
1719 | #endif | |
1720 | case vmin: | |
1721 | #if defined(VMIN) | |
1722 | *ch = t->c_cc[VMIN]; | |
1723 | return 1; | |
1724 | #else | |
1725 | return 0; | |
1726 | #endif | |
1727 | case vswtc: | |
1728 | #if defined(VSWTC) | |
1729 | *ch = t->c_cc[VSWTC]; | |
1730 | return 1; | |
1731 | #else | |
1732 | return 0; | |
1733 | #endif | |
1734 | case vstart: | |
1735 | #if defined(VSTART) | |
1736 | *ch = t->c_cc[VSTART]; | |
1737 | return 1; | |
1738 | #else | |
1739 | return 0; | |
1740 | #endif | |
1741 | case vstop: | |
1742 | #if defined(VSTOP) | |
1743 | *ch = t->c_cc[VSTOP]; | |
1744 | return 1; | |
1745 | #else | |
1746 | return 0; | |
1747 | #endif | |
1748 | case vsusp: | |
1749 | #if defined(VSUSP) | |
1750 | *ch = t->c_cc[VSUSP]; | |
1751 | return 1; | |
1752 | #else | |
1753 | return 0; | |
1754 | #endif | |
1755 | case veol: | |
1756 | #if defined(VEOL) | |
1757 | *ch = t->c_cc[VEOL]; | |
1758 | return 1; | |
1759 | #else | |
1760 | return 0; | |
1761 | #endif | |
1762 | case vreprint: | |
1763 | #if defined(VREPRINT) | |
1764 | *ch = t->c_cc[VREPRINT]; | |
1765 | return 1; | |
1766 | #else | |
1767 | return 0; | |
1768 | #endif | |
1769 | case vdiscard: | |
1770 | #if defined(VDISCARD) | |
1771 | *ch = t->c_cc[VDISCARD]; | |
1772 | return 1; | |
1773 | #else | |
1774 | return 0; | |
1775 | #endif | |
1776 | case vwerase: | |
1777 | #if defined(VWERASE) | |
1778 | *ch = t->c_cc[VWERASE]; | |
1779 | return 1; | |
1780 | #else | |
1781 | return 0; | |
1782 | #endif | |
1783 | case vlnext: | |
1784 | #if defined(VLNEXT) | |
1785 | *ch = t->c_cc[VLNEXT]; | |
1786 | return 1; | |
1787 | #else | |
1788 | return 0; | |
1789 | #endif | |
1790 | case veol2: | |
1791 | #if defined(VEOL2) | |
1792 | *ch = t->c_cc[VEOL2]; | |
1793 | return 1; | |
1794 | #else | |
1795 | return 0; | |
1796 | #endif | |
1797 | default: | |
1798 | return 0; | |
1799 | } | |
1800 | } | |
1801 | ||
1802 | /* SetChar - sets a CHAR value in, t, and returns TRUE if, c, is | |
1803 | supported. */ | |
1804 | ||
1805 | int | |
1806 | EXPORT (SetChar) (struct termios *t, ControlChar c, char ch) | |
1807 | { | |
1808 | switch (c) | |
1809 | { | |
1810 | ||
1811 | case vintr: | |
1812 | #if defined(VINTR) | |
1813 | t->c_cc[VINTR] = ch; | |
1814 | return 1; | |
1815 | #else | |
1816 | return 0; | |
1817 | #endif | |
1818 | case vquit: | |
1819 | #if defined(VQUIT) | |
1820 | t->c_cc[VQUIT] = ch; | |
1821 | return 1; | |
1822 | #else | |
1823 | return 0; | |
1824 | #endif | |
1825 | case verase: | |
1826 | #if defined(VERASE) | |
1827 | t->c_cc[VERASE] = ch; | |
1828 | return 1; | |
1829 | #else | |
1830 | return 0; | |
1831 | #endif | |
1832 | case vkill: | |
1833 | #if defined(VKILL) | |
1834 | t->c_cc[VKILL] = ch; | |
1835 | return 1; | |
1836 | #else | |
1837 | return 0; | |
1838 | #endif | |
1839 | case veof: | |
1840 | #if defined(VEOF) | |
1841 | t->c_cc[VEOF] = ch; | |
1842 | return 1; | |
1843 | #else | |
1844 | return 0; | |
1845 | #endif | |
1846 | case vtime: | |
1847 | #if defined(VTIME) | |
1848 | t->c_cc[VTIME] = ch; | |
1849 | return 1; | |
1850 | #else | |
1851 | return 0; | |
1852 | #endif | |
1853 | case vmin: | |
1854 | #if defined(VMIN) | |
1855 | t->c_cc[VMIN] = ch; | |
1856 | return 1; | |
1857 | #else | |
1858 | return 0; | |
1859 | #endif | |
1860 | case vswtc: | |
1861 | #if defined(VSWTC) | |
1862 | t->c_cc[VSWTC] = ch; | |
1863 | return 1; | |
1864 | #else | |
1865 | return 0; | |
1866 | #endif | |
1867 | case vstart: | |
1868 | #if defined(VSTART) | |
1869 | t->c_cc[VSTART] = ch; | |
1870 | return 1; | |
1871 | #else | |
1872 | return 0; | |
1873 | #endif | |
1874 | case vstop: | |
1875 | #if defined(VSTOP) | |
1876 | t->c_cc[VSTOP] = ch; | |
1877 | return 1; | |
1878 | #else | |
1879 | return 0; | |
1880 | #endif | |
1881 | case vsusp: | |
1882 | #if defined(VSUSP) | |
1883 | t->c_cc[VSUSP] = ch; | |
1884 | return 1; | |
1885 | #else | |
1886 | return 0; | |
1887 | #endif | |
1888 | case veol: | |
1889 | #if defined(VEOL) | |
1890 | t->c_cc[VEOL] = ch; | |
1891 | return 1; | |
1892 | #else | |
1893 | return 0; | |
1894 | #endif | |
1895 | case vreprint: | |
1896 | #if defined(VREPRINT) | |
1897 | t->c_cc[VREPRINT] = ch; | |
1898 | return 1; | |
1899 | #else | |
1900 | return 0; | |
1901 | #endif | |
1902 | case vdiscard: | |
1903 | #if defined(VDISCARD) | |
1904 | t->c_cc[VDISCARD] = ch; | |
1905 | return 1; | |
1906 | #else | |
1907 | return 0; | |
1908 | #endif | |
1909 | case vwerase: | |
1910 | #if defined(VWERASE) | |
1911 | t->c_cc[VWERASE] = ch; | |
1912 | return 1; | |
1913 | #else | |
1914 | return 0; | |
1915 | #endif | |
1916 | case vlnext: | |
1917 | #if defined(VLNEXT) | |
1918 | t->c_cc[VLNEXT] = ch; | |
1919 | return 1; | |
1920 | #else | |
1921 | return 0; | |
1922 | #endif | |
1923 | case veol2: | |
1924 | #if defined(VEOL2) | |
1925 | t->c_cc[VEOL2] = ch; | |
1926 | return 1; | |
1927 | #else | |
1928 | return 0; | |
1929 | #endif | |
1930 | default: | |
1931 | return 0; | |
1932 | } | |
1933 | } | |
1934 | ||
1935 | void | |
1936 | _M2_termios_init (void) | |
1937 | { | |
1938 | } | |
1939 | ||
1940 | void | |
1941 | _M2_termios_fini (void) | |
1942 | { | |
1943 | } | |
1944 | ||
1945 | #ifdef __cplusplus | |
1946 | } | |
1947 | #endif |