![[BACK]](/cvsweb/icons/back.gif){kind=icon}
Return to vtd.c CVS log ![[TXT]](/cvsweb/icons/text.gif){kind=icon}
![[DIR]](/cvsweb/icons/dir.gif){kind=icon}
Up to [CSRG BSD Unix] / 43BSDReno / contrib / isode-beta / vt|
Return to vtd.c CVS log | Up to [CSRG BSD Unix] / 43BSDReno / contrib / isode-beta / vt |
1.1 root 1: /* vtd.c - VT responder */
2:
3: #ifndef lint
4: static char *rcsid = "$Header: /f/osi/vt/RCS/vtd.c,v 7.2 90/07/09 14:52:06 mrose Exp $";
5: #endif
6:
7: /*
8: * $Header: /f/osi/vt/RCS/vtd.c,v 7.2 90/07/09 14:52:06 mrose Exp $
9: *
10: *
11: * $Log: vtd.c,v $
12: * Revision 7.2 90/07/09 14:52:06 mrose
13: * sync
14: *
15: * Revision 7.1 89/11/30 23:51:42 mrose
16: * pa2str
17: *
18: * Revision 7.0 89/11/23 22:31:55 mrose
19: * Release 6.0
20: *
21: */
22:
23: /*
24: * NOTICE
25: *
26: * Acquisition, use, and distribution of this module and related
27: * materials are subject to the restrictions of a license agreement.
28: * Consult the Preface in the User's Manual for the full terms of
29: * this agreement.
30: *
31: */
32:
33:
34: #undef MAP_BACKSPACE /*Map backspace character to VT ERASE CHAR*/
35:
36: #include <signal.h>
37: #include "vtpm.h"
38: #include "sector1.h"
39: #include "tailor.h"
40: #include <sys/ioctl.h>
41: #ifdef BSD44
42: #include <sys/termios.h>
43: #include <sys/ttydefaults.h>
44: #endif
45:
46: #ifndef _PATH_LOGIN
47: #ifndef BSD44
48: #define _PATH_LOGIN "/bin/login"
49: #else
50: #define _PATH_LOGIN "/usr/bin/login"
51: #endif
52: #endif
53:
54: #include <arpa/telnet.h>
55:
56: #include <ctype.h>
57: #include <setjmp.h>
58: #include <pwd.h>
59: #include <varargs.h>
60:
61: #define BELL '\07'
62: #ifndef SUNOS4
63: #define BANNER "\r\n\r\n4.2 BSD UNIX (%s)\r\n\r\n\r%s"
64: #else
65: #define BANNER "\r\n\r\nSunOS UNIX (%s)\r\n\r\n\r%s"
66: #endif
67:
68: int connected = FALSE;
69: char command[256];
70:
71:
72: /*
73: * I/O data buffers, pointers, and counters.
74: */
75: char ptyobuf[BUFSIZ], *pfrontp = ptyobuf, *pbackp = ptyobuf;
76: char netobuf[BUFSIZ], *nfrontp = netobuf, *nbackp = netobuf;
77: int pcc;
78:
79: VT_PROFILE vtp_profile;
80: int rflag = 0;
81: char erase_char;
82: char erase_line;
83: char intr_char;
84: char *crp = "\r";
85: char *my_displayobj = "D"; /*Acceptor's Display Object Name*/
86: char *my_echo_obj = "NA"; /*Acceptor's Negotiation Control Object Name*/
87: char *my_signal_obj = "DI"; /*Acceptor's Signal Control Object*/
88: char *his_echo_obj = "NI"; /*Initiator's Negotiation Control Object*/
89: char *his_signal_obj = "KB"; /*Initiator/s Signal control Object*/
90: int my_right = ACCEPTOR;
91: char kb_image; /*KB Control Object image*/
92: char di_image; /*DI Control Object Image*/
93: char ni_image; /*NI Control Object image*/
94: char na_image; /*NA Control Object image*/
95: char nego_state; /*Current state of NA affected options*/
96: char sync_image; /*SY Control Object image*/
97: char ga_image;
98: int transparent = 0; /*Flag for Transparent repertoire*/
99: int telnet_profile =1;
100: int do_break = 1; /*If VT-BREAK agreed to*/
101: int showoptions = 0;
102: int debug = 0;
103:
104: #ifdef BSD44
105: struct termios oterm;
106: #else
107: struct tchars otc;
108: struct ltchars oltc;
109: struct sgttyb ottyb;
110: #endif
111: char *myhostname;
112: char peerhost[BUFSIZ];
113: struct PSAPaddr ts_bound;
114: struct passwd *pwd;
115:
116: int pty, net;
117: int inter;
118: extern char **environ;
119: extern int errno;
120: char line[] = "/dev/ptyp0";
121: char *envinit[] = { "TERM=network", 0 };
122: SFD cleanup();
123: static int do_cleaning = 0;
124:
125: char *myname;
126: LLog _vt_log = {
127: "vt.log", NULLCP, NULLCP,
128: LLOG_FATAL | LLOG_EXCEPTIONS | LLOG_NOTICE, LLOG_FATAL, -1,
129: LLOGCLS | LLOGCRT | LLOGZER, NOTOK
130:
131: };
132: LLog *vt_log = &_vt_log;
133:
134: main(argc, argv)
135: int argc;
136: char *argv[];
137: {
138: int f = 0;
139: char *cp = line;
140: char *logname = NULLCP;
141: int i, p, t;
142: char j;
143: #ifndef BSD44
144: struct sgttyb b;
145: #endif
146:
147: if (myname = rindex (*argv, '/'))
148: myname++;
149: if (myname == NULL || *myname == NULL)
150: myname = *argv;
151:
152: isodetailor (myname, 0);
153: if (debug = isatty (fileno (stderr)))
154: ll_dbinit (vt_log, myname);
155: else
156: ll_hdinit (vt_log, myname);
157:
158: for(i=1; i<(argc - 2); i++)
159: {
160: if (!strcmp(argv[i], "-d"))
161: {
162: if (!isdigit(argv[++i][0])
163: || sscanf(argv[i], "%d", &debug) != 1)
164: adios (NULLCP, "usage: %s -d 0-7", myname);
165: advise(LLOG_DEBUG,NULLCP, "setting debug level to %d", debug);
166: if (debug)
167: ll_dbinit (vt_log, myname);
168: }
169: else if(!strcmp(argv[i], "-F"))
170: {
171: if ((logname = argv[++i]) == NULL || *logname == '-')
172: adios (NULLCP, "usage: %s -F logfile", myname);
173: vt_log -> ll_file = logname;
174: (void) ll_close (vt_log);
175: advise(LLOG_DEBUG,NULLCP, "logging to %s",logname);
176: }
177: else
178: adios(NULLCP, "usage: %s [-F logfile] [-d N]",
179: myname);
180: }
181:
182: advise (LLOG_NOTICE,NULLCP, "starting");
183:
184: acc = &accs;
185: acr = &acrs;
186: aci = &acis;
187: acs = &acss;
188:
189: if (ass_ind(argc,argv) == OK) {
190: connected = TRUE;
191: if( !strcmp(vtp_profile.profile_name,"default") )
192: telnet_profile = 0;
193: }
194: else
195: exit(1);
196: #ifdef BSD44
197: na_image = 0;
198: nego_state = 0; /*Start off in Local echo*/
199: i = forkpty(&p, line, NULL, NULL);
200: if (i == -1) {
201: perror("vtd -- forkpty");
202: vrelreq();
203: /*NOTREACHED*/
204: }
205: if (i) {
206: vtd(sd, p);
207: /*NOTREACHED*/
208: }
209: #else
210: /*
211: * Get a pty, scan input lines.
212: */
213: for (j = 'p' ; j <= 't'; j++) {
214: cp[strlen ("/dev/pty")] = j;
215: for (i = 0; i < 16; i++) {
216: cp[strlen("/dev/ptyp")] = "0123456789abcdef"[i];
217: p = open(cp, 2);
218: if (p >= 0)
219: goto gotpty;
220: }
221: }
222: perror("All network ports in use");
223: vrelreq();
224: /*NOTREACHED*/
225: gotpty:
226:
227: cp[strlen("/dev/")] = 't';
228: t = open("/dev/tty", 2);
229: if (t >= 0) {
230: if (ioctl(t, TIOCNOTTY, 0) == -1) {
231: perror("ioctl (TIOCNOTTY)");
232: }
233: (void)close(t);
234: }
235: t = open(cp, 2);
236: if (t < 0)
237: fatalperror(f, cp, errno);
238: if (ioctl(t, TIOCGETP, (char*)&b) == -1) {
239: perror("ioctl (TIOCGETP)");
240: adios(NULLCP, "ioctl failed (TIOCGETP)");
241: }
242: b.sg_flags = CRMOD|XTABS|ANYP;
243: if (ioctl(t, TIOCSETP, (char*)&b) == -1) {
244: perror("ioctl (TIOCSETP)");
245: adios(NULLCP, "ioctl failed (TIOCSETP)");
246: }
247: if (ioctl(p, TIOCGETP, (char*)&b) == -1) { /* XXX why is this done on the controller */
248: perror("ioctl (TIOCGETP)");
249: adios(NULLCP, "ioctl failed (TIOCGETP)");
250: }
251: if (telnet_profile)
252: b.sg_flags &= ~ECHO;
253: else
254: b.sg_flags |= ECHO; /*Remote echo for Default*/
255: if (ioctl(p, TIOCSETP, (char*)&b) == -1) {
256: perror("ioctl (TIOCSETP)");
257: adios(NULLCP, "ioctl failed (TIOCSETP)");
258: }
259: na_image = 0;
260: nego_state = 0; /*Start off in Local echo*/
261:
262: if ((i = fork()) < 0)
263: fatalperror(f, "fork", errno);
264: if (i)
265: vtd(sd, p);
266: (void)close(sd);
267: (void)close(p);
268: if (dup2(t, 0) == -1) {
269: perror("dup2");
270: adios(NULLCP, "dup2 failed");
271: }
272: if (dup2(t, 1) == -1) {
273: perror("dup2");
274: adios(NULLCP, "dup2 failed");
275: }
276: if (dup2(t, 2) == -1) {
277: perror("dup2");
278: adios(NULLCP, "dup2 failed");
279: }
280: (void)close(t);
281: #endif
282: environ = envinit;
283:
284: execl(_PATH_LOGIN,"login","-h",peerhost,NULLCP);
285: fatalperror(f, _PATH_LOGIN, errno);
286: /*NOTREACHED*/
287: }
288:
289: fatal(f, msg)
290: int f;
291: char *msg;
292: {
293: char buf[BUFSIZ];
294:
295: (void) sprintf(buf, "%s: %s.\n", myname, msg);
296: (void) write(f, buf, strlen(buf));
297: adios (NULLCP, msg);
298: }
299:
300: fatalperror(f, msg, errnum)
301: int f;
302: char *msg;
303: int errnum;
304: {
305: char buf[BUFSIZ];
306: extern char *sys_errlist[];
307:
308: (void) sprintf(buf, "%s: %s", msg, sys_errlist[errnum]);
309: fatal(f, buf);
310: }
311:
312: /*
313: * Main loop. Select from pty and network.
314: */
315:
316: vtd(f, p)
317: {
318: int on = 1;
319: int nfds, result;
320:
321: do_cleaning = 1;
322: net = f, pty = p;
323: nfds = (f > p ? f : p) + 1;
324:
325: if (ioctl(p, FIONBIO, (char*)&on) == -1) {
326: perror("ioctl");
327: adios(NULLCP, "ioctl failed (FIONBIO)");
328: }
329: #ifdef SIGTSTP
330: (void) signal(SIGTSTP, SIG_IGN);
331: #endif
332: #ifdef SIGCHLD
333: (void) signal(SIGCHLD, cleanup);
334: #endif
335: /*
336: * Show banner that getty never gave.
337: */
338: myhostname = PLocalHostName ();
339: (void) sprintf(nfrontp, BANNER, myhostname, "");
340: nfrontp += strlen(nfrontp);
341:
342: #ifdef BSD44
343: if (tcgetattr(pty, &oterm) == -1) {
344: perror("tcgetattr");
345: adios(NULLCP, "tcgetattr failed");
346: }
347: if (telnet_profile) {
348: oterm.c_lflag &= ~ECHO;
349: if (tcsetattr(pty, TCSADRAIN, &oterm) == -1) {
350: perror("tcgetattr");
351: adios(NULLCP, "tcgetattr failed");
352: }
353: }
354: erase_char = oterm.c_cc[VERASE];
355: erase_line = oterm.c_cc[VKILL];
356: intr_char = oterm.c_cc[VINTR];
357: #else
358: if (ioctl(pty,TIOCGETP,(char*)&ottyb) == -1) {
359: perror("ioctl");
360: adios(NULLCP, "ioctl failed (TIOCGETP)");
361: }
362: if (ioctl(pty,TIOCGETC,(char*)&otc) == -1) {
363: perror("ioctl");
364: adios(NULLCP, "ioctl failed (TIOCGETC)");
365: }
366: if (ioctl(pty,TIOCGLTC,(char*)&oltc) == -1) {
367: perror("ioctl");
368: adios(NULLCP, "ioctl failed (TIOCGLTC)");
369: }
370: erase_char = ottyb.sg_erase;
371: erase_line = ottyb.sg_kill;
372: intr_char = otc.t_intrc;
373: #endif
374:
375:
376: for (;;) {
377: fd_set ibits, obits;
378: register int c;
379:
380: FD_ZERO (&ibits);
381: FD_ZERO (&obits);
382: /*
383: * Never look for input if there's still
384: * stuff in the corresponding output buffer
385: */
386: if (nfrontp - nbackp) {
387: FD_SET (f, &obits);
388: }
389: else {
390: FD_SET (p, &ibits);
391: }
392: if (pfrontp - pbackp) {
393: FD_SET (p, &obits);
394: }
395: else {
396: FD_SET (f, &ibits);
397: }
398: if (FD_ISSET (f, &ibits) && data_pending()) {
399: FD_CLR (f, &ibits);
400:
401: result = xselect(nfds, &ibits, &obits,
402: (fd_set *)NULL, OK);
403:
404: if (result < 0)
405: adios("failed", "xselect");
406: FD_SET (f, &ibits);
407: }
408: else {
409: if (xselect(nfds, &ibits, &obits, (fd_set *)NULL,
410: NOTOK) == -1)
411: adios("failed", "xselect");
412: }
413: if (!FD_ISSET (f, &ibits)
414: && !FD_ISSET (p, &ibits)
415: && !FD_ISSET (f, &obits)
416: && !FD_ISSET (p, &obits)) {
417: sleep(5);
418: continue;
419: }
420:
421: /*
422: * Something to read from the network...
423: */
424: if (FD_ISSET (f, &ibits)) {
425: while ((c = getch()) > 0)
426: *pfrontp++ = c;
427: }
428: if (c == E_EOF) {
429: break;
430: }
431:
432: /*
433: * Something to read from the pty...
434: */
435: if (FD_ISSET (p, &ibits)) {
436: pcc = read(p, nfrontp, (&netobuf[BUFSIZ] - nfrontp));
437:
438: if (pcc < 0 && errno == EWOULDBLOCK)
439: pcc = 0;
440: else {
441: if (pcc <= 0) {
442: if (debug)
443: advise(LLOG_EXCEPTIONS,NULLCP,
444: "problem reading from pty");
445: break;
446: }
447: }
448: nfrontp += pcc;
449: }
450:
451: if (FD_ISSET (f, &obits) && (nfrontp - nbackp) > 0)
452: netflush();
453:
454: if (FD_ISSET (p, &obits) && (pfrontp - pbackp) > 0)
455: ptyflush();
456: }
457: if (debug)
458: advise(LLOG_DEBUG,NULLCP, "finished loop in vtp");
459: cleanup();
460: }
461:
462: /*
463: * Send interrupt to process on other side of pty.
464: * If it is in raw mode, just write NULL;
465: * otherwise, write intr char.
466: */
467: interrupt()
468: {
469: #ifdef BSD44
470: struct termios term;
471:
472: ptyflush();
473: if (tcgetattr(pty, &term) == -1) {
474: perror("tcgetattr");
475: return;
476: }
477: if ((term.c_lflag&ISIG) && term.c_cc[VINTR] != _POSIX_VDISABLE)
478: *pfrontp++ = term.c_cc[VINTR];
479: else
480: *pfrontp++ = '\0';
481: #else
482: struct sgttyb b;
483: struct tchars tchars;
484:
485: ptyflush(); /* half-hearted */
486: if (ioctl(pty, TIOCGETP, (char*)&b) == -1) {
487: perror("ioctl");
488: adios(NULLCP, "ioctl failed");
489: }
490: if (b.sg_flags & RAW) {
491: *pfrontp++ = '\0';
492: return;
493: }
494: *pfrontp++ = ioctl(pty, TIOCGETC, (char*)&tchars) < 0 ?
495: '\177' : tchars.t_intrc;
496: #endif
497: }
498:
499: netflush()
500: {
501: register char *cp;
502: int n;
503: int i, j;
504: int nl_flag; /*Records if Newline is included in current PDU to
505: decide if Deliver Request should follow it. Should
506: not be required but some implementations may wait
507: for it before delivering NDQ to application*/
508:
509: nl_flag = 0;
510: if ((n = nfrontp - nbackp) > 0) {
511:
512: if (debug) {
513: (void) ll_log (vt_log, LLOG_DEBUG, NULLCP,
514: ("writing to the net"));
515: (void) ll_printf (vt_log, "<<");
516: for(i=0; i<(nfrontp-nbackp); i++)
517: (void)ll_printf (vt_log, "%02x ",*(nbackp+i));
518: (void)ll_printf (vt_log, ">>\n");
519: (void)ll_sync (vt_log);
520: }
521: if(transparent)
522: {
523: (void)vt_text(nbackp,n);
524: vtsend();
525: cp = nbackp;
526: for(i=0; i<n; i++)
527: {
528: if((*cp == '\r') ||
529: (*cp == '\n'))
530: {
531: vdelreq(FALSE);
532: break;
533: }
534: ++cp;
535: }
536: nbackp += n;
537: }
538: else
539: {
540: cp = nbackp;
541: for(i=0,j=0; i<n; i++)
542: {
543: if(*cp == '\r')
544: {
545: if(rflag) (void)vt_text(crp,1);
546: /*Previous char was CR so put one in NDQ*/
547: if(j)
548: (void)vt_text(nbackp,j);
549: nbackp += (j+1); /*Skip over current CR*/
550: cp = nbackp;
551: j = 0;
552: if(i == (n-1) ) (void)vt_text(crp,1);
553: /*If CR is last char in buffer, send it*/
554: else rflag = 1;
555: /*If not last char in buffer, read next one*/
556: continue;
557: }
558: else if(rflag) /*If previous character was CR*/
559: {
560: if(*cp == '\n') /*Got CR-LF -- map to Next X-Array*/
561: {
562: nbackp += (j+1);
563: cp = nbackp;
564: rflag = 0;
565: vt_newline();
566: ++nl_flag;
567: continue;
568: }
569: else /*Preceeding char was CR but not followed by
570: LF. Put CR in buffer*/
571: (void) vt_text(crp,1);
572: rflag = 0;
573: }
574: if(telnet_profile)
575: {
576: rflag = 0;
577: #ifdef MAP_BACKSPACE
578: if(*cp == 0x08) /*If believed to be erase*/
579: {
580: if(j)
581: (void)vt_text(nbackp,j);
582: nbackp += (j+1);
583: cp = nbackp;
584: j = 0;
585: vt_char_erase();
586: continue;
587: }
588: #endif
589: if(!vtp_profile.arg_val.tel_arg_list.full_ascii)
590: /*If ASCII GO, dump ctrl chars*/
591: {
592: if((*cp < 0x20) || (*cp > 0x7e))
593: {
594: if(j)
595: (void)vt_text(nbackp,j);
596: nbackp += (j+1);
597: cp = nbackp;
598: j = 0;
599: }
600: else
601: {
602: ++j; ++cp;
603: }
604: }
605: else
606: {
607: ++j;
608: ++cp;
609: }
610: }
611: else /*Else Default Profile*/
612: {
613: if((*cp < 0x20) || (*cp > 0x7e))
614: {
615: if(j)
616: (void)vt_text(nbackp,j);
617: nbackp += (j+1);
618: cp = nbackp;
619: j = 0;
620: }
621: else
622: {
623: ++j;
624: ++cp;
625: }
626: }
627: } /*End for loop*/
628: if(j)
629: (void)vt_text(nbackp,j); /*Load anything left if CR or LF
630: wasn't last char in buffer*/
631: nbackp += j;
632: vtsend(); /*Send the whole NDQ*/
633: if(nl_flag && telnet_profile) vdelreq(FALSE);
634: }
635: }
636: if (n < 0) {
637: if (errno != ENOBUFS && errno != EWOULDBLOCK) {
638: adios("closed", "association");
639: /*NOTREACHED*/
640: }
641: n = 0;
642: }
643: if (nbackp == nfrontp)
644: nbackp = nfrontp = netobuf;
645: }
646:
647: SFD cleanup()
648: {
649: sleep(1);
650: while(getch() > 0); /*Clean out unread VT-DATA PDU's still held
651: in network. Kludge to overcome deficiency
652: in Session Release. */
653: rmut();
654: #ifndef BSD44
655: vhangup();
656: #endif
657: vrelreq();
658: (void)kill(0, SIGKILL);
659: exit(1);
660: }
661:
662: #include <utmp.h>
663:
664: struct utmp wtmp;
665: char wtmpf[] = "/usr/adm/wtmp";
666: char utmp[] = "/etc/utmp";
667: #define SCPYN(a, b) strncpy(a, b, sizeof (a))
668: #define SCMPN(a, b) strncmp(a, b, sizeof (a))
669:
670: long lseek (), time ();
671:
672: rmut()
673: {
674: register f;
675: int found = 0;
676:
677: f = open(utmp, 2);
678: if (f >= 0) {
679: while(read(f, (char *)&wtmp, sizeof (wtmp)) == sizeof (wtmp)) {
680: if (SCMPN(wtmp.ut_line, line+5) || wtmp.ut_name[0]==0)
681: continue;
682: (void)lseek(f, -(long)sizeof (wtmp), 1);
683: (void)SCPYN(wtmp.ut_name, "");
684: #if !defined(SYS5) && !defined(bsd43_ut_host)
685: (void)SCPYN(wtmp.ut_host, "");
686: #endif
687: (void)time(&wtmp.ut_time);
688: (void) write(f, (char *)&wtmp, sizeof (wtmp));
689: found++;
690: }
691: (void)close(f);
692: }
693: if (found) {
694: f = open(wtmpf, 1);
695: if (f >= 0) {
696: (void)SCPYN(wtmp.ut_line, line+5);
697: (void)SCPYN(wtmp.ut_name, "");
698: #if !defined(SYS5) && !defined(bsd43_ut_host)
699: (void)SCPYN(wtmp.ut_host, "");
700: #endif
701: (void)time(&wtmp.ut_time);
702: (void)lseek(f, (long)0, 2);
703: (void) write(f, (char *)&wtmp, sizeof (wtmp));
704: (void)close(f);
705: }
706: }
707: (void)chmod(line, 0666);
708: (void)chown(line, 0, 0);
709: line[strlen("/dev/")] = 'p';
710: (void)chmod(line, 0666);
711: (void)chown(line, 0, 0);
712: }
713:
714: bye()
715: {
716: if(do_cleaning) {
717: rmut();
718: (void)kill(0, SIGKILL);
719: }
720: exit(0);
721: }
722:
723: flushbufs()
724: {
725: pcc = 0;
726: pfrontp = pbackp = ptyobuf;
727: nfrontp = nbackp = netobuf;
728: while (getch() > 0)
729: continue;
730: }
731:
732: /* ERRORS */
733:
734: void finalbye ()
735: {
736: bye ();
737: }
738:
739:
740: #ifndef lint
741: void adios (va_alist)
742: va_dcl
743: {
744: va_list ap;
745:
746: va_start (ap);
747:
748: (void) _ll_log (vt_log, LLOG_FATAL, ap);
749:
750: va_end (ap);
751:
752: bye ();
753:
754: _exit (1);
755: }
756: #else
757: /* VARARGS2 */
758:
759: void adios (what, fmt)
760: char *what,
761: *fmt;
762: {
763: adios (what, fmt);
764: }
765: #endif
766:
767:
768: #ifndef lint
769: void advise (va_alist)
770: va_dcl
771: {
772: int code;
773: va_list ap;
774:
775: va_start (ap);
776:
777: code = va_arg (ap, int);
778:
779: (void) _ll_log (vt_log, code, ap);
780:
781: va_end (ap);
782: }
783: #else
784: /* VARARGS3 */
785:
786: void advise (code, what, fmt)
787: int code;
788: char *what,
789: *fmt;
790: {
791: advise (code, what, fmt);
792: }
793: #endif
794:
795: ptyflush()
796: {
797: int n;
798:
799: if ((n = pfrontp - pbackp) > 0)
800: {
801: n = write(pty, pbackp, n);
802: }
803: if (n < 0)
804: return;
805: pbackp += n;
806: if (pbackp == pfrontp)
807: pbackp = pfrontp = ptyobuf;
808: }
809:
810: #ifdef BSD44
811: ptyecho(on)
812: {
813: struct termios term;
814:
815: ptyflush();
816: if (tcgetattr(pty, &term) == -1) {
817: perror("tcgetattr");
818: return;
819: }
820: if (on)
821: term.c_lflag |= ECHO;
822: else
823: term.c_lflag &= ECHO;
824: if (tcsetattr(pty, TCSAFLUSH, &term) == -1) {
825: perror("tcsetattr");
826: return;
827: }
828: }
829: #else
830: setmode(on, off)
831: int on, off;
832: {
833: struct sgttyb b;
834:
835: ptyflush();
836: if(ioctl(pty, TIOCGETP, (char*)&b) < 0) {
837: perror("ioctl");
838: adios(NULLCP, "ioctl failed");
839: }
840: b.sg_flags |= on;
841: b.sg_flags &= ~off;
842: if (ioctl(pty, TIOCSETP, (char*)&b) == -1) {
843: perror("ioctl");
844: adios(NULLCP, "ioctl failed");
845: }
846: }
847: #endif
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.