devusb.c 18 KB

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