devusb.c 18 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608609610611612613614615616617618619620621622623624625626627628629630631632633634635636637638639640641642643644645646647648649650651652653654655656657658659660661662663664665666667668669670671672673674675676677678679680681682683684685686687688689690691692693694695696697698699700701702703704705706707708709710711712713714715716717718719720721722723724725726727728729730731732733734735736737738739740741742743744745746747748749750751752753754755756757758759760761762763764765766767768769770771772773774775776777778779780781782783784785786787788789790791792793794795796797798799800801802803804805806807808809810811812813814815816817818819820821822823824825826827828829830831832833834835836837838839840841842843844845846847848849850851852853854855856857858859860861862863864865866867868869870871872873874875876877878879880881882883884885886887888889890891892893894895896897898899900901902903904905906907908909910911912913914915916917918919920921922923924925926927928929930931932933934935936937938939940941942943944945946947948949950951952953954955956957958959960961962963964965966967968969970971972973974975976977978979980981
  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. sprint(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. sprint(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 = malloc(sizeof(Usbhost));
  365. memset(uh, 0, sizeof(Usbhost));
  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))
  377. continue;
  378. break;
  379. }
  380. }
  381. if(cardno >= MaxUsb || usbtypes[cardno].type == nil){
  382. free(uh);
  383. return nil;
  384. }
  385. if(usbtypes[cardno].reset(uh) < 0){
  386. free(uh);
  387. return nil;
  388. }
  389. /*
  390. * IRQ2 doesn't really exist, it's used to gang the interrupt
  391. * controllers together. A device set to IRQ2 will appear on
  392. * the second interrupt controller as IRQ9.
  393. */
  394. if(uh->irq == 2)
  395. uh->irq = 9;
  396. snprint(name, sizeof(name), "usb%d", ctlrno);
  397. intrenable(uh->irq, uh->interrupt, uh, uh->tbdf, name);
  398. ebuf = buf + sizeof buf;
  399. p = seprint(buf, ebuf, "#U/usb%d: %s: port 0x%luX irq %d",
  400. ctlrno, usbtypes[cardno].type, uh->port, uh->irq);
  401. if(uh->mem)
  402. p = seprint(p, ebuf, " addr 0x%luX", PADDR(uh->mem));
  403. if(uh->size)
  404. seprint(p, ebuf, " size 0x%luX", uh->size);
  405. print("%s\n", buf);
  406. return uh;
  407. }
  408. static void
  409. usbreset(void)
  410. {
  411. int cardno, ctlrno;
  412. Usbhost *uh;
  413. for(ctlrno = 0; ctlrno < MaxUsb; ctlrno++){
  414. if((uh = usbprobe(-1, ctlrno)) == nil)
  415. continue;
  416. usbhost[ctlrno] = uh;
  417. }
  418. if(getconf("*nousbprobe"))
  419. return;
  420. cardno = ctlrno = 0;
  421. while(usbtypes[cardno].type != nil && ctlrno < MaxUsb){
  422. if(usbhost[ctlrno] != nil){
  423. ctlrno++;
  424. continue;
  425. }
  426. if((uh = usbprobe(cardno, ctlrno)) == nil){
  427. cardno++;
  428. continue;
  429. }
  430. usbhost[ctlrno] = uh;
  431. ctlrno++;
  432. }
  433. }
  434. void
  435. usbinit(void)
  436. {
  437. Udev *d;
  438. int ctlrno;
  439. Usbhost *uh;
  440. for(ctlrno = 0; ctlrno < MaxUsb; ctlrno++){
  441. uh = usbhost[ctlrno];
  442. if(uh == nil)
  443. continue;
  444. if(uh->init != 0)
  445. uh->init(uh);
  446. /* reserve device for configuration */
  447. d = usbnewdevice(uh);
  448. incref(d);
  449. d->state = Attached;
  450. }
  451. }
  452. Chan *
  453. usbattach(char *spec)
  454. {
  455. return devattach('U', spec);
  456. }
  457. static Walkqid*
  458. usbwalk(Chan *c, Chan *nc, char **name, int nname)
  459. {
  460. return devwalk(c, nc, name, nname, nil, 0, usbgen);
  461. }
  462. static int
  463. usbstat(Chan *c, uchar *db, int n)
  464. {
  465. return devstat(c, db, n, nil, 0, usbgen);
  466. }
  467. Chan*
  468. usbopen(Chan *c, int omode)
  469. {
  470. Udev *d;
  471. Endpt *e;
  472. int f, s, type;
  473. Usbhost *uh;
  474. if(c->qid.type == QTDIR)
  475. return devopen(c, omode, nil, 0, usbgen);
  476. f = 0;
  477. type = TYPE(c->qid);
  478. if(type == Qnew){
  479. d = usbdevice(c);
  480. d = usbnewdevice(d->uh);
  481. XPRINT("usbopen, new dev 0x%p\n", d);
  482. if(d == nil) {
  483. XPRINT("usbopen failed (usbnewdevice)\n");
  484. error(Enodev);
  485. }
  486. type = Qctl;
  487. mkqid(&c->qid, PATH(type, d->x, CTLR(c->qid)), d->id, QTFILE);
  488. f = 1;
  489. }
  490. if(type < Q3rd){
  491. XPRINT("usbopen, devopen < Q3rd\n");
  492. return devopen(c, omode, nil, 0, usbgen);
  493. }
  494. d = usbdevice(c);
  495. uh = d->uh;
  496. qlock(uh);
  497. if(waserror()){
  498. qunlock(uh);
  499. nexterror();
  500. }
  501. switch(type){
  502. case Qctl:
  503. if(0&&d->busy)
  504. error(Einuse);
  505. d->busy = 1;
  506. if(!f)
  507. incref(d);
  508. XPRINT("usbopen, Qctl 0x%p\n", d);
  509. break;
  510. // case Qsetup: /* OHCI addition */
  511. // d = usbhdevice(c);
  512. // doopen(ub, d, 0);
  513. // incref(d);
  514. // break;
  515. default:
  516. s = type - Qep0;
  517. XPRINT("usbopen, default 0x%p, %d\n", d, s);
  518. if(s >= 0 && s < nelem(d->ep)){
  519. if((e = d->ep[s]) == nil) {
  520. XPRINT("usbopen failed (endpoint)\n");
  521. error(Enodev);
  522. }
  523. XPRINT("usbopen: dev 0x%p, ept 0x%p\n", d, e);
  524. uh->epopen(uh, e);
  525. e->foffset = 0;
  526. e->toffset = 0;
  527. e->poffset = 0;
  528. e->buffered = 0;
  529. }
  530. incref(d);
  531. break;
  532. }
  533. poperror();
  534. qunlock(uh);
  535. c->mode = openmode(omode);
  536. c->flag |= COPEN;
  537. c->offset = 0;
  538. return c;
  539. }
  540. void
  541. usbclose(Chan *c)
  542. {
  543. Udev *d;
  544. int ept, type;
  545. Usbhost *uh;
  546. type = TYPE(c->qid);
  547. if(c->qid.type == QTDIR || type < Q3rd)
  548. return;
  549. d = usbdevice(c);
  550. uh = d->uh;
  551. qlock(uh);
  552. if(waserror()){
  553. qunlock(uh);
  554. nexterror();
  555. }
  556. if(type == Qctl)
  557. d->busy = 0;
  558. XPRINT("usbclose: dev 0x%p\n", d);
  559. if(c->flag & COPEN){
  560. ept = (type != Qctl) ? type - Qep0 : -1;
  561. XPRINT("usbclose: freedev 0x%p\n", d);
  562. freedev(d, ept);
  563. }
  564. poperror();
  565. qunlock(uh);
  566. }
  567. static char *
  568. epstatus(char *s, char *se, Endpt *e, int i)
  569. {
  570. char *p;
  571. p = seprint(s, se, "%2d %#6.6lux %10lud bytes %10lud blocks\n",
  572. i, e->csp, e->nbytes, e->nblocks);
  573. if(e->iso){
  574. p = seprint(p, se, "bufsize %6d buffered %6d",
  575. e->maxpkt, e->buffered);
  576. if(e->toffset)
  577. p = seprint(p, se, " offset %10lud time %19lld\n",
  578. e->toffset, e->time);
  579. p = seprint(p, se, "\n");
  580. }
  581. return p;
  582. }
  583. long
  584. usbread(Chan *c, void *a, long n, vlong offset)
  585. {
  586. int t, i;
  587. Udev *d;
  588. Endpt *e;
  589. Usbhost *uh;
  590. char *s, *se, *p;
  591. if(c->qid.type == QTDIR)
  592. return devdirread(c, a, n, nil, 0, usbgen);
  593. d = usbdevice(c);
  594. uh = d->uh;
  595. t = TYPE(c->qid);
  596. if(t >= Qep0) {
  597. t -= Qep0;
  598. if(t >= nelem(d->ep))
  599. error(Eio);
  600. e = d->ep[t];
  601. if(e == nil || e->mode == OWRITE)
  602. error(Egreg);
  603. if(t == 0) {
  604. if(e->iso)
  605. error(Egreg);
  606. e->rdata01 = 1;
  607. n = uh->read(uh, e, a, n, 0LL);
  608. if(e->setin){
  609. e->setin = 0;
  610. e->wdata01 = 1;
  611. uh->write(uh, e, "", 0, 0LL, uh->tokout);
  612. }
  613. return n;
  614. }
  615. return uh->read(uh, e, a, n, offset);
  616. }
  617. s = smalloc(READSTR);
  618. se = s+READSTR;
  619. if(waserror()){
  620. free(s);
  621. nexterror();
  622. }
  623. switch(t){
  624. case Qport:
  625. uh->portinfo(uh, s, se);
  626. break;
  627. case Qctl:
  628. seprint(s, se, "%11d %11d\n", d->x, d->id);
  629. break;
  630. case Qstatus:
  631. if (d->did || d->vid)
  632. p = seprint(s, se, "%s %#6.6lux %#4.4ux %#4.4ux\n",
  633. devstates[d->state], d->csp, d->vid, d->did);
  634. else
  635. p = seprint(s, se, "%s %#6.6lux\n",
  636. devstates[d->state], d->csp);
  637. for(i=0; i<nelem(d->ep); i++) {
  638. e = d->ep[i];
  639. if(e == nil)
  640. continue;
  641. /* TO DO: freeze e */
  642. p = epstatus(p, se, e, i);
  643. }
  644. }
  645. n = readstr(offset, a, n, s);
  646. poperror();
  647. free(s);
  648. return n;
  649. }
  650. long
  651. usbwrite(Chan *c, void *a, long n, vlong offset)
  652. {
  653. Udev *d;
  654. Endpt *e;
  655. Cmdtab *ct;
  656. Cmdbuf *cb;
  657. Usbhost *uh;
  658. int id, nw, t, i;
  659. char cmd[50];
  660. if(c->qid.type == QTDIR)
  661. error(Egreg);
  662. d = usbdevice(c);
  663. uh = d->uh;
  664. t = TYPE(c->qid);
  665. switch(t){
  666. case Qport:
  667. cb = parsecmd(a, n);
  668. if(waserror()){
  669. free(cb);
  670. nexterror();
  671. }
  672. ct = lookupcmd(cb, usbportmsg, nelem(usbportmsg));
  673. id = strtol(cb->f[1], nil, 0);
  674. switch(ct->index){
  675. case PMdisable:
  676. uh->portenable(uh, id, 0);
  677. break;
  678. case PMenable:
  679. uh->portenable(uh, id, 1);
  680. break;
  681. case PMreset:
  682. uh->portreset(uh, id);
  683. break;
  684. }
  685. poperror();
  686. free(cb);
  687. return n;
  688. case Qctl:
  689. cb = parsecmd(a, n);
  690. if(waserror()){
  691. free(cb);
  692. nexterror();
  693. }
  694. ct = lookupcmd(cb, usbctlmsg, nelem(usbctlmsg));
  695. switch(ct->index){
  696. case CMspeed:
  697. d->ls = strtoul(cb->f[1], nil, 0) == 0;
  698. break;
  699. case CMclass:
  700. if (cb->nf != 4 && cb->nf != 6)
  701. cmderror(cb, Ebadusbmsg);
  702. /*
  703. * class #ifc ept csp
  704. * (== class subclass proto) [vendor product]
  705. */
  706. d->npt = strtoul(cb->f[1], nil, 0); /* # of interfaces */
  707. i = strtoul(cb->f[2], nil, 0); /* endpoint */
  708. if (i < 0 || i >= nelem(d->ep)
  709. || d->npt > nelem(d->ep) || i >= d->npt)
  710. cmderror(cb, Ebadusbmsg);
  711. if (cb->nf == 6) {
  712. d->vid = strtoul(cb->f[4], nil, 0);
  713. d->did = strtoul(cb->f[5], nil, 0);
  714. }
  715. if (i == 0)
  716. d->csp = strtoul(cb->f[3], nil, 0);
  717. if(d->ep[i] == nil){
  718. XPRINT("calling devendpt in usbwrite (CMclass)\n");
  719. d->ep[i] = devendpt(d, i, 1);
  720. }
  721. d->ep[i]->csp = strtoul(cb->f[3], nil, 0);
  722. break;
  723. case CMdata:
  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->wdata01 = e->rdata01 = strtoul(cb->f[2], nil, 0) != 0;
  729. break;
  730. case CMmaxpkt:
  731. i = strtoul(cb->f[1], nil, 0);
  732. if(i < 0 || i >= nelem(d->ep) || d->ep[i] == nil)
  733. error(Ebadusbmsg);
  734. e = d->ep[i];
  735. e->maxpkt = strtoul(cb->f[2], nil, 0);
  736. if(e->maxpkt > 1500)
  737. e->maxpkt = 1500;
  738. break;
  739. case CMadjust:
  740. i = strtoul(cb->f[1], nil, 0);
  741. if(i < 0 || i >= nelem(d->ep) || d->ep[i] == nil)
  742. error(Ebadusbmsg);
  743. e = d->ep[i];
  744. if (e->iso == 0)
  745. error(Eperm);
  746. i = strtoul(cb->f[2], nil, 0);
  747. /* speed may not result in change of maxpkt */
  748. if (i < (e->maxpkt-1)/e->samplesz * 1000/e->pollms
  749. || i > e->maxpkt/e->samplesz * 1000/e->pollms){
  750. snprint(cmd, sizeof(cmd), "%d < %d < %d?",
  751. (e->maxpkt-1)/e->samplesz * 1000/e->pollms,
  752. i,
  753. e->maxpkt/e->samplesz * 1000/e->pollms);
  754. error(cmd);
  755. }
  756. e->hz = i;
  757. break;
  758. case CMdebug:
  759. i = strtoul(cb->f[1], nil, 0);
  760. if(i < -1 || i >= nelem(d->ep) || d->ep[i] == nil)
  761. error(Ebadusbmsg);
  762. if (i == -1)
  763. debug = 0;
  764. else {
  765. debug = 1;
  766. e = d->ep[i];
  767. e->debug = strtoul(cb->f[2], nil, 0);
  768. }
  769. break;
  770. case CMunstall:
  771. i = strtoul(cb->f[1], nil, 0);
  772. if(i < 0 || i >= nelem(d->ep) || d->ep[i] == nil)
  773. error(Ebadusbmsg);
  774. e = d->ep[i];
  775. e->err = nil;
  776. break;
  777. case CMep:
  778. /* ep n `bulk' mode maxpkt nbuf OR
  779. * ep n period mode samplesize Hz
  780. */
  781. i = strtoul(cb->f[1], nil, 0);
  782. if(i < 0 || i >= nelem(d->ep)) {
  783. XPRINT("field 1: 0 <= %d < %d\n",
  784. i, nelem(d->ep));
  785. error(Ebadarg);
  786. }
  787. if((e = d->ep[i]) == nil){
  788. XPRINT("calling devendpt in usbwrite (CMep)\n");
  789. e = devendpt(d, i, 1);
  790. }
  791. qlock(uh);
  792. if(waserror()){
  793. freept(e);
  794. qunlock(uh);
  795. nexterror();
  796. }
  797. if(e->active)
  798. error(Eperm);
  799. if(strcmp(cb->f[2], "bulk") == 0){
  800. /* ep n `bulk' mode maxpkt nbuf */
  801. e->iso = 0;
  802. i = strtoul(cb->f[4], nil, 0);
  803. if(i < 8 || i > 1023)
  804. i = 8;
  805. e->maxpkt = i;
  806. i = strtoul(cb->f[5], nil, 0);
  807. if(i >= 1 && i <= 32)
  808. e->nbuf = i;
  809. } else {
  810. /* ep n period mode samplesize Hz */
  811. i = strtoul(cb->f[2], nil, 0);
  812. if(i > 0 && i <= 1000){
  813. e->pollms = i;
  814. }else {
  815. XPRINT("field 4: 0 <= %d <= 1000\n", i);
  816. error(Ebadarg);
  817. }
  818. i = strtoul(cb->f[4], nil, 0);
  819. if(i >= 1 && i <= 8){
  820. e->samplesz = i;
  821. }else {
  822. XPRINT("field 4: 0 < %d <= 8\n", i);
  823. error(Ebadarg);
  824. }
  825. i = strtoul(cb->f[5], nil, 0);
  826. if(i >= 1 && i*e->samplesz <= 12*1000*1000){
  827. /* Hz */
  828. e->hz = i;
  829. e->remain = 0;
  830. }else {
  831. XPRINT("field 5: 1 < %d <= 100000 Hz\n",
  832. i);
  833. error(Ebadarg);
  834. }
  835. e->maxpkt = (e->hz*e->pollms + 999)/1000 *
  836. e->samplesz;
  837. e->iso = 1;
  838. }
  839. e->mode = strcmp(cb->f[3],"r") == 0? OREAD:
  840. strcmp(cb->f[3],"w") == 0? OWRITE: ORDWR;
  841. uh->epmode(uh, e);
  842. poperror();
  843. qunlock(uh);
  844. }
  845. poperror();
  846. free(cb);
  847. return n;
  848. case Qep0: /* SETUP endpoint 0 */
  849. /* should canqlock etc */
  850. e = d->ep[0];
  851. if(e == nil || e->iso)
  852. error(Egreg);
  853. if(n < 8)
  854. error(Eio);
  855. nw = *(uchar*)a & RD2H;
  856. e->wdata01 = 0;
  857. n = uh->write(uh, e, a, n, 0LL, uh->toksetup);
  858. if(nw == 0) { /* host to device: use IN[DATA1] to ack */
  859. e->rdata01 = 1;
  860. nw = uh->read(uh, e, cmd, 0LL, 8);
  861. if(nw != 0)
  862. error(Eio); /* could provide more status */
  863. }else
  864. e->setin = 1; /* two-phase */
  865. break;
  866. default: /* sends DATA[01] */
  867. t -= Qep0;
  868. if(t < 0 || t >= nelem(d->ep))
  869. error(Egreg);
  870. e = d->ep[t];
  871. if(e == nil || e->mode == OREAD)
  872. error(Egreg);
  873. n = uh->write(uh, e, a, n, offset, uh->tokout);
  874. break;
  875. }
  876. return n;
  877. }
  878. Dev usbdevtab = {
  879. 'U',
  880. "usb",
  881. usbreset,
  882. usbinit,
  883. devshutdown,
  884. usbattach,
  885. usbwalk,
  886. usbstat,
  887. usbopen,
  888. devcreate,
  889. usbclose,
  890. usbread,
  891. devbread,
  892. usbwrite,
  893. devbwrite,
  894. devremove,
  895. devwstat,
  896. };