xfnw/plan9fox
1
0
Fork 0
Code Issues Pull requests Projects Releases Wiki Activity

kbdfs: remap old control keys

Browse source
This commit is contained in:
cinap_lenrek 2012-03-12 18:01:20 +01:00
parent d370838368
commit c4831ff2d3
1 changed files with 14 additions and 12 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

26
sys/src/cmd/aux/kbdfs/kbdfs.c
View file

@ -259,17 +259,7 @@ kbdputsc(Scan *scan, int c)
else
key.r = kbtab[c];
switch(key.r){
case Spec|0x60:
key.r = Kshift;
break;
case Spec|0x62:
key.r = Kctl;
break;
case Spec|0x63:
key.r = Kalt;
break;
}
key.r = key.r;
if(scan->esc1 || kbtab[c] == 0)
key.b = key.r;
@ -825,6 +815,18 @@ kbmapread(Req *req)
respond(req, nil);
}
Rune
kbcompat(Rune r)
{
static Rune o = Spec|0x60, tab[] = {
Kshift, Kbreak, Kctl, Kalt,
Kcaps, Knum, Kmiddle, Kaltgr,
};
if(r >= o && r < o+nelem(tab))
return tab[r - o];
return r;
}
void
kbmapwrite(Req *req)
{
@ -880,7 +882,7 @@ kbmapwrite(Req *req)
r = strtoul(lp, &lp, 0);
else
goto Badarg;
*rp = r;
*rp = kbcompat(r);
lp = line;
}
}