21 {0x1b, 0xff1b}, /* escape */
46 static char shiftkey[128] = {
47 0, 0, 0, 0, 0, 0, 0, 0, /* nul soh stx etx eot enq ack bel */
48 0, 0, 0, 0, 0, 0, 0, 0, /* bs ht nl vt np cr so si */
49 0, 0, 0, 0, 0, 0, 0, 0, /* dle dc1 dc2 dc3 dc4 nak syn etb */
50 0, 0, 0, 0, 0, 0, 0, 0, /* can em sub esc fs gs rs us */
51 0, 1, 1, 1, 1, 1, 1, 0, /* sp ! " # $ % & ' */
52 1, 1, 1, 1, 0, 0, 0, 0, /* ( ) * + , - . / */
53 0, 0, 0, 0, 0, 0, 0, 0, /* 0 1 2 3 4 5 6 7 */
54 0, 0, 1, 0, 1, 0, 1, 1, /* 8 9 : ; < = > ? */
55 1, 1, 1, 1, 1, 1, 1, 1, /* @ A B C D E F G */
56 1, 1, 1, 1, 1, 1, 1, 1, /* H I J K L M N O */
57 1, 1, 1, 1, 1, 1, 1, 1, /* P Q R S T U V W */
58 1, 1, 1, 0, 0, 0, 1, 1, /* X Y Z [ \ ] ^ _ */
59 0, 0, 0, 0, 0, 0, 0, 0, /* ` a b c d e f g */
60 0, 0, 0, 0, 0, 0, 0, 0, /* h i j k l m n o */
61 0, 0, 0, 0, 0, 0, 0, 0, /* p q r s t u v w */
62 0, 0, 0, 1, 1, 1, 1, 0, /* x y z { | } ~ del */
70 for(i=0; i<nelem(ktab); i++)
72 return ktab[i].keysym;
77 keyevent(Vnc *v, ulong ksym, int down)
93 int ctlfd, fd, kr, kn, w, shift, ctl, alt;
96 snprint(buf, sizeof buf, "%s/cons", display->devdir);
97 if((fd = open(buf, OREAD)) < 0)
98 sysfatal("open %s: %r", buf);
100 snprint(buf, sizeof buf, "%s/consctl", display->devdir);
101 if((ctlfd = open(buf, OWRITE)) < 0)
102 sysfatal("open %s: %r", buf);
103 write(ctlfd, "rawon", 5);
106 shift = alt = ctl = 0;
108 while(!fullrune(k, kn)){
109 kr = read(fd, k+kn, sizeof k - kn);
111 sysfatal("bad read from kbd");
114 w = chartorune(&r, k);
116 memmove(k, &k[w], kn);
122 keyevent(v, Xalt, alt);
126 keyevent(v, Xctl, ctl);
130 keyevent(v, Xshift, shift);
133 if(r == ks && r < 0x1A){ /* control key */
134 keyevent(v, Xctl, 1);
135 keyevent(v, r+0x60, 1); /* 0x60: make capital letter */
136 keyevent(v, r+0x60, 0);
137 keyevent(v, Xctl, 0);
140 * to send an upper case letter or shifted
141 * punctuation, mac os x vnc server,
142 * at least, needs a `shift' sent first.
144 if(!shift && r == ks && r < sizeof shiftkey && shiftkey[r]){
146 keyevent(v, Xshift, 1);
149 * map an xkeysym onto a utf-8 char.
150 * allows Xvnc to read us, see utf2ksym.h
152 if((ks & 0xff00) && ks < nelem(utf2ksym) && utf2ksym[ks] != 0)
156 * up event needed by vmware inside linux vnc server,
163 keyevent(v, Xalt, 0);
167 keyevent(v, Xctl, 0);
171 keyevent(v, Xshift, 0);