devusb.c 20 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608609610611612613614615616617618619620621622623624625626627628629630631632633634635636637638639640641642643644645646647648649650651652653654655656657658659660661662663664665666667668669670671672673674675676677678679680681682683684685686687688689690691692693694695696697698699700701702703704705706707708709710711712713714715716717718719720721722723724725726727728729730731732733734735736737738739740741742743744745746747748749750751752753754755756757758759760761762763764765766767768769770771772773774775776777778779780781782783784785786787788789790791792793794795796797798799800801802803804805806807808809810811812813814815816817818819820821822823824825826827828829830831832833834835836837838839840841842843844845846847848849850851852853854855856857858859860861862863864865866867868869870871872873874875876877878879880881882883884885886887888889890891892893894895896897898899900901902903904905906907908909910911912913914915916917918919920921922923924925926927928929930931932933934935936937938939940941942943944945946947948949950951952953954955956957958959960961962963964965966967968969970971972973974975976977978979980981982983984985986987988989990991992993994995996997998999100010011002100310041005100610071008100910101011101210131014101510161017101810191020102110221023102410251026102710281029103010311032103310341035103610371038103910401041104210431044104510461047104810491050105110521053
  1. /*
  2. * USB device and framework.
  3. * usb*.c contains host controller interface drivers.
  4. */
  5. #include "u.h"
  6. #include "../port/lib.h"
  7. #include "mem.h"
  8. #include "dat.h"
  9. #include "fns.h"
  10. #include "io.h"
  11. #include "../port/error.h"
  12. #include "usb.h"
  13. static int debug = 0;
  14. static int debugtoggle = 0;
  15. #define XPRINT if(debug)print
  16. Usbhost* usbhost[MaxUsb];
  17. static char *devstates[] = {
  18. [Disabled] "Disabled",
  19. [Attached] "Attached",
  20. [Enabled] "Enabled",
  21. [Assigned] "Assigned",
  22. [Configured] "Configured",
  23. };
  24. static char Ebadusbmsg[] = "invalid parameters to USB ctl message";
  25. enum
  26. {
  27. Qtopdir = 0,
  28. Q2nd,
  29. Qnew,
  30. Qdebug,
  31. Qport,
  32. Q3rd,
  33. Qctl,
  34. Qstatus,
  35. Qep0,
  36. /* other endpoint files */
  37. };
  38. /*
  39. * Qid path is:
  40. * 8 bits of file type (qids above)
  41. * 8 bits of slot number; default address 0 used for per-controller files
  42. * 4 bits of controller number
  43. */
  44. enum {
  45. TYPEBITS = 8,
  46. SLOTBITS = 8,
  47. CTLRBITS = 4,
  48. SLOTSHIFT = TYPEBITS,
  49. CTLRSHIFT = SLOTSHIFT+SLOTBITS,
  50. TYPEMASK = (1<<TYPEBITS)-1,
  51. SLOTMASK = (1<<SLOTBITS)-1,
  52. CTLRMASK = (1<<CTLRBITS)-1,
  53. };
  54. #define TYPE(q) (((ulong)(q).path)&TYPEMASK)
  55. #define SLOT(q) ((((ulong)(q).path)>>SLOTSHIFT)&SLOTMASK)
  56. #define CTLR(q) ((((ulong)(q).path)>>CTLRSHIFT)&CTLRMASK)
  57. #define PATH(t, s, c) ((t)|((s)<<SLOTSHIFT)|((c)<<CTLRSHIFT))
  58. static Dirtab usbdir2[] = {
  59. "new", {Qnew}, 0, 0666,
  60. "debug", {Qdebug}, 0, 0444,
  61. "port", {Qport}, 0, 0666,
  62. };
  63. static Dirtab usbdir3[]={
  64. "ctl", {Qctl}, 0, 0666,
  65. "status", {Qstatus}, 0, 0444,
  66. "setup", {Qep0}, 0, 0666,
  67. /* epNdata names are generated on demand */
  68. };
  69. enum
  70. {
  71. PMdisable,
  72. PMenable,
  73. PMreset,
  74. };
  75. enum
  76. {
  77. CMclass,
  78. CMdata,
  79. CMdebug,
  80. CMep,
  81. CMmaxpkt,
  82. CMadjust,
  83. CMspeed,
  84. CMunstall,
  85. };
  86. static Cmdtab usbportmsg[] =
  87. {
  88. PMdisable, "disable", 2,
  89. PMenable, "enable", 2,
  90. PMreset, "reset", 2,
  91. };
  92. static Cmdtab usbctlmsg[] =
  93. {
  94. CMclass, "class", 0,
  95. CMdata, "data", 3,
  96. CMdebug, "debug", 3,
  97. CMep, "ep", 0,
  98. CMmaxpkt, "maxpkt", 3,
  99. CMadjust, "adjust", 3,
  100. CMspeed, "speed", 2,
  101. CMunstall, "unstall", 2,
  102. };
  103. static struct
  104. {
  105. char* type;
  106. int (*reset)(Usbhost*);
  107. } usbtypes[MaxUsb+1];
  108. void
  109. addusbtype(char* t, int (*r)(Usbhost*))
  110. {
  111. static int ntype;
  112. if(ntype == MaxUsb)
  113. panic("too many USB host interface types");
  114. usbtypes[ntype].type = t;
  115. usbtypes[ntype].reset = r;
  116. ntype++;
  117. }
  118. static Udev*
  119. usbdeviceofslot(Usbhost *uh, int s)
  120. {
  121. if(s < 0 || s >= nelem(uh->dev))
  122. return nil;
  123. return uh->dev[s];
  124. }
  125. static Udev*
  126. usbdevice(Chan *c)
  127. {
  128. int bus;
  129. Udev *d;
  130. Usbhost *uh;
  131. bus = CTLR(c->qid);
  132. if(bus >= nelem(usbhost) || (uh = usbhost[bus]) == nil) {
  133. error(Egreg);
  134. return nil; /* for compiler */
  135. }
  136. d = usbdeviceofslot(uh, SLOT(c->qid));
  137. if(d == nil || d->id != c->qid.vers || d->state == Disabled)
  138. error(Ehungup);
  139. return d;
  140. }
  141. static Endpt *
  142. devendpt(Udev *d, int id, int add)
  143. {
  144. Usbhost *uh;
  145. Endpt *e, **p;
  146. p = &d->ep[id&0xF];
  147. lock(d);
  148. e = *p;
  149. if(e != nil){
  150. incref(e);
  151. XPRINT("incref(0x%p) in devendpt, new value %ld\n", e, e->ref);
  152. unlock(d);
  153. return e;
  154. }
  155. unlock(d);
  156. if(!add)
  157. return nil;
  158. e = mallocz(sizeof(*e), 1);
  159. e->ref = 1;
  160. e->x = id&0xF;
  161. e->id = id;
  162. e->sched = -1;
  163. e->maxpkt = 8;
  164. e->nbuf = 1;
  165. e->dev = d;
  166. e->active = 0;
  167. uh = d->uh;
  168. uh->epalloc(uh, e);
  169. lock(d);
  170. if(*p != nil){
  171. incref(*p);
  172. XPRINT("incref(0x%p) in devendpt, new value %ld\n",
  173. *p, (*p)->ref);
  174. unlock(d);
  175. uh->epfree(uh, e);
  176. free(e);
  177. return *p;
  178. }
  179. *p = e;
  180. unlock(d);
  181. e->rq = qopen(8*1024, 0, nil, e);
  182. e->wq = qopen(8*1024, 0, nil, e);
  183. return e;
  184. }
  185. static void
  186. freept(Endpt *e)
  187. {
  188. Usbhost *uh;
  189. if(e != nil && decref(e) == 0){
  190. XPRINT("freept(%d,%d)\n", e->dev->x, e->x);
  191. uh = e->dev->uh;
  192. uh->epclose(uh, e);
  193. e->dev->ep[e->x] = nil;
  194. uh->epfree(uh, e);
  195. free(e);
  196. }
  197. }
  198. static Udev*
  199. usbnewdevice(Usbhost *uh)
  200. {
  201. int i;
  202. Udev *d;
  203. Endpt *e;
  204. d = nil;
  205. qlock(uh);
  206. if(waserror()){
  207. if(d){
  208. uh->dev[d->x] = nil;
  209. freept(d->ep[0]);
  210. free(d);
  211. }
  212. qunlock(uh);
  213. nexterror();
  214. }
  215. for(i=0; i<nelem(uh->dev); i++)
  216. if(uh->dev[i] == nil){
  217. uh->idgen++;
  218. d = mallocz(sizeof(*d), 1);
  219. d->uh = uh;
  220. d->ref = 1;
  221. d->x = i;
  222. d->id = (uh->idgen << 8) | i;
  223. d->speed = Fullspeed;
  224. d->state = Enabled;
  225. XPRINT("calling devendpt in usbnewdevice\n");
  226. e = devendpt(d, 0, 1); /* always provide ctl endpt 0 */
  227. e->mode = ORDWR;
  228. e->epmode = Ctlmode; /* OHCI */
  229. e->epnewmode = Ctlmode; /* OHCI */
  230. e->sched = -1;
  231. uh->dev[i] = d;
  232. break;
  233. }
  234. poperror();
  235. qunlock(uh);
  236. return d;
  237. }
  238. static void
  239. freedev(Udev *d, int ept)
  240. {
  241. int i;
  242. Endpt *e;
  243. Usbhost *uh;
  244. uh = d->uh;
  245. if(decref(d) == 0){
  246. XPRINT("freedev 0x%p, 0\n", d);
  247. for(i=0; i<nelem(d->ep); i++)
  248. freept(d->ep[i]);
  249. if(d->x >= 0)
  250. uh->dev[d->x] = nil;
  251. free(d);
  252. } else {
  253. if(ept >= 0 && ept < nelem(d->ep)){
  254. e = d->ep[ept];
  255. XPRINT("freedev, freept 0x%p\n", e);
  256. if(e != nil)
  257. uh->epclose(uh, e);
  258. }
  259. }
  260. }
  261. static int
  262. usbgen(Chan *c, char *, Dirtab*, int, int s, Dir *dp)
  263. {
  264. Qid q;
  265. Udev *d;
  266. Endpt *e;
  267. Dirtab *tab;
  268. Usbhost *uh;
  269. int t, bus, slot, perm;
  270. /*
  271. * Top level directory contains the controller names.
  272. */
  273. if(c->qid.path == Qtopdir){
  274. if(s == DEVDOTDOT){
  275. mkqid(&q, Qtopdir, 0, QTDIR);
  276. devdir(c, q, "#U", 0, eve, 0555, dp);
  277. return 1;
  278. }
  279. if(s >= nelem(usbhost) || usbhost[s] == nil)
  280. return -1;
  281. mkqid(&q, PATH(Q2nd, 0, s), 0, QTDIR);
  282. snprint(up->genbuf, sizeof up->genbuf, "usb%d", s);
  283. devdir(c, q, up->genbuf, 0, eve, 0555, dp);
  284. return 1;
  285. }
  286. bus = CTLR(c->qid);
  287. if(bus >= nelem(usbhost) || (uh = usbhost[bus]) == nil)
  288. return -1;
  289. /*
  290. * Second level contains "new", "port", and a numbered
  291. * directory for each enumerated device on the bus.
  292. */
  293. t = TYPE(c->qid);
  294. if(t < Q3rd){
  295. if(s == DEVDOTDOT){
  296. mkqid(&q, Qtopdir, 0, QTDIR);
  297. devdir(c, q, "#U", 0, eve, 0555, dp);
  298. return 1;
  299. }
  300. if(s < nelem(usbdir2)){
  301. d = uh->dev[0];
  302. if(d == nil)
  303. return -1;
  304. tab = &usbdir2[s];
  305. mkqid(&q, PATH(tab->qid.path, 0, bus), d->id, QTFILE);
  306. devdir(c, q, tab->name, tab->length, eve, tab->perm, dp);
  307. return 1;
  308. }
  309. s -= nelem(usbdir2);
  310. if(s >= 0 && s < nelem(uh->dev)) {
  311. d = uh->dev[s];
  312. if(d == nil)
  313. return 0;
  314. snprint(up->genbuf, sizeof up->genbuf, "%d", s);
  315. mkqid(&q, PATH(Q3rd, s, bus), d->id, QTDIR);
  316. devdir(c, q, up->genbuf, 0, eve, 0555, dp);
  317. return 1;
  318. }
  319. return -1;
  320. }
  321. /*
  322. * Third level.
  323. */
  324. slot = SLOT(c->qid);
  325. if(s == DEVDOTDOT) {
  326. mkqid(&q, PATH(Q2nd, 0, bus), c->qid.vers, QTDIR);
  327. snprint(up->genbuf, sizeof up->genbuf, "usb%d", bus);
  328. devdir(c, q, up->genbuf, 0, eve, 0555, dp);
  329. return 1;
  330. }
  331. if(s < nelem(usbdir3)) {
  332. tab = &usbdir3[s];
  333. mkqid(&q, PATH(tab->qid.path, slot, bus), c->qid.vers, QTFILE);
  334. devdir(c, q, tab->name, tab->length, eve, tab->perm, dp);
  335. return 1;
  336. }
  337. s -= nelem(usbdir3);
  338. /* active endpoints */
  339. d = usbdeviceofslot(uh, slot);
  340. if(d == nil || s >= nelem(d->ep))
  341. return -1;
  342. if(s == 0 || (e = d->ep[s]) == nil) /* ep0data is called "setup" */
  343. return 0;
  344. snprint(up->genbuf, sizeof up->genbuf, "ep%ddata", s);
  345. mkqid(&q, PATH(Qep0+s, slot, bus), c->qid.vers, QTFILE);
  346. switch(e->mode){
  347. case OREAD:
  348. perm = 0444;
  349. break;
  350. case OWRITE:
  351. perm = 0222;
  352. break;
  353. default:
  354. perm = 0666;
  355. break;
  356. }
  357. devdir(c, q, up->genbuf, e->buffered, eve, perm, dp);
  358. return 1;
  359. }
  360. static Usbhost*
  361. usbprobe(int cardno, int ctlrno)
  362. {
  363. Usbhost *uh;
  364. char buf[128], *ebuf, name[64], *p, *type;
  365. uh = mallocz(sizeof *uh, 1);
  366. uh->tbdf = BUSUNKNOWN;
  367. if(cardno < 0){
  368. if(isaconfig("usb", ctlrno, uh) == 0){
  369. free(uh);
  370. return nil;
  371. }
  372. for(cardno = 0; usbtypes[cardno].type; cardno++){
  373. type = uh->type;
  374. if(type==nil || *type==0)
  375. type = "uhci";
  376. if(cistrcmp(usbtypes[cardno].type, type) == 0)
  377. break;
  378. }
  379. }
  380. if(cardno >= MaxUsb || usbtypes[cardno].type == nil ||
  381. usbtypes[cardno].reset(uh) < 0){
  382. free(uh);
  383. return nil;
  384. }
  385. /*
  386. * IRQ2 doesn't really exist, it's used to gang the interrupt
  387. * controllers together. A device set to IRQ2 will appear on
  388. * the second interrupt controller as IRQ9.
  389. */
  390. if(uh->irq == 2)
  391. uh->irq = 9;
  392. snprint(name, sizeof(name), "usb%d", ctlrno);
  393. intrenable(uh->irq, uh->interrupt, uh, uh->tbdf, name);
  394. ebuf = buf + sizeof buf;
  395. p = seprint(buf, ebuf, "#U/usb%d: %s: port 0x%luX irq %d",
  396. ctlrno, usbtypes[cardno].type, uh->port, uh->irq);
  397. if(uh->mem)
  398. p = seprint(p, ebuf, " addr 0x%luX", PADDR(uh->mem));
  399. if(uh->size)
  400. seprint(p, ebuf, " size 0x%luX", uh->size);
  401. print("%s\n", buf);
  402. return uh;
  403. }
  404. static void
  405. usbreset(void)
  406. {
  407. int cardno, ctlrno;
  408. Usbhost *uh;
  409. for(ctlrno = 0; ctlrno < MaxUsb; ctlrno++)
  410. if((uh = usbprobe(-1, ctlrno)) != nil)
  411. usbhost[ctlrno] = uh;
  412. if(getconf("*nousbprobe"))
  413. return;
  414. cardno = ctlrno = 0;
  415. while(usbtypes[cardno].type != nil && ctlrno < MaxUsb){
  416. if(usbhost[ctlrno] != nil){
  417. ctlrno++;
  418. continue;
  419. }
  420. if((uh = usbprobe(cardno, ctlrno)) == nil){
  421. cardno++;
  422. continue;
  423. }
  424. usbhost[ctlrno] = uh;
  425. ctlrno++;
  426. }
  427. }
  428. void
  429. usbinit(void)
  430. {
  431. Udev *d;
  432. int ctlrno;
  433. Usbhost *uh;
  434. for(ctlrno = 0; ctlrno < MaxUsb; ctlrno++){
  435. uh = usbhost[ctlrno];
  436. if(uh == nil)
  437. continue;
  438. if(uh->init != nil)
  439. uh->init(uh);
  440. /* reserve device for configuration */
  441. d = usbnewdevice(uh);
  442. incref(d);
  443. d->state = Attached;
  444. }
  445. }
  446. Chan *
  447. usbattach(char *spec)
  448. {
  449. return devattach('U', spec);
  450. }
  451. static Walkqid*
  452. usbwalk(Chan *c, Chan *nc, char **name, int nname)
  453. {
  454. return devwalk(c, nc, name, nname, nil, 0, usbgen);
  455. }
  456. static int
  457. usbstat(Chan *c, uchar *db, int n)
  458. {
  459. return devstat(c, db, n, nil, 0, usbgen);
  460. }
  461. Chan*
  462. usbopen(Chan *c, int omode)
  463. {
  464. Udev *d;
  465. Endpt *e;
  466. int f, s, type;
  467. Usbhost *uh;
  468. if(c->qid.type == QTDIR)
  469. return devopen(c, omode, nil, 0, usbgen);
  470. f = 0;
  471. type = TYPE(c->qid);
  472. if(type == Qnew){
  473. d = usbdevice(c);
  474. d = usbnewdevice(d->uh);
  475. XPRINT("usbopen, new dev 0x%p\n", d);
  476. if(d == nil) {
  477. XPRINT("usbopen failed (usbnewdevice)\n");
  478. error(Enodev);
  479. }
  480. type = Qctl;
  481. mkqid(&c->qid, PATH(type, d->x, CTLR(c->qid)), d->id, QTFILE);
  482. f = 1;
  483. }
  484. if(type < Q3rd){
  485. XPRINT("usbopen, devopen < Q3rd\n");
  486. return devopen(c, omode, nil, 0, usbgen);
  487. }
  488. d = usbdevice(c);
  489. uh = d->uh;
  490. qlock(uh);
  491. if(waserror()){
  492. qunlock(uh);
  493. nexterror();
  494. }
  495. switch(type){
  496. case Qctl:
  497. if(0&&d->busy)
  498. error(Einuse);
  499. d->busy = 1;
  500. if(!f)
  501. incref(d);
  502. XPRINT("usbopen, Qctl 0x%p\n", d);
  503. break;
  504. // case Qsetup: /* OHCI addition */
  505. // d = usbhdevice(c);
  506. // doopen(ub, d, 0);
  507. // incref(d);
  508. // break;
  509. default:
  510. s = type - Qep0;
  511. XPRINT("usbopen, default 0x%p, %d\n", d, s);
  512. if(s >= 0 && s < nelem(d->ep)){
  513. if((e = d->ep[s]) == nil) {
  514. XPRINT("usbopen failed (endpoint)\n");
  515. error(Enodev);
  516. }
  517. XPRINT("usbopen: dev 0x%p, ept 0x%p\n", d, e);
  518. uh->epopen(uh, e);
  519. e->foffset = 0;
  520. e->toffset = 0;
  521. e->poffset = 0;
  522. e->buffered = 0;
  523. }
  524. incref(d);
  525. break;
  526. }
  527. poperror();
  528. qunlock(uh);
  529. c->mode = openmode(omode);
  530. c->flag |= COPEN;
  531. c->offset = 0;
  532. return c;
  533. }
  534. void
  535. usbclose(Chan *c)
  536. {
  537. Udev *d;
  538. int ept, type;
  539. Usbhost *uh;
  540. type = TYPE(c->qid);
  541. if(c->qid.type == QTDIR || type < Q3rd)
  542. return;
  543. d = usbdevice(c);
  544. uh = d->uh;
  545. qlock(uh);
  546. if(waserror()){
  547. qunlock(uh);
  548. nexterror();
  549. }
  550. if(type == Qctl)
  551. d->busy = 0;
  552. XPRINT("usbclose: dev 0x%p\n", d);
  553. if(c->flag & COPEN){
  554. ept = (type != Qctl) ? type - Qep0 : -1;
  555. XPRINT("usbclose: freedev 0x%p\n", d);
  556. freedev(d, ept);
  557. }
  558. poperror();
  559. qunlock(uh);
  560. }
  561. static char *
  562. epstatus(char *s, char *se, Endpt *e, int i)
  563. {
  564. char *p;
  565. p = seprint(s, se, "%2d %#6.6lux %10lud bytes %10lud blocks\n",
  566. i, e->csp, e->nbytes, e->nblocks);
  567. if(e->epmode == Isomode){
  568. p = seprint(p, se, "bufsize %6d buffered %6d",
  569. e->maxpkt, e->buffered);
  570. if(e->toffset)
  571. p = seprint(p, se, " offset %10llud time %19lld\n",
  572. e->toffset, e->time);
  573. p = seprint(p, se, "\n");
  574. }
  575. return p;
  576. }
  577. long
  578. usbread(Chan *c, void *a, long n, vlong offset)
  579. {
  580. int t, i;
  581. Udev *d;
  582. Endpt *e;
  583. Usbhost *uh;
  584. char *s, *se, *p;
  585. if(c->qid.type == QTDIR)
  586. return devdirread(c, a, n, nil, 0, usbgen);
  587. d = usbdevice(c);
  588. uh = d->uh;
  589. t = TYPE(c->qid);
  590. if(t >= Qep0) {
  591. t -= Qep0;
  592. if(t >= nelem(d->ep))
  593. error(Eio);
  594. e = d->ep[t];
  595. if(e == nil || e->mode == OWRITE)
  596. error(Egreg);
  597. if(t == 0) {
  598. if(e->epmode == Isomode)
  599. error(Egreg);
  600. if(e->override)
  601. e->override = 0;
  602. else
  603. e->rdata01 = 1;
  604. n = uh->read(uh, e, a, n, 0LL);
  605. if(e->setin){
  606. e->setin = 0;
  607. e->wdata01 = 1;
  608. uh->write(uh, e, "", 0, 0LL, uh->tokout);
  609. }
  610. return n;
  611. }
  612. return uh->read(uh, e, a, n, offset);
  613. }
  614. s = smalloc(READSTR);
  615. se = s+READSTR;
  616. if(waserror()){
  617. free(s);
  618. nexterror();
  619. }
  620. switch(t){
  621. case Qdebug:
  622. s[0] = '\0';
  623. if(uh->debug)
  624. uh->debug(uh, s, se);
  625. break;
  626. case Qport:
  627. uh->portinfo(uh, s, se);
  628. break;
  629. case Qctl:
  630. seprint(s, se, "%11d %11d\n", d->x, d->id);
  631. break;
  632. case Qstatus:
  633. if (d->did || d->vid)
  634. p = seprint(s, se, "%s %#6.6lux %#4.4ux %#4.4ux\n",
  635. devstates[d->state], d->csp, d->vid, d->did);
  636. else
  637. p = seprint(s, se, "%s %#6.6lux\n",
  638. devstates[d->state], d->csp);
  639. for(i=0; i<nelem(d->ep); i++) {
  640. e = d->ep[i];
  641. if(e == nil)
  642. continue;
  643. /* TO DO: freeze e */
  644. p = epstatus(p, se, e, i);
  645. }
  646. }
  647. n = readstr(offset, a, n, s);
  648. poperror();
  649. free(s);
  650. return n;
  651. }
  652. long
  653. usbwrite(Chan *c, void *a, long n, vlong offset)
  654. {
  655. Udev *d;
  656. Endpt *e;
  657. Cmdtab *ct;
  658. Cmdbuf *cb;
  659. Usbhost *uh;
  660. int id, nw, t, i;
  661. char cmd[50];
  662. if(c->qid.type == QTDIR)
  663. error(Egreg);
  664. d = usbdevice(c);
  665. uh = d->uh;
  666. t = TYPE(c->qid);
  667. switch(t){
  668. case Qport:
  669. cb = parsecmd(a, n);
  670. if(waserror()){
  671. free(cb);
  672. nexterror();
  673. }
  674. ct = lookupcmd(cb, usbportmsg, nelem(usbportmsg));
  675. id = strtol(cb->f[1], nil, 0);
  676. switch(ct->index){
  677. case PMdisable:
  678. uh->portenable(uh, id, 0);
  679. break;
  680. case PMenable:
  681. uh->portenable(uh, id, 1);
  682. break;
  683. case PMreset:
  684. uh->portreset(uh, id);
  685. break;
  686. }
  687. poperror();
  688. free(cb);
  689. return n;
  690. case Qctl:
  691. cb = parsecmd(a, n);
  692. if(waserror()){
  693. free(cb);
  694. nexterror();
  695. }
  696. ct = lookupcmd(cb, usbctlmsg, nelem(usbctlmsg));
  697. switch(ct->index){
  698. case CMspeed:
  699. XPRINT("speed %s\n", cb->f[1]);
  700. if(strcmp(cb->f[1], "low") == 0)
  701. d->speed = Lowspeed;
  702. else if(strcmp(cb->f[1], "full") == 0)
  703. d->speed = Fullspeed;
  704. else if(strcmp(cb->f[1], "high") == 0)
  705. d->speed = Highspeed;
  706. else if(strtoul(cb->f[1], nil, 0) == 0)
  707. d->speed = Lowspeed;
  708. else
  709. d->speed = Fullspeed;
  710. for(i = 0; i < nelem(d->ep); i++)
  711. if(d->ep[i])
  712. uh->epmode(uh, d->ep[i]);
  713. break;
  714. case CMclass:
  715. if (cb->nf != 5 && cb->nf != 7)
  716. cmderror(cb, Ecmdargs);
  717. /*
  718. * class #ifc ept csp
  719. * (== class subclass proto) [vendor product]
  720. */
  721. d->npt = strtoul(cb->f[1], nil, 0); /* # of interfaces */
  722. i = strtoul(cb->f[2], nil, 0); /* endpoint */
  723. if (i < 0 || i >= nelem(d->ep) ||
  724. d->npt > nelem(d->ep) || i >= d->npt)
  725. cmderror(cb, Ebadusbmsg);
  726. if(cb->nf == 7){
  727. d->vid = strtoul(cb->f[5], nil, 0);
  728. d->did = strtoul(cb->f[6], nil, 0);
  729. }
  730. if (i == 0)
  731. d->csp = strtoul(cb->f[3], nil, 0);
  732. if(d->ep[i] == nil){
  733. XPRINT("calling devendpt in usbwrite (CMclass)\n");
  734. d->ep[i] = devendpt(d, i, 1);
  735. }
  736. d->ep[i]->csp = strtoul(cb->f[3], nil, 0);
  737. d->ep[i]->maxpkt = strtoul(cb->f[4], nil, 0);
  738. if(uh->epmaxpkt)
  739. uh->epmaxpkt(uh, d->ep[i]);
  740. break;
  741. case CMdata:
  742. i = strtoul(cb->f[1], nil, 0);
  743. if(i < 0 || i >= nelem(d->ep) || d->ep[i] == nil)
  744. error(Ebadusbmsg);
  745. e = d->ep[i];
  746. e->wdata01 = e->rdata01 = strtoul(cb->f[2], nil, 0) != 0;
  747. e->override = 1;
  748. break;
  749. case CMmaxpkt:
  750. i = strtoul(cb->f[1], nil, 0);
  751. if(i < 0 || i >= nelem(d->ep) || d->ep[i] == nil)
  752. error(Ebadusbmsg);
  753. e = d->ep[i];
  754. e->maxpkt = strtoul(cb->f[2], nil, 0);
  755. if(e->maxpkt > 1500)
  756. e->maxpkt = 1500;
  757. if(uh->epmaxpkt)
  758. uh->epmaxpkt(uh, e);
  759. break;
  760. case CMadjust:
  761. i = strtoul(cb->f[1], nil, 0);
  762. if(i < 0 || i >= nelem(d->ep) || d->ep[i] == nil)
  763. error(Ebadusbmsg);
  764. e = d->ep[i];
  765. if(e->epmode != Isomode)
  766. error(Eperm);
  767. i = strtoul(cb->f[2], nil, 0);
  768. /* speed may not result in change of maxpkt */
  769. if (i < (e->maxpkt-1)/e->samplesz * 1000/e->pollms
  770. || i > e->maxpkt/e->samplesz * 1000/e->pollms){
  771. snprint(cmd, sizeof(cmd), "%d < %d < %d?",
  772. (e->maxpkt-1)/e->samplesz * 1000/e->pollms,
  773. i,
  774. e->maxpkt/e->samplesz * 1000/e->pollms);
  775. error(cmd);
  776. }
  777. e->hz = i;
  778. break;
  779. case CMdebug:
  780. i = strtoul(cb->f[1], nil, 0);
  781. if(i < -1 || i >= nelem(d->ep) || d->ep[i] == nil)
  782. error(Ebadusbmsg);
  783. if (i == -1)
  784. debug = 0;
  785. else {
  786. debug = 1;
  787. e = d->ep[i];
  788. e->debug = strtoul(cb->f[2], nil, 0);
  789. }
  790. break;
  791. case CMunstall:
  792. i = strtoul(cb->f[1], nil, 0);
  793. if(i < 0 || i >= nelem(d->ep) || d->ep[i] == nil)
  794. error(Ebadusbmsg);
  795. e = d->ep[i];
  796. e->dir[Dirout].err = e->dir[Dirin].err = nil;
  797. break;
  798. case CMep:
  799. /* Ctlmode: ep n `ctl' mode maxpkt nbuf OR
  800. * Bulkmode: ep n `bulk' mode maxpkt nbuf OR
  801. * Isomode: ep n period mode samplesize Hz OR
  802. * Intrmode: ep n period mode maxpkt
  803. */
  804. if(cb->nf < 3)
  805. error(Ecmdargs);
  806. i = strtoul(cb->f[1], nil, 0);
  807. if(i < 0 || i >= nelem(d->ep)) {
  808. XPRINT("field 1: 0 <= %d < %d\n",
  809. i, nelem(d->ep));
  810. error(Ebadarg);
  811. }
  812. if((e = d->ep[i]) == nil){
  813. XPRINT("calling devendpt in usbwrite (CMep)\n");
  814. e = devendpt(d, i, 1);
  815. }
  816. qlock(uh);
  817. if(e->active){
  818. qunlock(uh);
  819. error(Eperm);
  820. }
  821. if(waserror()){
  822. freept(e);
  823. qunlock(uh);
  824. nexterror();
  825. }
  826. if(strcmp(cb->f[2], "bulk") == 0){
  827. /* ep n `bulk' mode maxpkt nbuf */
  828. if(cb->nf != 6)
  829. error(Ecmdargs);
  830. i = strtoul(cb->f[4], nil, 0);
  831. if(i < 1 || i > 1023){
  832. XPRINT("maxpkt: 1 <= %d < 1024\n", i);
  833. error(Ebadarg);
  834. }
  835. e->maxpkt = i;
  836. i = strtoul(cb->f[5], nil, 0);
  837. if(i < 1 || i > 32){
  838. XPRINT("nbuf: 1 <= %d <= 32\n", i);
  839. error(Ebadarg);
  840. }
  841. e->nbuf = i;
  842. e->epnewmode = Bulkmode;
  843. }else if(strcmp(cb->f[2], "ctl") == 0){
  844. /* ep n `ctl' mode maxpkt nbuf */
  845. if(cb->nf != 6)
  846. error(Ecmdargs);
  847. i = strtoul(cb->f[4], nil, 0);
  848. if(i < 8 || i > 1023){
  849. XPRINT("maxpkt: 8 <= %d < 1024\n", i);
  850. error(Ebadarg);
  851. }
  852. e->maxpkt = i;
  853. i = strtoul(cb->f[5], nil, 0);
  854. if(i < 1 || i > 32){
  855. XPRINT("nbuf: 1 <= %d <= 32\n", i);
  856. error(Ebadarg);
  857. }
  858. e->nbuf = i;
  859. e->epnewmode = Ctlmode;
  860. }else if(cb->nf == 5){
  861. /* ep n period mode maxpkt */
  862. i = strtoul(cb->f[2], nil, 0);
  863. if(i > 0 && i <= 1000){
  864. e->pollms = i;
  865. }else {
  866. XPRINT("pollms: 0 <= %d <= 1000\n", i);
  867. error(Ebadarg);
  868. }
  869. i = strtoul(cb->f[4], nil, 0);
  870. if(i >= 1 && i < 256){
  871. e->maxpkt = i;
  872. }else {
  873. XPRINT("maxpkt: 0 < %d <= 8\n", i);
  874. error(Ebadarg);
  875. }
  876. e->nbuf = 1; /* just in case */
  877. e->epnewmode = Intrmode;
  878. }else if(cb->nf == 6){
  879. /* ep n period mode samplesize Hz */
  880. i = strtoul(cb->f[2], nil, 0);
  881. if(i > 0 && i <= 1000){
  882. e->pollms = i;
  883. }else {
  884. XPRINT("Hz: 0 <= %d <= 1000\n", i);
  885. error(Ebadarg);
  886. }
  887. i = strtoul(cb->f[4], nil, 0);
  888. if(i >= 1 && i <= 8){
  889. e->samplesz = i;
  890. }else {
  891. XPRINT("samplesize: 0 < %d <= 8\n", i);
  892. error(Ebadarg);
  893. }
  894. i = strtoul(cb->f[5], nil, 0);
  895. if(i >= 1 && i*e->samplesz <= 12*1000*1000){
  896. /* Hz */
  897. e->hz = i;
  898. e->remain = 0;
  899. }else {
  900. XPRINT("field 6: 1 < %d <= 100000 Hz\n", i);
  901. error(Ebadarg);
  902. }
  903. e->maxpkt = (e->hz*e->pollms + 999)/1000 *
  904. e->samplesz;
  905. e->epnewmode = Isomode;
  906. }else
  907. error(Ecmdargs);
  908. e->mode = strcmp(cb->f[3],"r") == 0? OREAD:
  909. strcmp(cb->f[3],"w") == 0? OWRITE: ORDWR;
  910. uh->epmode(uh, e);
  911. poperror();
  912. qunlock(uh);
  913. }
  914. poperror();
  915. free(cb);
  916. return n;
  917. case Qep0: /* SETUP endpoint 0 */
  918. /* should canqlock etc */
  919. e = d->ep[0];
  920. if(e == nil || e->epmode == Isomode)
  921. error(Egreg);
  922. if(n < 8)
  923. error(Eio);
  924. nw = *(uchar*)a & RD2H;
  925. if(e->override)
  926. e->override = 0;
  927. else
  928. e->wdata01 = 0;
  929. n = uh->write(uh, e, a, n, 0LL, uh->toksetup);
  930. if(nw == 0){ /* host to device: use IN[DATA1] to ack */
  931. e->rdata01 = 1;
  932. nw = uh->read(uh, e, cmd, 0LL, 8);
  933. if(nw != 0)
  934. error(Eio); /* could provide more status */
  935. }else
  936. e->setin = 1; /* two-phase */
  937. break;
  938. default: /* sends DATA[01] */
  939. t -= Qep0;
  940. if(t < 0 || t >= nelem(d->ep))
  941. error(Egreg);
  942. e = d->ep[t];
  943. if(e == nil || e->mode == OREAD)
  944. error(Egreg);
  945. n = uh->write(uh, e, a, n, offset, uh->tokout);
  946. break;
  947. }
  948. return n;
  949. }
  950. Dev usbdevtab = {
  951. 'U',
  952. "usb",
  953. usbreset,
  954. usbinit,
  955. devshutdown,
  956. usbattach,
  957. usbwalk,
  958. usbstat,
  959. usbopen,
  960. devcreate,
  961. usbclose,
  962. usbread,
  963. devbread,
  964. usbwrite,
  965. devbwrite,
  966. devremove,
  967. devwstat,
  968. };