#ifndef lint #ifdef sccs static char sccsid[] = "@(#)tty_main.c 20.93 93/06/28"; #endif #endif /* * (c) Copyright 1989 Sun Microsystems, Inc. Sun design patents * pending in the U.S. and foreign countries. See LEGAL NOTICE * file for terms of the license. */ /* * Very active terminal emulator subwindow pty code. */ #include #include #include #include #include #include #ifdef XV_USE_SVR4_PTYS #include #include #include #else /* XV_USE_SVR4_PTYS */ #include #endif /* XV_USE_SVR4_PTYS */ #include #include #include #include #include #include #include #include #include #include #include #include #include #include #define _NOTIFY_MIN_SYMBOLS #include #undef _NOTIFY_MIN_SYMBOLS #include #include #include #include #ifdef OW_I18N #include #include #include #include #ifdef FULL_R5 #include #endif /* FULL_R5 */ #endif #ifdef OW_I18N /* * If there are committed chars and pre_edit chars returned by XIM, * we should display the echo'ed committed chars before display pre_edit chars. * Thus, tty callback will not display pre_edit chars until all committed chars * are echoed. */ int committed_left = 0; #endif extern Textsw_index textsw_insert(); #ifdef OW_I18N extern Textsw_index textsw_insert_wcs(); #endif /* * jcb -- remove continual cursor repaint in shelltool windows also known to * ttyansi.c */ extern int do_cursor_draw; extern int tty_new_cursor_row, tty_new_cursor_col; extern int tty_has_new_bufmod; /* shorthand */ #define iwbp ttysw->ttysw_ibuf.cb_wbp #define irbp ttysw->ttysw_ibuf.cb_rbp #define iebp ttysw->ttysw_ibuf.cb_ebp #define ibuf ttysw->ttysw_ibuf.cb_buf #define owbp ttysw->ttysw_obuf.cb_wbp #define orbp ttysw->ttysw_obuf.cb_rbp #define oebp ttysw->ttysw_obuf.cb_ebp #define obuf ttysw->ttysw_obuf.cb_buf /* #ifdef TERMSW */ /* * The basic strategy for building a line-oriented command subwindow * (terminal emulator subwindow) on top of the text subwindow is as follows. * * The idle state has no user input still to be processed, and no outstanding * active processes at the other end of the pty (except the shell). * * When the user starts creating input events, they are passed through to the * textsw unless they fall in the class of "activating events" (which right * now consists of \n, \r, \033, ^C and ^Z). In addition, the end of the * textsw's backing store is recorded when the first event is created. * * When an activating event is entered, all of the characters in the textsw * from the recorded former end to the current end of the backing store are * added to the list of characters to be sent to the pty. In addition, the * current end is set to be the insertion place for response from the pty. * * If the user has started to enter a command, then in order to avoid messes * on the display, the first response from the pty will be suffixed with a \n * (unless it ends in a \n), and the pty will be marked as "owing" a \n. * * In the meantime, if the user continues to create input events, they are * appended at the end of the textsw, after the response from the pty. When * an activating event is entered, all of the markers, etc. are updated as * described above. * * The most general situation is: Old stuff in the log file ^User editing * here More old stuff Completed commands enqueued for the pty Pty inserting * here^ (Prompt)Partial user command */ /* #endif TERMSW */ /* * Main pty processing. */ /* * Return nonzero iff ttysw is in a state such that the current (partial) line * destined to be input to the application should be sent to it. * * Assumption: the line is nonempty. */ Pkg_private int ttysw_pty_output_ok(ttysw) register Ttysw_folio ttysw; { CHAR c; /* * If the ttysw's pty isn't in remote mode, then the kernel pty code will * worry about assembling complete lines, so it's ok for us to send what * we have. (N.B., we assume here that the pty is in remote mode * precisely when ttysw is acting as a tty (as opposed to text) * subwindow.) */ if (!ttysw_getopt(ttysw, TTYOPT_TEXT)) return (1); /* * If the slave side of the pty isn't in canonical mode, then partial * lines are ok. */ if (!tty_iscanon(ttysw)) return (1); /* * If the line ends with a terminator, it should be sent. */ c = *(iwbp - 1); if (c == (CHAR)'\n' || c == (CHAR)tty_geteofc(ttysw) || c == (CHAR)tty_geteolc(ttysw) || c == (CHAR)tty_geteol2c(ttysw)) return (1); /* * A pending EOT counts as a terminator. */ { Termsw_folio termsw = TERMSW_FOLIO_FOR_VIEW(TERMSW_VIEW_PRIVATE_FROM_TTY_PRIVATE(ttysw)); if (termsw->pty_eot > -1) return (1); } return (0); } /* * Write window input to pty. * * A bit of care is required here. If the pty is currently in remote mode, we * have responsibility for implementing tty semantics. In particular, we must * make sure that, when in canonical mode, we don't present partial input * lines to the application reading from the slave side of the pty. */ #ifdef OW_I18N #define MB_BUF_MAX 8192 Pkg_private int ttysw_pty_output(ttysw, pty) register Ttysw_folio ttysw; int pty; { register int cc; char mb_irbp[MB_BUF_MAX + 1];/* multi-byte copy of irbp */ int mb_nbytes; /* number of bytes converted */ CHAR save_char; if (ttysw_getopt((caddr_t) ttysw, TTYOPT_TEXT)) { Termsw_folio termsw = TERMSW_FOLIO_FOR_VIEW(TERMSW_VIEW_PRIVATE_FROM_TTY_PRIVATE(ttysw)); if (termsw->pty_eot > -1) { CHAR *eot_bp = ibuf + termsw->pty_eot; CHAR nullc = (CHAR)'\0'; /* write everything up to pty_eot */ if (eot_bp >= irbp) { /* convert CHAR to char and calls write() */ save_char = *eot_bp; *eot_bp = nullc; mb_nbytes = wcstombs_with_null(mb_irbp, irbp, eot_bp - irbp); *eot_bp = save_char; if( mb_nbytes == -1 ) { perror(XV_MSG("TTYSW:ttysw_pty_output: invalid wide character")); return; } cc = ttysw_mbs_write(pty, mb_irbp, mb_nbytes); if (cc > 0) { irbp += cc; } else if (cc < 0) { perror(XV_MSG("TTYSW pty write failure")); } termsw->pty_eot = -1; } } /* termsw->pty_eot > -1 */ /* only write the rest of the buffer if it doesn't have an eot in it */ if (termsw->pty_eot > -1) return; } if (iwbp > irbp) { /* * Bail out if we need to present a complete input line but don't have * one yet. * * XXX: Need to consider buffer overflows here. * XXX: Tests made and actions taken elsewhere should ensure that this * test never succeeds; we're just being paranoid here. */ if (!ttysw_pty_output_ok(ttysw)) return; /* convert CHAR to char and call write() */ save_char = *iwbp; *iwbp = '\0'; mb_nbytes = wcstombs_with_null(mb_irbp, irbp, iwbp - irbp ); *iwbp = save_char; if( mb_nbytes == -1 ) { perror(XV_MSG("TTYSW:ttysw_pty_output: invalid wide character")); return; } cc = ttysw_mbs_write(pty, mb_irbp, mb_nbytes); if (cc > 0) { irbp += cc; if (irbp == iwbp) irbp = iwbp = ibuf; } else if (cc < 0) { perror(XV_MSG("TTYSW pty write failure")); } } } #undef MB_BUF_MAX /* * write() system call does not guarantee that all data you have passed * is actually written. This kind of paranoia occurs when you are * writing to a channel to another process such as a pipe. * This function takes care that some data may remain unwritten and also, * the boundary is within one multibyte character. */ /* static */ int ttysw_mbs_write(pty, mbs, nbytes) int pty; char *mbs; int nbytes; { int nchars = 0; int write_flag = 0; int charlen,len; register char *tmp = mbs ; static int nbytes_left; static char mbs_left[10]; if (nbytes_left > 0) { len = write(pty, mbs_left, nbytes_left); if (len < 0) return -1; else if (len == nbytes_left) { nbytes_left = 0; write_flag = 1; } else { nbytes_left -= len; XV_BCOPY(&mbs_left[len], mbs_left, nbytes_left); return 0; } } len = write(pty, mbs, nbytes); if (len < 0) return ((write_flag == 1) ? 0 : -1); while (len > 0) { charlen = euclen( tmp ); tmp += charlen; len -= charlen; nchars++; } if (len < 0) { tmp += len; XV_BCOPY(tmp, mbs_left, -len); nbytes_left = -len; } return nchars; } #else #ifdef DEBUG Pkg_private void ttysw_print_debug_string(cp, len) char *cp; int len; { int i; putchar('"'); for (i=0; i"); else if (cp[i] == '\n') printf(""); else if (cp[i] == '\r') printf(""); else if (cp[i] == '\010') printf(""); else if (iscntrl(cp[i])) printf("<^%c>", cp[i]+'A'-1); else printf("<0x%x>", cp[i]); } printf("\"\n"); } #endif /* DEBUG */ Pkg_private int ttysw_pty_output(ttysw, pty) register Ttysw_folio ttysw; int pty; { register int cc; if (ttysw_getopt((caddr_t) ttysw, TTYOPT_TEXT)) { Termsw_folio termsw = TERMSW_FOLIO_FOR_VIEW(TERMSW_VIEW_PRIVATE_FROM_TTY_PRIVATE(ttysw)); if (termsw->pty_eot > -1) { char *eot_bp = ibuf + termsw->pty_eot; /* write everything up to pty_eot */ if (eot_bp >= irbp) { /* was: > */ cc = write(pty, irbp, eot_bp - irbp); #ifdef DEBUG printf("write to pty: "); ttysw_print_debug_string(irbp, eot_bp - irbp); #endif /* DEBUG */ if (cc > 0) irbp += cc; else if (cc < 0) perror(XV_MSG("TTYSW pty write failure")); } termsw->pty_eot = -1; } /* only write the rest of the buffer if it doesn't have an eot in it */ if (termsw->pty_eot > -1) return; } if (iwbp > irbp) { /* * Bail out if we need to present a complete input line but don't have * one yet. * * XXX: Need to consider buffer overflows here. * XXX: Tests made and actions taken elsewhere should ensure that this * test never succeeds; we're just being paranoid here. */ if (!ttysw_pty_output_ok(ttysw)) return; cc = write(pty, irbp, iwbp - irbp); #ifdef DEBUG printf("write to pty: "); ttysw_print_debug_string(irbp, iwbp - irbp); #endif /* DEBUG */ if (cc > 0) { irbp += cc; if (irbp == iwbp) irbp = iwbp = ibuf; } else if (cc < 0) perror(XV_MSG("TTYSW pty write failure")); } } #endif /* static */ void ttysw_process_STI(ttysw, cp, cc) register Ttysw_folio ttysw; register char *cp; register int cc; { register short post_id; register Textsw textsw; Textsw_view textsw_view; register Termsw_folio termsw; Textsw_index pty_index; Textsw_index cmd_start; #ifdef DEBUG fprintf(stderr, "STI \"%.*s\"\n", cc, cp); #endif /* DEBUG */ /* * If we're not in remote mode, then the OS tty line discipline code will * already have handled the TIOCSTI, leaving us with nothing to do here. */ if (!ttysw_getopt(ttysw, TTYOPT_TEXT)) return; textsw = TEXTSW_FROM_TTY(ttysw); textsw_view = TERMSW_VIEW_PUBLIC(TERMSW_VIEW_PRIVATE_FROM_TEXTSW(textsw)); termsw = TERMSW_FOLIO_FOR_VIEW(TERMSW_VIEW_PRIVATE_FROM_TEXTSW(textsw)); /* Assume app wants STI text echoed at cursor position */ if (termsw->cooked_echo) { pty_index = textsw_find_mark_i18n(textsw, termsw->pty_mark); if (termsw->cmd_started) cmd_start = textsw_find_mark_i18n(textsw, termsw->user_mark); else cmd_start = (Textsw_index) xv_get(textsw, TEXTSW_LENGTH_I18N); if (cmd_start > pty_index) { if (termsw->append_only_log) textsw_remove_mark(textsw, termsw->read_only_mark); (void) textsw_delete_i18n(textsw, pty_index, cmd_start); if (termsw->append_only_log) { termsw->read_only_mark = textsw_add_mark_i18n(textsw, pty_index, TEXTSW_MARK_READ_ONLY); } termsw->pty_owes_newline = 0; } } /* * Pretend STI text came in from textsw window fd. * * What we really have to do here is post the STI text as events to the * current textsw view. This delivers them to ttysw_text_event, which * we've interposed on the view. That routine either handles the events * directly or dispatches them onward. */ while (cc > 0) { post_id = (short) (*cp); (void) win_post_id(textsw_view, post_id, NOTIFY_SAFE); cp++; cc--; } /* flush caches */ (void) xv_get(textsw, TEXTSW_LENGTH_I18N); } #ifdef XV_USE_SVR4_PTYS /* * Read pty's input (which is output from program) * * Assumptions: * 1) SVR4-style ptys, with the pckt module pushed on the master side. * 2) pty has been put into nonblocking i/o mode. * 3) The slave side has ttcompat and ldterm pushed on it, so that we don't * have to cope with BSD-style tty ioctls here. * 4) It's ok to return without delivering any data. * 5) The data buffer we're given is large enough to hold an iocblk plus * associated data. */ Pkg_private void ttysw_pty_input(ttysw, pty) register Ttysw_folio ttysw; int pty; { struct strbuf ctlbuf; struct strbuf databuf; u_char ctlbyte; /* buffer for control part of msg */ int flags = 0; register int rv; #ifdef OW_I18N #define MB_BUF_SIZE 12 #define MB_BUF_MAX 8192 register int mb_nbyte; /* # of bytes to be converted */ register int wc_nchar; /* # of wide characters converted */ unsigned char mb_buf_p[MB_BUF_MAX]; unsigned char *a_mb_buf_p = mb_buf_p; unsigned char mb_data[MB_BUF_MAX]; static unsigned char rest_of_char[MB_BUF_SIZE]; static int rest_of_nchar = 0; int mb_buf_length = 0; if ((rest_of_nchar > 0) && (rest_of_nchar <= MB_BUF_MAX)) { XV_BCOPY(rest_of_char, mb_buf_p, rest_of_nchar); a_mb_buf_p += rest_of_nchar; mb_buf_length += rest_of_nchar; rest_of_nchar = 0; } #endif ctlbuf.maxlen = sizeof ctlbyte; ctlbuf.len = 0; /* redundant */ ctlbuf.buf = (char *)&ctlbyte; get_some_more: databuf.len = 0; /* redundant */ #ifdef OW_I18N /* * The minus one is important for NULL terminating character * will not write outside of the buffer. */ databuf.maxlen = ((oebp - owbp) - mb_buf_length) - 1; databuf.buf = (char *)mb_data; #else /* OW_I18N */ databuf.maxlen = oebp - owbp; databuf.buf = owbp; #endif /* OW_I18N */ rv = getmsg (pty, &ctlbuf, &databuf, &flags); /* * Check for read error or a false hit from poll/select. * * (The original version of the routine didn't distinguish these * possibilities. It also didn't check for zero-length reads. For the * moment, at least, we don't try to tell them apart since the original * didn't.) */ if (rv < 0) return; /* * If there's no control part, then we've effectively done a normal read. * This can potentially happen if the last message's data part overflowed * the buffer we provided for it. */ if (ctlbuf.len <= 0) goto m_data; /* sleazy control transfer... */ # ifdef notdef /* * The packet module only creates messages with the control part * consisting of one byte. Since it packetizes M_DATA and M_*PROTO * messages and getmsg only passes messages of those types through to us, * the test below can never be satisfied. */ if ((rv & MORECTL) || ctlbuf.len != sizeof ctlbyte) return; # endif /* notdef */ /* * Process the message. The code below handles only packetized M_DATA and * M_IOCTL messages. It perhaps should be extended to handle M_START, * M_STOP, M_FLUSH, etc. */ switch (ctlbyte) { case M_DATA: m_data: if (databuf.len > 0) { #ifdef OW_I18N register unsigned char *p, *q; register wchar_t *w; register int i, j; XV_BCOPY(mb_data, a_mb_buf_p, databuf.len); a_mb_buf_p += databuf.len; mb_buf_length += databuf.len; if ( (oebp - owbp) - mb_buf_length <= 4 ) goto process_mb_buf; if(!tty_has_new_bufmod) { struct strpeek peek; char byte; peek.ctlbuf.maxlen = sizeof byte; peek.ctlbuf.buf = & byte; peek.databuf.buf = NULL; /* no data info */ peek.flags = 0; if(ioctl(pty, I_PEEK, & peek) <= 0) goto process_mb_buf; if(byte == M_DATA) goto get_some_more; } process_mb_buf: i = mb_nbyte = mb_buf_length; mb_buf_p[i] = NULL; wc_nchar = 0; for (p = mb_buf_p, w = owbp; i > 0; ) { if( *p >= 0 && *p <= 0x7f ) { /* It includes NULL char */ #ifdef sun /* * This direct casting depends on the wchar_t * implementation. It's Sun specific. The main reason * to do so here is to get better performance. */ *w = (wchar_t)(*p); #endif j = 1; } else { if ((j = mbtowc(w, (char *)p, MB_CUR_MAX)) < 0) { if (i < (int)MB_CUR_MAX) break; p++; i--; continue; } } p += j; i -= j; w++; wc_nchar++; } *w = 0; if ((i > 0) && (i < MB_BUF_SIZE)) { q = rest_of_char; XV_BCOPY(p, q, i); rest_of_nchar = i; } #undef MB_BUF_SIZE owbp += wc_nchar; #else /* OW_I18N */ #ifdef DEBUG printf("read from pty: "); ttysw_print_debug_string(owbp, databuf.len); #endif owbp += databuf.len; /* * the following block of code attempts to * compensate for the lack of consolidation in * 5.0 ptys. * * It is used only if we couldn't config the * new bufmod to provide the buffering for * us... * * */ if(!tty_has_new_bufmod) { struct strpeek peek; char byte; peek.ctlbuf.maxlen = sizeof byte; peek.ctlbuf.buf = & byte; peek.databuf.buf = NULL; /* no data info */ peek.flags = 0; if(ioctl(pty, I_PEEK, & peek) <= 0) return; if(byte == M_DATA) goto get_some_more; } #endif /* OW_I18N */ return; } /* * Zero-length message ==> slave closed; as noted above, we ignore it. */ return; case M_IOCTL: { struct iocblk *ioc = (struct iocblk *)databuf.buf; #ifdef DEBUG int i; struct ioctl_name_t { int value; char *name; }; static struct ioctl_name_t ioctl_name[8] = { TCSETS, "TCSETS", TCSETSW, "TCSETSW", TCSETSF, "TCSETSF", TCSETA, "TCSETA", TCSETAW, "TCSETAW", TCSETAF, "TCSETAF", TIOCSTI, "TIOCSTI", 0, 0 }; for (i=0; ioctl_name[i].value; i++) { if (ioctl_name[i].value == ioc->ioc_cmd) { printf("(ttysw_pty_input) ioctl %s received\n", ioctl_name[i].name); break; } } #endif /* DEBUG */ #ifdef OW_I18N if ( !TTY_IS_TERMSW(ttysw) ) break; #endif /* * Process the ioctl by switching on it and handling all interesting * cases. * * XXX: We're utterly unprepared to handle ioctls that overflow * databuf. (There's some chance this could happen with * TIOCSTI.) */ switch (ioc->ioc_cmd) { case TCSETS: case TCSETSW: case TCSETSF: /* * A termios-style ioctl. Replace our saved tty state with its * contents. Then check for interesting mode transitions. */ ttysw->termios = *(struct termios *)(databuf.buf + sizeof *ioc); ttysw_getp(TTY_VIEW_HANDLE_FROM_TTY_FOLIO(ttysw)); break; case TCSETA: case TCSETAW: case TCSETAF: { /* * A termio-style ioctl. (It'll be nice when these are phased * out...) Fold its contents into our saved tty state. Then * check for interesting mode transitions. */ struct termios *tp = &ttysw->termios; struct termio *ti; ti = (struct termio *) (databuf.buf + sizeof *ioc); tp->c_iflag = (tp->c_iflag & 0xffff0000) | ti->c_iflag; tp->c_oflag = (tp->c_oflag & 0xffff0000) | ti->c_oflag; tp->c_lflag = (tp->c_lflag & 0xffff0000) | ti->c_lflag; tp->c_cc[VINTR] = ti->c_cc[VINTR]; tp->c_cc[VQUIT] = ti->c_cc[VQUIT]; tp->c_cc[VERASE] = ti->c_cc[VERASE]; tp->c_cc[VKILL] = ti->c_cc[VKILL]; tp->c_cc[VEOF] = ti->c_cc[VEOF]; tp->c_cc[VEOL] = ti->c_cc[VEOL]; tp->c_cc[VEOL2] = ti->c_cc[VEOL2]; ttysw_getp(TTY_VIEW_HANDLE_FROM_TTY_FOLIO(ttysw)); break; } case TIOCSTI: /* * The argument byte(s) for the TIOCSTI imediately follow the * ioctl control block. */ ttysw_process_STI(ttysw, databuf.buf + sizeof *ioc, databuf.len - sizeof *ioc); break; default: /* * XXX: Are there other interesting ioctls than the ones handled * above? For debugging purposes, we probably need a printf here. */ break; } break; } default: break; } #ifdef OW_I18N rest_of_nchar = 0; #ifdef notdef free(mb_buf_p); #endif /* notdef */ #endif } #else /* XV_USE_SVR4_PTYS */ Pkg_private void ttysw_pty_input(ttysw, pty) register Ttysw_folio ttysw; int pty; { static struct iovec iov[2]; register int cc; char ucntl; register unsigned int_ucntl; #ifdef OW_I18N #define MB_BUF_SIZE 12 register int wc_nchar; /* number of wide characters converted */ unsigned char * mb_buf_p; unsigned char mb_buf[MB_BUF_SIZE]; static unsigned char rest_of_char[MB_BUF_SIZE]; static int rest_of_nchar = 0; /* readv to a buffer and convert it to CHAR */ /* readv avoids need to shift packet header out of owbp. */ iov[0].iov_base = &ucntl; iov[0].iov_len = 1; iov[1].iov_len = oebp - owbp; #else /* readv avoids need to shift packet header out of owbp. */ iov[0].iov_base = &ucntl; iov[0].iov_len = 1; iov[1].iov_base = owbp; iov[1].iov_len = oebp - owbp; #endif #ifdef OW_I18N if (!(mb_buf_p = (unsigned char *)malloc((iov[1].iov_len * sizeof(CHAR)) + sizeof(rest_of_char)))) { perror(XV_MSG("TTYSW:ttysw_pty_input: out of memory")); return; } if (rest_of_nchar != 0) XV_BCOPY(rest_of_char, mb_buf_p, rest_of_nchar); iov[1].iov_base = (char *)mb_buf_p + rest_of_nchar; /* yuck */ #endif cc = readv(pty, iov, 2); #ifdef OW_I18N mb_buf_p[cc - 1 + rest_of_nchar] = 0; { register unsigned char *p; register wchar_t *w; register int i, j; wc_nchar = 0; i = cc - 1 + rest_of_nchar; rest_of_nchar = 0; for (p = mb_buf_p, w = owbp; i > 0; ) { if( *p == '\0' ) { *w = (wchar_t)'\0'; j = 1; } else { if ((j = mbtowc(w, p, MB_CUR_MAX)) < 0) { if (i < MB_CUR_MAX) { break; } p++; i--; continue; } } p += j; i -= j; w++; wc_nchar++; } if (i >= MB_CUR_MAX) { perror(XV_MSG("TTYSW:ttysw_pty_input: invalid multi-byte character")); if (mb_buf_p != mb_buf) free(mb_buf_p); return; } *w = 0; if (i != 0) { XV_BCOPY(p, rest_of_char, i); rest_of_nchar = i; } } if (mb_buf_p != mb_buf) { free(mb_buf_p); } #endif if (cc < 0 && errno == EWOULDBLOCK) cc = 0; else if (cc <= 0) cc = -1; if (cc > 0) { int_ucntl = (unsigned) ucntl; if (int_ucntl != 0 && ttysw_getopt(ttysw, TTYOPT_TEXT)) { unsigned tiocsti = TIOCSTI; if (int_ucntl == (tiocsti & 0xff)) ttysw_process_STI(ttysw, owbp, cc - 1); (void) ioctl(ttysw->ttysw_tty, TIOCGETC, &ttysw->tchars); (void) ioctl(ttysw->ttysw_tty, TIOCGLTC, &ttysw->ltchars); ttysw_getp(TTY_VIEW_HANDLE_FROM_TTY_FOLIO(ttysw)); /* jcb for nng */ } else #ifdef OW_I18N owbp += wc_nchar; #undef MB_BUF_SIZE #else owbp += cc - 1; #endif } } #endif /* XV_USE_SVR4_PTYS */ /* * Send program output to terminal emulator. */ Pkg_private void ttysw_consume_output(ttysw_view) Ttysw_view_handle ttysw_view; { register Ttysw_folio ttysw = TTY_FOLIO_FROM_TTY_VIEW_HANDLE(ttysw_view); short is_not_text; int cc; /* cache the cursor removal and re-render once in this set -- jcb */ if (is_not_text = !ttysw_getopt((caddr_t) ttysw, TTYOPT_TEXT)) { (void) ttysw_removeCursor(); do_cursor_draw = FALSE; } while (owbp > orbp && !(ttysw->ttysw_flags & TTYSW_FL_FROZEN)) { if (is_not_text) { #ifdef OW_I18N if ( ttysw->implicit_commit == 0 ) { #endif if (ttysw->ttysw_primary.sel_made) { ttysel_deselect(&ttysw->ttysw_primary, SELN_PRIMARY); } if (ttysw->ttysw_secondary.sel_made) { ttysel_deselect(&ttysw->ttysw_secondary, SELN_SECONDARY); } #ifdef OW_I18N } else ttysw->implicit_commit = 0; /* turn off the flag */ #endif } cc = ttysw_output_it(ttysw_view, orbp, owbp - orbp); #ifdef OW_I18N /* * Display the pre_edit region after committed string is echoed. * In case of non-echo mode, we don't guarantee the echoing of * the preedit region either. */ if (committed_left > 0) { committed_left -= cc; if (committed_left <= 0) { committed_left = 0; } } #endif orbp += cc; if (orbp == owbp) orbp = owbp = obuf; } if (is_not_text) { (void) ttysw_drawCursor(tty_new_cursor_row, tty_new_cursor_col); do_cursor_draw = TRUE; #ifdef OW_I18N if (ttysw->im_store) { int len; ttysw->im_first_col = curscol; ttysw->im_first_row = cursrow; if ( (len = wslen(ttysw->im_store)) > 0 ) { tty_preedit_put_wcs( ttysw, ttysw->im_store , ttysw->im_attr, ttysw->im_first_col, ttysw->im_first_row, &(ttysw->im_len) ); } } #endif } } /* * Do the low-level work of transcribing a string into the ttysw's input * queue. Return number of bytes transcribed. */ Pkg_private int ttysw_copy_to_input_buffer(ttysw, addr, len) register Ttysw_folio ttysw; CHAR *addr; register int len; { if (iwbp + len >= iebp) { /* * Input buffer would overflow, so tell user and discard chars. */ Frame frame = xv_get(TTY_PUBLIC(ttysw), WIN_FRAME); Xv_Notice tty_notice; tty_notice = xv_get(frame, XV_KEY_DATA, tty_notice_key, NULL); if (!tty_notice) { tty_notice = xv_create(frame, NOTICE, NOTICE_LOCK_SCREEN, FALSE, NOTICE_BLOCK_THREAD, TRUE, NOTICE_BUTTON_YES, XV_MSG("Continue"), NOTICE_MESSAGE_STRINGS, XV_MSG("Too many characters to add to the input buffer.\n\ Wait a few seconds after you click Continue,\n\ then retype the missing characters."), 0, XV_SHOW, TRUE, 0); xv_set(frame, XV_KEY_DATA, tty_notice_key, tty_notice, NULL); } else { xv_set(tty_notice, NOTICE_LOCK_SCREEN, FALSE, NOTICE_BLOCK_THREAD, TRUE, NOTICE_BUTTON_YES, XV_MSG("Continue"), NOTICE_MESSAGE_STRINGS, XV_MSG("Too many characters to add to the input buffer.\n\ Wait a few seconds after you click Continue,\n\ then retype the missing characters."), 0, XV_SHOW, TRUE, 0); } return (0); } (void) XV_BCOPY(addr, iwbp, len * sizeof(CHAR)); iwbp += len; return (len); } /* * Add the string to the input queue. */ Pkg_private int ttysw_input_it(ttysw, addr, len) register Ttysw_folio ttysw; char *addr; register int len; { #ifdef OW_I18N CHAR *wcs_buf; register CHAR *wc; register int wc_nchar; static int rest_of_nchar = 0; register char *mbc; register int new_len; int mb_len; register int i; char *save_char; #define MB_BUF_SIZE 24 static char rest_of_char[MB_BUF_SIZE]; #endif #ifdef OW_I18N /* convert char to CHAR: allocate to worst case (ascii) */ if (!(wcs_buf = (CHAR *)malloc((len + 2)*sizeof(CHAR)))) { perror(XV_MSG("TTYSW:ttysw_input_it: out of memory")); return 0; } if (!(save_char = (char *)malloc(len + MB_BUF_SIZE))) { perror(XV_MSG("TTYSW:ttysw_input_it: out of memory")); free(wcs_buf); return (0); } #undef MB_BUF_SIZE if( rest_of_nchar != 0 ) XV_BCOPY(rest_of_char, save_char, rest_of_nchar); strncpy(save_char + rest_of_nchar, addr, len); new_len = rest_of_nchar + len; save_char[new_len] = '\0'; mbc = save_char; wc = wcs_buf; wc_nchar = 0; for (i = 0 ; i < new_len ;) { if (*mbc == '\0') { mb_len = 1; *wc = (wchar_t)'\0'; } else { mb_len = mbtowc( wc, mbc, MB_CUR_MAX ); if (mb_len < 0) { if (new_len - i < (int)MB_CUR_MAX) { if ((new_len - i) > 1 && mbc[1] <= 0x7f) { mbc++; i++; continue; } break; } mbc++; i++; continue; } } wc ++; mbc += mb_len; i += mb_len; wc_nchar++; } if (i < new_len) { XV_BCOPY(mbc, rest_of_char, new_len - i); rest_of_char[new_len - i] = '\0'; rest_of_nchar = new_len - i; } else rest_of_nchar = 0; free(save_char); #endif /* OW_I18N */ if (ttysw_getopt((caddr_t) ttysw, TTYOPT_TEXT)) { Textsw textsw = TEXTSW_FROM_TTY(ttysw); #ifdef OW_I18N (void) textsw_insert_wcs(textsw, wcs_buf, (long int) wc_nchar); free(wcs_buf); return(wc_nchar); #else (void) textsw_insert(textsw, addr, (long int) len); return (len); #endif } else { int bytes_copied; #ifdef OW_I18N bytes_copied = ttysw_copy_to_input_buffer(ttysw, wcs_buf, wc_nchar); free(wcs_buf); #else bytes_copied = ttysw_copy_to_input_buffer(ttysw, addr, len); #endif if (bytes_copied > 0) { /* * The ttysw's input state actually changed. Arrange to flush the * input out through the pty after updating state relating to page * mode. */ Ttysw_view_handle ttysw_view; ttysw->ttysw_lpp = 0; /* reset page mode counter */ ttysw_view = TTY_VIEW_HANDLE_FROM_TTY_FOLIO(ttysw); if (ttysw->ttysw_flags & TTYSW_FL_FROZEN) (void) ttysw_freeze(ttysw_view, 0); if (!(ttysw->ttysw_flags & TTYSW_FL_IN_PRIORITIZER)) ttysw_reset_conditions(ttysw_view); } return (bytes_copied); } } #ifdef OW_I18N /* * Add the wide character string to the input queue. */ Pkg_private int ttysw_input_it_wcs(ttysw, addr, len) register Ttysw_folio ttysw; CHAR *addr; register int len; { if (ttysw_getopt((caddr_t) ttysw, TTYOPT_TEXT)) { Textsw textsw = TEXTSW_FROM_TTY(ttysw); (void) textsw_insert_wcs(textsw, addr, (long int) len); return (len); } else { int bytes_copied = ttysw_copy_to_input_buffer(ttysw, addr, len); if (bytes_copied > 0) { /* * The ttysw's input state actually changed. Arrange to flush the * input out through the pty after updating state relating to page * mode. */ Ttysw_view_handle ttysw_view; ttysw->ttysw_lpp = 0; /* reset page mode counter */ ttysw_view = TTY_VIEW_HANDLE_FROM_TTY_FOLIO(ttysw); if (ttysw->ttysw_flags & TTYSW_FL_FROZEN) (void) ttysw_freeze(ttysw_view, 0); if (!(ttysw->ttysw_flags & TTYSW_FL_IN_PRIORITIZER)) ttysw_reset_conditions(ttysw_view); } return (bytes_copied); } } #endif /* OW_I18N */ /* #ifndef TERMSW */ Pkg_private void ttysw_handle_itimer(ttysw) register Ttysw_folio ttysw; { if (ttysw->ttysw_primary.sel_made) { ttysel_deselect(&ttysw->ttysw_primary, SELN_PRIMARY); } if (ttysw->ttysw_secondary.sel_made) { ttysel_deselect(&ttysw->ttysw_secondary, SELN_SECONDARY); } (void) ttysw_pdisplayscreen(0); } /* * handle standard events. */ /* BUG ALERT: This routine should be Pkg_private, not Xv_public */ Xv_public int ttysw_eventstd(ttysw_view_public, ie) /* This could be a public ttysw view or termsw view */ register Tty_view ttysw_view_public; register struct inputevent *ie; { Frame frame_public; register Ttysw_folio ttysw = TTY_PRIVATE_FROM_ANY_VIEW(ttysw_view_public); register Tty tty_public = TTY_PUBLIC(ttysw); switch (event_action(ie)) { case KBD_USE: case KBD_DONE: frame_public = (Frame) xv_get(tty_public, WIN_OWNER); switch (event_action(ie)) { case KBD_USE: #ifdef OW_I18N if (xv_get(tty_public, WIN_USE_IM) && ttysw->ic) { Xv_Drawable_info *info; DRAWABLE_INFO_MACRO(ttysw_view_public, info); window_set_ic_focus_win(ttysw_view_public, ttysw->ic, xv_xid(info)); } #endif ttysw_restore_cursor(); (void) frame_kbd_use(frame_public, tty_public, tty_public); return TTY_DONE; case KBD_DONE: ttysw_lighten_cursor(); (void) frame_kbd_done(frame_public, tty_public); return TTY_DONE; } case WIN_REPAINT: case WIN_GRAPHICS_EXPOSE: if (TTY_IS_TERMSW(ttysw)) { Termsw_view_handle termsw = TERMSW_VIEW_PRIVATE_FROM_TTY_PRIVATE(ttysw); if (termsw->folio->cmd_started) { (void) ttysw_scan_for_completed_commands( TTY_VIEW_PRIVATE_FROM_ANY_PUBLIC(ttysw_view_public), -1, 0); } } ttysw_display(ttysw, ie); #ifdef OW_I18N if( ttysw->preedit_state ) { tty_preedit_put_wcs( ttysw, ttysw->im_store , ttysw->im_attr, ttysw->im_first_col,ttysw->im_first_row, &(ttysw->im_len) ); } #endif return (TTY_DONE); case WIN_VISIBILITY_NOTIFY: ttysw_view_obscured = event_xevent(ie)->xvisibility.state; return (TTY_DONE); case WIN_RESIZE: ttysw_resize(TTY_VIEW_PRIVATE_FROM_ANY_PUBLIC(ttysw_view_public)); #ifdef OW_I18N if( ttysw->preedit_state ) { ttysw_preedit_resize_proc(ttysw); } #ifdef FULL_R5 if (ttysw->ic) { XRectangle x_rect; Rect *xv_rect; XVaNestedList preedit_nested_list; preedit_nested_list = NULL; if (ttysw->xim_style & (XIMPreeditPosition | XIMPreeditArea)) { xv_rect = (Rect *)xv_get(ttysw_view_public, WIN_RECT); x_rect.x = xv_rect->r_left; x_rect.y = xv_rect->r_top; x_rect.width = xv_rect->r_width; x_rect.height = xv_rect->r_height; preedit_nested_list = XVaCreateNestedList(NULL, XNArea, &x_rect, NULL); } if (preedit_nested_list) { XSetICValues(ttysw->ic, XNPreeditAttributes, preedit_nested_list, NULL); XFree(preedit_nested_list); } } #endif /* FULL_R5 */ #endif /* OW_I18N */ return (TTY_DONE); case ACTION_SELECT: return ttysw_process_point(ttysw, ie); case ACTION_ADJUST: return ttysw_process_adjust(ttysw, ie); case ACTION_MENU:{ if (event_is_down(ie)) { ttysw_show_walkmenu(ttysw_view_public, ie); ttysw->ttysw_butdown = ACTION_MENU; } return (TTY_DONE); } #ifdef notdef /* BUG ALERT */ /* * 11 Sept 87: Alok found that if we do the exit processing, we turn * off LOC_WINEXIT and thus defeat the auto-generation of KBD_DONE by * xview_x_input_readevent. Until we incorporate a fix in the lower * input code we comment out this optimization. */ case LOC_WINEXIT: return ttysw_process_exit(ttysw, ie); #endif case LOC_MOVEWHILEBUTDOWN: return ttysw_process_motion(ttysw, ie); default: return ttysw_process_keyboard(ttysw, ie); } } static int ttysw_process_point(ttysw, ie) register Ttysw_folio ttysw; register struct inputevent *ie; { if (win_inputposevent(ie)) { #ifdef OW_I18N ttysw_implicit_commit(ttysw, 1); #endif ttysw->ttysw_butdown = ACTION_SELECT; ttysel_make(ttysw, ie, 1); } else { if (ttysw->ttysw_butdown == ACTION_SELECT) { ttysel_adjust(ttysw, ie, FALSE, FALSE); ttysetselection(ttysw); } /* ttysw->ttysw_butdown = 0; */ } return TTY_DONE; } static int ttysw_process_adjust(ttysw, ie) register Ttysw_folio ttysw; register struct inputevent *ie; { if (win_inputposevent(ie)) { ttysel_adjust(ttysw, ie, TRUE, (ttysw->ttysw_butdown == ACTION_ADJUST)); /* Very important for this to be set after the call to ttysel_adjust */ ttysw->ttysw_butdown = ACTION_ADJUST; } else { if (ttysw->ttysw_butdown == ACTION_ADJUST) { ttysel_adjust(ttysw, ie, FALSE, FALSE); ttysetselection(ttysw); } /* ttysw->ttysw_butdown = 0; */ } return TTY_DONE; } static int ttysw_process_motion(ttysw, ie) register Ttysw_folio ttysw; register struct inputevent *ie; { if ((ttysw->ttysw_butdown == ACTION_SELECT) || (ttysw->ttysw_butdown == ACTION_ADJUST)) ttysel_adjust(ttysw, ie, FALSE, FALSE); return TTY_DONE; } static int ttysw_process_keyboard(ttysw, ie) Ttysw_folio ttysw; struct inputevent *ie; { register int id = event_id(ie); switch (event_action(ie)) { case ACTION_HELP: case ACTION_MORE_HELP: case ACTION_TEXT_HELP: case ACTION_MORE_TEXT_HELP: case ACTION_INPUT_FOCUS_HELP: return (ttysw_domap(ttysw, ie)); } #ifdef OW_I18N if( event_is_string(ie) && win_inputposevent(ie) ) { /* * This is a committed string or a string generated from a non-English * keyboard. For example, a kana string from the Nihongo keyboard. * This string should only be displayed once on the down event. */ wchar_t *ws_char; ws_char = _xv_mbstowcsdup(ie->ie_string); committed_left = wslen(ws_char); (void) ttysw_input_it_wcs(ttysw,ws_char,committed_left); free( ws_char ); return TTY_DONE; } #endif if ((id >= ASCII_FIRST && id <= ISO_LAST) && (win_inputposevent(ie))) { char c = (char) id; /* * State machine for handling logical caps lock, ``F1'' key. * Capitalize characters except when an ESC goes by. Then go into a * state where characters are passed uncapitalized until an * alphabetic character is passed. We presume that all ESC sequences * end with an alphabetic character. * * Used to solve the function key problem where the final `z' is is * being capitalized. (Bug id: 1005033) */ if (ttysw->ttysw_capslocked & TTYSW_CAPSLOCKED) { if (ttysw->ttysw_capslocked & TTYSW_CAPSSAWESC) { if (isalpha(c)) ttysw->ttysw_capslocked &= ~TTYSW_CAPSSAWESC; } else { if (islower(c)) c = toupper(c); else if (c == '\033') ttysw->ttysw_capslocked |= TTYSW_CAPSSAWESC; } } (void) ttysw_input_it(ttysw, &c, 1); #ifdef TTY_ACQUIRE_CARET if (!ttysw->ttysw_caret.sel_made) { ttysel_acquire(ttysw, SELN_CARET); } #endif return TTY_DONE; } if (id > ISO_LAST) { return ttysw_domap(ttysw, ie); } return TTY_OK; } /* #endif TERMSW */ /* * After the character array image changes size, this routine must be called * so that pty knows about the new size. */ Pkg_private void xv_tty_new_size(ttysw, cols, lines) Ttysw_folio ttysw; int cols, lines; { #if defined(sun) && ! defined(SVR4) /* * The ttysize structure and TIOCSSIZE and TIOCGSIZE ioctls are available * only on Suns. */ struct ttysize ts; #ifndef SVR4 struct sigvec vec, ovec; vec.sv_handler = SIG_IGN; vec.sv_mask = vec.sv_onstack = 0; (void) sigvec(SIGTTOU, &vec, &ovec); #endif ts.ts_lines = lines; ts.ts_cols = cols; if ((ioctl(ttysw->ttysw_tty, TIOCSSIZE, &ts)) == -1) perror(XV_MSG("ttysw-TIOCSSIZE")); #ifndef SVR4 (void) sigvec(SIGTTOU, &ovec, 0); #endif #else /* sun */ /* * Otherwise, we use the winsize struct and TIOCSWINSZ ioctl. */ struct winsize ws; #ifndef SVR4 struct sigvec vec, ovec; vec.sv_handler = SIG_IGN; vec.sv_mask = vec.sv_onstack = 0; (void) sigvec(SIGTTOU, &vec, &ovec); #endif ws.ws_row = lines; ws.ws_col = cols; if ((ioctl(ttysw->ttysw_tty, TIOCSWINSZ, &ws)) == -1) perror(XV_MSG("ttysw-TIOCSWINSZ")); #ifndef SVR4 (void) sigvec(SIGTTOU, &ovec, 0); #endif #endif /* sun */ } /* * Freeze tty output. */ Pkg_private int ttysw_freeze(ttysw_view, on) Ttysw_view_handle ttysw_view; int on; { register Ttysw_folio ttysw = ttysw_view->folio; register Tty_view ttysw_view_public = TTY_PUBLIC(ttysw_view); extern Xv_Cursor ttysw_cursor; extern Xv_Cursor ttysw_stop_cursor; if (!ttysw_cursor) ttysw_cursor = xv_get(ttysw_view_public, WIN_CURSOR); if (!(ttysw->ttysw_flags & TTYSW_FL_FROZEN) && on) { /* * Inspect the current tty modes without disturbing other state. The * fact that this circumlocution is necessary is an indication that * interfaces haven't been defined cleanly here. */ Ttysw tmp; (void) tty_getmode(ttysw->ttysw_tty, (tty_mode_t *)&tmp.tty_mode); if (tty_iscanon(&tmp)) { xv_set(ttysw_view_public, WIN_CURSOR, ttysw_stop_cursor, 0); ttysw->ttysw_flags |= TTYSW_FL_FROZEN; } else ttysw->ttysw_lpp = 0; } else if ((ttysw->ttysw_flags & TTYSW_FL_FROZEN) && !on) { xv_set(ttysw_view_public, WIN_CURSOR, ttysw_cursor, 0); ttysw->ttysw_flags &= ~TTYSW_FL_FROZEN; ttysw->ttysw_lpp = 0; } return ((ttysw->ttysw_flags & TTYSW_FL_FROZEN) != 0); } /* * Set (or reset) the specified option number. */ Pkg_private void ttysw_setopt(ttysw_folio_or_view, opt, on) Xv_opaque ttysw_folio_or_view; int opt, on; { Tty folio_or_view_public = TTY_PUBLIC((Ttysw_folio) ttysw_folio_or_view); Ttysw_view_handle ttysw_view; Ttysw_folio ttysw_folio; int result = 0; if (IS_TTY_VIEW(folio_or_view_public) || IS_TERMSW_VIEW(folio_or_view_public)) { ttysw_view = (Ttysw_view_handle) ttysw_folio_or_view; ttysw_folio = TTY_FOLIO_FROM_TTY_VIEW_HANDLE(ttysw_view); } else { ttysw_folio = (Ttysw_folio) ttysw_folio_or_view; ttysw_view = TTY_VIEW_HANDLE_FROM_TTY_FOLIO(ttysw_folio); } switch (opt) { case TTYOPT_TEXT: /* termsw */ if (on) result = ttysw_be_termsw(ttysw_view); else result = ttysw_be_ttysw(ttysw_view); } if (result != -1) { if (on) ttysw_folio->ttysw_opt |= 1 << opt; else ttysw_folio->ttysw_opt &= ~(1 << opt); } } Pkg_private int ttysw_getopt(ttysw, opt) Ttysw_folio ttysw; int opt; { return ((ttysw->ttysw_opt & (1 << opt)) != 0); } Pkg_private void ttysw_flush_input(ttysw) Ttysw_folio ttysw; { #ifndef SVR4 struct sigvec vec, ovec; /* Sys V compatibility */ int flushf = 0; vec.sv_handler = SIG_IGN; vec.sv_mask = vec.sv_onstack = 0; (void) sigvec(SIGTTOU, &vec, &ovec); #else struct sigaction vec, ovec; vec.sa_handler = SIG_IGN; sigemptyset(&vec.sa_mask); vec.sa_flags = SA_RESTART; sigaction(SIGTTOU, &vec, &ovec); #endif /* * Flush tty input buffer. * * N.B.: Since SVR4 ==> XV_USE_TERMIOS, this can be simplified. */ # ifdef XV_USE_TERMIOS if (tcflush(ttysw->ttysw_tty, TCIFLUSH) < 0) # else /* XV_USE_TERMIOS */ # ifndef SVR4 if (ioctl(ttysw->ttysw_tty, TIOCFLUSH, &flushf)) # else /* SVR4 */ if (ioctl(ttysw->ttysw_tty, TIOCFLUSH, 0)) # endif /* SVR4 */ # endif /* XV_USE_TERMIOS */ perror(XV_MSG("TIOCFLUSH")); #ifndef SVR4 (void) sigvec(SIGTTOU, &ovec, (struct sigvec *) 0); #else sigaction(SIGTTOU, &ovec, (struct sigaction *) 0); #endif /* Flush ttysw input pending buffer */ irbp = iwbp = ibuf; } #ifdef OW_I18N /* * This function converts a wide-character-string to a multibyte * string without any regard to null-characters. */ /* BUG ALERT: No XView prefix */ /* static */ int wcstombs_with_null(mbs, wcs, nchar) char *mbs; wchar_t *wcs; register int nchar; { register char *mbs_tmp = mbs; register wchar_t *wcs_tmp = wcs; register int i,mb_len; for( i = 0 ; i < nchar ; i++ ) { if( iswascii(*wcs_tmp) ) { /* It includes NULL char. */ mb_len = 1; #ifdef sun /* * This direct casting depends on the wchar_t implementation. * It's Sun specific. The main reason to do so here is to * get better performance. */ *mbs_tmp = (char)*wcs_tmp; #endif } else { mb_len = wctomb( mbs_tmp, *wcs_tmp ); } wcs_tmp++; mbs_tmp += mb_len; } return( (int)(mbs_tmp - mbs) ); } /* * The function is called for drawing implicit commit text. */ Pkg_private void ttysw_implicit_commit(folio, as_input) Ttysw_folio folio; int as_input; { if (folio->ic) { register Tty ttysw_public = TTY_PUBLIC(folio); int conv_on; conv_on = (int)xv_get(ttysw_public, WIN_IC_CONVERSION, NULL); /* * WIN_IC_CONVERSION is a Sun extension attribute which is not * supported in htt (xim server). Thus, force it be true now. */ conv_on = 1; if ( conv_on != 0 ) { CHAR *commit_text; int len; /* * Just in case when (im_store == NULL). It's true in CLE * which has a Cnversion_On mode without any preedit. */ if ( !folio->im_store ) return; len = wslen(folio->im_store); if ( len == 0 ) return; xv_set(ttysw_public, WIN_IC_RESET, NULL); commit_text = (CHAR *)xv_get(ttysw_public, WIN_IC_COMMIT_STRING_WCS, NULL); /* * Clean up preedit. It should be done by preedit callback. * But since the callbacks will be switched in term mode * switch, ttysw preedit callbacks will sit in event queue * until switch back to tty mode. Anyway, preedit should be * erased for IC reset. */ folio->im_store[0] = 0; folio->im_len = 0; xv_set(ttysw_public, WIN_IC_CONVERSION, TRUE, NULL); /* * temporary code due to the libxim problem(s) in turning on * conversion after RESET. */ /* * This is an extension attribute. * conv_on = (int)xv_get(ttysw_public, WIN_IC_CONVERSION, NULL); if ( conv_on == 0 ) xv_set(ttysw_public, WIN_IC_CONVERSION, TRUE, NULL); * */ /* * if (as_input == 0), not send the committed string out * as the ttysw input. It only happens when enabling scrolling * (shelltool => cmdtool). */ if ( ( commit_text != (CHAR *)NULL ) && as_input ) { len = wslen(commit_text); if ( len > 0 ) /* * Turn on the flag, tell ttysw_consume_output() * not erase any selection. */ folio->implicit_commit = 1; ttysw_input_it_wcs(folio, commit_text, len); } } } } #endif