![[BACK]](/cvsweb/icons/back.gif){kind=icon}
Return to map.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 map.c CVS log | Up to [CSRG BSD Unix] / 43BSDReno / contrib / isode-beta / vt |
1.1 ! root 1: /* map.c - VT telnet profile mappings */ ! 2: ! 3: #ifndef lint ! 4: static char *rcsid = "$Header: /f/osi/vt/RCS/map.c,v 7.1 90/07/09 14:51:50 mrose Exp $"; ! 5: #endif ! 6: ! 7: /* ! 8: * $Header: /f/osi/vt/RCS/map.c,v 7.1 90/07/09 14:51:50 mrose Exp $ ! 9: * ! 10: * ! 11: * $Log: map.c,v $ ! 12: * Revision 7.1 90/07/09 14:51:50 mrose ! 13: * sync ! 14: * ! 15: * Revision 7.0 89/11/23 22:31:31 mrose ! 16: * Release 6.0 ! 17: * ! 18: */ ! 19: ! 20: /* ! 21: * NOTICE ! 22: * ! 23: * Acquisition, use, and distribution of this module and related ! 24: * materials are subject to the restrictions of a license agreement. ! 25: * Consult the Preface in the User's Manual for the full terms of ! 26: * this agreement. ! 27: * ! 28: */ ! 29: ! 30: ! 31: #define DO_LOCAL_ECHO ! 32: #undef PEPYPARM ! 33: #define PEPYPARM int * ! 34: ! 35: ! 36: #include "vtpm.h" ! 37: #include "sector1.h" ! 38: ! 39: #include <sys/ioctl.h> ! 40: #ifdef BSD44 ! 41: #include <sys/termios.h> ! 42: #endif ! 43: ! 44: extern char erase_char; ! 45: extern char erase_line; ! 46: #ifdef BSD44 ! 47: extern struct termios oterm; ! 48: #else ! 49: extern struct sgttyb ottyb; ! 50: extern struct tchars otc; ! 51: #endif ! 52: extern char intr_char; ! 53: extern char ni_image; ! 54: extern char na_image; ! 55: extern char nego_state; ! 56: extern char kb_image; ! 57: extern char di_image; ! 58: extern char sync_image; ! 59: extern char ga_image; ! 60: extern int my_right; ! 61: extern int cur_emode; ! 62: extern char *myhostname; ! 63: extern int pty; ! 64: extern int transparent; ! 65: extern int showoptions; ! 66: extern int debug; ! 67: extern int telnet_profile; ! 68: ! 69: TEXT_UPDATE *ndq_queue, *deq(); /*Incoming (From Net) NDQ's*/ ! 70: ! 71: map(ndq) /*Parse the given NDQ (could contain several updates). ! 72: Pass individual updates to appropriate processing ! 73: routine. ! 74: */ ! 75: PE ndq; ! 76: { ! 77: ! 78: TEXT_UPDATE *ud; ! 79: ! 80: if(unbuild_NDQPDU_NDQpdu(ndq,1,NULLIP,NULLVP,(PEPYPARM)0) == NOTOK) ! 81: { ! 82: advise (LLOG_NOTICE,NULLCP, "NDQ parse failure (%s)", PY_pepy); ! 83: return; ! 84: } ! 85: while(ud = deq(&ndq_queue) ) ! 86: { ! 87: if(ud->type_sw == DISPLAY_OBJ) ! 88: { ! 89: display_ud(&ud->updates.do_list); ! 90: free((char *)ud->updates.do_list.do_name); ! 91: } ! 92: else if(ud->type_sw == CTRL_OBJ) ! 93: { ! 94: control_ud(&ud->updates.co_list); ! 95: free((char *)ud->updates.co_list.co_name); ! 96: } ! 97: else ! 98: advise(LLOG_NOTICE,NULLCP, "Invalid Update"); ! 99: free((char *)ud); ! 100: } ! 101: pe_free(ndq); ! 102: } ! 103: ! 104: ! 105: display_ud(doptr) /*Handle Display Updates*/ ! 106: DO_UPDATE *doptr; ! 107: { ! 108: ! 109: int i; ! 110: char *pt; ! 111: #ifdef BSD44 ! 112: struct termios term; ! 113: #else ! 114: struct sgttyb ttyb; ! 115: #endif ! 116: ! 117: switch(doptr->do_type) { ! 118: ! 119: case DO_NEXT_X: ! 120: if(putch('\r') == NOTOK) { ! 121: if(debug) ! 122: advise(LLOG_NOTICE,NULLCP, "DROPPED CHAR"); ! 123: return; ! 124: } ! 125: ! 126: if(my_right == INITIATOR) { ! 127: if(putch('\n') == NOTOK) /*Current Telnet only gives ! 128: CR to PTY*/ ! 129: { ! 130: advise(LLOG_NOTICE,NULLCP, "DROPPED CHAR"); ! 131: return; ! 132: } ! 133: } ! 134: break; ! 135: ! 136: case DO_NEXT_Y: ! 137: if(debug) ! 138: advise(LLOG_DEBUG,NULLCP, "Next Y Array"); ! 139: break; ! 140: ! 141: case DO_PTR_REL: /*Ignore for TELNET since next update must ! 142: be erase. */ ! 143: break; ! 144: ! 145: case DO_PTR_ABS: /*Ignore for TELNET since must have been ! 146: preceeded by erase line. */ ! 147: break; ! 148: ! 149: case DO_TEXT: ! 150: for(pt = doptr->do_cmd.text_ud.text_ptr, i = 0; ! 151: i < doptr->do_cmd.text_ud.text_count; ++pt,++i) ! 152: { ! 153: if(putch(*pt) == NOTOK) ! 154: { ! 155: advise(LLOG_NOTICE,NULLCP, "DROPPED CHAR"); ! 156: return; ! 157: } ! 158: } ! 159: free(doptr->do_cmd.text_ud.text_ptr); ! 160: break; ! 161: ! 162: case DO_RPT_TEXT: ! 163: if(debug) ! 164: advise(LLOG_DEBUG,NULLCP, "Repeat Text"); ! 165: break; ! 166: ! 167: case DO_ATTR: ! 168: if(debug) ! 169: advise(LLOG_DEBUG,NULLCP, "Write Attribute"); ! 170: attrib_hdlr(doptr); ! 171: break; ! 172: ! 173: case DO_ERASE: ! 174: if((doptr->do_cmd.erase.start_erase.ptr_type == 0) && ! 175: (doptr->do_cmd.erase.end_erase.ptr_type == 0) ) ! 176: { ! 177: if(my_right == ACCEPTOR) ! 178: { ! 179: #ifdef BSD44 ! 180: if (tcgetattr(pty, &term) == -1) ! 181: perror("ioctl"); ! 182: else ! 183: (void)putch(erase_char=term.c_cc[VERASE]); /* XXX what if _POSIX_VDISABLE */ ! 184: #else ! 185: if (ioctl(pty,TIOCGETP,(char*)&ttyb) == -1) { ! 186: perror("ioctl"); ! 187: adios(NULLCP, "ioctl failed"); ! 188: } ! 189: (void)putch(ttyb.sg_erase); ! 190: erase_char = ttyb.sg_erase; ! 191: #endif ! 192: } ! 193: else (void)putch(erase_char); ! 194: } ! 195: else if((doptr->do_cmd.erase.start_erase.ptr_type == 3) && ! 196: (doptr->do_cmd.erase.end_erase.ptr_type == 6)) ! 197: { ! 198: if(my_right == ACCEPTOR) ! 199: { ! 200: #ifdef BSD44 ! 201: if (tcgetattr(pty, &term) == -1) ! 202: perror("ioctl"); ! 203: else ! 204: (void)putch(erase_line=term.c_cc[VKILL]); /* XXX what if _POSIX_VDISABLE */ ! 205: #else ! 206: if (ioctl(pty,TIOCGETP,(char*)&ttyb) == -1) { ! 207: perror("ioctl"); ! 208: adios(NULLCP, "ioctl failed"); ! 209: } ! 210: (void)putch(ttyb.sg_kill); ! 211: erase_line = ttyb.sg_kill; ! 212: #endif ! 213: } ! 214: else (void)putch(erase_line); ! 215: } ! 216: break; ! 217: ! 218: case DO_PREV_X: ! 219: if(debug) ! 220: advise(LLOG_DEBUG,NULLCP, "Previous X-Array\n"); ! 221: break; ! 222: ! 223: case DO_PREV_Y: ! 224: if(debug) ! 225: advise(LLOG_DEBUG,NULLCP, "Previous Y-Array\n"); ! 226: break; ! 227: } /*End Switch*/ ! 228: } ! 229: ! 230: ! 231: control_ud(coptr) /*Handle Control Object Updates*/ ! 232: CO_UPDATE *coptr; ! 233: { ! 234: ! 235: char active = 0; ! 236: #ifdef BSD44 ! 237: struct termios term; ! 238: #else ! 239: struct sgttyb sb; ! 240: #endif ! 241: ! 242: if(!telnet_profile) ! 243: { ! 244: if((my_right == INITIATOR) && (!strcmp(coptr->co_name,"E"))) ! 245: /*The Echo Control Object in Default Profile is WACA*/ ! 246: def_echo(coptr); ! 247: else ! 248: advise(LLOG_NOTICE,NULLCP, "Received Invalid CO Update under Default Profile\n"); ! 249: return; ! 250: } ! 251: if(coptr->co_type != 1) /*Only Booleans allowed in TELNET*/ ! 252: { ! 253: advise(LLOG_NOTICE,NULLCP, "Invalid CO Type\n"); ! 254: return; ! 255: } ! 256: if(coptr->co_cmd.bool_update.mask_count == 0) active = 0xff; ! 257: else active = *coptr->co_cmd.bool_update.mask; ! 258: ! 259: if(my_right == INITIATOR) ! 260: { ! 261: if(!strcmp(coptr->co_name,"DI") ) ! 262: { ! 263: if(active & AYT_OBJ) ! 264: /*If This CO contains potential update to Are You There bit*/ ! 265: { ! 266: if( (di_image & AYT_OBJ) != ! 267: (AYT_OBJ & *coptr->co_cmd.bool_update.value)) ! 268: /*If this bit was toggled*/ ! 269: { ! 270: if(debug) ! 271: advise(LLOG_DEBUG,NULLCP, "Toggled AYT in DI\n"); ! 272: di_image ^= AYT_OBJ; /*Save the new value*/ ! 273: } ! 274: } ! 275: if(active & AO_OBJ) ! 276: /*If potential update to Abort Output bit*/ ! 277: { ! 278: if( (di_image & AO_OBJ) != ! 279: (AO_OBJ & *coptr->co_cmd.bool_update.value)) ! 280: /*Toggled AO bit*/ ! 281: { ! 282: if(debug) ! 283: advise(LLOG_DEBUG,NULLCP, "Toggled AO in DI\n"); ! 284: di_image ^= AO_OBJ; /*Record it*/ ! 285: } ! 286: } ! 287: if(active & IP_OBJ) ! 288: /*If potential update to Interrupt Process bit*/ ! 289: { ! 290: if( (di_image & IP_OBJ) != ! 291: (IP_OBJ & *coptr->co_cmd.bool_update.value)) ! 292: /*Toggled AO bit*/ ! 293: { ! 294: if(debug) ! 295: advise(LLOG_DEBUG,NULLCP, "Toggled IP in DI/n"); ! 296: di_image ^= IP_OBJ; ! 297: } ! 298: } ! 299: if(active & DM_OBJ) ! 300: { ! 301: if( (di_image & DM_OBJ) != ! 302: (DM_OBJ & *coptr->co_cmd.bool_update.value) ) ! 303: ! 304: /*Toggled DM Bit*/ ! 305: { ! 306: if(debug) ! 307: advise(LLOG_DEBUG,NULLCP, "Toggled DM in DI\n"); ! 308: di_image ^= DM_OBJ; ! 309: } ! 310: } ! 311: if(active & BRK_OBJ) ! 312: { ! 313: if( (di_image & BRK_OBJ) != ! 314: (BRK_OBJ & *coptr->co_cmd.bool_update.value) ) ! 315: /*Toggled Break Bit*/ ! 316: { ! 317: if(debug) ! 318: advise(LLOG_DEBUG,NULLCP, "Toggled BRK in DI\n"); ! 319: di_image ^= BRK_OBJ; ! 320: } ! 321: } ! 322: } ! 323: else if( !strcmp(coptr->co_name,"NA") ) ! 324: { ! 325: if(active & ECHO_OBJ) ! 326: /*Update to Echo Control Object*/ ! 327: { ! 328: if(ECHO_OBJ & *coptr->co_cmd.bool_update.value) ! 329: /*Request from Server for Remote Echo*/ ! 330: { ! 331: na_image |= ECHO_OBJ; ! 332: if(showoptions) ! 333: (void)printf("Remote Echo Update Received\r\n"); ! 334: if(ECHO_OBJ & nego_state) /*If now in Remote Echo*/ ! 335: { ! 336: if(ni_image & ECHO_OBJ) /*No request outstatnding*/ ! 337: { ! 338: if(showoptions) ! 339: (void)printf("Server Request ignored--Now in Remote echo\r\n"); ! 340: } ! 341: else ! 342: { ! 343: if(showoptions) ! 344: (void)printf("Request for Local Echo Denied by Server\r\n"); ! 345: ni_image |= ECHO_OBJ; ! 346: } ! 347: } ! 348: else /*Else Not in Remote Echo*/ ! 349: { ! 350: if(ni_image & ECHO_OBJ) /*I Requested Remote Echo*/ ! 351: /*This must be confirmation*/ ! 352: { ! 353: if(showoptions) ! 354: (void)printf("Server agreed to do Remote Echo\r\n"); ! 355: } ! 356: else /*Request to do Remote Echo*/ ! 357: { ! 358: if(showoptions) ! 359: (void)printf("Server Requested Remote Echo\r\n"); ! 360: ni_image |= ECHO_OBJ; ! 361: vt_set_nego(ni_image,ECHO_OBJ);/*Respond "WILL"*/ ! 362: } ! 363: (void) tmode(1); ! 364: nego_state |= ECHO_OBJ; ! 365: cur_emode = ECHO_NOW; /*Want Server to Echo*/ ! 366: } ! 367: } ! 368: else /*Request from server for Local Echo*/ ! 369: { ! 370: if(showoptions) ! 371: (void)printf("NA--Local Echo\r\n"); ! 372: cur_emode = NOT_ECHO_NOW; ! 373: na_image &= ~ECHO_OBJ; ! 374: if(nego_state & ECHO_OBJ) /*If now in Remote Echo*/ ! 375: { ! 376: if(ni_image & ECHO_OBJ) /*If no request pending*/ ! 377: /*Must be request from sender*/ ! 378: { ! 379: if(showoptions) ! 380: (void)printf("Server requested Local Echo -- O.K.\r\n"); ! 381: ni_image &= ~ECHO_OBJ; ! 382: vt_set_nego(ni_image,ECHO_OBJ);/*Respond "WILL"*/ ! 383: } ! 384: else ! 385: { ! 386: if(showoptions) ! 387: (void)printf("User request for Local Echo Accepted\r\n"); ! 388: } ! 389: nego_state &= ~ECHO_OBJ; ! 390: /* sb = ottyb; ! 391: /* sb.sg_flags |= ECHO|CRMOD|CBREAK; ! 392: /* ioctl(fileno(stdin),TIOCSETP,(char*)&sb); ! 393: */ ! 394: (void)tmode(2); ! 395: } ! 396: else /*Else now in Local Echo*/ ! 397: { ! 398: if(ni_image & ECHO_OBJ) /*If requeset pending*/ ! 399: /*Must be negative response*/ ! 400: { ! 401: ni_image &= ~ECHO_OBJ; ! 402: if(showoptions) ! 403: (void)printf("Request for Remote Echo Denied by Server\r\n"); ! 404: } ! 405: else /*Else no request pending*/ ! 406: { ! 407: if(showoptions) ! 408: (void)printf("Server Request Ignored--Now in Local Echo\r\n"); ! 409: } ! 410: } ! 411: } ! 412: } ! 413: if(active & SUP_GA) ! 414: /*Update to Suppress Go Ahead Control Object*/ ! 415: { ! 416: if(SUP_GA & *coptr->co_cmd.bool_update.value) ! 417: { ! 418: if(showoptions) ! 419: (void)printf("Suppress Go Ahead\r\n"); ! 420: na_image |= SUP_GA; ! 421: if((ni_image & SUP_GA) == (nego_state & SUP_GA)) ! 422: /*If no outstanding request from User*/ ! 423: { ! 424: if(!(nego_state & SUP_GA)) ! 425: /*If not currently in Suppress Go Ahead*/ ! 426: { ! 427: ni_image |= SUP_GA; ! 428: vt_set_nego(ni_image,SUP_GA);/*Reply "Will"*/ ! 429: } ! 430: } ! 431: nego_state |= SUP_GA;/*Either here now or entering*/ ! 432: } ! 433: else ! 434: { ! 435: if(showoptions) ! 436: (void)printf("Go Ahead\r\n"); ! 437: na_image &= ~SUP_GA; ! 438: if( (ni_image & SUP_GA) == (nego_state & SUP_GA) ) ! 439: /*Must be request from Server*/ ! 440: { ! 441: ni_image |= SUP_GA; ! 442: vt_set_nego(ni_image,SUP_GA);/*Reply "Won't"*/ ! 443: } ! 444: else /*Else response to my request to Suppress*/ ! 445: { ! 446: if(showoptions) ! 447: (void)printf("Server refuses to Suppress Go Ahead\r\n"); ! 448: ni_image &= ~SUP_GA; /*Give Up*/ ! 449: /*May want to terminate Association here*/ ! 450: } ! 451: } ! 452: } ! 453: if(active & DISP_BIN) ! 454: /*Update to WACA Binary Repertoire*/ ! 455: { ! 456: if(DISP_BIN & *coptr->co_cmd.bool_update.value) ! 457: { ! 458: if(showoptions) ! 459: (void)printf("WACA requested Binary Repertoire on DI\r\n"); ! 460: if((ni_image & DISP_BIN) == (nego_state & DISP_BIN)) ! 461: /*No request outstanding from Initiator*/ ! 462: { ! 463: if(!(nego_state & DISP_BIN)) /*If not now binary*/ ! 464: { ! 465: ni_image |= DISP_BIN; ! 466: vt_set_nego(ni_image,DISP_BIN); /*Send "Will"*/ ! 467: } ! 468: } ! 469: nego_state |= DISP_BIN; ! 470: ni_image |= DISP_BIN; ! 471: } ! 472: else ! 473: { ! 474: if(showoptions) ! 475: (void)printf("WACA requested ASCII Repertoire on DI\r\n"); ! 476: if((ni_image & DISP_BIN) == (nego_state & DISP_BIN)) ! 477: { ! 478: if(nego_state & DISP_BIN) /*If not now ASCII*/ ! 479: { ! 480: ni_image &= ~DISP_BIN; ! 481: vt_set_nego(ni_image,DISP_BIN); ! 482: } ! 483: } ! 484: nego_state &= ~DISP_BIN; ! 485: ni_image &= ~DISP_BIN; ! 486: } ! 487: } ! 488: if(active & KBD_BIN) ! 489: /*Update to WACI Binary Repertoire*/ ! 490: { ! 491: if(KBD_BIN & *coptr->co_cmd.bool_update.value) ! 492: { ! 493: if(showoptions) ! 494: (void)printf("WACA requested Binary Repertoire on KB\r\n"); ! 495: if((ni_image & KBD_BIN) == (nego_state & KBD_BIN)) ! 496: /*If no initiator request outstanding*/ ! 497: { ! 498: if(!(nego_state & KBD_BIN))/*If not now binary*/ ! 499: { ! 500: ni_image |= KBD_BIN; ! 501: vt_set_nego(ni_image,KBD_BIN); /*Reply "Will"*/ ! 502: switch_rep(2); ! 503: /*Send Attribute update to use Binary Repertoire*/ ! 504: } ! 505: } ! 506: else /*Else a response to Initiator Request*/ ! 507: { ! 508: if(ni_image & KBD_BIN) /*Positive response*/ ! 509: switch_rep(2); ! 510: } ! 511: ni_image |= KBD_BIN; ! 512: nego_state |= KBD_BIN; ! 513: } ! 514: else ! 515: { ! 516: if(showoptions) ! 517: (void)printf("Acceptor requested ASCII Repertoire on KB\r\n"); ! 518: if((ni_image & KBD_BIN) == (nego_state & KBD_BIN)) ! 519: /*Request from Acceptor*/ ! 520: { ! 521: if(nego_state & KBD_BIN) /*If not now ASCII*/ ! 522: { ! 523: ni_image &= ~KBD_BIN; ! 524: vt_set_nego(ni_image,KBD_BIN); /*Reply "Will"*/ ! 525: switch_rep(1);/*Send Attr to ASCII*/ ! 526: } ! 527: } ! 528: else /*Else response to Initiator Request*/ ! 529: { ! 530: if( !(ni_image & KBD_BIN))/*Positive response*/ ! 531: switch_rep(1); ! 532: } ! 533: ni_image &= ~KBD_BIN; ! 534: nego_state &= ~KBD_BIN; ! 535: } ! 536: } ! 537: } ! 538: } ! 539: else /*Else Server (Display) side*/ ! 540: { ! 541: if(!strcmp(coptr->co_name,"KB") ) ! 542: /*Server receives updates to the Keyboard*/ ! 543: { ! 544: if(active & AYT_OBJ) ! 545: /*If This CO contains potential update to Are You There bit*/ ! 546: { ! 547: if( (kb_image & AYT_OBJ) != ! 548: (AYT_OBJ & *coptr->co_cmd.bool_update.value)) ! 549: /*If this bit was toggled*/ ! 550: { ! 551: if(debug) ! 552: advise(LLOG_DEBUG,NULLCP, "Toggled AYT in KB"); ! 553: kb_image ^= AYT_OBJ; /*Save the new value*/ ! 554: if (vt_text("[associated with terminal service on ", strlen("[associated with terminal service on ")) != OK) ! 555: advise(LLOG_NOTICE,NULLCP, "vt_text failed"); ! 556: if (vt_text(myhostname,strlen(myhostname)) != OK) ! 557: advise(LLOG_NOTICE,NULLCP, "vt_text failed"); ! 558: if (vt_text("]\r\n",3) != OK) ! 559: advise(LLOG_NOTICE,NULLCP, "vt_text failed"); ! 560: vtsend(); ! 561: } ! 562: } ! 563: if(active & AO_OBJ) ! 564: /*If potential update to Abort Output bit*/ ! 565: { ! 566: if( (kb_image & AO_OBJ) != ! 567: (AO_OBJ & *coptr->co_cmd.bool_update.value)) ! 568: /*Toggled AO bit*/ ! 569: { ! 570: if(debug) ! 571: advise(LLOG_DEBUG,NULLCP, "Toggled AO in KB"); ! 572: kb_image ^= AO_OBJ; /*Record it*/ ! 573: } ! 574: } ! 575: if(active & IP_OBJ) ! 576: /*If potential update to Interrupt Process bit*/ ! 577: { ! 578: if( (kb_image & IP_OBJ) != ! 579: (IP_OBJ & *coptr->co_cmd.bool_update.value)) ! 580: /*Toggled IP bit*/ ! 581: { ! 582: if(debug) ! 583: advise(LLOG_DEBUG,NULLCP, "Toggled IP in KB"); ! 584: kb_image ^= IP_OBJ; ! 585: kill_proc(); ! 586: } ! 587: } ! 588: if(active & DM_OBJ) ! 589: { ! 590: if( (kb_image & DM_OBJ) != ! 591: (DM_OBJ & *coptr->co_cmd.bool_update.value)) ! 592: { ! 593: /*Toggled DM BIt*/ ! 594: if(debug) ! 595: advise(LLOG_DEBUG,NULLCP, "Toggled DM in KB"); ! 596: kb_image ^= DM_OBJ; ! 597: } ! 598: } ! 599: if(active & BRK_OBJ) ! 600: /*If potential update to Break Bit*/ ! 601: { ! 602: if( (kb_image & BRK_OBJ) != ! 603: (BRK_OBJ & *coptr->co_cmd.bool_update.value)) ! 604: /*Toggled BREAK bit*/ ! 605: { ! 606: if(debug) ! 607: advise(LLOG_DEBUG,NULLCP, "Toggled BREAK in KB"); ! 608: kb_image ^= BRK_OBJ; ! 609: kill_proc(); ! 610: } ! 611: } ! 612: } ! 613: else if( !strcmp(coptr->co_name,"NI") ) ! 614: { ! 615: if(active & ECHO_OBJ) ! 616: /*Update to Echo Control Object*/ ! 617: { ! 618: if(ECHO_OBJ & *coptr->co_cmd.bool_update.value) ! 619: /*Request from User for Remote Echo*/ ! 620: { ! 621: ni_image |= ECHO_OBJ; ! 622: if(showoptions) ! 623: (void)printf("Remote Echo Update Received\n"); ! 624: if(ECHO_OBJ & nego_state) /*If now in Remote Echo*/ ! 625: { ! 626: if(na_image & ECHO_OBJ) /*No request outstatnding*/ ! 627: advise(LLOG_NOTICE,NULLCP, "User Request ignored--Now in Remote echo"); ! 628: else /*Must be user's response to a request*/ ! 629: { ! 630: if(showoptions) ! 631: (void)printf("Request for Local Echo Denied by User\n"); ! 632: na_image |= ECHO_OBJ; ! 633: } ! 634: } ! 635: else /*Else Not in Remote Echo*/ ! 636: { ! 637: if(na_image & ECHO_OBJ) /*I Requested Remote Echo*/ ! 638: /*This must be confirmation*/ ! 639: { ! 640: if(showoptions) ! 641: (void)printf("User agreed to do Remote Echo\n"); ! 642: } ! 643: else /*Request to do Remote Echo*/ ! 644: { ! 645: if(showoptions) ! 646: (void)printf("User Requested Remote Echo--O.K.\n"); ! 647: na_image |= ECHO_OBJ; ! 648: vt_set_nego(na_image,ECHO_OBJ);/*Respond "WILL"*/ ! 649: } ! 650: #ifdef BSD44 ! 651: realptyecho(1); ! 652: #else ! 653: if (ioctl(pty,TIOCGETP,(char*)&sb) == -1) { ! 654: perror("ioctl"); ! 655: adios(NULLCP, "ioctl failed"); ! 656: } ! 657: sb.sg_flags |= ECHO; /*Turn on Echo*/ ! 658: if (ioctl(pty,TIOCSETP,(char*)&sb) == -1) { ! 659: perror("ioctl"); ! 660: adios(NULLCP, "ioctl failed"); ! 661: } ! 662: #endif ! 663: nego_state |= ECHO_OBJ; ! 664: cur_emode = NOT_ECHO_NOW; /*Don't Want user to Echo*/ ! 665: } ! 666: } ! 667: else /*Request from user for Local Echo*/ ! 668: { ! 669: if(showoptions) ! 670: (void)printf("NI--Local Echo\n"); ! 671: cur_emode = NOT_ECHO_NOW; ! 672: ni_image &= ~ECHO_OBJ; ! 673: if(nego_state & ECHO_OBJ) /*If now in Remote Echo*/ ! 674: { ! 675: if(na_image & ECHO_OBJ) /*If no request pending*/ ! 676: /*Must be request from user*/ ! 677: { ! 678: ! 679: #ifdef DO_LOCAL_ECHO ! 680: if(showoptions) ! 681: (void)printf("User requested Local Echo -- O.K.\n"); ! 682: ! 683: na_image &= ~ECHO_OBJ; ! 684: nego_state &= ~ECHO_OBJ; ! 685: #ifdef BSD44 ! 686: ptyecho(0); ! 687: #else ! 688: setmode(0,ECHO); ! 689: #endif ! 690: #else ! 691: na_image |= ECHO_OBJ; ! 692: if(showoptions) ! 693: (void)printf("User requested Local Echo -- Denied\n"); ! 694: #endif ! 695: ! 696: vt_set_nego(na_image,ECHO_OBJ); /*Respond "WILL"*/ ! 697: } ! 698: else ! 699: { ! 700: if(showoptions) ! 701: (void)printf("Server request for Local Echo Accepted\n"); ! 702: nego_state &= ~ECHO_OBJ; ! 703: #ifdef BSD44 ! 704: ptyecho(0); ! 705: #else ! 706: setmode(0,ECHO); ! 707: #endif ! 708: } ! 709: } ! 710: else /*Else now in Local Echo*/ ! 711: { ! 712: if(na_image & ECHO_OBJ) /*If requeset pending*/ ! 713: /*Must be negative response*/ ! 714: { ! 715: na_image &= ~ECHO_OBJ; ! 716: if(showoptions) ! 717: (void)printf("Request for Remote Echo Denied by User\n"); ! 718: } ! 719: else /*Else no request pending*/ ! 720: { ! 721: if(showoptions) ! 722: (void)printf("User Request Ignored--Now in Local Echo\n"); ! 723: } ! 724: } ! 725: } ! 726: } ! 727: if(active & SUP_GA) ! 728: /*Update to Suppress Go Ahead Control Object*/ ! 729: { ! 730: if(SUP_GA & *coptr->co_cmd.bool_update.value) ! 731: { ! 732: if(showoptions) ! 733: (void)printf("Suppress Go Ahead\n"); ! 734: ni_image |= SUP_GA; ! 735: if((na_image & SUP_GA) == (nego_state &SUP_GA)) ! 736: /*If no request from Acceptor outstanding*/ ! 737: { ! 738: if(!(nego_state & SUP_GA)) ! 739: /*If not currently in Supress Go Ahead*/ ! 740: { ! 741: na_image |= SUP_GA; ! 742: vt_set_nego(na_image,SUP_GA);/*Reply "Will"*/ ! 743: } ! 744: } ! 745: nego_state |= SUP_GA; /*Entering or already there*/ ! 746: } ! 747: else ! 748: { ! 749: if(showoptions) ! 750: (void)printf("Don't Suppress Go Ahead\n"); ! 751: ni_image &= ~SUP_GA; ! 752: if((na_image & SUP_GA) == (nego_state & SUP_GA)) ! 753: /*Must be request from Initiator*/ ! 754: { ! 755: na_image |= SUP_GA; ! 756: vt_set_nego(na_image,SUP_GA);/*Reply "Won't"*/ ! 757: } ! 758: else /*Else reply to my request*/ ! 759: { ! 760: if(showoptions) ! 761: (void)printf("User refuses to Suppress Go Ahead\n"); ! 762: na_image &= ~SUP_GA; /*Give up*/ ! 763: } ! 764: } ! 765: } ! 766: if(active & DISP_BIN) ! 767: /*Update to WACI Binary Repertoire*/ ! 768: { ! 769: if(DISP_BIN & *coptr->co_cmd.bool_update.value) ! 770: { ! 771: if(showoptions) ! 772: (void)printf("Initiator requested Binary Repertoire on DI\n"); ! 773: if((na_image & DISP_BIN) == (nego_state & DISP_BIN)) ! 774: /*No request outstanding from Acceptor*/ ! 775: { ! 776: if(!(nego_state & DISP_BIN)) /*If not now binary*/ ! 777: { ! 778: na_image |= DISP_BIN; ! 779: vt_set_nego(na_image,DISP_BIN); /*Send "Will"*/ ! 780: switch_rep(2); ! 781: } ! 782: } ! 783: else /*Else a response to Acceptor request*/ ! 784: { ! 785: if(na_image & KBD_BIN) /*Positive Response*/ ! 786: switch_rep(2); ! 787: } ! 788: nego_state |= DISP_BIN; ! 789: na_image |= DISP_BIN; ! 790: } ! 791: else ! 792: { ! 793: if(showoptions) ! 794: (void)printf("Initiator requested ASCII Repertoire on DI\n"); ! 795: if((na_image & DISP_BIN) == (nego_state & DISP_BIN)) ! 796: { ! 797: if(nego_state & DISP_BIN) /*If not now ASCII*/ ! 798: { ! 799: na_image &= ~DISP_BIN; ! 800: vt_set_nego(na_image,DISP_BIN); ! 801: switch_rep(1); ! 802: } ! 803: } ! 804: else ! 805: { ! 806: if(!(na_image & KBD_BIN)) /*Positive Response*/ ! 807: switch_rep(1); ! 808: } ! 809: nego_state &= ~DISP_BIN; ! 810: na_image &= ~DISP_BIN; ! 811: } ! 812: } ! 813: if(active & KBD_BIN) ! 814: /*Update to WACI Binary Repertoire*/ ! 815: { ! 816: if(KBD_BIN & *coptr->co_cmd.bool_update.value) ! 817: { ! 818: if(showoptions) ! 819: (void)printf("Initiator requested Binary Repertoire on KB\n"); ! 820: if((na_image & KBD_BIN) == (nego_state & KBD_BIN)) ! 821: /*If no Acceptor request outstanding*/ ! 822: { ! 823: if(!(nego_state & KBD_BIN))/*If not now binary*/ ! 824: { ! 825: na_image |= KBD_BIN; ! 826: vt_set_nego(na_image,KBD_BIN); /*Reply "Will"*/ ! 827: } ! 828: } ! 829: na_image |= KBD_BIN; ! 830: nego_state |= KBD_BIN; ! 831: } ! 832: else ! 833: { ! 834: if(showoptions) ! 835: (void)printf("Initiator requested ASCII Repertoire on KB\n"); ! 836: if((na_image & KBD_BIN) == (nego_state & KBD_BIN)) ! 837: /*Request from Initator*/ ! 838: { ! 839: if(nego_state & KBD_BIN) /*If not now ASCII*/ ! 840: { ! 841: na_image &= ~KBD_BIN; ! 842: vt_set_nego(na_image,KBD_BIN); /*Reply "Will"*/ ! 843: } ! 844: } ! 845: na_image &= ~KBD_BIN; ! 846: nego_state &= ~KBD_BIN; ! 847: } ! 848: } ! 849: } ! 850: } ! 851: if( !strcmp(coptr->co_name,"SY") ) /*SYNCHRONIZE CO can be written ! 852: by Initiator or Acceptor*/ ! 853: { ! 854: if(active & SYNC) ! 855: /*Potential Update to Synch*/ ! 856: { ! 857: if( (SYNC & *coptr->co_cmd.bool_update.value) != ! 858: (SYNC & sync_image) ) ! 859: { ! 860: advise(LLOG_NOTICE,NULLCP, "Toggled SYNC"); ! 861: sync_image ^= SYNC; ! 862: } ! 863: } ! 864: } ! 865: if( !strcmp(coptr->co_name,"GA") ) ! 866: { ! 867: if(active & GO_AHEAD) ! 868: /*Potential Update to Go Ahead*/ ! 869: { ! 870: if( (GO_AHEAD & *coptr->co_cmd.bool_update.value) != ! 871: (GO_AHEAD & ga_image) ) ! 872: { ! 873: if(debug) ! 874: advise(LLOG_DEBUG,NULLCP, "Toggled Go Ahead"); ! 875: ga_image ^= GO_AHEAD; ! 876: } ! 877: } ! 878: } ! 879: ! 880: } ! 881: ! 882: attrib_hdlr(doptr) /*Handle Write Attribute Display Object Update*/ ! 883: DO_UPDATE *doptr; ! 884: { ! 885: ! 886: ! 887: if(doptr->do_cmd.wrt_attrib.attr_id == 0) ! 888: /*If switching repertoires*/ ! 889: { ! 890: if(doptr->do_cmd.wrt_attrib.attr_ext == 2) ! 891: /*If Modal extent*/ ! 892: { ! 893: if(doptr->do_cmd.wrt_attrib.attr_val == 1) ! 894: { ! 895: if(showoptions) ! 896: if(my_right == INITIATOR) ! 897: (void)printf("Switching to ASCII Repertoire\r\n"); ! 898: transparent = 0; ! 899: } ! 900: else if(doptr->do_cmd.wrt_attrib.attr_val == 2) ! 901: { ! 902: if(showoptions) ! 903: if(my_right == INITIATOR) ! 904: (void)printf("Switching to Transparent profile.\r\n"); ! 905: transparent = 1; ! 906: } ! 907: else (void)printf("Attribute for unavailable repertoire\n"); ! 908: } ! 909: else (void)printf("Attribute update with invalid extent (%d)\n", ! 910: doptr->do_cmd.wrt_attrib.attr_ext); ! 911: } ! 912: else ! 913: advise(LLOG_NOTICE,NULLCP, "Attribute Update with invalid I.D. (%d)\n", doptr->do_cmd.wrt_attrib.attr_id); ! 914: } ! 915: ! 916: /* TTY */ ! 917: ! 918: #ifdef BSD44 ! 919: extern struct termios oterm; ! 920: ! 921: int ! 922: tmode(f) ! 923: int f; ! 924: { ! 925: static int prevmode = 0; ! 926: struct termios term; ! 927: int onoff, old; ! 928: ! 929: if (prevmode == f) ! 930: return (f); ! 931: old = prevmode; ! 932: prevmode = f; ! 933: term = oterm; ! 934: switch (f) { ! 935: case 0: ! 936: onoff = 0; ! 937: break; ! 938: case 1: ! 939: case 2: ! 940: onoff = 1; ! 941: if (f == 1) ! 942: { ! 943: term.c_lflag &= ~ECHO; ! 944: term.c_oflag &= ~OPOST; ! 945: } ! 946: else ! 947: { ! 948: term.c_lflag |= ECHO; ! 949: term.c_oflag |= OPOST; ! 950: } ! 951: term.c_lflag &= ~(IEXTEN|ISIG|ICANON); ! 952: break; ! 953: default: ! 954: return old; ! 955: } ! 956: if (tcsetattr(fileno(stdin), TCSAFLUSH, &term) == -1) ! 957: perror("tcsetattr"); ! 958: if (ioctl(fileno(stdin), FIONBIO, (char*)&onoff) == -1) { ! 959: perror("ioctl"); ! 960: } ! 961: return (old); ! 962: } ! 963: ! 964: #else ! 965: ! 966: extern struct tchars otc; ! 967: extern struct ltchars oltc; ! 968: extern struct sgttyb ottyb; ! 969: ! 970: /* struct tchars notc = { -1, 3, -1, -1, -1, -1 };*/ ! 971: struct tchars notc = { ! 972: -1, -1, -1, -1, -1, -1 }; ! 973: struct ltchars noltc = { ! 974: -1, -1, -1, -1, -1, -1 }; ! 975: ! 976: int ! 977: tmode(f) ! 978: register int f; ! 979: { ! 980: static int prevmode = 0; ! 981: struct tchars *tc; ! 982: struct ltchars *ltc; ! 983: struct sgttyb sb; ! 984: int onoff, old; ! 985: ! 986: if (prevmode == f) ! 987: return (f); ! 988: old = prevmode; ! 989: prevmode = f; ! 990: sb = ottyb; ! 991: switch (f) { ! 992: ! 993: case 0: ! 994: onoff = 0; ! 995: tc = &otc; ! 996: ltc = &oltc; ! 997: break; ! 998: ! 999: case 1: ! 1000: case 2: ! 1001: if (f == 1) ! 1002: { ! 1003: sb.sg_flags |= CBREAK; ! 1004: sb.sg_flags &= ~(ECHO|CRMOD); ! 1005: sb.sg_erase = sb.sg_kill = -1; ! 1006: } ! 1007: else ! 1008: { ! 1009: sb.sg_flags &= CBREAK; ! 1010: sb.sg_flags |= ECHO|CRMOD; ! 1011: } ! 1012: tc = ¬c; ! 1013: notc.t_stopc = otc.t_stopc; ! 1014: notc.t_startc = otc.t_startc; ! 1015: ltc = &noltc; ! 1016: onoff = 1; ! 1017: break; ! 1018: ! 1019: default: ! 1020: return old; ! 1021: } ! 1022: if (ioctl(fileno(stdin), TIOCSLTC, (char *)ltc) == -1) { ! 1023: perror("ioctl"); ! 1024: adios(NULLCP, "ioctl failed"); ! 1025: } ! 1026: if (ioctl(fileno(stdin), TIOCSETC, (char *)tc) == -1) { ! 1027: perror("ioctl"); ! 1028: adios(NULLCP, "ioctl failed"); ! 1029: } ! 1030: if (ioctl(fileno(stdin), TIOCSETP, (char *)&sb) == -1) { ! 1031: perror("ioctl"); ! 1032: adios(NULLCP, "ioctl failed"); ! 1033: } ! 1034: if (ioctl(fileno(stdin), FIONBIO, (char*)&onoff) == -1) { ! 1035: perror("ioctl"); ! 1036: adios(NULLCP, "ioctl failed"); ! 1037: } ! 1038: if (ioctl(fileno(stdout), FIONBIO, (char*)&onoff) == -1) { ! 1039: perror("ioctl"); ! 1040: adios(NULLCP, "ioctl failed"); ! 1041: } ! 1042: return (old); ! 1043: } ! 1044: #endif ! 1045: ! 1046: kill_proc() /*Terminate current UNIX process using UNIX interrupt char*/ ! 1047: { ! 1048: #ifdef BSD44 ! 1049: struct termios term; ! 1050: ! 1051: if (tcgetattr(pty, &term) == -1) ! 1052: perror("tcgetattr"); ! 1053: else if (term.c_cc[VINTR] != _POSIX_VDISABLE) ! 1054: (void) putch(term.c_cc[VINTR]); ! 1055: #else ! 1056: if(ioctl(pty,TIOCGETC,(char *)&otc) == -1) ! 1057: { ! 1058: perror("ioctl"); ! 1059: adios(NULLCP, "ioctl failed"); ! 1060: } ! 1061: (void) putch(otc.t_intrc); ! 1062: #endif ! 1063: } ! 1064: ! 1065: def_echo(coptr) /*Handle Default Profile Echo Ctrl Object*/ ! 1066: CO_UPDATE *coptr; ! 1067: { ! 1068: ! 1069: char active = 0; ! 1070: ! 1071: if(coptr->co_cmd.bool_update.mask_count == 0) active = 0xff; ! 1072: else active = *coptr->co_cmd.bool_update.mask; ! 1073: ! 1074: if (active & ECHO_OBJ) { ! 1075: if(*coptr->co_cmd.bool_update.value & ECHO_OBJ) ! 1076: /*True means do local echo*/ ! 1077: (void) tmode(2); ! 1078: else ! 1079: (void) tmode(1); ! 1080: } ! 1081: } ! 1082: #ifdef BSD44 ! 1083: static realptyecho(on) ! 1084: { ! 1085: struct termios term; ! 1086: ! 1087: if (tcgetattr(pty, &term) == -1) { ! 1088: perror("tcgetattr"); ! 1089: return; ! 1090: } ! 1091: if (on) ! 1092: term.c_lflag |= ECHO; ! 1093: else ! 1094: term.c_lflag &= ECHO; ! 1095: if (tcsetattr(pty, TCSAFLUSH, &term) == -1) { ! 1096: perror("tcsetattr"); ! 1097: return; ! 1098: } ! 1099: } ! 1100: #endif
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.