nvi/common/key.c

103 v_key_init(SCR *sp)
110 	gp = sp->gp;
112 	v_key_ilookup(sp);
114 	v_keyval(sp, K_CNTRLD, KEY_VEOF);
115 	v_keyval(sp, K_VERASE, KEY_VERASE);
116 	v_keyval(sp, K_VKILL, KEY_VKILL);
117 	v_keyval(sp, K_VWERASE, KEY_VWERASE);
133 		msgq(sp, M_ERR, "079|No non-printable character found");
149 	SCR *sp,
158 	if (sp->gp->scr_keyval(sp, name, &ch, &dne))
185 v_key_ilookup(SCR *sp)
192 	for (gp = sp->gp, ch = 0;; ++ch) {
193 		for (p = gp->cname[ch].name, t = v_key_name(sp, ch),
194 		    len = gp->cname[ch].len = sp->clen; len--;)
210 	SCR *sp,
213 	(void)v_key_name(sp, ch);
214 	return (sp->clen);
226 	SCR *sp,
239 	if (ach && sp->lastc == ach)
240 		return (sp->cname);
241 	sp->lastc = ach;
244 	len = wctomb(sp->cname, ach);
247 		sp->cname[(len = 1)-1] = (u_char)ach;
249 	ch = (u_char)sp->cname[0];
250 	sp->cname[len] = '\0';
253 	if ((chp = O_STR(sp, O_PRINT)) != NULL)
254 		if (strstr(chp, sp->cname) != NULL)
256 	if ((chp = O_STR(sp, O_NOPRINT)) != NULL)
257 		if (strstr(chp, sp->cname) != NULL)
275 	if (CAN_PRINT(sp, ach))
278 		sp->cname[0] = '^';
279 		sp->cname[1] = ch == 0x7f ? '?' : '@' + ch;
288 			uc = decode_utf8(sp->cname);
291 			char buf[sizeof(sp->cname)] = "";
292 			size_t left = sizeof(sp->cname);
293 			char *in = sp->cname;
295 			iconv(sp->conv.id[IC_IE_TO_UTF16],
297 			iconv(sp->conv.id[IC_IE_TO_UTF16],
303 			len = snprintf(sp->cname, sizeof(sp->cname),
309 	if (O_ISSET(sp, O_OCTAL)) {
310 		sp->cname[0] = '\\';
311 		sp->cname[1] = octdigit[(ch & 0300) >> 6];
312 		sp->cname[2] = octdigit[(ch &  070) >> 3];
313 		sp->cname[3] = octdigit[ ch &   07      ];
315 		sp->cname[0] = '\\';
316 		sp->cname[1] = 'x';
317 		sp->cname[2] = hexdigit[(ch & 0xf0) >> 4];
318 		sp->cname[3] = hexdigit[ ch & 0x0f      ];
321 done:	sp->cname[sp->clen = len] = '\0';
322 	return (sp->cname);
334 	SCR *sp,
358 	SCR *sp,
369 	gp = sp->gp;
384 	if (total >= gp->i_nelem && v_event_grow(sp, MAX(total, 64)))
399 			evp->e_value = KEY_VAL(sp, evp->e_c);
412 	SCR *sp,
422 	gp = sp->gp;
425 		v_event_grow(sp, MAX(nevents, 64));
434 			evp->e_value = KEY_VAL(sp, evp->e_c);
539 	SCR *sp,
549 	gp = sp->gp;
573 		if (F_ISSET(gp, G_SCRWIN) && sscr_input(sp))
575 loop:		if (gp->scr_event(sp, argp,
586 			v_sync(sp, RCV_ENDSESSION | RCV_PRESERVE |
594 			F_SET(sp->gp, G_INTERRUPTED);
604 append:			if (v_event_append(sp, argp))
647 	qp = seq_find(sp, NULL, evp, NULL, gp->i_cnt,
666 		if (O_ISSET(sp, O_TIMEOUT))
668 			    O_VAL(sp, O_ESCAPETIME) :
669 			    O_VAL(sp, O_KEYTIME)) * 100;
708 	if (O_ISSET(sp, O_REMAP)) {
717 		    (gp->scr_event(sp, &ev,
719 			F_SET(sp->gp, G_INTERRUPTED);
731 			if (v_event_push(sp, NULL, qp->output + qp->ilen,
734 			if (v_event_push(sp, NULL,
740 		if (v_event_push(sp, NULL, qp->output, qp->olen, CH_MAPPED))
746 	if (v_event_push(sp, NULL, qp->output, qp->olen, CH_MAPPED | CH_NOMAP))
758 	SCR *sp,
763 	gp = sp->gp;
764 	TAILQ_FOREACH(sp, gp->dq, q)
765 		rcv_sync(sp, flags);
766 	TAILQ_FOREACH(sp, gp->hq, q)
767 		rcv_sync(sp, flags);
778 	SCR *sp,
783 		msgq(sp, M_ERR, "276|Unexpected character event");
786 		msgq(sp, M_ERR, "277|Unexpected end-of-file event");
789 		msgq(sp, M_ERR, "279|Unexpected interrupt event");
792 		msgq(sp, M_ERR, "281|Unexpected repaint event");
795 		msgq(sp, M_ERR, "285|Unexpected string event");
798 		msgq(sp, M_ERR, "286|Unexpected timeout event");
801 		msgq(sp, M_ERR, "316|Unexpected resize event");
828 	SCR *sp,
834 	for (rval = 0, gp = sp->gp; gp->i_cnt != 0 &&
846 	SCR *sp,
852 	gp = sp->gp;
855 	BINC_RET(sp, EVENT, gp->i_event, olen, new_nelem * sizeof(gp->i_event[0]));