xref: /plan9/sys/src/9/port/devkbin.c (revision c8a340cd3a4d961f476a4f4f2d047cd5eedaced7)
1*c8a340cdSDavid du Colombier /*
2*c8a340cdSDavid du Colombier  *  keyboard scan code input from outside the kernel.
3*c8a340cdSDavid du Colombier  *  to avoid duplication of keyboard map processing for usb.
4*c8a340cdSDavid du Colombier  */
5*c8a340cdSDavid du Colombier 
6*c8a340cdSDavid du Colombier #include	"u.h"
7*c8a340cdSDavid du Colombier #include	"../port/lib.h"
8*c8a340cdSDavid du Colombier #include	"mem.h"
9*c8a340cdSDavid du Colombier #include	"dat.h"
10*c8a340cdSDavid du Colombier #include	"fns.h"
11*c8a340cdSDavid du Colombier #include	"../port/error.h"
12*c8a340cdSDavid du Colombier 
13*c8a340cdSDavid du Colombier extern	void kbdputsc(int, int);
14*c8a340cdSDavid du Colombier 
15*c8a340cdSDavid du Colombier enum {
16*c8a340cdSDavid du Colombier 	Qdir,
17*c8a340cdSDavid du Colombier 	Qkbd,
18*c8a340cdSDavid du Colombier };
19*c8a340cdSDavid du Colombier 
20*c8a340cdSDavid du Colombier Dirtab kbintab[] = {
21*c8a340cdSDavid du Colombier 	".",	{Qdir, 0, QTDIR},	0,	0555,
22*c8a340cdSDavid du Colombier 	"kbin",	{Qkbd, 0},		0,	0200,
23*c8a340cdSDavid du Colombier };
24*c8a340cdSDavid du Colombier 
25*c8a340cdSDavid du Colombier Lock	kbinlck;
26*c8a340cdSDavid du Colombier int	kbinbusy;
27*c8a340cdSDavid du Colombier 
28*c8a340cdSDavid du Colombier static Chan *
kbinattach(char * spec)29*c8a340cdSDavid du Colombier kbinattach(char *spec)
30*c8a340cdSDavid du Colombier {
31*c8a340cdSDavid du Colombier 	return devattach(L'Ι', spec);
32*c8a340cdSDavid du Colombier }
33*c8a340cdSDavid du Colombier 
34*c8a340cdSDavid du Colombier static Walkqid*
kbinwalk(Chan * c,Chan * nc,char ** name,int nname)35*c8a340cdSDavid du Colombier kbinwalk(Chan *c, Chan *nc, char **name, int nname)
36*c8a340cdSDavid du Colombier {
37*c8a340cdSDavid du Colombier 	return devwalk(c, nc, name, nname, kbintab, nelem(kbintab), devgen);
38*c8a340cdSDavid du Colombier }
39*c8a340cdSDavid du Colombier 
40*c8a340cdSDavid du Colombier static int
kbinstat(Chan * c,uchar * dp,int n)41*c8a340cdSDavid du Colombier kbinstat(Chan *c, uchar *dp, int n)
42*c8a340cdSDavid du Colombier {
43*c8a340cdSDavid du Colombier 	return devstat(c, dp, n, kbintab, nelem(kbintab), devgen);
44*c8a340cdSDavid du Colombier }
45*c8a340cdSDavid du Colombier 
46*c8a340cdSDavid du Colombier static Chan*
kbinopen(Chan * c,int omode)47*c8a340cdSDavid du Colombier kbinopen(Chan *c, int omode)
48*c8a340cdSDavid du Colombier {
49*c8a340cdSDavid du Colombier 	if(!iseve())
50*c8a340cdSDavid du Colombier 		error(Eperm);
51*c8a340cdSDavid du Colombier 	if(c->qid.path == Qkbd){
52*c8a340cdSDavid du Colombier 		lock(&kbinlck);
53*c8a340cdSDavid du Colombier 		if(kbinbusy){
54*c8a340cdSDavid du Colombier 			unlock(&kbinlck);
55*c8a340cdSDavid du Colombier 			error(Einuse);
56*c8a340cdSDavid du Colombier 		}
57*c8a340cdSDavid du Colombier 		kbinbusy++;
58*c8a340cdSDavid du Colombier 		unlock(&kbinlck);
59*c8a340cdSDavid du Colombier 	}
60*c8a340cdSDavid du Colombier 	return devopen(c, omode, kbintab, nelem(kbintab), devgen);
61*c8a340cdSDavid du Colombier }
62*c8a340cdSDavid du Colombier 
63*c8a340cdSDavid du Colombier static void
kbinclose(Chan * c)64*c8a340cdSDavid du Colombier kbinclose(Chan *c)
65*c8a340cdSDavid du Colombier {
66*c8a340cdSDavid du Colombier 	if(c->aux){
67*c8a340cdSDavid du Colombier 		free(c->aux);
68*c8a340cdSDavid du Colombier 		c->aux = nil;
69*c8a340cdSDavid du Colombier 	}
70*c8a340cdSDavid du Colombier 	if(c->qid.path == Qkbd)
71*c8a340cdSDavid du Colombier 		kbinbusy = 0;
72*c8a340cdSDavid du Colombier }
73*c8a340cdSDavid du Colombier 
74*c8a340cdSDavid du Colombier static long
kbinread(Chan * c,void * a,long n,vlong)75*c8a340cdSDavid du Colombier kbinread(Chan *c, void *a, long n, vlong )
76*c8a340cdSDavid du Colombier {
77*c8a340cdSDavid du Colombier 	if(c->qid.type == QTDIR)
78*c8a340cdSDavid du Colombier 		return devdirread(c, a, n, kbintab, nelem(kbintab), devgen);
79*c8a340cdSDavid du Colombier 	return 0;
80*c8a340cdSDavid du Colombier }
81*c8a340cdSDavid du Colombier 
82*c8a340cdSDavid du Colombier static long
kbinwrite(Chan * c,void * a,long n,vlong)83*c8a340cdSDavid du Colombier kbinwrite(Chan *c, void *a, long n, vlong)
84*c8a340cdSDavid du Colombier {
85*c8a340cdSDavid du Colombier 	int i;
86*c8a340cdSDavid du Colombier 	uchar *p = a;
87*c8a340cdSDavid du Colombier 
88*c8a340cdSDavid du Colombier 	if(c->qid.type == QTDIR)
89*c8a340cdSDavid du Colombier 		error(Eisdir);
90*c8a340cdSDavid du Colombier 	switch((int)c->qid.path){
91*c8a340cdSDavid du Colombier 	case Qkbd:
92*c8a340cdSDavid du Colombier 		for(i = 0; i < n; i++)
93*c8a340cdSDavid du Colombier 			kbdputsc(*p++, 1);	/* external source */
94*c8a340cdSDavid du Colombier 		break;
95*c8a340cdSDavid du Colombier 	default:
96*c8a340cdSDavid du Colombier 		error(Egreg);
97*c8a340cdSDavid du Colombier 	}
98*c8a340cdSDavid du Colombier 	return n;
99*c8a340cdSDavid du Colombier }
100*c8a340cdSDavid du Colombier 
101*c8a340cdSDavid du Colombier Dev kbindevtab = {
102*c8a340cdSDavid du Colombier 	L'Ι',
103*c8a340cdSDavid du Colombier 	"kbin",
104*c8a340cdSDavid du Colombier 
105*c8a340cdSDavid du Colombier 	devreset,
106*c8a340cdSDavid du Colombier 	devinit,
107*c8a340cdSDavid du Colombier 	devshutdown,
108*c8a340cdSDavid du Colombier 	kbinattach,
109*c8a340cdSDavid du Colombier 	kbinwalk,
110*c8a340cdSDavid du Colombier 	kbinstat,
111*c8a340cdSDavid du Colombier 	kbinopen,
112*c8a340cdSDavid du Colombier 	devcreate,
113*c8a340cdSDavid du Colombier 	kbinclose,
114*c8a340cdSDavid du Colombier 	kbinread,
115*c8a340cdSDavid du Colombier 	devbread,
116*c8a340cdSDavid du Colombier 	kbinwrite,
117*c8a340cdSDavid du Colombier 	devbwrite,
118*c8a340cdSDavid du Colombier 	devremove,
119*c8a340cdSDavid du Colombier 	devwstat,
120*c8a340cdSDavid du Colombier };
121