Loading...
1/*
2 * R8A66597 HCD (Host Controller Driver)
3 *
4 * Copyright (C) 2006-2007 Renesas Solutions Corp.
5 * Portions Copyright (C) 2004 Psion Teklogix (for NetBook PRO)
6 * Portions Copyright (C) 2004-2005 David Brownell
7 * Portions Copyright (C) 1999 Roman Weissgaerber
8 *
9 * Author : Yoshihiro Shimoda <yoshihiro.shimoda.uh@renesas.com>
10 *
11 * This program is free software; you can redistribute it and/or modify
12 * it under the terms of the GNU General Public License as published by
13 * the Free Software Foundation; version 2 of the License.
14 *
15 * This program is distributed in the hope that it will be useful,
16 * but WITHOUT ANY WARRANTY; without even the implied warranty of
17 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
18 * GNU General Public License for more details.
19 *
20 * You should have received a copy of the GNU General Public License
21 * along with this program; if not, write to the Free Software
22 * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA
23 *
24 */
25
26#include <linux/module.h>
27#include <linux/kernel.h>
28#include <linux/sched.h>
29#include <linux/errno.h>
30#include <linux/timer.h>
31#include <linux/delay.h>
32#include <linux/list.h>
33#include <linux/interrupt.h>
34#include <linux/usb.h>
35#include <linux/usb/hcd.h>
36#include <linux/platform_device.h>
37#include <linux/io.h>
38#include <linux/mm.h>
39#include <linux/irq.h>
40#include <linux/slab.h>
41#include <asm/cacheflush.h>
42
43#include "r8a66597.h"
44
45MODULE_DESCRIPTION("R8A66597 USB Host Controller Driver");
46MODULE_LICENSE("GPL");
47MODULE_AUTHOR("Yoshihiro Shimoda");
48MODULE_ALIAS("platform:r8a66597_hcd");
49
50#define DRIVER_VERSION "2009-05-26"
51
52static const char hcd_name[] = "r8a66597_hcd";
53
54static void packet_write(struct r8a66597 *r8a66597, u16 pipenum);
55static int r8a66597_get_frame(struct usb_hcd *hcd);
56
57/* this function must be called with interrupt disabled */
58static void enable_pipe_irq(struct r8a66597 *r8a66597, u16 pipenum,
59 unsigned long reg)
60{
61 u16 tmp;
62
63 tmp = r8a66597_read(r8a66597, INTENB0);
64 r8a66597_bclr(r8a66597, BEMPE | NRDYE | BRDYE, INTENB0);
65 r8a66597_bset(r8a66597, 1 << pipenum, reg);
66 r8a66597_write(r8a66597, tmp, INTENB0);
67}
68
69/* this function must be called with interrupt disabled */
70static void disable_pipe_irq(struct r8a66597 *r8a66597, u16 pipenum,
71 unsigned long reg)
72{
73 u16 tmp;
74
75 tmp = r8a66597_read(r8a66597, INTENB0);
76 r8a66597_bclr(r8a66597, BEMPE | NRDYE | BRDYE, INTENB0);
77 r8a66597_bclr(r8a66597, 1 << pipenum, reg);
78 r8a66597_write(r8a66597, tmp, INTENB0);
79}
80
81static void set_devadd_reg(struct r8a66597 *r8a66597, u8 r8a66597_address,
82 u16 usbspd, u8 upphub, u8 hubport, int port)
83{
84 u16 val;
85 unsigned long devadd_reg = get_devadd_addr(r8a66597_address);
86
87 val = (upphub << 11) | (hubport << 8) | (usbspd << 6) | (port & 0x0001);
88 r8a66597_write(r8a66597, val, devadd_reg);
89}
90
91static int r8a66597_clock_enable(struct r8a66597 *r8a66597)
92{
93 u16 tmp;
94 int i = 0;
95
96 if (r8a66597->pdata->on_chip) {
97 clk_prepare_enable(r8a66597->clk);
98 do {
99 r8a66597_write(r8a66597, SCKE, SYSCFG0);
100 tmp = r8a66597_read(r8a66597, SYSCFG0);
101 if (i++ > 1000) {
102 printk(KERN_ERR "r8a66597: reg access fail.\n");
103 return -ENXIO;
104 }
105 } while ((tmp & SCKE) != SCKE);
106 r8a66597_write(r8a66597, 0x04, 0x02);
107 } else {
108 do {
109 r8a66597_write(r8a66597, USBE, SYSCFG0);
110 tmp = r8a66597_read(r8a66597, SYSCFG0);
111 if (i++ > 1000) {
112 printk(KERN_ERR "r8a66597: reg access fail.\n");
113 return -ENXIO;
114 }
115 } while ((tmp & USBE) != USBE);
116 r8a66597_bclr(r8a66597, USBE, SYSCFG0);
117 r8a66597_mdfy(r8a66597, get_xtal_from_pdata(r8a66597->pdata),
118 XTAL, SYSCFG0);
119
120 i = 0;
121 r8a66597_bset(r8a66597, XCKE, SYSCFG0);
122 do {
123 msleep(1);
124 tmp = r8a66597_read(r8a66597, SYSCFG0);
125 if (i++ > 500) {
126 printk(KERN_ERR "r8a66597: reg access fail.\n");
127 return -ENXIO;
128 }
129 } while ((tmp & SCKE) != SCKE);
130 }
131
132 return 0;
133}
134
135static void r8a66597_clock_disable(struct r8a66597 *r8a66597)
136{
137 r8a66597_bclr(r8a66597, SCKE, SYSCFG0);
138 udelay(1);
139
140 if (r8a66597->pdata->on_chip) {
141 clk_disable_unprepare(r8a66597->clk);
142 } else {
143 r8a66597_bclr(r8a66597, PLLC, SYSCFG0);
144 r8a66597_bclr(r8a66597, XCKE, SYSCFG0);
145 r8a66597_bclr(r8a66597, USBE, SYSCFG0);
146 }
147}
148
149static void r8a66597_enable_port(struct r8a66597 *r8a66597, int port)
150{
151 u16 val;
152
153 val = port ? DRPD : DCFM | DRPD;
154 r8a66597_bset(r8a66597, val, get_syscfg_reg(port));
155 r8a66597_bset(r8a66597, HSE, get_syscfg_reg(port));
156
157 r8a66597_write(r8a66597, BURST | CPU_ADR_RD_WR, get_dmacfg_reg(port));
158 r8a66597_bclr(r8a66597, DTCHE, get_intenb_reg(port));
159 r8a66597_bset(r8a66597, ATTCHE, get_intenb_reg(port));
160}
161
162static void r8a66597_disable_port(struct r8a66597 *r8a66597, int port)
163{
164 u16 val, tmp;
165
166 r8a66597_write(r8a66597, 0, get_intenb_reg(port));
167 r8a66597_write(r8a66597, 0, get_intsts_reg(port));
168
169 r8a66597_port_power(r8a66597, port, 0);
170
171 do {
172 tmp = r8a66597_read(r8a66597, SOFCFG) & EDGESTS;
173 udelay(640);
174 } while (tmp == EDGESTS);
175
176 val = port ? DRPD : DCFM | DRPD;
177 r8a66597_bclr(r8a66597, val, get_syscfg_reg(port));
178 r8a66597_bclr(r8a66597, HSE, get_syscfg_reg(port));
179}
180
181static int enable_controller(struct r8a66597 *r8a66597)
182{
183 int ret, port;
184 u16 vif = r8a66597->pdata->vif ? LDRV : 0;
185 u16 irq_sense = r8a66597->irq_sense_low ? INTL : 0;
186 u16 endian = r8a66597->pdata->endian ? BIGEND : 0;
187
188 ret = r8a66597_clock_enable(r8a66597);
189 if (ret < 0)
190 return ret;
191
192 r8a66597_bset(r8a66597, vif & LDRV, PINCFG);
193 r8a66597_bset(r8a66597, USBE, SYSCFG0);
194
195 r8a66597_bset(r8a66597, BEMPE | NRDYE | BRDYE, INTENB0);
196 r8a66597_bset(r8a66597, irq_sense & INTL, SOFCFG);
197 r8a66597_bset(r8a66597, BRDY0, BRDYENB);
198 r8a66597_bset(r8a66597, BEMP0, BEMPENB);
199
200 r8a66597_bset(r8a66597, endian & BIGEND, CFIFOSEL);
201 r8a66597_bset(r8a66597, endian & BIGEND, D0FIFOSEL);
202 r8a66597_bset(r8a66597, endian & BIGEND, D1FIFOSEL);
203 r8a66597_bset(r8a66597, TRNENSEL, SOFCFG);
204
205 r8a66597_bset(r8a66597, SIGNE | SACKE, INTENB1);
206
207 for (port = 0; port < r8a66597->max_root_hub; port++)
208 r8a66597_enable_port(r8a66597, port);
209
210 return 0;
211}
212
213static void disable_controller(struct r8a66597 *r8a66597)
214{
215 int port;
216
217 /* disable interrupts */
218 r8a66597_write(r8a66597, 0, INTENB0);
219 r8a66597_write(r8a66597, 0, INTENB1);
220 r8a66597_write(r8a66597, 0, BRDYENB);
221 r8a66597_write(r8a66597, 0, BEMPENB);
222 r8a66597_write(r8a66597, 0, NRDYENB);
223
224 /* clear status */
225 r8a66597_write(r8a66597, 0, BRDYSTS);
226 r8a66597_write(r8a66597, 0, NRDYSTS);
227 r8a66597_write(r8a66597, 0, BEMPSTS);
228
229 for (port = 0; port < r8a66597->max_root_hub; port++)
230 r8a66597_disable_port(r8a66597, port);
231
232 r8a66597_clock_disable(r8a66597);
233}
234
235static int get_parent_r8a66597_address(struct r8a66597 *r8a66597,
236 struct usb_device *udev)
237{
238 struct r8a66597_device *dev;
239
240 if (udev->parent && udev->parent->devnum != 1)
241 udev = udev->parent;
242
243 dev = dev_get_drvdata(&udev->dev);
244 if (dev)
245 return dev->address;
246 else
247 return 0;
248}
249
250static int is_child_device(char *devpath)
251{
252 return (devpath[2] ? 1 : 0);
253}
254
255static int is_hub_limit(char *devpath)
256{
257 return ((strlen(devpath) >= 4) ? 1 : 0);
258}
259
260static void get_port_number(struct r8a66597 *r8a66597,
261 char *devpath, u16 *root_port, u16 *hub_port)
262{
263 if (root_port) {
264 *root_port = (devpath[0] & 0x0F) - 1;
265 if (*root_port >= r8a66597->max_root_hub)
266 printk(KERN_ERR "r8a66597: Illegal root port number.\n");
267 }
268 if (hub_port)
269 *hub_port = devpath[2] & 0x0F;
270}
271
272static u16 get_r8a66597_usb_speed(enum usb_device_speed speed)
273{
274 u16 usbspd = 0;
275
276 switch (speed) {
277 case USB_SPEED_LOW:
278 usbspd = LSMODE;
279 break;
280 case USB_SPEED_FULL:
281 usbspd = FSMODE;
282 break;
283 case USB_SPEED_HIGH:
284 usbspd = HSMODE;
285 break;
286 default:
287 printk(KERN_ERR "r8a66597: unknown speed\n");
288 break;
289 }
290
291 return usbspd;
292}
293
294static void set_child_connect_map(struct r8a66597 *r8a66597, int address)
295{
296 int idx;
297
298 idx = address / 32;
299 r8a66597->child_connect_map[idx] |= 1 << (address % 32);
300}
301
302static void put_child_connect_map(struct r8a66597 *r8a66597, int address)
303{
304 int idx;
305
306 idx = address / 32;
307 r8a66597->child_connect_map[idx] &= ~(1 << (address % 32));
308}
309
310static void set_pipe_reg_addr(struct r8a66597_pipe *pipe, u8 dma_ch)
311{
312 u16 pipenum = pipe->info.pipenum;
313 const unsigned long fifoaddr[] = {D0FIFO, D1FIFO, CFIFO};
314 const unsigned long fifosel[] = {D0FIFOSEL, D1FIFOSEL, CFIFOSEL};
315 const unsigned long fifoctr[] = {D0FIFOCTR, D1FIFOCTR, CFIFOCTR};
316
317 if (dma_ch > R8A66597_PIPE_NO_DMA) /* dma fifo not use? */
318 dma_ch = R8A66597_PIPE_NO_DMA;
319
320 pipe->fifoaddr = fifoaddr[dma_ch];
321 pipe->fifosel = fifosel[dma_ch];
322 pipe->fifoctr = fifoctr[dma_ch];
323
324 if (pipenum == 0)
325 pipe->pipectr = DCPCTR;
326 else
327 pipe->pipectr = get_pipectr_addr(pipenum);
328
329 if (check_bulk_or_isoc(pipenum)) {
330 pipe->pipetre = get_pipetre_addr(pipenum);
331 pipe->pipetrn = get_pipetrn_addr(pipenum);
332 } else {
333 pipe->pipetre = 0;
334 pipe->pipetrn = 0;
335 }
336}
337
338static struct r8a66597_device *
339get_urb_to_r8a66597_dev(struct r8a66597 *r8a66597, struct urb *urb)
340{
341 if (usb_pipedevice(urb->pipe) == 0)
342 return &r8a66597->device0;
343
344 return dev_get_drvdata(&urb->dev->dev);
345}
346
347static int make_r8a66597_device(struct r8a66597 *r8a66597,
348 struct urb *urb, u8 addr)
349{
350 struct r8a66597_device *dev;
351 int usb_address = urb->setup_packet[2]; /* urb->pipe is address 0 */
352
353 dev = kzalloc(sizeof(struct r8a66597_device), GFP_ATOMIC);
354 if (dev == NULL)
355 return -ENOMEM;
356
357 dev_set_drvdata(&urb->dev->dev, dev);
358 dev->udev = urb->dev;
359 dev->address = addr;
360 dev->usb_address = usb_address;
361 dev->state = USB_STATE_ADDRESS;
362 dev->ep_in_toggle = 0;
363 dev->ep_out_toggle = 0;
364 INIT_LIST_HEAD(&dev->device_list);
365 list_add_tail(&dev->device_list, &r8a66597->child_device);
366
367 get_port_number(r8a66597, urb->dev->devpath,
368 &dev->root_port, &dev->hub_port);
369 if (!is_child_device(urb->dev->devpath))
370 r8a66597->root_hub[dev->root_port].dev = dev;
371
372 set_devadd_reg(r8a66597, dev->address,
373 get_r8a66597_usb_speed(urb->dev->speed),
374 get_parent_r8a66597_address(r8a66597, urb->dev),
375 dev->hub_port, dev->root_port);
376
377 return 0;
378}
379
380/* this function must be called with interrupt disabled */
381static u8 alloc_usb_address(struct r8a66597 *r8a66597, struct urb *urb)
382{
383 u8 addr; /* R8A66597's address */
384 struct r8a66597_device *dev;
385
386 if (is_hub_limit(urb->dev->devpath)) {
387 dev_err(&urb->dev->dev, "External hub limit reached.\n");
388 return 0;
389 }
390
391 dev = get_urb_to_r8a66597_dev(r8a66597, urb);
392 if (dev && dev->state >= USB_STATE_ADDRESS)
393 return dev->address;
394
395 for (addr = 1; addr <= R8A66597_MAX_DEVICE; addr++) {
396 if (r8a66597->address_map & (1 << addr))
397 continue;
398
399 dev_dbg(&urb->dev->dev, "alloc_address: r8a66597_addr=%d\n", addr);
400 r8a66597->address_map |= 1 << addr;
401
402 if (make_r8a66597_device(r8a66597, urb, addr) < 0)
403 return 0;
404
405 return addr;
406 }
407
408 dev_err(&urb->dev->dev,
409 "cannot communicate with a USB device more than 10.(%x)\n",
410 r8a66597->address_map);
411
412 return 0;
413}
414
415/* this function must be called with interrupt disabled */
416static void free_usb_address(struct r8a66597 *r8a66597,
417 struct r8a66597_device *dev, int reset)
418{
419 int port;
420
421 if (!dev)
422 return;
423
424 dev_dbg(&dev->udev->dev, "free_addr: addr=%d\n", dev->address);
425
426 dev->state = USB_STATE_DEFAULT;
427 r8a66597->address_map &= ~(1 << dev->address);
428 dev->address = 0;
429 /*
430 * Only when resetting USB, it is necessary to erase drvdata. When
431 * a usb device with usb hub is disconnect, "dev->udev" is already
432 * freed on usb_desconnect(). So we cannot access the data.
433 */
434 if (reset)
435 dev_set_drvdata(&dev->udev->dev, NULL);
436 list_del(&dev->device_list);
437 kfree(dev);
438
439 for (port = 0; port < r8a66597->max_root_hub; port++) {
440 if (r8a66597->root_hub[port].dev == dev) {
441 r8a66597->root_hub[port].dev = NULL;
442 break;
443 }
444 }
445}
446
447static void r8a66597_reg_wait(struct r8a66597 *r8a66597, unsigned long reg,
448 u16 mask, u16 loop)
449{
450 u16 tmp;
451 int i = 0;
452
453 do {
454 tmp = r8a66597_read(r8a66597, reg);
455 if (i++ > 1000000) {
456 printk(KERN_ERR "r8a66597: register%lx, loop %x "
457 "is timeout\n", reg, loop);
458 break;
459 }
460 ndelay(1);
461 } while ((tmp & mask) != loop);
462}
463
464/* this function must be called with interrupt disabled */
465static void pipe_start(struct r8a66597 *r8a66597, struct r8a66597_pipe *pipe)
466{
467 u16 tmp;
468
469 tmp = r8a66597_read(r8a66597, pipe->pipectr) & PID;
470 if ((pipe->info.pipenum != 0) & ((tmp & PID_STALL) != 0)) /* stall? */
471 r8a66597_mdfy(r8a66597, PID_NAK, PID, pipe->pipectr);
472 r8a66597_mdfy(r8a66597, PID_BUF, PID, pipe->pipectr);
473}
474
475/* this function must be called with interrupt disabled */
476static void pipe_stop(struct r8a66597 *r8a66597, struct r8a66597_pipe *pipe)
477{
478 u16 tmp;
479
480 tmp = r8a66597_read(r8a66597, pipe->pipectr) & PID;
481 if ((tmp & PID_STALL11) != PID_STALL11) /* force stall? */
482 r8a66597_mdfy(r8a66597, PID_STALL, PID, pipe->pipectr);
483 r8a66597_mdfy(r8a66597, PID_NAK, PID, pipe->pipectr);
484 r8a66597_reg_wait(r8a66597, pipe->pipectr, PBUSY, 0);
485}
486
487/* this function must be called with interrupt disabled */
488static void clear_all_buffer(struct r8a66597 *r8a66597,
489 struct r8a66597_pipe *pipe)
490{
491 u16 tmp;
492
493 if (!pipe || pipe->info.pipenum == 0)
494 return;
495
496 pipe_stop(r8a66597, pipe);
497 r8a66597_bset(r8a66597, ACLRM, pipe->pipectr);
498 tmp = r8a66597_read(r8a66597, pipe->pipectr);
499 tmp = r8a66597_read(r8a66597, pipe->pipectr);
500 tmp = r8a66597_read(r8a66597, pipe->pipectr);
501 r8a66597_bclr(r8a66597, ACLRM, pipe->pipectr);
502}
503
504/* this function must be called with interrupt disabled */
505static void r8a66597_pipe_toggle(struct r8a66597 *r8a66597,
506 struct r8a66597_pipe *pipe, int toggle)
507{
508 if (toggle)
509 r8a66597_bset(r8a66597, SQSET, pipe->pipectr);
510 else
511 r8a66597_bset(r8a66597, SQCLR, pipe->pipectr);
512}
513
514static inline unsigned short mbw_value(struct r8a66597 *r8a66597)
515{
516 if (r8a66597->pdata->on_chip)
517 return MBW_32;
518 else
519 return MBW_16;
520}
521
522/* this function must be called with interrupt disabled */
523static inline void cfifo_change(struct r8a66597 *r8a66597, u16 pipenum)
524{
525 unsigned short mbw = mbw_value(r8a66597);
526
527 r8a66597_mdfy(r8a66597, mbw | pipenum, mbw | CURPIPE, CFIFOSEL);
528 r8a66597_reg_wait(r8a66597, CFIFOSEL, CURPIPE, pipenum);
529}
530
531/* this function must be called with interrupt disabled */
532static inline void fifo_change_from_pipe(struct r8a66597 *r8a66597,
533 struct r8a66597_pipe *pipe)
534{
535 unsigned short mbw = mbw_value(r8a66597);
536
537 cfifo_change(r8a66597, 0);
538 r8a66597_mdfy(r8a66597, mbw | 0, mbw | CURPIPE, D0FIFOSEL);
539 r8a66597_mdfy(r8a66597, mbw | 0, mbw | CURPIPE, D1FIFOSEL);
540
541 r8a66597_mdfy(r8a66597, mbw | pipe->info.pipenum, mbw | CURPIPE,
542 pipe->fifosel);
543 r8a66597_reg_wait(r8a66597, pipe->fifosel, CURPIPE, pipe->info.pipenum);
544}
545
546static u16 r8a66597_get_pipenum(struct urb *urb, struct usb_host_endpoint *hep)
547{
548 struct r8a66597_pipe *pipe = hep->hcpriv;
549
550 if (usb_pipeendpoint(urb->pipe) == 0)
551 return 0;
552 else
553 return pipe->info.pipenum;
554}
555
556static u16 get_urb_to_r8a66597_addr(struct r8a66597 *r8a66597, struct urb *urb)
557{
558 struct r8a66597_device *dev = get_urb_to_r8a66597_dev(r8a66597, urb);
559
560 return (usb_pipedevice(urb->pipe) == 0) ? 0 : dev->address;
561}
562
563static unsigned short *get_toggle_pointer(struct r8a66597_device *dev,
564 int urb_pipe)
565{
566 if (!dev)
567 return NULL;
568
569 return usb_pipein(urb_pipe) ? &dev->ep_in_toggle : &dev->ep_out_toggle;
570}
571
572/* this function must be called with interrupt disabled */
573static void pipe_toggle_set(struct r8a66597 *r8a66597,
574 struct r8a66597_pipe *pipe,
575 struct urb *urb, int set)
576{
577 struct r8a66597_device *dev = get_urb_to_r8a66597_dev(r8a66597, urb);
578 unsigned char endpoint = usb_pipeendpoint(urb->pipe);
579 unsigned short *toggle = get_toggle_pointer(dev, urb->pipe);
580
581 if (!toggle)
582 return;
583
584 if (set)
585 *toggle |= 1 << endpoint;
586 else
587 *toggle &= ~(1 << endpoint);
588}
589
590/* this function must be called with interrupt disabled */
591static void pipe_toggle_save(struct r8a66597 *r8a66597,
592 struct r8a66597_pipe *pipe,
593 struct urb *urb)
594{
595 if (r8a66597_read(r8a66597, pipe->pipectr) & SQMON)
596 pipe_toggle_set(r8a66597, pipe, urb, 1);
597 else
598 pipe_toggle_set(r8a66597, pipe, urb, 0);
599}
600
601/* this function must be called with interrupt disabled */
602static void pipe_toggle_restore(struct r8a66597 *r8a66597,
603 struct r8a66597_pipe *pipe,
604 struct urb *urb)
605{
606 struct r8a66597_device *dev = get_urb_to_r8a66597_dev(r8a66597, urb);
607 unsigned char endpoint = usb_pipeendpoint(urb->pipe);
608 unsigned short *toggle = get_toggle_pointer(dev, urb->pipe);
609
610 if (!toggle)
611 return;
612
613 r8a66597_pipe_toggle(r8a66597, pipe, *toggle & (1 << endpoint));
614}
615
616/* this function must be called with interrupt disabled */
617static void pipe_buffer_setting(struct r8a66597 *r8a66597,
618 struct r8a66597_pipe_info *info)
619{
620 u16 val = 0;
621
622 if (info->pipenum == 0)
623 return;
624
625 r8a66597_bset(r8a66597, ACLRM, get_pipectr_addr(info->pipenum));
626 r8a66597_bclr(r8a66597, ACLRM, get_pipectr_addr(info->pipenum));
627 r8a66597_write(r8a66597, info->pipenum, PIPESEL);
628 if (!info->dir_in)
629 val |= R8A66597_DIR;
630 if (info->type == R8A66597_BULK && info->dir_in)
631 val |= R8A66597_DBLB | R8A66597_SHTNAK;
632 val |= info->type | info->epnum;
633 r8a66597_write(r8a66597, val, PIPECFG);
634
635 r8a66597_write(r8a66597, (info->buf_bsize << 10) | (info->bufnum),
636 PIPEBUF);
637 r8a66597_write(r8a66597, make_devsel(info->address) | info->maxpacket,
638 PIPEMAXP);
639 r8a66597_write(r8a66597, info->interval, PIPEPERI);
640}
641
642/* this function must be called with interrupt disabled */
643static void pipe_setting(struct r8a66597 *r8a66597, struct r8a66597_td *td)
644{
645 struct r8a66597_pipe_info *info;
646 struct urb *urb = td->urb;
647
648 if (td->pipenum > 0) {
649 info = &td->pipe->info;
650 cfifo_change(r8a66597, 0);
651 pipe_buffer_setting(r8a66597, info);
652
653 if (!usb_gettoggle(urb->dev, usb_pipeendpoint(urb->pipe),
654 usb_pipeout(urb->pipe)) &&
655 !usb_pipecontrol(urb->pipe)) {
656 r8a66597_pipe_toggle(r8a66597, td->pipe, 0);
657 pipe_toggle_set(r8a66597, td->pipe, urb, 0);
658 clear_all_buffer(r8a66597, td->pipe);
659 usb_settoggle(urb->dev, usb_pipeendpoint(urb->pipe),
660 usb_pipeout(urb->pipe), 1);
661 }
662 pipe_toggle_restore(r8a66597, td->pipe, urb);
663 }
664}
665
666/* this function must be called with interrupt disabled */
667static u16 get_empty_pipenum(struct r8a66597 *r8a66597,
668 struct usb_endpoint_descriptor *ep)
669{
670 u16 array[R8A66597_MAX_NUM_PIPE], i = 0, min;
671
672 memset(array, 0, sizeof(array));
673 switch (usb_endpoint_type(ep)) {
674 case USB_ENDPOINT_XFER_BULK:
675 if (usb_endpoint_dir_in(ep))
676 array[i++] = 4;
677 else {
678 array[i++] = 3;
679 array[i++] = 5;
680 }
681 break;
682 case USB_ENDPOINT_XFER_INT:
683 if (usb_endpoint_dir_in(ep)) {
684 array[i++] = 6;
685 array[i++] = 7;
686 array[i++] = 8;
687 } else
688 array[i++] = 9;
689 break;
690 case USB_ENDPOINT_XFER_ISOC:
691 if (usb_endpoint_dir_in(ep))
692 array[i++] = 2;
693 else
694 array[i++] = 1;
695 break;
696 default:
697 printk(KERN_ERR "r8a66597: Illegal type\n");
698 return 0;
699 }
700
701 i = 1;
702 min = array[0];
703 while (array[i] != 0) {
704 if (r8a66597->pipe_cnt[min] > r8a66597->pipe_cnt[array[i]])
705 min = array[i];
706 i++;
707 }
708
709 return min;
710}
711
712static u16 get_r8a66597_type(__u8 type)
713{
714 u16 r8a66597_type;
715
716 switch (type) {
717 case USB_ENDPOINT_XFER_BULK:
718 r8a66597_type = R8A66597_BULK;
719 break;
720 case USB_ENDPOINT_XFER_INT:
721 r8a66597_type = R8A66597_INT;
722 break;
723 case USB_ENDPOINT_XFER_ISOC:
724 r8a66597_type = R8A66597_ISO;
725 break;
726 default:
727 printk(KERN_ERR "r8a66597: Illegal type\n");
728 r8a66597_type = 0x0000;
729 break;
730 }
731
732 return r8a66597_type;
733}
734
735static u16 get_bufnum(u16 pipenum)
736{
737 u16 bufnum = 0;
738
739 if (pipenum == 0)
740 bufnum = 0;
741 else if (check_bulk_or_isoc(pipenum))
742 bufnum = 8 + (pipenum - 1) * R8A66597_BUF_BSIZE*2;
743 else if (check_interrupt(pipenum))
744 bufnum = 4 + (pipenum - 6);
745 else
746 printk(KERN_ERR "r8a66597: Illegal pipenum (%d)\n", pipenum);
747
748 return bufnum;
749}
750
751static u16 get_buf_bsize(u16 pipenum)
752{
753 u16 buf_bsize = 0;
754
755 if (pipenum == 0)
756 buf_bsize = 3;
757 else if (check_bulk_or_isoc(pipenum))
758 buf_bsize = R8A66597_BUF_BSIZE - 1;
759 else if (check_interrupt(pipenum))
760 buf_bsize = 0;
761 else
762 printk(KERN_ERR "r8a66597: Illegal pipenum (%d)\n", pipenum);
763
764 return buf_bsize;
765}
766
767/* this function must be called with interrupt disabled */
768static void enable_r8a66597_pipe_dma(struct r8a66597 *r8a66597,
769 struct r8a66597_device *dev,
770 struct r8a66597_pipe *pipe,
771 struct urb *urb)
772{
773 int i;
774 struct r8a66597_pipe_info *info = &pipe->info;
775 unsigned short mbw = mbw_value(r8a66597);
776
777 /* pipe dma is only for external controlles */
778 if (r8a66597->pdata->on_chip)
779 return;
780
781 if ((pipe->info.pipenum != 0) && (info->type != R8A66597_INT)) {
782 for (i = 0; i < R8A66597_MAX_DMA_CHANNEL; i++) {
783 if ((r8a66597->dma_map & (1 << i)) != 0)
784 continue;
785
786 dev_info(&dev->udev->dev,
787 "address %d, EndpointAddress 0x%02x use "
788 "DMA FIFO\n", usb_pipedevice(urb->pipe),
789 info->dir_in ?
790 USB_ENDPOINT_DIR_MASK + info->epnum
791 : info->epnum);
792
793 r8a66597->dma_map |= 1 << i;
794 dev->dma_map |= 1 << i;
795 set_pipe_reg_addr(pipe, i);
796
797 cfifo_change(r8a66597, 0);
798 r8a66597_mdfy(r8a66597, mbw | pipe->info.pipenum,
799 mbw | CURPIPE, pipe->fifosel);
800
801 r8a66597_reg_wait(r8a66597, pipe->fifosel, CURPIPE,
802 pipe->info.pipenum);
803 r8a66597_bset(r8a66597, BCLR, pipe->fifoctr);
804 break;
805 }
806 }
807}
808
809/* this function must be called with interrupt disabled */
810static void enable_r8a66597_pipe(struct r8a66597 *r8a66597, struct urb *urb,
811 struct usb_host_endpoint *hep,
812 struct r8a66597_pipe_info *info)
813{
814 struct r8a66597_device *dev = get_urb_to_r8a66597_dev(r8a66597, urb);
815 struct r8a66597_pipe *pipe = hep->hcpriv;
816
817 dev_dbg(&dev->udev->dev, "enable_pipe:\n");
818
819 pipe->info = *info;
820 set_pipe_reg_addr(pipe, R8A66597_PIPE_NO_DMA);
821 r8a66597->pipe_cnt[pipe->info.pipenum]++;
822 dev->pipe_cnt[pipe->info.pipenum]++;
823
824 enable_r8a66597_pipe_dma(r8a66597, dev, pipe, urb);
825}
826
827static void r8a66597_urb_done(struct r8a66597 *r8a66597, struct urb *urb,
828 int status)
829__releases(r8a66597->lock)
830__acquires(r8a66597->lock)
831{
832 if (usb_pipein(urb->pipe) && usb_pipetype(urb->pipe) != PIPE_CONTROL) {
833 void *ptr;
834
835 for (ptr = urb->transfer_buffer;
836 ptr < urb->transfer_buffer + urb->transfer_buffer_length;
837 ptr += PAGE_SIZE)
838 flush_dcache_page(virt_to_page(ptr));
839 }
840
841 usb_hcd_unlink_urb_from_ep(r8a66597_to_hcd(r8a66597), urb);
842 spin_unlock(&r8a66597->lock);
843 usb_hcd_giveback_urb(r8a66597_to_hcd(r8a66597), urb, status);
844 spin_lock(&r8a66597->lock);
845}
846
847/* this function must be called with interrupt disabled */
848static void force_dequeue(struct r8a66597 *r8a66597, u16 pipenum, u16 address)
849{
850 struct r8a66597_td *td, *next;
851 struct urb *urb;
852 struct list_head *list = &r8a66597->pipe_queue[pipenum];
853
854 if (list_empty(list))
855 return;
856
857 list_for_each_entry_safe(td, next, list, queue) {
858 if (td->address != address)
859 continue;
860
861 urb = td->urb;
862 list_del(&td->queue);
863 kfree(td);
864
865 if (urb)
866 r8a66597_urb_done(r8a66597, urb, -ENODEV);
867
868 break;
869 }
870}
871
872/* this function must be called with interrupt disabled */
873static void disable_r8a66597_pipe_all(struct r8a66597 *r8a66597,
874 struct r8a66597_device *dev)
875{
876 int check_ep0 = 0;
877 u16 pipenum;
878
879 if (!dev)
880 return;
881
882 for (pipenum = 1; pipenum < R8A66597_MAX_NUM_PIPE; pipenum++) {
883 if (!dev->pipe_cnt[pipenum])
884 continue;
885
886 if (!check_ep0) {
887 check_ep0 = 1;
888 force_dequeue(r8a66597, 0, dev->address);
889 }
890
891 r8a66597->pipe_cnt[pipenum] -= dev->pipe_cnt[pipenum];
892 dev->pipe_cnt[pipenum] = 0;
893 force_dequeue(r8a66597, pipenum, dev->address);
894 }
895
896 dev_dbg(&dev->udev->dev, "disable_pipe\n");
897
898 r8a66597->dma_map &= ~(dev->dma_map);
899 dev->dma_map = 0;
900}
901
902static u16 get_interval(struct urb *urb, __u8 interval)
903{
904 u16 time = 1;
905 int i;
906
907 if (urb->dev->speed == USB_SPEED_HIGH) {
908 if (interval > IITV)
909 time = IITV;
910 else
911 time = interval ? interval - 1 : 0;
912 } else {
913 if (interval > 128) {
914 time = IITV;
915 } else {
916 /* calculate the nearest value for PIPEPERI */
917 for (i = 0; i < 7; i++) {
918 if ((1 << i) < interval &&
919 (1 << (i + 1) > interval))
920 time = 1 << i;
921 }
922 }
923 }
924
925 return time;
926}
927
928static unsigned long get_timer_interval(struct urb *urb, __u8 interval)
929{
930 __u8 i;
931 unsigned long time = 1;
932
933 if (usb_pipeisoc(urb->pipe))
934 return 0;
935
936 if (get_r8a66597_usb_speed(urb->dev->speed) == HSMODE) {
937 for (i = 0; i < (interval - 1); i++)
938 time *= 2;
939 time = time * 125 / 1000; /* uSOF -> msec */
940 } else {
941 time = interval;
942 }
943
944 return time;
945}
946
947/* this function must be called with interrupt disabled */
948static void init_pipe_info(struct r8a66597 *r8a66597, struct urb *urb,
949 struct usb_host_endpoint *hep,
950 struct usb_endpoint_descriptor *ep)
951{
952 struct r8a66597_pipe_info info;
953
954 info.pipenum = get_empty_pipenum(r8a66597, ep);
955 info.address = get_urb_to_r8a66597_addr(r8a66597, urb);
956 info.epnum = usb_endpoint_num(ep);
957 info.maxpacket = usb_endpoint_maxp(ep);
958 info.type = get_r8a66597_type(usb_endpoint_type(ep));
959 info.bufnum = get_bufnum(info.pipenum);
960 info.buf_bsize = get_buf_bsize(info.pipenum);
961 if (info.type == R8A66597_BULK) {
962 info.interval = 0;
963 info.timer_interval = 0;
964 } else {
965 info.interval = get_interval(urb, ep->bInterval);
966 info.timer_interval = get_timer_interval(urb, ep->bInterval);
967 }
968 if (usb_endpoint_dir_in(ep))
969 info.dir_in = 1;
970 else
971 info.dir_in = 0;
972
973 enable_r8a66597_pipe(r8a66597, urb, hep, &info);
974}
975
976static void init_pipe_config(struct r8a66597 *r8a66597, struct urb *urb)
977{
978 struct r8a66597_device *dev;
979
980 dev = get_urb_to_r8a66597_dev(r8a66597, urb);
981 dev->state = USB_STATE_CONFIGURED;
982}
983
984static void pipe_irq_enable(struct r8a66597 *r8a66597, struct urb *urb,
985 u16 pipenum)
986{
987 if (pipenum == 0 && usb_pipeout(urb->pipe))
988 enable_irq_empty(r8a66597, pipenum);
989 else
990 enable_irq_ready(r8a66597, pipenum);
991
992 if (!usb_pipeisoc(urb->pipe))
993 enable_irq_nrdy(r8a66597, pipenum);
994}
995
996static void pipe_irq_disable(struct r8a66597 *r8a66597, u16 pipenum)
997{
998 disable_irq_ready(r8a66597, pipenum);
999 disable_irq_nrdy(r8a66597, pipenum);
1000}
1001
1002static void r8a66597_root_hub_start_polling(struct r8a66597 *r8a66597)
1003{
1004 mod_timer(&r8a66597->rh_timer,
1005 jiffies + msecs_to_jiffies(R8A66597_RH_POLL_TIME));
1006}
1007
1008static void start_root_hub_sampling(struct r8a66597 *r8a66597, int port,
1009 int connect)
1010{
1011 struct r8a66597_root_hub *rh = &r8a66597->root_hub[port];
1012
1013 rh->old_syssts = r8a66597_read(r8a66597, get_syssts_reg(port)) & LNST;
1014 rh->scount = R8A66597_MAX_SAMPLING;
1015 if (connect)
1016 rh->port |= USB_PORT_STAT_CONNECTION;
1017 else
1018 rh->port &= ~USB_PORT_STAT_CONNECTION;
1019 rh->port |= USB_PORT_STAT_C_CONNECTION << 16;
1020
1021 r8a66597_root_hub_start_polling(r8a66597);
1022}
1023
1024/* this function must be called with interrupt disabled */
1025static void r8a66597_check_syssts(struct r8a66597 *r8a66597, int port,
1026 u16 syssts)
1027__releases(r8a66597->lock)
1028__acquires(r8a66597->lock)
1029{
1030 if (syssts == SE0) {
1031 r8a66597_write(r8a66597, ~ATTCH, get_intsts_reg(port));
1032 r8a66597_bset(r8a66597, ATTCHE, get_intenb_reg(port));
1033 } else {
1034 if (syssts == FS_JSTS)
1035 r8a66597_bset(r8a66597, HSE, get_syscfg_reg(port));
1036 else if (syssts == LS_JSTS)
1037 r8a66597_bclr(r8a66597, HSE, get_syscfg_reg(port));
1038
1039 r8a66597_write(r8a66597, ~DTCH, get_intsts_reg(port));
1040 r8a66597_bset(r8a66597, DTCHE, get_intenb_reg(port));
1041
1042 if (r8a66597->bus_suspended)
1043 usb_hcd_resume_root_hub(r8a66597_to_hcd(r8a66597));
1044 }
1045
1046 spin_unlock(&r8a66597->lock);
1047 usb_hcd_poll_rh_status(r8a66597_to_hcd(r8a66597));
1048 spin_lock(&r8a66597->lock);
1049}
1050
1051/* this function must be called with interrupt disabled */
1052static void r8a66597_usb_connect(struct r8a66597 *r8a66597, int port)
1053{
1054 u16 speed = get_rh_usb_speed(r8a66597, port);
1055 struct r8a66597_root_hub *rh = &r8a66597->root_hub[port];
1056
1057 rh->port &= ~(USB_PORT_STAT_HIGH_SPEED | USB_PORT_STAT_LOW_SPEED);
1058 if (speed == HSMODE)
1059 rh->port |= USB_PORT_STAT_HIGH_SPEED;
1060 else if (speed == LSMODE)
1061 rh->port |= USB_PORT_STAT_LOW_SPEED;
1062
1063 rh->port &= ~USB_PORT_STAT_RESET;
1064 rh->port |= USB_PORT_STAT_ENABLE;
1065}
1066
1067/* this function must be called with interrupt disabled */
1068static void r8a66597_usb_disconnect(struct r8a66597 *r8a66597, int port)
1069{
1070 struct r8a66597_device *dev = r8a66597->root_hub[port].dev;
1071
1072 disable_r8a66597_pipe_all(r8a66597, dev);
1073 free_usb_address(r8a66597, dev, 0);
1074
1075 start_root_hub_sampling(r8a66597, port, 0);
1076}
1077
1078/* this function must be called with interrupt disabled */
1079static void prepare_setup_packet(struct r8a66597 *r8a66597,
1080 struct r8a66597_td *td)
1081{
1082 int i;
1083 __le16 *p = (__le16 *)td->urb->setup_packet;
1084 unsigned long setup_addr = USBREQ;
1085
1086 r8a66597_write(r8a66597, make_devsel(td->address) | td->maxpacket,
1087 DCPMAXP);
1088 r8a66597_write(r8a66597, ~(SIGN | SACK), INTSTS1);
1089
1090 for (i = 0; i < 4; i++) {
1091 r8a66597_write(r8a66597, le16_to_cpu(p[i]), setup_addr);
1092 setup_addr += 2;
1093 }
1094 r8a66597_write(r8a66597, SUREQ, DCPCTR);
1095}
1096
1097/* this function must be called with interrupt disabled */
1098static void prepare_packet_read(struct r8a66597 *r8a66597,
1099 struct r8a66597_td *td)
1100{
1101 struct urb *urb = td->urb;
1102
1103 if (usb_pipecontrol(urb->pipe)) {
1104 r8a66597_bclr(r8a66597, R8A66597_DIR, DCPCFG);
1105 r8a66597_mdfy(r8a66597, 0, ISEL | CURPIPE, CFIFOSEL);
1106 r8a66597_reg_wait(r8a66597, CFIFOSEL, CURPIPE, 0);
1107 if (urb->actual_length == 0) {
1108 r8a66597_pipe_toggle(r8a66597, td->pipe, 1);
1109 r8a66597_write(r8a66597, BCLR, CFIFOCTR);
1110 }
1111 pipe_irq_disable(r8a66597, td->pipenum);
1112 pipe_start(r8a66597, td->pipe);
1113 pipe_irq_enable(r8a66597, urb, td->pipenum);
1114 } else {
1115 if (urb->actual_length == 0) {
1116 pipe_irq_disable(r8a66597, td->pipenum);
1117 pipe_setting(r8a66597, td);
1118 pipe_stop(r8a66597, td->pipe);
1119 r8a66597_write(r8a66597, ~(1 << td->pipenum), BRDYSTS);
1120
1121 if (td->pipe->pipetre) {
1122 r8a66597_write(r8a66597, TRCLR,
1123 td->pipe->pipetre);
1124 r8a66597_write(r8a66597,
1125 DIV_ROUND_UP
1126 (urb->transfer_buffer_length,
1127 td->maxpacket),
1128 td->pipe->pipetrn);
1129 r8a66597_bset(r8a66597, TRENB,
1130 td->pipe->pipetre);
1131 }
1132
1133 pipe_start(r8a66597, td->pipe);
1134 pipe_irq_enable(r8a66597, urb, td->pipenum);
1135 }
1136 }
1137}
1138
1139/* this function must be called with interrupt disabled */
1140static void prepare_packet_write(struct r8a66597 *r8a66597,
1141 struct r8a66597_td *td)
1142{
1143 u16 tmp;
1144 struct urb *urb = td->urb;
1145
1146 if (usb_pipecontrol(urb->pipe)) {
1147 pipe_stop(r8a66597, td->pipe);
1148 r8a66597_bset(r8a66597, R8A66597_DIR, DCPCFG);
1149 r8a66597_mdfy(r8a66597, ISEL, ISEL | CURPIPE, CFIFOSEL);
1150 r8a66597_reg_wait(r8a66597, CFIFOSEL, CURPIPE, 0);
1151 if (urb->actual_length == 0) {
1152 r8a66597_pipe_toggle(r8a66597, td->pipe, 1);
1153 r8a66597_write(r8a66597, BCLR, CFIFOCTR);
1154 }
1155 } else {
1156 if (urb->actual_length == 0)
1157 pipe_setting(r8a66597, td);
1158 if (td->pipe->pipetre)
1159 r8a66597_bclr(r8a66597, TRENB, td->pipe->pipetre);
1160 }
1161 r8a66597_write(r8a66597, ~(1 << td->pipenum), BRDYSTS);
1162
1163 fifo_change_from_pipe(r8a66597, td->pipe);
1164 tmp = r8a66597_read(r8a66597, td->pipe->fifoctr);
1165 if (unlikely((tmp & FRDY) == 0))
1166 pipe_irq_enable(r8a66597, urb, td->pipenum);
1167 else
1168 packet_write(r8a66597, td->pipenum);
1169 pipe_start(r8a66597, td->pipe);
1170}
1171
1172/* this function must be called with interrupt disabled */
1173static void prepare_status_packet(struct r8a66597 *r8a66597,
1174 struct r8a66597_td *td)
1175{
1176 struct urb *urb = td->urb;
1177
1178 r8a66597_pipe_toggle(r8a66597, td->pipe, 1);
1179 pipe_stop(r8a66597, td->pipe);
1180
1181 if (urb->setup_packet[0] & USB_ENDPOINT_DIR_MASK) {
1182 r8a66597_bset(r8a66597, R8A66597_DIR, DCPCFG);
1183 r8a66597_mdfy(r8a66597, ISEL, ISEL | CURPIPE, CFIFOSEL);
1184 r8a66597_reg_wait(r8a66597, CFIFOSEL, CURPIPE, 0);
1185 r8a66597_write(r8a66597, ~BEMP0, BEMPSTS);
1186 r8a66597_write(r8a66597, BCLR | BVAL, CFIFOCTR);
1187 enable_irq_empty(r8a66597, 0);
1188 } else {
1189 r8a66597_bclr(r8a66597, R8A66597_DIR, DCPCFG);
1190 r8a66597_mdfy(r8a66597, 0, ISEL | CURPIPE, CFIFOSEL);
1191 r8a66597_reg_wait(r8a66597, CFIFOSEL, CURPIPE, 0);
1192 r8a66597_write(r8a66597, BCLR, CFIFOCTR);
1193 enable_irq_ready(r8a66597, 0);
1194 }
1195 enable_irq_nrdy(r8a66597, 0);
1196 pipe_start(r8a66597, td->pipe);
1197}
1198
1199static int is_set_address(unsigned char *setup_packet)
1200{
1201 if (((setup_packet[0] & USB_TYPE_MASK) == USB_TYPE_STANDARD) &&
1202 setup_packet[1] == USB_REQ_SET_ADDRESS)
1203 return 1;
1204 else
1205 return 0;
1206}
1207
1208/* this function must be called with interrupt disabled */
1209static int start_transfer(struct r8a66597 *r8a66597, struct r8a66597_td *td)
1210{
1211 BUG_ON(!td);
1212
1213 switch (td->type) {
1214 case USB_PID_SETUP:
1215 if (is_set_address(td->urb->setup_packet)) {
1216 td->set_address = 1;
1217 td->urb->setup_packet[2] = alloc_usb_address(r8a66597,
1218 td->urb);
1219 if (td->urb->setup_packet[2] == 0)
1220 return -EPIPE;
1221 }
1222 prepare_setup_packet(r8a66597, td);
1223 break;
1224 case USB_PID_IN:
1225 prepare_packet_read(r8a66597, td);
1226 break;
1227 case USB_PID_OUT:
1228 prepare_packet_write(r8a66597, td);
1229 break;
1230 case USB_PID_ACK:
1231 prepare_status_packet(r8a66597, td);
1232 break;
1233 default:
1234 printk(KERN_ERR "r8a66597: invalid type.\n");
1235 break;
1236 }
1237
1238 return 0;
1239}
1240
1241static int check_transfer_finish(struct r8a66597_td *td, struct urb *urb)
1242{
1243 if (usb_pipeisoc(urb->pipe)) {
1244 if (urb->number_of_packets == td->iso_cnt)
1245 return 1;
1246 }
1247
1248 /* control or bulk or interrupt */
1249 if ((urb->transfer_buffer_length <= urb->actual_length) ||
1250 (td->short_packet) || (td->zero_packet))
1251 return 1;
1252
1253 return 0;
1254}
1255
1256/* this function must be called with interrupt disabled */
1257static void set_td_timer(struct r8a66597 *r8a66597, struct r8a66597_td *td)
1258{
1259 unsigned long time;
1260
1261 BUG_ON(!td);
1262
1263 if (!list_empty(&r8a66597->pipe_queue[td->pipenum]) &&
1264 !usb_pipecontrol(td->urb->pipe) && usb_pipein(td->urb->pipe)) {
1265 r8a66597->timeout_map |= 1 << td->pipenum;
1266 switch (usb_pipetype(td->urb->pipe)) {
1267 case PIPE_INTERRUPT:
1268 case PIPE_ISOCHRONOUS:
1269 time = 30;
1270 break;
1271 default:
1272 time = 300;
1273 break;
1274 }
1275
1276 mod_timer(&r8a66597->td_timer[td->pipenum],
1277 jiffies + msecs_to_jiffies(time));
1278 }
1279}
1280
1281/* this function must be called with interrupt disabled */
1282static void finish_request(struct r8a66597 *r8a66597, struct r8a66597_td *td,
1283 u16 pipenum, struct urb *urb, int status)
1284__releases(r8a66597->lock) __acquires(r8a66597->lock)
1285{
1286 int restart = 0;
1287 struct usb_hcd *hcd = r8a66597_to_hcd(r8a66597);
1288
1289 r8a66597->timeout_map &= ~(1 << pipenum);
1290
1291 if (likely(td)) {
1292 if (td->set_address && (status != 0 || urb->unlinked))
1293 r8a66597->address_map &= ~(1 << urb->setup_packet[2]);
1294
1295 pipe_toggle_save(r8a66597, td->pipe, urb);
1296 list_del(&td->queue);
1297 kfree(td);
1298 }
1299
1300 if (!list_empty(&r8a66597->pipe_queue[pipenum]))
1301 restart = 1;
1302
1303 if (likely(urb)) {
1304 if (usb_pipeisoc(urb->pipe))
1305 urb->start_frame = r8a66597_get_frame(hcd);
1306
1307 r8a66597_urb_done(r8a66597, urb, status);
1308 }
1309
1310 if (restart) {
1311 td = r8a66597_get_td(r8a66597, pipenum);
1312 if (unlikely(!td))
1313 return;
1314
1315 start_transfer(r8a66597, td);
1316 set_td_timer(r8a66597, td);
1317 }
1318}
1319
1320static void packet_read(struct r8a66597 *r8a66597, u16 pipenum)
1321{
1322 u16 tmp;
1323 int rcv_len, bufsize, urb_len, size;
1324 u16 *buf;
1325 struct r8a66597_td *td = r8a66597_get_td(r8a66597, pipenum);
1326 struct urb *urb;
1327 int finish = 0;
1328 int status = 0;
1329
1330 if (unlikely(!td))
1331 return;
1332 urb = td->urb;
1333
1334 fifo_change_from_pipe(r8a66597, td->pipe);
1335 tmp = r8a66597_read(r8a66597, td->pipe->fifoctr);
1336 if (unlikely((tmp & FRDY) == 0)) {
1337 pipe_stop(r8a66597, td->pipe);
1338 pipe_irq_disable(r8a66597, pipenum);
1339 printk(KERN_ERR "r8a66597: in fifo not ready (%d)\n", pipenum);
1340 finish_request(r8a66597, td, pipenum, td->urb, -EPIPE);
1341 return;
1342 }
1343
1344 /* prepare parameters */
1345 rcv_len = tmp & DTLN;
1346 if (usb_pipeisoc(urb->pipe)) {
1347 buf = (u16 *)(urb->transfer_buffer +
1348 urb->iso_frame_desc[td->iso_cnt].offset);
1349 urb_len = urb->iso_frame_desc[td->iso_cnt].length;
1350 } else {
1351 buf = (void *)urb->transfer_buffer + urb->actual_length;
1352 urb_len = urb->transfer_buffer_length - urb->actual_length;
1353 }
1354 bufsize = min(urb_len, (int) td->maxpacket);
1355 if (rcv_len <= bufsize) {
1356 size = rcv_len;
1357 } else {
1358 size = bufsize;
1359 status = -EOVERFLOW;
1360 finish = 1;
1361 }
1362
1363 /* update parameters */
1364 urb->actual_length += size;
1365 if (rcv_len == 0)
1366 td->zero_packet = 1;
1367 if (rcv_len < bufsize) {
1368 td->short_packet = 1;
1369 }
1370 if (usb_pipeisoc(urb->pipe)) {
1371 urb->iso_frame_desc[td->iso_cnt].actual_length = size;
1372 urb->iso_frame_desc[td->iso_cnt].status = status;
1373 td->iso_cnt++;
1374 finish = 0;
1375 }
1376
1377 /* check transfer finish */
1378 if (finish || check_transfer_finish(td, urb)) {
1379 pipe_stop(r8a66597, td->pipe);
1380 pipe_irq_disable(r8a66597, pipenum);
1381 finish = 1;
1382 }
1383
1384 /* read fifo */
1385 if (urb->transfer_buffer) {
1386 if (size == 0)
1387 r8a66597_write(r8a66597, BCLR, td->pipe->fifoctr);
1388 else
1389 r8a66597_read_fifo(r8a66597, td->pipe->fifoaddr,
1390 buf, size);
1391 }
1392
1393 if (finish && pipenum != 0)
1394 finish_request(r8a66597, td, pipenum, urb, status);
1395}
1396
1397static void packet_write(struct r8a66597 *r8a66597, u16 pipenum)
1398{
1399 u16 tmp;
1400 int bufsize, size;
1401 u16 *buf;
1402 struct r8a66597_td *td = r8a66597_get_td(r8a66597, pipenum);
1403 struct urb *urb;
1404
1405 if (unlikely(!td))
1406 return;
1407 urb = td->urb;
1408
1409 fifo_change_from_pipe(r8a66597, td->pipe);
1410 tmp = r8a66597_read(r8a66597, td->pipe->fifoctr);
1411 if (unlikely((tmp & FRDY) == 0)) {
1412 pipe_stop(r8a66597, td->pipe);
1413 pipe_irq_disable(r8a66597, pipenum);
1414 printk(KERN_ERR "r8a66597: out fifo not ready (%d)\n", pipenum);
1415 finish_request(r8a66597, td, pipenum, urb, -EPIPE);
1416 return;
1417 }
1418
1419 /* prepare parameters */
1420 bufsize = td->maxpacket;
1421 if (usb_pipeisoc(urb->pipe)) {
1422 buf = (u16 *)(urb->transfer_buffer +
1423 urb->iso_frame_desc[td->iso_cnt].offset);
1424 size = min(bufsize,
1425 (int)urb->iso_frame_desc[td->iso_cnt].length);
1426 } else {
1427 buf = (u16 *)(urb->transfer_buffer + urb->actual_length);
1428 size = min_t(u32, bufsize,
1429 urb->transfer_buffer_length - urb->actual_length);
1430 }
1431
1432 /* write fifo */
1433 if (pipenum > 0)
1434 r8a66597_write(r8a66597, ~(1 << pipenum), BEMPSTS);
1435 if (urb->transfer_buffer) {
1436 r8a66597_write_fifo(r8a66597, td->pipe, buf, size);
1437 if (!usb_pipebulk(urb->pipe) || td->maxpacket != size)
1438 r8a66597_write(r8a66597, BVAL, td->pipe->fifoctr);
1439 }
1440
1441 /* update parameters */
1442 urb->actual_length += size;
1443 if (usb_pipeisoc(urb->pipe)) {
1444 urb->iso_frame_desc[td->iso_cnt].actual_length = size;
1445 urb->iso_frame_desc[td->iso_cnt].status = 0;
1446 td->iso_cnt++;
1447 }
1448
1449 /* check transfer finish */
1450 if (check_transfer_finish(td, urb)) {
1451 disable_irq_ready(r8a66597, pipenum);
1452 enable_irq_empty(r8a66597, pipenum);
1453 if (!usb_pipeisoc(urb->pipe))
1454 enable_irq_nrdy(r8a66597, pipenum);
1455 } else
1456 pipe_irq_enable(r8a66597, urb, pipenum);
1457}
1458
1459
1460static void check_next_phase(struct r8a66597 *r8a66597, int status)
1461{
1462 struct r8a66597_td *td = r8a66597_get_td(r8a66597, 0);
1463 struct urb *urb;
1464 u8 finish = 0;
1465
1466 if (unlikely(!td))
1467 return;
1468 urb = td->urb;
1469
1470 switch (td->type) {
1471 case USB_PID_IN:
1472 case USB_PID_OUT:
1473 if (check_transfer_finish(td, urb))
1474 td->type = USB_PID_ACK;
1475 break;
1476 case USB_PID_SETUP:
1477 if (urb->transfer_buffer_length == urb->actual_length)
1478 td->type = USB_PID_ACK;
1479 else if (usb_pipeout(urb->pipe))
1480 td->type = USB_PID_OUT;
1481 else
1482 td->type = USB_PID_IN;
1483 break;
1484 case USB_PID_ACK:
1485 finish = 1;
1486 break;
1487 }
1488
1489 if (finish || status != 0 || urb->unlinked)
1490 finish_request(r8a66597, td, 0, urb, status);
1491 else
1492 start_transfer(r8a66597, td);
1493}
1494
1495static int get_urb_error(struct r8a66597 *r8a66597, u16 pipenum)
1496{
1497 struct r8a66597_td *td = r8a66597_get_td(r8a66597, pipenum);
1498
1499 if (td) {
1500 u16 pid = r8a66597_read(r8a66597, td->pipe->pipectr) & PID;
1501
1502 if (pid == PID_NAK)
1503 return -ECONNRESET;
1504 else
1505 return -EPIPE;
1506 }
1507 return 0;
1508}
1509
1510static void irq_pipe_ready(struct r8a66597 *r8a66597)
1511{
1512 u16 check;
1513 u16 pipenum;
1514 u16 mask;
1515 struct r8a66597_td *td;
1516
1517 mask = r8a66597_read(r8a66597, BRDYSTS)
1518 & r8a66597_read(r8a66597, BRDYENB);
1519 r8a66597_write(r8a66597, ~mask, BRDYSTS);
1520 if (mask & BRDY0) {
1521 td = r8a66597_get_td(r8a66597, 0);
1522 if (td && td->type == USB_PID_IN)
1523 packet_read(r8a66597, 0);
1524 else
1525 pipe_irq_disable(r8a66597, 0);
1526 check_next_phase(r8a66597, 0);
1527 }
1528
1529 for (pipenum = 1; pipenum < R8A66597_MAX_NUM_PIPE; pipenum++) {
1530 check = 1 << pipenum;
1531 if (mask & check) {
1532 td = r8a66597_get_td(r8a66597, pipenum);
1533 if (unlikely(!td))
1534 continue;
1535
1536 if (td->type == USB_PID_IN)
1537 packet_read(r8a66597, pipenum);
1538 else if (td->type == USB_PID_OUT)
1539 packet_write(r8a66597, pipenum);
1540 }
1541 }
1542}
1543
1544static void irq_pipe_empty(struct r8a66597 *r8a66597)
1545{
1546 u16 tmp;
1547 u16 check;
1548 u16 pipenum;
1549 u16 mask;
1550 struct r8a66597_td *td;
1551
1552 mask = r8a66597_read(r8a66597, BEMPSTS)
1553 & r8a66597_read(r8a66597, BEMPENB);
1554 r8a66597_write(r8a66597, ~mask, BEMPSTS);
1555 if (mask & BEMP0) {
1556 cfifo_change(r8a66597, 0);
1557 td = r8a66597_get_td(r8a66597, 0);
1558 if (td && td->type != USB_PID_OUT)
1559 disable_irq_empty(r8a66597, 0);
1560 check_next_phase(r8a66597, 0);
1561 }
1562
1563 for (pipenum = 1; pipenum < R8A66597_MAX_NUM_PIPE; pipenum++) {
1564 check = 1 << pipenum;
1565 if (mask & check) {
1566 struct r8a66597_td *td;
1567 td = r8a66597_get_td(r8a66597, pipenum);
1568 if (unlikely(!td))
1569 continue;
1570
1571 tmp = r8a66597_read(r8a66597, td->pipe->pipectr);
1572 if ((tmp & INBUFM) == 0) {
1573 disable_irq_empty(r8a66597, pipenum);
1574 pipe_irq_disable(r8a66597, pipenum);
1575 finish_request(r8a66597, td, pipenum, td->urb,
1576 0);
1577 }
1578 }
1579 }
1580}
1581
1582static void irq_pipe_nrdy(struct r8a66597 *r8a66597)
1583{
1584 u16 check;
1585 u16 pipenum;
1586 u16 mask;
1587 int status;
1588
1589 mask = r8a66597_read(r8a66597, NRDYSTS)
1590 & r8a66597_read(r8a66597, NRDYENB);
1591 r8a66597_write(r8a66597, ~mask, NRDYSTS);
1592 if (mask & NRDY0) {
1593 cfifo_change(r8a66597, 0);
1594 status = get_urb_error(r8a66597, 0);
1595 pipe_irq_disable(r8a66597, 0);
1596 check_next_phase(r8a66597, status);
1597 }
1598
1599 for (pipenum = 1; pipenum < R8A66597_MAX_NUM_PIPE; pipenum++) {
1600 check = 1 << pipenum;
1601 if (mask & check) {
1602 struct r8a66597_td *td;
1603 td = r8a66597_get_td(r8a66597, pipenum);
1604 if (unlikely(!td))
1605 continue;
1606
1607 status = get_urb_error(r8a66597, pipenum);
1608 pipe_irq_disable(r8a66597, pipenum);
1609 pipe_stop(r8a66597, td->pipe);
1610 finish_request(r8a66597, td, pipenum, td->urb, status);
1611 }
1612 }
1613}
1614
1615static irqreturn_t r8a66597_irq(struct usb_hcd *hcd)
1616{
1617 struct r8a66597 *r8a66597 = hcd_to_r8a66597(hcd);
1618 u16 intsts0, intsts1, intsts2;
1619 u16 intenb0, intenb1, intenb2;
1620 u16 mask0, mask1, mask2;
1621 int status;
1622
1623 spin_lock(&r8a66597->lock);
1624
1625 intsts0 = r8a66597_read(r8a66597, INTSTS0);
1626 intsts1 = r8a66597_read(r8a66597, INTSTS1);
1627 intsts2 = r8a66597_read(r8a66597, INTSTS2);
1628 intenb0 = r8a66597_read(r8a66597, INTENB0);
1629 intenb1 = r8a66597_read(r8a66597, INTENB1);
1630 intenb2 = r8a66597_read(r8a66597, INTENB2);
1631
1632 mask2 = intsts2 & intenb2;
1633 mask1 = intsts1 & intenb1;
1634 mask0 = intsts0 & intenb0 & (BEMP | NRDY | BRDY);
1635 if (mask2) {
1636 if (mask2 & ATTCH) {
1637 r8a66597_write(r8a66597, ~ATTCH, INTSTS2);
1638 r8a66597_bclr(r8a66597, ATTCHE, INTENB2);
1639
1640 /* start usb bus sampling */
1641 start_root_hub_sampling(r8a66597, 1, 1);
1642 }
1643 if (mask2 & DTCH) {
1644 r8a66597_write(r8a66597, ~DTCH, INTSTS2);
1645 r8a66597_bclr(r8a66597, DTCHE, INTENB2);
1646 r8a66597_usb_disconnect(r8a66597, 1);
1647 }
1648 if (mask2 & BCHG) {
1649 r8a66597_write(r8a66597, ~BCHG, INTSTS2);
1650 r8a66597_bclr(r8a66597, BCHGE, INTENB2);
1651 usb_hcd_resume_root_hub(r8a66597_to_hcd(r8a66597));
1652 }
1653 }
1654
1655 if (mask1) {
1656 if (mask1 & ATTCH) {
1657 r8a66597_write(r8a66597, ~ATTCH, INTSTS1);
1658 r8a66597_bclr(r8a66597, ATTCHE, INTENB1);
1659
1660 /* start usb bus sampling */
1661 start_root_hub_sampling(r8a66597, 0, 1);
1662 }
1663 if (mask1 & DTCH) {
1664 r8a66597_write(r8a66597, ~DTCH, INTSTS1);
1665 r8a66597_bclr(r8a66597, DTCHE, INTENB1);
1666 r8a66597_usb_disconnect(r8a66597, 0);
1667 }
1668 if (mask1 & BCHG) {
1669 r8a66597_write(r8a66597, ~BCHG, INTSTS1);
1670 r8a66597_bclr(r8a66597, BCHGE, INTENB1);
1671 usb_hcd_resume_root_hub(r8a66597_to_hcd(r8a66597));
1672 }
1673
1674 if (mask1 & SIGN) {
1675 r8a66597_write(r8a66597, ~SIGN, INTSTS1);
1676 status = get_urb_error(r8a66597, 0);
1677 check_next_phase(r8a66597, status);
1678 }
1679 if (mask1 & SACK) {
1680 r8a66597_write(r8a66597, ~SACK, INTSTS1);
1681 check_next_phase(r8a66597, 0);
1682 }
1683 }
1684 if (mask0) {
1685 if (mask0 & BRDY)
1686 irq_pipe_ready(r8a66597);
1687 if (mask0 & BEMP)
1688 irq_pipe_empty(r8a66597);
1689 if (mask0 & NRDY)
1690 irq_pipe_nrdy(r8a66597);
1691 }
1692
1693 spin_unlock(&r8a66597->lock);
1694 return IRQ_HANDLED;
1695}
1696
1697/* this function must be called with interrupt disabled */
1698static void r8a66597_root_hub_control(struct r8a66597 *r8a66597, int port)
1699{
1700 u16 tmp;
1701 struct r8a66597_root_hub *rh = &r8a66597->root_hub[port];
1702
1703 if (rh->port & USB_PORT_STAT_RESET) {
1704 unsigned long dvstctr_reg = get_dvstctr_reg(port);
1705
1706 tmp = r8a66597_read(r8a66597, dvstctr_reg);
1707 if ((tmp & USBRST) == USBRST) {
1708 r8a66597_mdfy(r8a66597, UACT, USBRST | UACT,
1709 dvstctr_reg);
1710 r8a66597_root_hub_start_polling(r8a66597);
1711 } else
1712 r8a66597_usb_connect(r8a66597, port);
1713 }
1714
1715 if (!(rh->port & USB_PORT_STAT_CONNECTION)) {
1716 r8a66597_write(r8a66597, ~ATTCH, get_intsts_reg(port));
1717 r8a66597_bset(r8a66597, ATTCHE, get_intenb_reg(port));
1718 }
1719
1720 if (rh->scount > 0) {
1721 tmp = r8a66597_read(r8a66597, get_syssts_reg(port)) & LNST;
1722 if (tmp == rh->old_syssts) {
1723 rh->scount--;
1724 if (rh->scount == 0)
1725 r8a66597_check_syssts(r8a66597, port, tmp);
1726 else
1727 r8a66597_root_hub_start_polling(r8a66597);
1728 } else {
1729 rh->scount = R8A66597_MAX_SAMPLING;
1730 rh->old_syssts = tmp;
1731 r8a66597_root_hub_start_polling(r8a66597);
1732 }
1733 }
1734}
1735
1736static void r8a66597_interval_timer(unsigned long _r8a66597)
1737{
1738 struct r8a66597 *r8a66597 = (struct r8a66597 *)_r8a66597;
1739 unsigned long flags;
1740 u16 pipenum;
1741 struct r8a66597_td *td;
1742
1743 spin_lock_irqsave(&r8a66597->lock, flags);
1744
1745 for (pipenum = 0; pipenum < R8A66597_MAX_NUM_PIPE; pipenum++) {
1746 if (!(r8a66597->interval_map & (1 << pipenum)))
1747 continue;
1748 if (timer_pending(&r8a66597->interval_timer[pipenum]))
1749 continue;
1750
1751 td = r8a66597_get_td(r8a66597, pipenum);
1752 if (td)
1753 start_transfer(r8a66597, td);
1754 }
1755
1756 spin_unlock_irqrestore(&r8a66597->lock, flags);
1757}
1758
1759static void r8a66597_td_timer(unsigned long _r8a66597)
1760{
1761 struct r8a66597 *r8a66597 = (struct r8a66597 *)_r8a66597;
1762 unsigned long flags;
1763 u16 pipenum;
1764 struct r8a66597_td *td, *new_td = NULL;
1765 struct r8a66597_pipe *pipe;
1766
1767 spin_lock_irqsave(&r8a66597->lock, flags);
1768 for (pipenum = 0; pipenum < R8A66597_MAX_NUM_PIPE; pipenum++) {
1769 if (!(r8a66597->timeout_map & (1 << pipenum)))
1770 continue;
1771 if (timer_pending(&r8a66597->td_timer[pipenum]))
1772 continue;
1773
1774 td = r8a66597_get_td(r8a66597, pipenum);
1775 if (!td) {
1776 r8a66597->timeout_map &= ~(1 << pipenum);
1777 continue;
1778 }
1779
1780 if (td->urb->actual_length) {
1781 set_td_timer(r8a66597, td);
1782 break;
1783 }
1784
1785 pipe = td->pipe;
1786 pipe_stop(r8a66597, pipe);
1787
1788 new_td = td;
1789 do {
1790 list_move_tail(&new_td->queue,
1791 &r8a66597->pipe_queue[pipenum]);
1792 new_td = r8a66597_get_td(r8a66597, pipenum);
1793 if (!new_td) {
1794 new_td = td;
1795 break;
1796 }
1797 } while (td != new_td && td->address == new_td->address);
1798
1799 start_transfer(r8a66597, new_td);
1800
1801 if (td == new_td)
1802 r8a66597->timeout_map &= ~(1 << pipenum);
1803 else
1804 set_td_timer(r8a66597, new_td);
1805 break;
1806 }
1807 spin_unlock_irqrestore(&r8a66597->lock, flags);
1808}
1809
1810static void r8a66597_timer(unsigned long _r8a66597)
1811{
1812 struct r8a66597 *r8a66597 = (struct r8a66597 *)_r8a66597;
1813 unsigned long flags;
1814 int port;
1815
1816 spin_lock_irqsave(&r8a66597->lock, flags);
1817
1818 for (port = 0; port < r8a66597->max_root_hub; port++)
1819 r8a66597_root_hub_control(r8a66597, port);
1820
1821 spin_unlock_irqrestore(&r8a66597->lock, flags);
1822}
1823
1824static int check_pipe_config(struct r8a66597 *r8a66597, struct urb *urb)
1825{
1826 struct r8a66597_device *dev = get_urb_to_r8a66597_dev(r8a66597, urb);
1827
1828 if (dev && dev->address && dev->state != USB_STATE_CONFIGURED &&
1829 (urb->dev->state == USB_STATE_CONFIGURED))
1830 return 1;
1831 else
1832 return 0;
1833}
1834
1835static int r8a66597_start(struct usb_hcd *hcd)
1836{
1837 struct r8a66597 *r8a66597 = hcd_to_r8a66597(hcd);
1838
1839 hcd->state = HC_STATE_RUNNING;
1840 return enable_controller(r8a66597);
1841}
1842
1843static void r8a66597_stop(struct usb_hcd *hcd)
1844{
1845 struct r8a66597 *r8a66597 = hcd_to_r8a66597(hcd);
1846
1847 disable_controller(r8a66597);
1848}
1849
1850static void set_address_zero(struct r8a66597 *r8a66597, struct urb *urb)
1851{
1852 unsigned int usb_address = usb_pipedevice(urb->pipe);
1853 u16 root_port, hub_port;
1854
1855 if (usb_address == 0) {
1856 get_port_number(r8a66597, urb->dev->devpath,
1857 &root_port, &hub_port);
1858 set_devadd_reg(r8a66597, 0,
1859 get_r8a66597_usb_speed(urb->dev->speed),
1860 get_parent_r8a66597_address(r8a66597, urb->dev),
1861 hub_port, root_port);
1862 }
1863}
1864
1865static struct r8a66597_td *r8a66597_make_td(struct r8a66597 *r8a66597,
1866 struct urb *urb,
1867 struct usb_host_endpoint *hep)
1868{
1869 struct r8a66597_td *td;
1870 u16 pipenum;
1871
1872 td = kzalloc(sizeof(struct r8a66597_td), GFP_ATOMIC);
1873 if (td == NULL)
1874 return NULL;
1875
1876 pipenum = r8a66597_get_pipenum(urb, hep);
1877 td->pipenum = pipenum;
1878 td->pipe = hep->hcpriv;
1879 td->urb = urb;
1880 td->address = get_urb_to_r8a66597_addr(r8a66597, urb);
1881 td->maxpacket = usb_maxpacket(urb->dev, urb->pipe,
1882 !usb_pipein(urb->pipe));
1883 if (usb_pipecontrol(urb->pipe))
1884 td->type = USB_PID_SETUP;
1885 else if (usb_pipein(urb->pipe))
1886 td->type = USB_PID_IN;
1887 else
1888 td->type = USB_PID_OUT;
1889 INIT_LIST_HEAD(&td->queue);
1890
1891 return td;
1892}
1893
1894static int r8a66597_urb_enqueue(struct usb_hcd *hcd,
1895 struct urb *urb,
1896 gfp_t mem_flags)
1897{
1898 struct usb_host_endpoint *hep = urb->ep;
1899 struct r8a66597 *r8a66597 = hcd_to_r8a66597(hcd);
1900 struct r8a66597_td *td = NULL;
1901 int ret, request = 0;
1902 unsigned long flags;
1903
1904 spin_lock_irqsave(&r8a66597->lock, flags);
1905 if (!get_urb_to_r8a66597_dev(r8a66597, urb)) {
1906 ret = -ENODEV;
1907 goto error_not_linked;
1908 }
1909
1910 ret = usb_hcd_link_urb_to_ep(hcd, urb);
1911 if (ret)
1912 goto error_not_linked;
1913
1914 if (!hep->hcpriv) {
1915 hep->hcpriv = kzalloc(sizeof(struct r8a66597_pipe),
1916 GFP_ATOMIC);
1917 if (!hep->hcpriv) {
1918 ret = -ENOMEM;
1919 goto error;
1920 }
1921 set_pipe_reg_addr(hep->hcpriv, R8A66597_PIPE_NO_DMA);
1922 if (usb_pipeendpoint(urb->pipe))
1923 init_pipe_info(r8a66597, urb, hep, &hep->desc);
1924 }
1925
1926 if (unlikely(check_pipe_config(r8a66597, urb)))
1927 init_pipe_config(r8a66597, urb);
1928
1929 set_address_zero(r8a66597, urb);
1930 td = r8a66597_make_td(r8a66597, urb, hep);
1931 if (td == NULL) {
1932 ret = -ENOMEM;
1933 goto error;
1934 }
1935 if (list_empty(&r8a66597->pipe_queue[td->pipenum]))
1936 request = 1;
1937 list_add_tail(&td->queue, &r8a66597->pipe_queue[td->pipenum]);
1938 urb->hcpriv = td;
1939
1940 if (request) {
1941 if (td->pipe->info.timer_interval) {
1942 r8a66597->interval_map |= 1 << td->pipenum;
1943 mod_timer(&r8a66597->interval_timer[td->pipenum],
1944 jiffies + msecs_to_jiffies(
1945 td->pipe->info.timer_interval));
1946 } else {
1947 ret = start_transfer(r8a66597, td);
1948 if (ret < 0) {
1949 list_del(&td->queue);
1950 kfree(td);
1951 }
1952 }
1953 } else
1954 set_td_timer(r8a66597, td);
1955
1956error:
1957 if (ret)
1958 usb_hcd_unlink_urb_from_ep(hcd, urb);
1959error_not_linked:
1960 spin_unlock_irqrestore(&r8a66597->lock, flags);
1961 return ret;
1962}
1963
1964static int r8a66597_urb_dequeue(struct usb_hcd *hcd, struct urb *urb,
1965 int status)
1966{
1967 struct r8a66597 *r8a66597 = hcd_to_r8a66597(hcd);
1968 struct r8a66597_td *td;
1969 unsigned long flags;
1970 int rc;
1971
1972 spin_lock_irqsave(&r8a66597->lock, flags);
1973 rc = usb_hcd_check_unlink_urb(hcd, urb, status);
1974 if (rc)
1975 goto done;
1976
1977 if (urb->hcpriv) {
1978 td = urb->hcpriv;
1979 pipe_stop(r8a66597, td->pipe);
1980 pipe_irq_disable(r8a66597, td->pipenum);
1981 disable_irq_empty(r8a66597, td->pipenum);
1982 finish_request(r8a66597, td, td->pipenum, urb, status);
1983 }
1984 done:
1985 spin_unlock_irqrestore(&r8a66597->lock, flags);
1986 return rc;
1987}
1988
1989static void r8a66597_endpoint_disable(struct usb_hcd *hcd,
1990 struct usb_host_endpoint *hep)
1991{
1992 struct r8a66597 *r8a66597 = hcd_to_r8a66597(hcd);
1993 struct r8a66597_pipe *pipe = (struct r8a66597_pipe *)hep->hcpriv;
1994 struct r8a66597_td *td;
1995 struct urb *urb = NULL;
1996 u16 pipenum;
1997 unsigned long flags;
1998
1999 if (pipe == NULL)
2000 return;
2001 pipenum = pipe->info.pipenum;
2002
2003 if (pipenum == 0) {
2004 kfree(hep->hcpriv);
2005 hep->hcpriv = NULL;
2006 return;
2007 }
2008
2009 spin_lock_irqsave(&r8a66597->lock, flags);
2010 pipe_stop(r8a66597, pipe);
2011 pipe_irq_disable(r8a66597, pipenum);
2012 disable_irq_empty(r8a66597, pipenum);
2013 td = r8a66597_get_td(r8a66597, pipenum);
2014 if (td)
2015 urb = td->urb;
2016 finish_request(r8a66597, td, pipenum, urb, -ESHUTDOWN);
2017 kfree(hep->hcpriv);
2018 hep->hcpriv = NULL;
2019 spin_unlock_irqrestore(&r8a66597->lock, flags);
2020}
2021
2022static int r8a66597_get_frame(struct usb_hcd *hcd)
2023{
2024 struct r8a66597 *r8a66597 = hcd_to_r8a66597(hcd);
2025 return r8a66597_read(r8a66597, FRMNUM) & 0x03FF;
2026}
2027
2028static void collect_usb_address_map(struct usb_device *udev, unsigned long *map)
2029{
2030 int chix;
2031 struct usb_device *childdev;
2032
2033 if (udev->state == USB_STATE_CONFIGURED &&
2034 udev->parent && udev->parent->devnum > 1 &&
2035 udev->parent->descriptor.bDeviceClass == USB_CLASS_HUB)
2036 map[udev->devnum/32] |= (1 << (udev->devnum % 32));
2037
2038 usb_hub_for_each_child(udev, chix, childdev)
2039 collect_usb_address_map(childdev, map);
2040}
2041
2042/* this function must be called with interrupt disabled */
2043static struct r8a66597_device *get_r8a66597_device(struct r8a66597 *r8a66597,
2044 int addr)
2045{
2046 struct r8a66597_device *dev;
2047 struct list_head *list = &r8a66597->child_device;
2048
2049 list_for_each_entry(dev, list, device_list) {
2050 if (dev->usb_address != addr)
2051 continue;
2052
2053 return dev;
2054 }
2055
2056 printk(KERN_ERR "r8a66597: get_r8a66597_device fail.(%d)\n", addr);
2057 return NULL;
2058}
2059
2060static void update_usb_address_map(struct r8a66597 *r8a66597,
2061 struct usb_device *root_hub,
2062 unsigned long *map)
2063{
2064 int i, j, addr;
2065 unsigned long diff;
2066 unsigned long flags;
2067
2068 for (i = 0; i < 4; i++) {
2069 diff = r8a66597->child_connect_map[i] ^ map[i];
2070 if (!diff)
2071 continue;
2072
2073 for (j = 0; j < 32; j++) {
2074 if (!(diff & (1 << j)))
2075 continue;
2076
2077 addr = i * 32 + j;
2078 if (map[i] & (1 << j))
2079 set_child_connect_map(r8a66597, addr);
2080 else {
2081 struct r8a66597_device *dev;
2082
2083 spin_lock_irqsave(&r8a66597->lock, flags);
2084 dev = get_r8a66597_device(r8a66597, addr);
2085 disable_r8a66597_pipe_all(r8a66597, dev);
2086 free_usb_address(r8a66597, dev, 0);
2087 put_child_connect_map(r8a66597, addr);
2088 spin_unlock_irqrestore(&r8a66597->lock, flags);
2089 }
2090 }
2091 }
2092}
2093
2094static void r8a66597_check_detect_child(struct r8a66597 *r8a66597,
2095 struct usb_hcd *hcd)
2096{
2097 struct usb_bus *bus;
2098 unsigned long now_map[4];
2099
2100 memset(now_map, 0, sizeof(now_map));
2101
2102 mutex_lock(&usb_bus_idr_lock);
2103 bus = idr_find(&usb_bus_idr, hcd->self.busnum);
2104 if (bus && bus->root_hub) {
2105 collect_usb_address_map(bus->root_hub, now_map);
2106 update_usb_address_map(r8a66597, bus->root_hub, now_map);
2107 }
2108 mutex_unlock(&usb_bus_idr_lock);
2109}
2110
2111static int r8a66597_hub_status_data(struct usb_hcd *hcd, char *buf)
2112{
2113 struct r8a66597 *r8a66597 = hcd_to_r8a66597(hcd);
2114 unsigned long flags;
2115 int i;
2116
2117 r8a66597_check_detect_child(r8a66597, hcd);
2118
2119 spin_lock_irqsave(&r8a66597->lock, flags);
2120
2121 *buf = 0; /* initialize (no change) */
2122
2123 for (i = 0; i < r8a66597->max_root_hub; i++) {
2124 if (r8a66597->root_hub[i].port & 0xffff0000)
2125 *buf |= 1 << (i + 1);
2126 }
2127
2128 spin_unlock_irqrestore(&r8a66597->lock, flags);
2129
2130 return (*buf != 0);
2131}
2132
2133static void r8a66597_hub_descriptor(struct r8a66597 *r8a66597,
2134 struct usb_hub_descriptor *desc)
2135{
2136 desc->bDescriptorType = USB_DT_HUB;
2137 desc->bHubContrCurrent = 0;
2138 desc->bNbrPorts = r8a66597->max_root_hub;
2139 desc->bDescLength = 9;
2140 desc->bPwrOn2PwrGood = 0;
2141 desc->wHubCharacteristics =
2142 cpu_to_le16(HUB_CHAR_INDV_PORT_LPSM | HUB_CHAR_NO_OCPM);
2143 desc->u.hs.DeviceRemovable[0] =
2144 ((1 << r8a66597->max_root_hub) - 1) << 1;
2145 desc->u.hs.DeviceRemovable[1] = ~0;
2146}
2147
2148static int r8a66597_hub_control(struct usb_hcd *hcd, u16 typeReq, u16 wValue,
2149 u16 wIndex, char *buf, u16 wLength)
2150{
2151 struct r8a66597 *r8a66597 = hcd_to_r8a66597(hcd);
2152 int ret;
2153 int port = (wIndex & 0x00FF) - 1;
2154 struct r8a66597_root_hub *rh = &r8a66597->root_hub[port];
2155 unsigned long flags;
2156
2157 ret = 0;
2158
2159 spin_lock_irqsave(&r8a66597->lock, flags);
2160 switch (typeReq) {
2161 case ClearHubFeature:
2162 case SetHubFeature:
2163 switch (wValue) {
2164 case C_HUB_OVER_CURRENT:
2165 case C_HUB_LOCAL_POWER:
2166 break;
2167 default:
2168 goto error;
2169 }
2170 break;
2171 case ClearPortFeature:
2172 if (wIndex > r8a66597->max_root_hub)
2173 goto error;
2174 if (wLength != 0)
2175 goto error;
2176
2177 switch (wValue) {
2178 case USB_PORT_FEAT_ENABLE:
2179 rh->port &= ~USB_PORT_STAT_POWER;
2180 break;
2181 case USB_PORT_FEAT_SUSPEND:
2182 break;
2183 case USB_PORT_FEAT_POWER:
2184 r8a66597_port_power(r8a66597, port, 0);
2185 break;
2186 case USB_PORT_FEAT_C_ENABLE:
2187 case USB_PORT_FEAT_C_SUSPEND:
2188 case USB_PORT_FEAT_C_CONNECTION:
2189 case USB_PORT_FEAT_C_OVER_CURRENT:
2190 case USB_PORT_FEAT_C_RESET:
2191 break;
2192 default:
2193 goto error;
2194 }
2195 rh->port &= ~(1 << wValue);
2196 break;
2197 case GetHubDescriptor:
2198 r8a66597_hub_descriptor(r8a66597,
2199 (struct usb_hub_descriptor *)buf);
2200 break;
2201 case GetHubStatus:
2202 *buf = 0x00;
2203 break;
2204 case GetPortStatus:
2205 if (wIndex > r8a66597->max_root_hub)
2206 goto error;
2207 *(__le32 *)buf = cpu_to_le32(rh->port);
2208 break;
2209 case SetPortFeature:
2210 if (wIndex > r8a66597->max_root_hub)
2211 goto error;
2212 if (wLength != 0)
2213 goto error;
2214
2215 switch (wValue) {
2216 case USB_PORT_FEAT_SUSPEND:
2217 break;
2218 case USB_PORT_FEAT_POWER:
2219 r8a66597_port_power(r8a66597, port, 1);
2220 rh->port |= USB_PORT_STAT_POWER;
2221 break;
2222 case USB_PORT_FEAT_RESET: {
2223 struct r8a66597_device *dev = rh->dev;
2224
2225 rh->port |= USB_PORT_STAT_RESET;
2226
2227 disable_r8a66597_pipe_all(r8a66597, dev);
2228 free_usb_address(r8a66597, dev, 1);
2229
2230 r8a66597_mdfy(r8a66597, USBRST, USBRST | UACT,
2231 get_dvstctr_reg(port));
2232 mod_timer(&r8a66597->rh_timer,
2233 jiffies + msecs_to_jiffies(50));
2234 }
2235 break;
2236 default:
2237 goto error;
2238 }
2239 rh->port |= 1 << wValue;
2240 break;
2241 default:
2242error:
2243 ret = -EPIPE;
2244 break;
2245 }
2246
2247 spin_unlock_irqrestore(&r8a66597->lock, flags);
2248 return ret;
2249}
2250
2251#if defined(CONFIG_PM)
2252static int r8a66597_bus_suspend(struct usb_hcd *hcd)
2253{
2254 struct r8a66597 *r8a66597 = hcd_to_r8a66597(hcd);
2255 int port;
2256
2257 dev_dbg(&r8a66597->device0.udev->dev, "%s\n", __func__);
2258
2259 for (port = 0; port < r8a66597->max_root_hub; port++) {
2260 struct r8a66597_root_hub *rh = &r8a66597->root_hub[port];
2261 unsigned long dvstctr_reg = get_dvstctr_reg(port);
2262
2263 if (!(rh->port & USB_PORT_STAT_ENABLE))
2264 continue;
2265
2266 dev_dbg(&rh->dev->udev->dev, "suspend port = %d\n", port);
2267 r8a66597_bclr(r8a66597, UACT, dvstctr_reg); /* suspend */
2268 rh->port |= USB_PORT_STAT_SUSPEND;
2269
2270 if (rh->dev->udev->do_remote_wakeup) {
2271 msleep(3); /* waiting last SOF */
2272 r8a66597_bset(r8a66597, RWUPE, dvstctr_reg);
2273 r8a66597_write(r8a66597, ~BCHG, get_intsts_reg(port));
2274 r8a66597_bset(r8a66597, BCHGE, get_intenb_reg(port));
2275 }
2276 }
2277
2278 r8a66597->bus_suspended = 1;
2279
2280 return 0;
2281}
2282
2283static int r8a66597_bus_resume(struct usb_hcd *hcd)
2284{
2285 struct r8a66597 *r8a66597 = hcd_to_r8a66597(hcd);
2286 int port;
2287
2288 dev_dbg(&r8a66597->device0.udev->dev, "%s\n", __func__);
2289
2290 for (port = 0; port < r8a66597->max_root_hub; port++) {
2291 struct r8a66597_root_hub *rh = &r8a66597->root_hub[port];
2292 unsigned long dvstctr_reg = get_dvstctr_reg(port);
2293
2294 if (!(rh->port & USB_PORT_STAT_SUSPEND))
2295 continue;
2296
2297 dev_dbg(&rh->dev->udev->dev, "resume port = %d\n", port);
2298 rh->port &= ~USB_PORT_STAT_SUSPEND;
2299 rh->port |= USB_PORT_STAT_C_SUSPEND << 16;
2300 r8a66597_mdfy(r8a66597, RESUME, RESUME | UACT, dvstctr_reg);
2301 msleep(USB_RESUME_TIMEOUT);
2302 r8a66597_mdfy(r8a66597, UACT, RESUME | UACT, dvstctr_reg);
2303 }
2304
2305 return 0;
2306
2307}
2308#else
2309#define r8a66597_bus_suspend NULL
2310#define r8a66597_bus_resume NULL
2311#endif
2312
2313static struct hc_driver r8a66597_hc_driver = {
2314 .description = hcd_name,
2315 .hcd_priv_size = sizeof(struct r8a66597),
2316 .irq = r8a66597_irq,
2317
2318 /*
2319 * generic hardware linkage
2320 */
2321 .flags = HCD_USB2,
2322
2323 .start = r8a66597_start,
2324 .stop = r8a66597_stop,
2325
2326 /*
2327 * managing i/o requests and associated device resources
2328 */
2329 .urb_enqueue = r8a66597_urb_enqueue,
2330 .urb_dequeue = r8a66597_urb_dequeue,
2331 .endpoint_disable = r8a66597_endpoint_disable,
2332
2333 /*
2334 * periodic schedule support
2335 */
2336 .get_frame_number = r8a66597_get_frame,
2337
2338 /*
2339 * root hub support
2340 */
2341 .hub_status_data = r8a66597_hub_status_data,
2342 .hub_control = r8a66597_hub_control,
2343 .bus_suspend = r8a66597_bus_suspend,
2344 .bus_resume = r8a66597_bus_resume,
2345};
2346
2347#if defined(CONFIG_PM)
2348static int r8a66597_suspend(struct device *dev)
2349{
2350 struct r8a66597 *r8a66597 = dev_get_drvdata(dev);
2351 int port;
2352
2353 dev_dbg(dev, "%s\n", __func__);
2354
2355 disable_controller(r8a66597);
2356
2357 for (port = 0; port < r8a66597->max_root_hub; port++) {
2358 struct r8a66597_root_hub *rh = &r8a66597->root_hub[port];
2359
2360 rh->port = 0x00000000;
2361 }
2362
2363 return 0;
2364}
2365
2366static int r8a66597_resume(struct device *dev)
2367{
2368 struct r8a66597 *r8a66597 = dev_get_drvdata(dev);
2369 struct usb_hcd *hcd = r8a66597_to_hcd(r8a66597);
2370
2371 dev_dbg(dev, "%s\n", __func__);
2372
2373 enable_controller(r8a66597);
2374 usb_root_hub_lost_power(hcd->self.root_hub);
2375
2376 return 0;
2377}
2378
2379static const struct dev_pm_ops r8a66597_dev_pm_ops = {
2380 .suspend = r8a66597_suspend,
2381 .resume = r8a66597_resume,
2382 .poweroff = r8a66597_suspend,
2383 .restore = r8a66597_resume,
2384};
2385
2386#define R8A66597_DEV_PM_OPS (&r8a66597_dev_pm_ops)
2387#else /* if defined(CONFIG_PM) */
2388#define R8A66597_DEV_PM_OPS NULL
2389#endif
2390
2391static int r8a66597_remove(struct platform_device *pdev)
2392{
2393 struct r8a66597 *r8a66597 = platform_get_drvdata(pdev);
2394 struct usb_hcd *hcd = r8a66597_to_hcd(r8a66597);
2395
2396 del_timer_sync(&r8a66597->rh_timer);
2397 usb_remove_hcd(hcd);
2398 iounmap(r8a66597->reg);
2399 if (r8a66597->pdata->on_chip)
2400 clk_put(r8a66597->clk);
2401 usb_put_hcd(hcd);
2402 return 0;
2403}
2404
2405static int r8a66597_probe(struct platform_device *pdev)
2406{
2407 char clk_name[8];
2408 struct resource *res = NULL, *ires;
2409 int irq = -1;
2410 void __iomem *reg = NULL;
2411 struct usb_hcd *hcd = NULL;
2412 struct r8a66597 *r8a66597;
2413 int ret = 0;
2414 int i;
2415 unsigned long irq_trigger;
2416
2417 if (usb_disabled())
2418 return -ENODEV;
2419
2420 if (pdev->dev.dma_mask) {
2421 ret = -EINVAL;
2422 dev_err(&pdev->dev, "dma not supported\n");
2423 goto clean_up;
2424 }
2425
2426 res = platform_get_resource(pdev, IORESOURCE_MEM, 0);
2427 if (!res) {
2428 ret = -ENODEV;
2429 dev_err(&pdev->dev, "platform_get_resource error.\n");
2430 goto clean_up;
2431 }
2432
2433 ires = platform_get_resource(pdev, IORESOURCE_IRQ, 0);
2434 if (!ires) {
2435 ret = -ENODEV;
2436 dev_err(&pdev->dev,
2437 "platform_get_resource IORESOURCE_IRQ error.\n");
2438 goto clean_up;
2439 }
2440
2441 irq = ires->start;
2442 irq_trigger = ires->flags & IRQF_TRIGGER_MASK;
2443
2444 reg = ioremap(res->start, resource_size(res));
2445 if (reg == NULL) {
2446 ret = -ENOMEM;
2447 dev_err(&pdev->dev, "ioremap error.\n");
2448 goto clean_up;
2449 }
2450
2451 if (pdev->dev.platform_data == NULL) {
2452 dev_err(&pdev->dev, "no platform data\n");
2453 ret = -ENODEV;
2454 goto clean_up;
2455 }
2456
2457 /* initialize hcd */
2458 hcd = usb_create_hcd(&r8a66597_hc_driver, &pdev->dev, (char *)hcd_name);
2459 if (!hcd) {
2460 ret = -ENOMEM;
2461 dev_err(&pdev->dev, "Failed to create hcd\n");
2462 goto clean_up;
2463 }
2464 r8a66597 = hcd_to_r8a66597(hcd);
2465 memset(r8a66597, 0, sizeof(struct r8a66597));
2466 platform_set_drvdata(pdev, r8a66597);
2467 r8a66597->pdata = dev_get_platdata(&pdev->dev);
2468 r8a66597->irq_sense_low = irq_trigger == IRQF_TRIGGER_LOW;
2469
2470 if (r8a66597->pdata->on_chip) {
2471 snprintf(clk_name, sizeof(clk_name), "usb%d", pdev->id);
2472 r8a66597->clk = clk_get(&pdev->dev, clk_name);
2473 if (IS_ERR(r8a66597->clk)) {
2474 dev_err(&pdev->dev, "cannot get clock \"%s\"\n",
2475 clk_name);
2476 ret = PTR_ERR(r8a66597->clk);
2477 goto clean_up2;
2478 }
2479 r8a66597->max_root_hub = 1;
2480 } else
2481 r8a66597->max_root_hub = 2;
2482
2483 spin_lock_init(&r8a66597->lock);
2484 setup_timer(&r8a66597->rh_timer, r8a66597_timer,
2485 (unsigned long)r8a66597);
2486 r8a66597->reg = reg;
2487
2488 /* make sure no interrupts are pending */
2489 ret = r8a66597_clock_enable(r8a66597);
2490 if (ret < 0)
2491 goto clean_up3;
2492 disable_controller(r8a66597);
2493
2494 for (i = 0; i < R8A66597_MAX_NUM_PIPE; i++) {
2495 INIT_LIST_HEAD(&r8a66597->pipe_queue[i]);
2496 setup_timer(&r8a66597->td_timer[i], r8a66597_td_timer,
2497 (unsigned long)r8a66597);
2498 setup_timer(&r8a66597->interval_timer[i],
2499 r8a66597_interval_timer,
2500 (unsigned long)r8a66597);
2501 }
2502 INIT_LIST_HEAD(&r8a66597->child_device);
2503
2504 hcd->rsrc_start = res->start;
2505 hcd->has_tt = 1;
2506
2507 ret = usb_add_hcd(hcd, irq, irq_trigger);
2508 if (ret != 0) {
2509 dev_err(&pdev->dev, "Failed to add hcd\n");
2510 goto clean_up3;
2511 }
2512 device_wakeup_enable(hcd->self.controller);
2513
2514 return 0;
2515
2516clean_up3:
2517 if (r8a66597->pdata->on_chip)
2518 clk_put(r8a66597->clk);
2519clean_up2:
2520 usb_put_hcd(hcd);
2521
2522clean_up:
2523 if (reg)
2524 iounmap(reg);
2525
2526 return ret;
2527}
2528
2529static struct platform_driver r8a66597_driver = {
2530 .probe = r8a66597_probe,
2531 .remove = r8a66597_remove,
2532 .driver = {
2533 .name = hcd_name,
2534 .pm = R8A66597_DEV_PM_OPS,
2535 },
2536};
2537
2538module_platform_driver(r8a66597_driver);
1// SPDX-License-Identifier: GPL-2.0
2/*
3 * R8A66597 HCD (Host Controller Driver)
4 *
5 * Copyright (C) 2006-2007 Renesas Solutions Corp.
6 * Portions Copyright (C) 2004 Psion Teklogix (for NetBook PRO)
7 * Portions Copyright (C) 2004-2005 David Brownell
8 * Portions Copyright (C) 1999 Roman Weissgaerber
9 *
10 * Author : Yoshihiro Shimoda <yoshihiro.shimoda.uh@renesas.com>
11 */
12
13#include <linux/module.h>
14#include <linux/kernel.h>
15#include <linux/sched.h>
16#include <linux/errno.h>
17#include <linux/timer.h>
18#include <linux/delay.h>
19#include <linux/list.h>
20#include <linux/interrupt.h>
21#include <linux/usb.h>
22#include <linux/usb/hcd.h>
23#include <linux/platform_device.h>
24#include <linux/io.h>
25#include <linux/mm.h>
26#include <linux/irq.h>
27#include <linux/slab.h>
28#include <asm/cacheflush.h>
29
30#include "r8a66597.h"
31
32MODULE_DESCRIPTION("R8A66597 USB Host Controller Driver");
33MODULE_LICENSE("GPL");
34MODULE_AUTHOR("Yoshihiro Shimoda");
35MODULE_ALIAS("platform:r8a66597_hcd");
36
37#define DRIVER_VERSION "2009-05-26"
38
39static const char hcd_name[] = "r8a66597_hcd";
40
41static void packet_write(struct r8a66597 *r8a66597, u16 pipenum);
42static int r8a66597_get_frame(struct usb_hcd *hcd);
43
44/* this function must be called with interrupt disabled */
45static void enable_pipe_irq(struct r8a66597 *r8a66597, u16 pipenum,
46 unsigned long reg)
47{
48 u16 tmp;
49
50 tmp = r8a66597_read(r8a66597, INTENB0);
51 r8a66597_bclr(r8a66597, BEMPE | NRDYE | BRDYE, INTENB0);
52 r8a66597_bset(r8a66597, 1 << pipenum, reg);
53 r8a66597_write(r8a66597, tmp, INTENB0);
54}
55
56/* this function must be called with interrupt disabled */
57static void disable_pipe_irq(struct r8a66597 *r8a66597, u16 pipenum,
58 unsigned long reg)
59{
60 u16 tmp;
61
62 tmp = r8a66597_read(r8a66597, INTENB0);
63 r8a66597_bclr(r8a66597, BEMPE | NRDYE | BRDYE, INTENB0);
64 r8a66597_bclr(r8a66597, 1 << pipenum, reg);
65 r8a66597_write(r8a66597, tmp, INTENB0);
66}
67
68static void set_devadd_reg(struct r8a66597 *r8a66597, u8 r8a66597_address,
69 u16 usbspd, u8 upphub, u8 hubport, int port)
70{
71 u16 val;
72 unsigned long devadd_reg = get_devadd_addr(r8a66597_address);
73
74 val = (upphub << 11) | (hubport << 8) | (usbspd << 6) | (port & 0x0001);
75 r8a66597_write(r8a66597, val, devadd_reg);
76}
77
78static int r8a66597_clock_enable(struct r8a66597 *r8a66597)
79{
80 u16 tmp;
81 int i = 0;
82
83 if (r8a66597->pdata->on_chip) {
84 clk_prepare_enable(r8a66597->clk);
85 do {
86 r8a66597_write(r8a66597, SCKE, SYSCFG0);
87 tmp = r8a66597_read(r8a66597, SYSCFG0);
88 if (i++ > 1000) {
89 printk(KERN_ERR "r8a66597: reg access fail.\n");
90 return -ENXIO;
91 }
92 } while ((tmp & SCKE) != SCKE);
93 r8a66597_write(r8a66597, 0x04, 0x02);
94 } else {
95 do {
96 r8a66597_write(r8a66597, USBE, SYSCFG0);
97 tmp = r8a66597_read(r8a66597, SYSCFG0);
98 if (i++ > 1000) {
99 printk(KERN_ERR "r8a66597: reg access fail.\n");
100 return -ENXIO;
101 }
102 } while ((tmp & USBE) != USBE);
103 r8a66597_bclr(r8a66597, USBE, SYSCFG0);
104 r8a66597_mdfy(r8a66597, get_xtal_from_pdata(r8a66597->pdata),
105 XTAL, SYSCFG0);
106
107 i = 0;
108 r8a66597_bset(r8a66597, XCKE, SYSCFG0);
109 do {
110 msleep(1);
111 tmp = r8a66597_read(r8a66597, SYSCFG0);
112 if (i++ > 500) {
113 printk(KERN_ERR "r8a66597: reg access fail.\n");
114 return -ENXIO;
115 }
116 } while ((tmp & SCKE) != SCKE);
117 }
118
119 return 0;
120}
121
122static void r8a66597_clock_disable(struct r8a66597 *r8a66597)
123{
124 r8a66597_bclr(r8a66597, SCKE, SYSCFG0);
125 udelay(1);
126
127 if (r8a66597->pdata->on_chip) {
128 clk_disable_unprepare(r8a66597->clk);
129 } else {
130 r8a66597_bclr(r8a66597, PLLC, SYSCFG0);
131 r8a66597_bclr(r8a66597, XCKE, SYSCFG0);
132 r8a66597_bclr(r8a66597, USBE, SYSCFG0);
133 }
134}
135
136static void r8a66597_enable_port(struct r8a66597 *r8a66597, int port)
137{
138 u16 val;
139
140 val = port ? DRPD : DCFM | DRPD;
141 r8a66597_bset(r8a66597, val, get_syscfg_reg(port));
142 r8a66597_bset(r8a66597, HSE, get_syscfg_reg(port));
143
144 r8a66597_write(r8a66597, BURST | CPU_ADR_RD_WR, get_dmacfg_reg(port));
145 r8a66597_bclr(r8a66597, DTCHE, get_intenb_reg(port));
146 r8a66597_bset(r8a66597, ATTCHE, get_intenb_reg(port));
147}
148
149static void r8a66597_disable_port(struct r8a66597 *r8a66597, int port)
150{
151 u16 val, tmp;
152
153 r8a66597_write(r8a66597, 0, get_intenb_reg(port));
154 r8a66597_write(r8a66597, 0, get_intsts_reg(port));
155
156 r8a66597_port_power(r8a66597, port, 0);
157
158 do {
159 tmp = r8a66597_read(r8a66597, SOFCFG) & EDGESTS;
160 udelay(640);
161 } while (tmp == EDGESTS);
162
163 val = port ? DRPD : DCFM | DRPD;
164 r8a66597_bclr(r8a66597, val, get_syscfg_reg(port));
165 r8a66597_bclr(r8a66597, HSE, get_syscfg_reg(port));
166}
167
168static int enable_controller(struct r8a66597 *r8a66597)
169{
170 int ret, port;
171 u16 vif = r8a66597->pdata->vif ? LDRV : 0;
172 u16 irq_sense = r8a66597->irq_sense_low ? INTL : 0;
173 u16 endian = r8a66597->pdata->endian ? BIGEND : 0;
174
175 ret = r8a66597_clock_enable(r8a66597);
176 if (ret < 0)
177 return ret;
178
179 r8a66597_bset(r8a66597, vif & LDRV, PINCFG);
180 r8a66597_bset(r8a66597, USBE, SYSCFG0);
181
182 r8a66597_bset(r8a66597, BEMPE | NRDYE | BRDYE, INTENB0);
183 r8a66597_bset(r8a66597, irq_sense & INTL, SOFCFG);
184 r8a66597_bset(r8a66597, BRDY0, BRDYENB);
185 r8a66597_bset(r8a66597, BEMP0, BEMPENB);
186
187 r8a66597_bset(r8a66597, endian & BIGEND, CFIFOSEL);
188 r8a66597_bset(r8a66597, endian & BIGEND, D0FIFOSEL);
189 r8a66597_bset(r8a66597, endian & BIGEND, D1FIFOSEL);
190 r8a66597_bset(r8a66597, TRNENSEL, SOFCFG);
191
192 r8a66597_bset(r8a66597, SIGNE | SACKE, INTENB1);
193
194 for (port = 0; port < r8a66597->max_root_hub; port++)
195 r8a66597_enable_port(r8a66597, port);
196
197 return 0;
198}
199
200static void disable_controller(struct r8a66597 *r8a66597)
201{
202 int port;
203
204 /* disable interrupts */
205 r8a66597_write(r8a66597, 0, INTENB0);
206 r8a66597_write(r8a66597, 0, INTENB1);
207 r8a66597_write(r8a66597, 0, BRDYENB);
208 r8a66597_write(r8a66597, 0, BEMPENB);
209 r8a66597_write(r8a66597, 0, NRDYENB);
210
211 /* clear status */
212 r8a66597_write(r8a66597, 0, BRDYSTS);
213 r8a66597_write(r8a66597, 0, NRDYSTS);
214 r8a66597_write(r8a66597, 0, BEMPSTS);
215
216 for (port = 0; port < r8a66597->max_root_hub; port++)
217 r8a66597_disable_port(r8a66597, port);
218
219 r8a66597_clock_disable(r8a66597);
220}
221
222static int get_parent_r8a66597_address(struct r8a66597 *r8a66597,
223 struct usb_device *udev)
224{
225 struct r8a66597_device *dev;
226
227 if (udev->parent && udev->parent->devnum != 1)
228 udev = udev->parent;
229
230 dev = dev_get_drvdata(&udev->dev);
231 if (dev)
232 return dev->address;
233 else
234 return 0;
235}
236
237static int is_child_device(char *devpath)
238{
239 return (devpath[2] ? 1 : 0);
240}
241
242static int is_hub_limit(char *devpath)
243{
244 return ((strlen(devpath) >= 4) ? 1 : 0);
245}
246
247static void get_port_number(struct r8a66597 *r8a66597,
248 char *devpath, u16 *root_port, u16 *hub_port)
249{
250 if (root_port) {
251 *root_port = (devpath[0] & 0x0F) - 1;
252 if (*root_port >= r8a66597->max_root_hub)
253 printk(KERN_ERR "r8a66597: Illegal root port number.\n");
254 }
255 if (hub_port)
256 *hub_port = devpath[2] & 0x0F;
257}
258
259static u16 get_r8a66597_usb_speed(enum usb_device_speed speed)
260{
261 u16 usbspd = 0;
262
263 switch (speed) {
264 case USB_SPEED_LOW:
265 usbspd = LSMODE;
266 break;
267 case USB_SPEED_FULL:
268 usbspd = FSMODE;
269 break;
270 case USB_SPEED_HIGH:
271 usbspd = HSMODE;
272 break;
273 default:
274 printk(KERN_ERR "r8a66597: unknown speed\n");
275 break;
276 }
277
278 return usbspd;
279}
280
281static void set_child_connect_map(struct r8a66597 *r8a66597, int address)
282{
283 int idx;
284
285 idx = address / 32;
286 r8a66597->child_connect_map[idx] |= 1 << (address % 32);
287}
288
289static void put_child_connect_map(struct r8a66597 *r8a66597, int address)
290{
291 int idx;
292
293 idx = address / 32;
294 r8a66597->child_connect_map[idx] &= ~(1 << (address % 32));
295}
296
297static void set_pipe_reg_addr(struct r8a66597_pipe *pipe, u8 dma_ch)
298{
299 u16 pipenum = pipe->info.pipenum;
300 const unsigned long fifoaddr[] = {D0FIFO, D1FIFO, CFIFO};
301 const unsigned long fifosel[] = {D0FIFOSEL, D1FIFOSEL, CFIFOSEL};
302 const unsigned long fifoctr[] = {D0FIFOCTR, D1FIFOCTR, CFIFOCTR};
303
304 if (dma_ch > R8A66597_PIPE_NO_DMA) /* dma fifo not use? */
305 dma_ch = R8A66597_PIPE_NO_DMA;
306
307 pipe->fifoaddr = fifoaddr[dma_ch];
308 pipe->fifosel = fifosel[dma_ch];
309 pipe->fifoctr = fifoctr[dma_ch];
310
311 if (pipenum == 0)
312 pipe->pipectr = DCPCTR;
313 else
314 pipe->pipectr = get_pipectr_addr(pipenum);
315
316 if (check_bulk_or_isoc(pipenum)) {
317 pipe->pipetre = get_pipetre_addr(pipenum);
318 pipe->pipetrn = get_pipetrn_addr(pipenum);
319 } else {
320 pipe->pipetre = 0;
321 pipe->pipetrn = 0;
322 }
323}
324
325static struct r8a66597_device *
326get_urb_to_r8a66597_dev(struct r8a66597 *r8a66597, struct urb *urb)
327{
328 if (usb_pipedevice(urb->pipe) == 0)
329 return &r8a66597->device0;
330
331 return dev_get_drvdata(&urb->dev->dev);
332}
333
334static int make_r8a66597_device(struct r8a66597 *r8a66597,
335 struct urb *urb, u8 addr)
336{
337 struct r8a66597_device *dev;
338 int usb_address = urb->setup_packet[2]; /* urb->pipe is address 0 */
339
340 dev = kzalloc(sizeof(struct r8a66597_device), GFP_ATOMIC);
341 if (dev == NULL)
342 return -ENOMEM;
343
344 dev_set_drvdata(&urb->dev->dev, dev);
345 dev->udev = urb->dev;
346 dev->address = addr;
347 dev->usb_address = usb_address;
348 dev->state = USB_STATE_ADDRESS;
349 dev->ep_in_toggle = 0;
350 dev->ep_out_toggle = 0;
351 INIT_LIST_HEAD(&dev->device_list);
352 list_add_tail(&dev->device_list, &r8a66597->child_device);
353
354 get_port_number(r8a66597, urb->dev->devpath,
355 &dev->root_port, &dev->hub_port);
356 if (!is_child_device(urb->dev->devpath))
357 r8a66597->root_hub[dev->root_port].dev = dev;
358
359 set_devadd_reg(r8a66597, dev->address,
360 get_r8a66597_usb_speed(urb->dev->speed),
361 get_parent_r8a66597_address(r8a66597, urb->dev),
362 dev->hub_port, dev->root_port);
363
364 return 0;
365}
366
367/* this function must be called with interrupt disabled */
368static u8 alloc_usb_address(struct r8a66597 *r8a66597, struct urb *urb)
369{
370 u8 addr; /* R8A66597's address */
371 struct r8a66597_device *dev;
372
373 if (is_hub_limit(urb->dev->devpath)) {
374 dev_err(&urb->dev->dev, "External hub limit reached.\n");
375 return 0;
376 }
377
378 dev = get_urb_to_r8a66597_dev(r8a66597, urb);
379 if (dev && dev->state >= USB_STATE_ADDRESS)
380 return dev->address;
381
382 for (addr = 1; addr <= R8A66597_MAX_DEVICE; addr++) {
383 if (r8a66597->address_map & (1 << addr))
384 continue;
385
386 dev_dbg(&urb->dev->dev, "alloc_address: r8a66597_addr=%d\n", addr);
387 r8a66597->address_map |= 1 << addr;
388
389 if (make_r8a66597_device(r8a66597, urb, addr) < 0)
390 return 0;
391
392 return addr;
393 }
394
395 dev_err(&urb->dev->dev,
396 "cannot communicate with a USB device more than 10.(%x)\n",
397 r8a66597->address_map);
398
399 return 0;
400}
401
402/* this function must be called with interrupt disabled */
403static void free_usb_address(struct r8a66597 *r8a66597,
404 struct r8a66597_device *dev, int reset)
405{
406 int port;
407
408 if (!dev)
409 return;
410
411 dev_dbg(&dev->udev->dev, "free_addr: addr=%d\n", dev->address);
412
413 dev->state = USB_STATE_DEFAULT;
414 r8a66597->address_map &= ~(1 << dev->address);
415 dev->address = 0;
416 /*
417 * Only when resetting USB, it is necessary to erase drvdata. When
418 * a usb device with usb hub is disconnect, "dev->udev" is already
419 * freed on usb_desconnect(). So we cannot access the data.
420 */
421 if (reset)
422 dev_set_drvdata(&dev->udev->dev, NULL);
423 list_del(&dev->device_list);
424 kfree(dev);
425
426 for (port = 0; port < r8a66597->max_root_hub; port++) {
427 if (r8a66597->root_hub[port].dev == dev) {
428 r8a66597->root_hub[port].dev = NULL;
429 break;
430 }
431 }
432}
433
434static void r8a66597_reg_wait(struct r8a66597 *r8a66597, unsigned long reg,
435 u16 mask, u16 loop)
436{
437 u16 tmp;
438 int i = 0;
439
440 do {
441 tmp = r8a66597_read(r8a66597, reg);
442 if (i++ > 1000000) {
443 printk(KERN_ERR "r8a66597: register%lx, loop %x "
444 "is timeout\n", reg, loop);
445 break;
446 }
447 ndelay(1);
448 } while ((tmp & mask) != loop);
449}
450
451/* this function must be called with interrupt disabled */
452static void pipe_start(struct r8a66597 *r8a66597, struct r8a66597_pipe *pipe)
453{
454 u16 tmp;
455
456 tmp = r8a66597_read(r8a66597, pipe->pipectr) & PID;
457 if ((pipe->info.pipenum != 0) & ((tmp & PID_STALL) != 0)) /* stall? */
458 r8a66597_mdfy(r8a66597, PID_NAK, PID, pipe->pipectr);
459 r8a66597_mdfy(r8a66597, PID_BUF, PID, pipe->pipectr);
460}
461
462/* this function must be called with interrupt disabled */
463static void pipe_stop(struct r8a66597 *r8a66597, struct r8a66597_pipe *pipe)
464{
465 u16 tmp;
466
467 tmp = r8a66597_read(r8a66597, pipe->pipectr) & PID;
468 if ((tmp & PID_STALL11) != PID_STALL11) /* force stall? */
469 r8a66597_mdfy(r8a66597, PID_STALL, PID, pipe->pipectr);
470 r8a66597_mdfy(r8a66597, PID_NAK, PID, pipe->pipectr);
471 r8a66597_reg_wait(r8a66597, pipe->pipectr, PBUSY, 0);
472}
473
474/* this function must be called with interrupt disabled */
475static void clear_all_buffer(struct r8a66597 *r8a66597,
476 struct r8a66597_pipe *pipe)
477{
478 u16 tmp;
479
480 if (!pipe || pipe->info.pipenum == 0)
481 return;
482
483 pipe_stop(r8a66597, pipe);
484 r8a66597_bset(r8a66597, ACLRM, pipe->pipectr);
485 tmp = r8a66597_read(r8a66597, pipe->pipectr);
486 tmp = r8a66597_read(r8a66597, pipe->pipectr);
487 tmp = r8a66597_read(r8a66597, pipe->pipectr);
488 r8a66597_bclr(r8a66597, ACLRM, pipe->pipectr);
489}
490
491/* this function must be called with interrupt disabled */
492static void r8a66597_pipe_toggle(struct r8a66597 *r8a66597,
493 struct r8a66597_pipe *pipe, int toggle)
494{
495 if (toggle)
496 r8a66597_bset(r8a66597, SQSET, pipe->pipectr);
497 else
498 r8a66597_bset(r8a66597, SQCLR, pipe->pipectr);
499}
500
501static inline unsigned short mbw_value(struct r8a66597 *r8a66597)
502{
503 if (r8a66597->pdata->on_chip)
504 return MBW_32;
505 else
506 return MBW_16;
507}
508
509/* this function must be called with interrupt disabled */
510static inline void cfifo_change(struct r8a66597 *r8a66597, u16 pipenum)
511{
512 unsigned short mbw = mbw_value(r8a66597);
513
514 r8a66597_mdfy(r8a66597, mbw | pipenum, mbw | CURPIPE, CFIFOSEL);
515 r8a66597_reg_wait(r8a66597, CFIFOSEL, CURPIPE, pipenum);
516}
517
518/* this function must be called with interrupt disabled */
519static inline void fifo_change_from_pipe(struct r8a66597 *r8a66597,
520 struct r8a66597_pipe *pipe)
521{
522 unsigned short mbw = mbw_value(r8a66597);
523
524 cfifo_change(r8a66597, 0);
525 r8a66597_mdfy(r8a66597, mbw | 0, mbw | CURPIPE, D0FIFOSEL);
526 r8a66597_mdfy(r8a66597, mbw | 0, mbw | CURPIPE, D1FIFOSEL);
527
528 r8a66597_mdfy(r8a66597, mbw | pipe->info.pipenum, mbw | CURPIPE,
529 pipe->fifosel);
530 r8a66597_reg_wait(r8a66597, pipe->fifosel, CURPIPE, pipe->info.pipenum);
531}
532
533static u16 r8a66597_get_pipenum(struct urb *urb, struct usb_host_endpoint *hep)
534{
535 struct r8a66597_pipe *pipe = hep->hcpriv;
536
537 if (usb_pipeendpoint(urb->pipe) == 0)
538 return 0;
539 else
540 return pipe->info.pipenum;
541}
542
543static u16 get_urb_to_r8a66597_addr(struct r8a66597 *r8a66597, struct urb *urb)
544{
545 struct r8a66597_device *dev = get_urb_to_r8a66597_dev(r8a66597, urb);
546
547 return (usb_pipedevice(urb->pipe) == 0) ? 0 : dev->address;
548}
549
550static unsigned short *get_toggle_pointer(struct r8a66597_device *dev,
551 int urb_pipe)
552{
553 if (!dev)
554 return NULL;
555
556 return usb_pipein(urb_pipe) ? &dev->ep_in_toggle : &dev->ep_out_toggle;
557}
558
559/* this function must be called with interrupt disabled */
560static void pipe_toggle_set(struct r8a66597 *r8a66597,
561 struct r8a66597_pipe *pipe,
562 struct urb *urb, int set)
563{
564 struct r8a66597_device *dev = get_urb_to_r8a66597_dev(r8a66597, urb);
565 unsigned char endpoint = usb_pipeendpoint(urb->pipe);
566 unsigned short *toggle = get_toggle_pointer(dev, urb->pipe);
567
568 if (!toggle)
569 return;
570
571 if (set)
572 *toggle |= 1 << endpoint;
573 else
574 *toggle &= ~(1 << endpoint);
575}
576
577/* this function must be called with interrupt disabled */
578static void pipe_toggle_save(struct r8a66597 *r8a66597,
579 struct r8a66597_pipe *pipe,
580 struct urb *urb)
581{
582 if (r8a66597_read(r8a66597, pipe->pipectr) & SQMON)
583 pipe_toggle_set(r8a66597, pipe, urb, 1);
584 else
585 pipe_toggle_set(r8a66597, pipe, urb, 0);
586}
587
588/* this function must be called with interrupt disabled */
589static void pipe_toggle_restore(struct r8a66597 *r8a66597,
590 struct r8a66597_pipe *pipe,
591 struct urb *urb)
592{
593 struct r8a66597_device *dev = get_urb_to_r8a66597_dev(r8a66597, urb);
594 unsigned char endpoint = usb_pipeendpoint(urb->pipe);
595 unsigned short *toggle = get_toggle_pointer(dev, urb->pipe);
596
597 if (!toggle)
598 return;
599
600 r8a66597_pipe_toggle(r8a66597, pipe, *toggle & (1 << endpoint));
601}
602
603/* this function must be called with interrupt disabled */
604static void pipe_buffer_setting(struct r8a66597 *r8a66597,
605 struct r8a66597_pipe_info *info)
606{
607 u16 val = 0;
608
609 if (info->pipenum == 0)
610 return;
611
612 r8a66597_bset(r8a66597, ACLRM, get_pipectr_addr(info->pipenum));
613 r8a66597_bclr(r8a66597, ACLRM, get_pipectr_addr(info->pipenum));
614 r8a66597_write(r8a66597, info->pipenum, PIPESEL);
615 if (!info->dir_in)
616 val |= R8A66597_DIR;
617 if (info->type == R8A66597_BULK && info->dir_in)
618 val |= R8A66597_DBLB | R8A66597_SHTNAK;
619 val |= info->type | info->epnum;
620 r8a66597_write(r8a66597, val, PIPECFG);
621
622 r8a66597_write(r8a66597, (info->buf_bsize << 10) | (info->bufnum),
623 PIPEBUF);
624 r8a66597_write(r8a66597, make_devsel(info->address) | info->maxpacket,
625 PIPEMAXP);
626 r8a66597_write(r8a66597, info->interval, PIPEPERI);
627}
628
629/* this function must be called with interrupt disabled */
630static void pipe_setting(struct r8a66597 *r8a66597, struct r8a66597_td *td)
631{
632 struct r8a66597_pipe_info *info;
633 struct urb *urb = td->urb;
634
635 if (td->pipenum > 0) {
636 info = &td->pipe->info;
637 cfifo_change(r8a66597, 0);
638 pipe_buffer_setting(r8a66597, info);
639
640 if (!usb_gettoggle(urb->dev, usb_pipeendpoint(urb->pipe),
641 usb_pipeout(urb->pipe)) &&
642 !usb_pipecontrol(urb->pipe)) {
643 r8a66597_pipe_toggle(r8a66597, td->pipe, 0);
644 pipe_toggle_set(r8a66597, td->pipe, urb, 0);
645 clear_all_buffer(r8a66597, td->pipe);
646 usb_settoggle(urb->dev, usb_pipeendpoint(urb->pipe),
647 usb_pipeout(urb->pipe), 1);
648 }
649 pipe_toggle_restore(r8a66597, td->pipe, urb);
650 }
651}
652
653/* this function must be called with interrupt disabled */
654static u16 get_empty_pipenum(struct r8a66597 *r8a66597,
655 struct usb_endpoint_descriptor *ep)
656{
657 u16 array[R8A66597_MAX_NUM_PIPE], i = 0, min;
658
659 memset(array, 0, sizeof(array));
660 switch (usb_endpoint_type(ep)) {
661 case USB_ENDPOINT_XFER_BULK:
662 if (usb_endpoint_dir_in(ep))
663 array[i++] = 4;
664 else {
665 array[i++] = 3;
666 array[i++] = 5;
667 }
668 break;
669 case USB_ENDPOINT_XFER_INT:
670 if (usb_endpoint_dir_in(ep)) {
671 array[i++] = 6;
672 array[i++] = 7;
673 array[i++] = 8;
674 } else
675 array[i++] = 9;
676 break;
677 case USB_ENDPOINT_XFER_ISOC:
678 if (usb_endpoint_dir_in(ep))
679 array[i++] = 2;
680 else
681 array[i++] = 1;
682 break;
683 default:
684 printk(KERN_ERR "r8a66597: Illegal type\n");
685 return 0;
686 }
687
688 i = 1;
689 min = array[0];
690 while (array[i] != 0) {
691 if (r8a66597->pipe_cnt[min] > r8a66597->pipe_cnt[array[i]])
692 min = array[i];
693 i++;
694 }
695
696 return min;
697}
698
699static u16 get_r8a66597_type(__u8 type)
700{
701 u16 r8a66597_type;
702
703 switch (type) {
704 case USB_ENDPOINT_XFER_BULK:
705 r8a66597_type = R8A66597_BULK;
706 break;
707 case USB_ENDPOINT_XFER_INT:
708 r8a66597_type = R8A66597_INT;
709 break;
710 case USB_ENDPOINT_XFER_ISOC:
711 r8a66597_type = R8A66597_ISO;
712 break;
713 default:
714 printk(KERN_ERR "r8a66597: Illegal type\n");
715 r8a66597_type = 0x0000;
716 break;
717 }
718
719 return r8a66597_type;
720}
721
722static u16 get_bufnum(u16 pipenum)
723{
724 u16 bufnum = 0;
725
726 if (pipenum == 0)
727 bufnum = 0;
728 else if (check_bulk_or_isoc(pipenum))
729 bufnum = 8 + (pipenum - 1) * R8A66597_BUF_BSIZE*2;
730 else if (check_interrupt(pipenum))
731 bufnum = 4 + (pipenum - 6);
732 else
733 printk(KERN_ERR "r8a66597: Illegal pipenum (%d)\n", pipenum);
734
735 return bufnum;
736}
737
738static u16 get_buf_bsize(u16 pipenum)
739{
740 u16 buf_bsize = 0;
741
742 if (pipenum == 0)
743 buf_bsize = 3;
744 else if (check_bulk_or_isoc(pipenum))
745 buf_bsize = R8A66597_BUF_BSIZE - 1;
746 else if (check_interrupt(pipenum))
747 buf_bsize = 0;
748 else
749 printk(KERN_ERR "r8a66597: Illegal pipenum (%d)\n", pipenum);
750
751 return buf_bsize;
752}
753
754/* this function must be called with interrupt disabled */
755static void enable_r8a66597_pipe_dma(struct r8a66597 *r8a66597,
756 struct r8a66597_device *dev,
757 struct r8a66597_pipe *pipe,
758 struct urb *urb)
759{
760 int i;
761 struct r8a66597_pipe_info *info = &pipe->info;
762 unsigned short mbw = mbw_value(r8a66597);
763
764 /* pipe dma is only for external controlles */
765 if (r8a66597->pdata->on_chip)
766 return;
767
768 if ((pipe->info.pipenum != 0) && (info->type != R8A66597_INT)) {
769 for (i = 0; i < R8A66597_MAX_DMA_CHANNEL; i++) {
770 if ((r8a66597->dma_map & (1 << i)) != 0)
771 continue;
772
773 dev_info(&dev->udev->dev,
774 "address %d, EndpointAddress 0x%02x use "
775 "DMA FIFO\n", usb_pipedevice(urb->pipe),
776 info->dir_in ?
777 USB_ENDPOINT_DIR_MASK + info->epnum
778 : info->epnum);
779
780 r8a66597->dma_map |= 1 << i;
781 dev->dma_map |= 1 << i;
782 set_pipe_reg_addr(pipe, i);
783
784 cfifo_change(r8a66597, 0);
785 r8a66597_mdfy(r8a66597, mbw | pipe->info.pipenum,
786 mbw | CURPIPE, pipe->fifosel);
787
788 r8a66597_reg_wait(r8a66597, pipe->fifosel, CURPIPE,
789 pipe->info.pipenum);
790 r8a66597_bset(r8a66597, BCLR, pipe->fifoctr);
791 break;
792 }
793 }
794}
795
796/* this function must be called with interrupt disabled */
797static void enable_r8a66597_pipe(struct r8a66597 *r8a66597, struct urb *urb,
798 struct usb_host_endpoint *hep,
799 struct r8a66597_pipe_info *info)
800{
801 struct r8a66597_device *dev = get_urb_to_r8a66597_dev(r8a66597, urb);
802 struct r8a66597_pipe *pipe = hep->hcpriv;
803
804 dev_dbg(&dev->udev->dev, "enable_pipe:\n");
805
806 pipe->info = *info;
807 set_pipe_reg_addr(pipe, R8A66597_PIPE_NO_DMA);
808 r8a66597->pipe_cnt[pipe->info.pipenum]++;
809 dev->pipe_cnt[pipe->info.pipenum]++;
810
811 enable_r8a66597_pipe_dma(r8a66597, dev, pipe, urb);
812}
813
814static void r8a66597_urb_done(struct r8a66597 *r8a66597, struct urb *urb,
815 int status)
816__releases(r8a66597->lock)
817__acquires(r8a66597->lock)
818{
819 if (usb_pipein(urb->pipe) && usb_pipetype(urb->pipe) != PIPE_CONTROL) {
820 void *ptr;
821
822 for (ptr = urb->transfer_buffer;
823 ptr < urb->transfer_buffer + urb->transfer_buffer_length;
824 ptr += PAGE_SIZE)
825 flush_dcache_page(virt_to_page(ptr));
826 }
827
828 usb_hcd_unlink_urb_from_ep(r8a66597_to_hcd(r8a66597), urb);
829 spin_unlock(&r8a66597->lock);
830 usb_hcd_giveback_urb(r8a66597_to_hcd(r8a66597), urb, status);
831 spin_lock(&r8a66597->lock);
832}
833
834/* this function must be called with interrupt disabled */
835static void force_dequeue(struct r8a66597 *r8a66597, u16 pipenum, u16 address)
836{
837 struct r8a66597_td *td, *next;
838 struct urb *urb;
839 struct list_head *list = &r8a66597->pipe_queue[pipenum];
840
841 if (list_empty(list))
842 return;
843
844 list_for_each_entry_safe(td, next, list, queue) {
845 if (td->address != address)
846 continue;
847
848 urb = td->urb;
849 list_del(&td->queue);
850 kfree(td);
851
852 if (urb)
853 r8a66597_urb_done(r8a66597, urb, -ENODEV);
854
855 break;
856 }
857}
858
859/* this function must be called with interrupt disabled */
860static void disable_r8a66597_pipe_all(struct r8a66597 *r8a66597,
861 struct r8a66597_device *dev)
862{
863 int check_ep0 = 0;
864 u16 pipenum;
865
866 if (!dev)
867 return;
868
869 for (pipenum = 1; pipenum < R8A66597_MAX_NUM_PIPE; pipenum++) {
870 if (!dev->pipe_cnt[pipenum])
871 continue;
872
873 if (!check_ep0) {
874 check_ep0 = 1;
875 force_dequeue(r8a66597, 0, dev->address);
876 }
877
878 r8a66597->pipe_cnt[pipenum] -= dev->pipe_cnt[pipenum];
879 dev->pipe_cnt[pipenum] = 0;
880 force_dequeue(r8a66597, pipenum, dev->address);
881 }
882
883 dev_dbg(&dev->udev->dev, "disable_pipe\n");
884
885 r8a66597->dma_map &= ~(dev->dma_map);
886 dev->dma_map = 0;
887}
888
889static u16 get_interval(struct urb *urb, __u8 interval)
890{
891 u16 time = 1;
892 int i;
893
894 if (urb->dev->speed == USB_SPEED_HIGH) {
895 if (interval > IITV)
896 time = IITV;
897 else
898 time = interval ? interval - 1 : 0;
899 } else {
900 if (interval > 128) {
901 time = IITV;
902 } else {
903 /* calculate the nearest value for PIPEPERI */
904 for (i = 0; i < 7; i++) {
905 if ((1 << i) < interval &&
906 (1 << (i + 1) > interval))
907 time = 1 << i;
908 }
909 }
910 }
911
912 return time;
913}
914
915static unsigned long get_timer_interval(struct urb *urb, __u8 interval)
916{
917 __u8 i;
918 unsigned long time = 1;
919
920 if (usb_pipeisoc(urb->pipe))
921 return 0;
922
923 if (get_r8a66597_usb_speed(urb->dev->speed) == HSMODE) {
924 for (i = 0; i < (interval - 1); i++)
925 time *= 2;
926 time = time * 125 / 1000; /* uSOF -> msec */
927 } else {
928 time = interval;
929 }
930
931 return time;
932}
933
934/* this function must be called with interrupt disabled */
935static void init_pipe_info(struct r8a66597 *r8a66597, struct urb *urb,
936 struct usb_host_endpoint *hep,
937 struct usb_endpoint_descriptor *ep)
938{
939 struct r8a66597_pipe_info info;
940
941 info.pipenum = get_empty_pipenum(r8a66597, ep);
942 info.address = get_urb_to_r8a66597_addr(r8a66597, urb);
943 info.epnum = usb_endpoint_num(ep);
944 info.maxpacket = usb_endpoint_maxp(ep);
945 info.type = get_r8a66597_type(usb_endpoint_type(ep));
946 info.bufnum = get_bufnum(info.pipenum);
947 info.buf_bsize = get_buf_bsize(info.pipenum);
948 if (info.type == R8A66597_BULK) {
949 info.interval = 0;
950 info.timer_interval = 0;
951 } else {
952 info.interval = get_interval(urb, ep->bInterval);
953 info.timer_interval = get_timer_interval(urb, ep->bInterval);
954 }
955 if (usb_endpoint_dir_in(ep))
956 info.dir_in = 1;
957 else
958 info.dir_in = 0;
959
960 enable_r8a66597_pipe(r8a66597, urb, hep, &info);
961}
962
963static void init_pipe_config(struct r8a66597 *r8a66597, struct urb *urb)
964{
965 struct r8a66597_device *dev;
966
967 dev = get_urb_to_r8a66597_dev(r8a66597, urb);
968 dev->state = USB_STATE_CONFIGURED;
969}
970
971static void pipe_irq_enable(struct r8a66597 *r8a66597, struct urb *urb,
972 u16 pipenum)
973{
974 if (pipenum == 0 && usb_pipeout(urb->pipe))
975 enable_irq_empty(r8a66597, pipenum);
976 else
977 enable_irq_ready(r8a66597, pipenum);
978
979 if (!usb_pipeisoc(urb->pipe))
980 enable_irq_nrdy(r8a66597, pipenum);
981}
982
983static void pipe_irq_disable(struct r8a66597 *r8a66597, u16 pipenum)
984{
985 disable_irq_ready(r8a66597, pipenum);
986 disable_irq_nrdy(r8a66597, pipenum);
987}
988
989static void r8a66597_root_hub_start_polling(struct r8a66597 *r8a66597)
990{
991 mod_timer(&r8a66597->rh_timer,
992 jiffies + msecs_to_jiffies(R8A66597_RH_POLL_TIME));
993}
994
995static void start_root_hub_sampling(struct r8a66597 *r8a66597, int port,
996 int connect)
997{
998 struct r8a66597_root_hub *rh = &r8a66597->root_hub[port];
999
1000 rh->old_syssts = r8a66597_read(r8a66597, get_syssts_reg(port)) & LNST;
1001 rh->scount = R8A66597_MAX_SAMPLING;
1002 if (connect)
1003 rh->port |= USB_PORT_STAT_CONNECTION;
1004 else
1005 rh->port &= ~USB_PORT_STAT_CONNECTION;
1006 rh->port |= USB_PORT_STAT_C_CONNECTION << 16;
1007
1008 r8a66597_root_hub_start_polling(r8a66597);
1009}
1010
1011/* this function must be called with interrupt disabled */
1012static void r8a66597_check_syssts(struct r8a66597 *r8a66597, int port,
1013 u16 syssts)
1014__releases(r8a66597->lock)
1015__acquires(r8a66597->lock)
1016{
1017 if (syssts == SE0) {
1018 r8a66597_write(r8a66597, ~ATTCH, get_intsts_reg(port));
1019 r8a66597_bset(r8a66597, ATTCHE, get_intenb_reg(port));
1020 } else {
1021 if (syssts == FS_JSTS)
1022 r8a66597_bset(r8a66597, HSE, get_syscfg_reg(port));
1023 else if (syssts == LS_JSTS)
1024 r8a66597_bclr(r8a66597, HSE, get_syscfg_reg(port));
1025
1026 r8a66597_write(r8a66597, ~DTCH, get_intsts_reg(port));
1027 r8a66597_bset(r8a66597, DTCHE, get_intenb_reg(port));
1028
1029 if (r8a66597->bus_suspended)
1030 usb_hcd_resume_root_hub(r8a66597_to_hcd(r8a66597));
1031 }
1032
1033 spin_unlock(&r8a66597->lock);
1034 usb_hcd_poll_rh_status(r8a66597_to_hcd(r8a66597));
1035 spin_lock(&r8a66597->lock);
1036}
1037
1038/* this function must be called with interrupt disabled */
1039static void r8a66597_usb_connect(struct r8a66597 *r8a66597, int port)
1040{
1041 u16 speed = get_rh_usb_speed(r8a66597, port);
1042 struct r8a66597_root_hub *rh = &r8a66597->root_hub[port];
1043
1044 rh->port &= ~(USB_PORT_STAT_HIGH_SPEED | USB_PORT_STAT_LOW_SPEED);
1045 if (speed == HSMODE)
1046 rh->port |= USB_PORT_STAT_HIGH_SPEED;
1047 else if (speed == LSMODE)
1048 rh->port |= USB_PORT_STAT_LOW_SPEED;
1049
1050 rh->port &= ~USB_PORT_STAT_RESET;
1051 rh->port |= USB_PORT_STAT_ENABLE;
1052}
1053
1054/* this function must be called with interrupt disabled */
1055static void r8a66597_usb_disconnect(struct r8a66597 *r8a66597, int port)
1056{
1057 struct r8a66597_device *dev = r8a66597->root_hub[port].dev;
1058
1059 disable_r8a66597_pipe_all(r8a66597, dev);
1060 free_usb_address(r8a66597, dev, 0);
1061
1062 start_root_hub_sampling(r8a66597, port, 0);
1063}
1064
1065/* this function must be called with interrupt disabled */
1066static void prepare_setup_packet(struct r8a66597 *r8a66597,
1067 struct r8a66597_td *td)
1068{
1069 int i;
1070 __le16 *p = (__le16 *)td->urb->setup_packet;
1071 unsigned long setup_addr = USBREQ;
1072
1073 r8a66597_write(r8a66597, make_devsel(td->address) | td->maxpacket,
1074 DCPMAXP);
1075 r8a66597_write(r8a66597, ~(SIGN | SACK), INTSTS1);
1076
1077 for (i = 0; i < 4; i++) {
1078 r8a66597_write(r8a66597, le16_to_cpu(p[i]), setup_addr);
1079 setup_addr += 2;
1080 }
1081 r8a66597_write(r8a66597, SUREQ, DCPCTR);
1082}
1083
1084/* this function must be called with interrupt disabled */
1085static void prepare_packet_read(struct r8a66597 *r8a66597,
1086 struct r8a66597_td *td)
1087{
1088 struct urb *urb = td->urb;
1089
1090 if (usb_pipecontrol(urb->pipe)) {
1091 r8a66597_bclr(r8a66597, R8A66597_DIR, DCPCFG);
1092 r8a66597_mdfy(r8a66597, 0, ISEL | CURPIPE, CFIFOSEL);
1093 r8a66597_reg_wait(r8a66597, CFIFOSEL, CURPIPE, 0);
1094 if (urb->actual_length == 0) {
1095 r8a66597_pipe_toggle(r8a66597, td->pipe, 1);
1096 r8a66597_write(r8a66597, BCLR, CFIFOCTR);
1097 }
1098 pipe_irq_disable(r8a66597, td->pipenum);
1099 pipe_start(r8a66597, td->pipe);
1100 pipe_irq_enable(r8a66597, urb, td->pipenum);
1101 } else {
1102 if (urb->actual_length == 0) {
1103 pipe_irq_disable(r8a66597, td->pipenum);
1104 pipe_setting(r8a66597, td);
1105 pipe_stop(r8a66597, td->pipe);
1106 r8a66597_write(r8a66597, ~(1 << td->pipenum), BRDYSTS);
1107
1108 if (td->pipe->pipetre) {
1109 r8a66597_write(r8a66597, TRCLR,
1110 td->pipe->pipetre);
1111 r8a66597_write(r8a66597,
1112 DIV_ROUND_UP
1113 (urb->transfer_buffer_length,
1114 td->maxpacket),
1115 td->pipe->pipetrn);
1116 r8a66597_bset(r8a66597, TRENB,
1117 td->pipe->pipetre);
1118 }
1119
1120 pipe_start(r8a66597, td->pipe);
1121 pipe_irq_enable(r8a66597, urb, td->pipenum);
1122 }
1123 }
1124}
1125
1126/* this function must be called with interrupt disabled */
1127static void prepare_packet_write(struct r8a66597 *r8a66597,
1128 struct r8a66597_td *td)
1129{
1130 u16 tmp;
1131 struct urb *urb = td->urb;
1132
1133 if (usb_pipecontrol(urb->pipe)) {
1134 pipe_stop(r8a66597, td->pipe);
1135 r8a66597_bset(r8a66597, R8A66597_DIR, DCPCFG);
1136 r8a66597_mdfy(r8a66597, ISEL, ISEL | CURPIPE, CFIFOSEL);
1137 r8a66597_reg_wait(r8a66597, CFIFOSEL, CURPIPE, 0);
1138 if (urb->actual_length == 0) {
1139 r8a66597_pipe_toggle(r8a66597, td->pipe, 1);
1140 r8a66597_write(r8a66597, BCLR, CFIFOCTR);
1141 }
1142 } else {
1143 if (urb->actual_length == 0)
1144 pipe_setting(r8a66597, td);
1145 if (td->pipe->pipetre)
1146 r8a66597_bclr(r8a66597, TRENB, td->pipe->pipetre);
1147 }
1148 r8a66597_write(r8a66597, ~(1 << td->pipenum), BRDYSTS);
1149
1150 fifo_change_from_pipe(r8a66597, td->pipe);
1151 tmp = r8a66597_read(r8a66597, td->pipe->fifoctr);
1152 if (unlikely((tmp & FRDY) == 0))
1153 pipe_irq_enable(r8a66597, urb, td->pipenum);
1154 else
1155 packet_write(r8a66597, td->pipenum);
1156 pipe_start(r8a66597, td->pipe);
1157}
1158
1159/* this function must be called with interrupt disabled */
1160static void prepare_status_packet(struct r8a66597 *r8a66597,
1161 struct r8a66597_td *td)
1162{
1163 struct urb *urb = td->urb;
1164
1165 r8a66597_pipe_toggle(r8a66597, td->pipe, 1);
1166 pipe_stop(r8a66597, td->pipe);
1167
1168 if (urb->setup_packet[0] & USB_ENDPOINT_DIR_MASK) {
1169 r8a66597_bset(r8a66597, R8A66597_DIR, DCPCFG);
1170 r8a66597_mdfy(r8a66597, ISEL, ISEL | CURPIPE, CFIFOSEL);
1171 r8a66597_reg_wait(r8a66597, CFIFOSEL, CURPIPE, 0);
1172 r8a66597_write(r8a66597, ~BEMP0, BEMPSTS);
1173 r8a66597_write(r8a66597, BCLR | BVAL, CFIFOCTR);
1174 enable_irq_empty(r8a66597, 0);
1175 } else {
1176 r8a66597_bclr(r8a66597, R8A66597_DIR, DCPCFG);
1177 r8a66597_mdfy(r8a66597, 0, ISEL | CURPIPE, CFIFOSEL);
1178 r8a66597_reg_wait(r8a66597, CFIFOSEL, CURPIPE, 0);
1179 r8a66597_write(r8a66597, BCLR, CFIFOCTR);
1180 enable_irq_ready(r8a66597, 0);
1181 }
1182 enable_irq_nrdy(r8a66597, 0);
1183 pipe_start(r8a66597, td->pipe);
1184}
1185
1186static int is_set_address(unsigned char *setup_packet)
1187{
1188 if (((setup_packet[0] & USB_TYPE_MASK) == USB_TYPE_STANDARD) &&
1189 setup_packet[1] == USB_REQ_SET_ADDRESS)
1190 return 1;
1191 else
1192 return 0;
1193}
1194
1195/* this function must be called with interrupt disabled */
1196static int start_transfer(struct r8a66597 *r8a66597, struct r8a66597_td *td)
1197{
1198 BUG_ON(!td);
1199
1200 switch (td->type) {
1201 case USB_PID_SETUP:
1202 if (is_set_address(td->urb->setup_packet)) {
1203 td->set_address = 1;
1204 td->urb->setup_packet[2] = alloc_usb_address(r8a66597,
1205 td->urb);
1206 if (td->urb->setup_packet[2] == 0)
1207 return -EPIPE;
1208 }
1209 prepare_setup_packet(r8a66597, td);
1210 break;
1211 case USB_PID_IN:
1212 prepare_packet_read(r8a66597, td);
1213 break;
1214 case USB_PID_OUT:
1215 prepare_packet_write(r8a66597, td);
1216 break;
1217 case USB_PID_ACK:
1218 prepare_status_packet(r8a66597, td);
1219 break;
1220 default:
1221 printk(KERN_ERR "r8a66597: invalid type.\n");
1222 break;
1223 }
1224
1225 return 0;
1226}
1227
1228static int check_transfer_finish(struct r8a66597_td *td, struct urb *urb)
1229{
1230 if (usb_pipeisoc(urb->pipe)) {
1231 if (urb->number_of_packets == td->iso_cnt)
1232 return 1;
1233 }
1234
1235 /* control or bulk or interrupt */
1236 if ((urb->transfer_buffer_length <= urb->actual_length) ||
1237 (td->short_packet) || (td->zero_packet))
1238 return 1;
1239
1240 return 0;
1241}
1242
1243/* this function must be called with interrupt disabled */
1244static void set_td_timer(struct r8a66597 *r8a66597, struct r8a66597_td *td)
1245{
1246 unsigned long time;
1247
1248 BUG_ON(!td);
1249
1250 if (!list_empty(&r8a66597->pipe_queue[td->pipenum]) &&
1251 !usb_pipecontrol(td->urb->pipe) && usb_pipein(td->urb->pipe)) {
1252 r8a66597->timeout_map |= 1 << td->pipenum;
1253 switch (usb_pipetype(td->urb->pipe)) {
1254 case PIPE_INTERRUPT:
1255 case PIPE_ISOCHRONOUS:
1256 time = 30;
1257 break;
1258 default:
1259 time = 50;
1260 break;
1261 }
1262
1263 mod_timer(&r8a66597->timers[td->pipenum].td,
1264 jiffies + msecs_to_jiffies(time));
1265 }
1266}
1267
1268/* this function must be called with interrupt disabled */
1269static void finish_request(struct r8a66597 *r8a66597, struct r8a66597_td *td,
1270 u16 pipenum, struct urb *urb, int status)
1271__releases(r8a66597->lock) __acquires(r8a66597->lock)
1272{
1273 int restart = 0;
1274 struct usb_hcd *hcd = r8a66597_to_hcd(r8a66597);
1275
1276 r8a66597->timeout_map &= ~(1 << pipenum);
1277
1278 if (likely(td)) {
1279 if (td->set_address && (status != 0 || urb->unlinked))
1280 r8a66597->address_map &= ~(1 << urb->setup_packet[2]);
1281
1282 pipe_toggle_save(r8a66597, td->pipe, urb);
1283 list_del(&td->queue);
1284 kfree(td);
1285 }
1286
1287 if (!list_empty(&r8a66597->pipe_queue[pipenum]))
1288 restart = 1;
1289
1290 if (likely(urb)) {
1291 if (usb_pipeisoc(urb->pipe))
1292 urb->start_frame = r8a66597_get_frame(hcd);
1293
1294 r8a66597_urb_done(r8a66597, urb, status);
1295 }
1296
1297 if (restart) {
1298 td = r8a66597_get_td(r8a66597, pipenum);
1299 if (unlikely(!td))
1300 return;
1301
1302 start_transfer(r8a66597, td);
1303 set_td_timer(r8a66597, td);
1304 }
1305}
1306
1307static void packet_read(struct r8a66597 *r8a66597, u16 pipenum)
1308{
1309 u16 tmp;
1310 int rcv_len, bufsize, urb_len, size;
1311 u16 *buf;
1312 struct r8a66597_td *td = r8a66597_get_td(r8a66597, pipenum);
1313 struct urb *urb;
1314 int finish = 0;
1315 int status = 0;
1316
1317 if (unlikely(!td))
1318 return;
1319 urb = td->urb;
1320
1321 fifo_change_from_pipe(r8a66597, td->pipe);
1322 tmp = r8a66597_read(r8a66597, td->pipe->fifoctr);
1323 if (unlikely((tmp & FRDY) == 0)) {
1324 pipe_stop(r8a66597, td->pipe);
1325 pipe_irq_disable(r8a66597, pipenum);
1326 printk(KERN_ERR "r8a66597: in fifo not ready (%d)\n", pipenum);
1327 finish_request(r8a66597, td, pipenum, td->urb, -EPIPE);
1328 return;
1329 }
1330
1331 /* prepare parameters */
1332 rcv_len = tmp & DTLN;
1333 if (usb_pipeisoc(urb->pipe)) {
1334 buf = (u16 *)(urb->transfer_buffer +
1335 urb->iso_frame_desc[td->iso_cnt].offset);
1336 urb_len = urb->iso_frame_desc[td->iso_cnt].length;
1337 } else {
1338 buf = (void *)urb->transfer_buffer + urb->actual_length;
1339 urb_len = urb->transfer_buffer_length - urb->actual_length;
1340 }
1341 bufsize = min(urb_len, (int) td->maxpacket);
1342 if (rcv_len <= bufsize) {
1343 size = rcv_len;
1344 } else {
1345 size = bufsize;
1346 status = -EOVERFLOW;
1347 finish = 1;
1348 }
1349
1350 /* update parameters */
1351 urb->actual_length += size;
1352 if (rcv_len == 0)
1353 td->zero_packet = 1;
1354 if (rcv_len < bufsize) {
1355 td->short_packet = 1;
1356 }
1357 if (usb_pipeisoc(urb->pipe)) {
1358 urb->iso_frame_desc[td->iso_cnt].actual_length = size;
1359 urb->iso_frame_desc[td->iso_cnt].status = status;
1360 td->iso_cnt++;
1361 finish = 0;
1362 }
1363
1364 /* check transfer finish */
1365 if (finish || check_transfer_finish(td, urb)) {
1366 pipe_stop(r8a66597, td->pipe);
1367 pipe_irq_disable(r8a66597, pipenum);
1368 finish = 1;
1369 }
1370
1371 /* read fifo */
1372 if (urb->transfer_buffer) {
1373 if (size == 0)
1374 r8a66597_write(r8a66597, BCLR, td->pipe->fifoctr);
1375 else
1376 r8a66597_read_fifo(r8a66597, td->pipe->fifoaddr,
1377 buf, size);
1378 }
1379
1380 if (finish && pipenum != 0)
1381 finish_request(r8a66597, td, pipenum, urb, status);
1382}
1383
1384static void packet_write(struct r8a66597 *r8a66597, u16 pipenum)
1385{
1386 u16 tmp;
1387 int bufsize, size;
1388 u16 *buf;
1389 struct r8a66597_td *td = r8a66597_get_td(r8a66597, pipenum);
1390 struct urb *urb;
1391
1392 if (unlikely(!td))
1393 return;
1394 urb = td->urb;
1395
1396 fifo_change_from_pipe(r8a66597, td->pipe);
1397 tmp = r8a66597_read(r8a66597, td->pipe->fifoctr);
1398 if (unlikely((tmp & FRDY) == 0)) {
1399 pipe_stop(r8a66597, td->pipe);
1400 pipe_irq_disable(r8a66597, pipenum);
1401 printk(KERN_ERR "r8a66597: out fifo not ready (%d)\n", pipenum);
1402 finish_request(r8a66597, td, pipenum, urb, -EPIPE);
1403 return;
1404 }
1405
1406 /* prepare parameters */
1407 bufsize = td->maxpacket;
1408 if (usb_pipeisoc(urb->pipe)) {
1409 buf = (u16 *)(urb->transfer_buffer +
1410 urb->iso_frame_desc[td->iso_cnt].offset);
1411 size = min(bufsize,
1412 (int)urb->iso_frame_desc[td->iso_cnt].length);
1413 } else {
1414 buf = (u16 *)(urb->transfer_buffer + urb->actual_length);
1415 size = min_t(u32, bufsize,
1416 urb->transfer_buffer_length - urb->actual_length);
1417 }
1418
1419 /* write fifo */
1420 if (pipenum > 0)
1421 r8a66597_write(r8a66597, ~(1 << pipenum), BEMPSTS);
1422 if (urb->transfer_buffer) {
1423 r8a66597_write_fifo(r8a66597, td->pipe, buf, size);
1424 if (!usb_pipebulk(urb->pipe) || td->maxpacket != size)
1425 r8a66597_write(r8a66597, BVAL, td->pipe->fifoctr);
1426 }
1427
1428 /* update parameters */
1429 urb->actual_length += size;
1430 if (usb_pipeisoc(urb->pipe)) {
1431 urb->iso_frame_desc[td->iso_cnt].actual_length = size;
1432 urb->iso_frame_desc[td->iso_cnt].status = 0;
1433 td->iso_cnt++;
1434 }
1435
1436 /* check transfer finish */
1437 if (check_transfer_finish(td, urb)) {
1438 disable_irq_ready(r8a66597, pipenum);
1439 enable_irq_empty(r8a66597, pipenum);
1440 if (!usb_pipeisoc(urb->pipe))
1441 enable_irq_nrdy(r8a66597, pipenum);
1442 } else
1443 pipe_irq_enable(r8a66597, urb, pipenum);
1444}
1445
1446
1447static void check_next_phase(struct r8a66597 *r8a66597, int status)
1448{
1449 struct r8a66597_td *td = r8a66597_get_td(r8a66597, 0);
1450 struct urb *urb;
1451 u8 finish = 0;
1452
1453 if (unlikely(!td))
1454 return;
1455 urb = td->urb;
1456
1457 switch (td->type) {
1458 case USB_PID_IN:
1459 case USB_PID_OUT:
1460 if (check_transfer_finish(td, urb))
1461 td->type = USB_PID_ACK;
1462 break;
1463 case USB_PID_SETUP:
1464 if (urb->transfer_buffer_length == urb->actual_length)
1465 td->type = USB_PID_ACK;
1466 else if (usb_pipeout(urb->pipe))
1467 td->type = USB_PID_OUT;
1468 else
1469 td->type = USB_PID_IN;
1470 break;
1471 case USB_PID_ACK:
1472 finish = 1;
1473 break;
1474 }
1475
1476 if (finish || status != 0 || urb->unlinked)
1477 finish_request(r8a66597, td, 0, urb, status);
1478 else
1479 start_transfer(r8a66597, td);
1480}
1481
1482static int get_urb_error(struct r8a66597 *r8a66597, u16 pipenum)
1483{
1484 struct r8a66597_td *td = r8a66597_get_td(r8a66597, pipenum);
1485
1486 if (td) {
1487 u16 pid = r8a66597_read(r8a66597, td->pipe->pipectr) & PID;
1488
1489 if (pid == PID_NAK)
1490 return -ECONNRESET;
1491 else
1492 return -EPIPE;
1493 }
1494 return 0;
1495}
1496
1497static void irq_pipe_ready(struct r8a66597 *r8a66597)
1498{
1499 u16 check;
1500 u16 pipenum;
1501 u16 mask;
1502 struct r8a66597_td *td;
1503
1504 mask = r8a66597_read(r8a66597, BRDYSTS)
1505 & r8a66597_read(r8a66597, BRDYENB);
1506 r8a66597_write(r8a66597, ~mask, BRDYSTS);
1507 if (mask & BRDY0) {
1508 td = r8a66597_get_td(r8a66597, 0);
1509 if (td && td->type == USB_PID_IN)
1510 packet_read(r8a66597, 0);
1511 else
1512 pipe_irq_disable(r8a66597, 0);
1513 check_next_phase(r8a66597, 0);
1514 }
1515
1516 for (pipenum = 1; pipenum < R8A66597_MAX_NUM_PIPE; pipenum++) {
1517 check = 1 << pipenum;
1518 if (mask & check) {
1519 td = r8a66597_get_td(r8a66597, pipenum);
1520 if (unlikely(!td))
1521 continue;
1522
1523 if (td->type == USB_PID_IN)
1524 packet_read(r8a66597, pipenum);
1525 else if (td->type == USB_PID_OUT)
1526 packet_write(r8a66597, pipenum);
1527 }
1528 }
1529}
1530
1531static void irq_pipe_empty(struct r8a66597 *r8a66597)
1532{
1533 u16 tmp;
1534 u16 check;
1535 u16 pipenum;
1536 u16 mask;
1537 struct r8a66597_td *td;
1538
1539 mask = r8a66597_read(r8a66597, BEMPSTS)
1540 & r8a66597_read(r8a66597, BEMPENB);
1541 r8a66597_write(r8a66597, ~mask, BEMPSTS);
1542 if (mask & BEMP0) {
1543 cfifo_change(r8a66597, 0);
1544 td = r8a66597_get_td(r8a66597, 0);
1545 if (td && td->type != USB_PID_OUT)
1546 disable_irq_empty(r8a66597, 0);
1547 check_next_phase(r8a66597, 0);
1548 }
1549
1550 for (pipenum = 1; pipenum < R8A66597_MAX_NUM_PIPE; pipenum++) {
1551 check = 1 << pipenum;
1552 if (mask & check) {
1553 struct r8a66597_td *td;
1554 td = r8a66597_get_td(r8a66597, pipenum);
1555 if (unlikely(!td))
1556 continue;
1557
1558 tmp = r8a66597_read(r8a66597, td->pipe->pipectr);
1559 if ((tmp & INBUFM) == 0) {
1560 disable_irq_empty(r8a66597, pipenum);
1561 pipe_irq_disable(r8a66597, pipenum);
1562 finish_request(r8a66597, td, pipenum, td->urb,
1563 0);
1564 }
1565 }
1566 }
1567}
1568
1569static void irq_pipe_nrdy(struct r8a66597 *r8a66597)
1570{
1571 u16 check;
1572 u16 pipenum;
1573 u16 mask;
1574 int status;
1575
1576 mask = r8a66597_read(r8a66597, NRDYSTS)
1577 & r8a66597_read(r8a66597, NRDYENB);
1578 r8a66597_write(r8a66597, ~mask, NRDYSTS);
1579 if (mask & NRDY0) {
1580 cfifo_change(r8a66597, 0);
1581 status = get_urb_error(r8a66597, 0);
1582 pipe_irq_disable(r8a66597, 0);
1583 check_next_phase(r8a66597, status);
1584 }
1585
1586 for (pipenum = 1; pipenum < R8A66597_MAX_NUM_PIPE; pipenum++) {
1587 check = 1 << pipenum;
1588 if (mask & check) {
1589 struct r8a66597_td *td;
1590 td = r8a66597_get_td(r8a66597, pipenum);
1591 if (unlikely(!td))
1592 continue;
1593
1594 status = get_urb_error(r8a66597, pipenum);
1595 pipe_irq_disable(r8a66597, pipenum);
1596 pipe_stop(r8a66597, td->pipe);
1597 finish_request(r8a66597, td, pipenum, td->urb, status);
1598 }
1599 }
1600}
1601
1602static irqreturn_t r8a66597_irq(struct usb_hcd *hcd)
1603{
1604 struct r8a66597 *r8a66597 = hcd_to_r8a66597(hcd);
1605 u16 intsts0, intsts1, intsts2;
1606 u16 intenb0, intenb1, intenb2;
1607 u16 mask0, mask1, mask2;
1608 int status;
1609
1610 spin_lock(&r8a66597->lock);
1611
1612 intsts0 = r8a66597_read(r8a66597, INTSTS0);
1613 intsts1 = r8a66597_read(r8a66597, INTSTS1);
1614 intsts2 = r8a66597_read(r8a66597, INTSTS2);
1615 intenb0 = r8a66597_read(r8a66597, INTENB0);
1616 intenb1 = r8a66597_read(r8a66597, INTENB1);
1617 intenb2 = r8a66597_read(r8a66597, INTENB2);
1618
1619 mask2 = intsts2 & intenb2;
1620 mask1 = intsts1 & intenb1;
1621 mask0 = intsts0 & intenb0 & (BEMP | NRDY | BRDY);
1622 if (mask2) {
1623 if (mask2 & ATTCH) {
1624 r8a66597_write(r8a66597, ~ATTCH, INTSTS2);
1625 r8a66597_bclr(r8a66597, ATTCHE, INTENB2);
1626
1627 /* start usb bus sampling */
1628 start_root_hub_sampling(r8a66597, 1, 1);
1629 }
1630 if (mask2 & DTCH) {
1631 r8a66597_write(r8a66597, ~DTCH, INTSTS2);
1632 r8a66597_bclr(r8a66597, DTCHE, INTENB2);
1633 r8a66597_usb_disconnect(r8a66597, 1);
1634 }
1635 if (mask2 & BCHG) {
1636 r8a66597_write(r8a66597, ~BCHG, INTSTS2);
1637 r8a66597_bclr(r8a66597, BCHGE, INTENB2);
1638 usb_hcd_resume_root_hub(r8a66597_to_hcd(r8a66597));
1639 }
1640 }
1641
1642 if (mask1) {
1643 if (mask1 & ATTCH) {
1644 r8a66597_write(r8a66597, ~ATTCH, INTSTS1);
1645 r8a66597_bclr(r8a66597, ATTCHE, INTENB1);
1646
1647 /* start usb bus sampling */
1648 start_root_hub_sampling(r8a66597, 0, 1);
1649 }
1650 if (mask1 & DTCH) {
1651 r8a66597_write(r8a66597, ~DTCH, INTSTS1);
1652 r8a66597_bclr(r8a66597, DTCHE, INTENB1);
1653 r8a66597_usb_disconnect(r8a66597, 0);
1654 }
1655 if (mask1 & BCHG) {
1656 r8a66597_write(r8a66597, ~BCHG, INTSTS1);
1657 r8a66597_bclr(r8a66597, BCHGE, INTENB1);
1658 usb_hcd_resume_root_hub(r8a66597_to_hcd(r8a66597));
1659 }
1660
1661 if (mask1 & SIGN) {
1662 r8a66597_write(r8a66597, ~SIGN, INTSTS1);
1663 status = get_urb_error(r8a66597, 0);
1664 check_next_phase(r8a66597, status);
1665 }
1666 if (mask1 & SACK) {
1667 r8a66597_write(r8a66597, ~SACK, INTSTS1);
1668 check_next_phase(r8a66597, 0);
1669 }
1670 }
1671 if (mask0) {
1672 if (mask0 & BRDY)
1673 irq_pipe_ready(r8a66597);
1674 if (mask0 & BEMP)
1675 irq_pipe_empty(r8a66597);
1676 if (mask0 & NRDY)
1677 irq_pipe_nrdy(r8a66597);
1678 }
1679
1680 spin_unlock(&r8a66597->lock);
1681 return IRQ_HANDLED;
1682}
1683
1684/* this function must be called with interrupt disabled */
1685static void r8a66597_root_hub_control(struct r8a66597 *r8a66597, int port)
1686{
1687 u16 tmp;
1688 struct r8a66597_root_hub *rh = &r8a66597->root_hub[port];
1689
1690 if (rh->port & USB_PORT_STAT_RESET) {
1691 unsigned long dvstctr_reg = get_dvstctr_reg(port);
1692
1693 tmp = r8a66597_read(r8a66597, dvstctr_reg);
1694 if ((tmp & USBRST) == USBRST) {
1695 r8a66597_mdfy(r8a66597, UACT, USBRST | UACT,
1696 dvstctr_reg);
1697 r8a66597_root_hub_start_polling(r8a66597);
1698 } else
1699 r8a66597_usb_connect(r8a66597, port);
1700 }
1701
1702 if (!(rh->port & USB_PORT_STAT_CONNECTION)) {
1703 r8a66597_write(r8a66597, ~ATTCH, get_intsts_reg(port));
1704 r8a66597_bset(r8a66597, ATTCHE, get_intenb_reg(port));
1705 }
1706
1707 if (rh->scount > 0) {
1708 tmp = r8a66597_read(r8a66597, get_syssts_reg(port)) & LNST;
1709 if (tmp == rh->old_syssts) {
1710 rh->scount--;
1711 if (rh->scount == 0)
1712 r8a66597_check_syssts(r8a66597, port, tmp);
1713 else
1714 r8a66597_root_hub_start_polling(r8a66597);
1715 } else {
1716 rh->scount = R8A66597_MAX_SAMPLING;
1717 rh->old_syssts = tmp;
1718 r8a66597_root_hub_start_polling(r8a66597);
1719 }
1720 }
1721}
1722
1723static void r8a66597_interval_timer(struct timer_list *t)
1724{
1725 struct r8a66597_timers *timers = from_timer(timers, t, interval);
1726 struct r8a66597 *r8a66597 = timers->r8a66597;
1727 unsigned long flags;
1728 u16 pipenum;
1729 struct r8a66597_td *td;
1730
1731 spin_lock_irqsave(&r8a66597->lock, flags);
1732
1733 for (pipenum = 0; pipenum < R8A66597_MAX_NUM_PIPE; pipenum++) {
1734 if (!(r8a66597->interval_map & (1 << pipenum)))
1735 continue;
1736 if (timer_pending(&r8a66597->timers[pipenum].interval))
1737 continue;
1738
1739 td = r8a66597_get_td(r8a66597, pipenum);
1740 if (td)
1741 start_transfer(r8a66597, td);
1742 }
1743
1744 spin_unlock_irqrestore(&r8a66597->lock, flags);
1745}
1746
1747static void r8a66597_td_timer(struct timer_list *t)
1748{
1749 struct r8a66597_timers *timers = from_timer(timers, t, td);
1750 struct r8a66597 *r8a66597 = timers->r8a66597;
1751 unsigned long flags;
1752 u16 pipenum;
1753 struct r8a66597_td *td, *new_td = NULL;
1754 struct r8a66597_pipe *pipe;
1755
1756 spin_lock_irqsave(&r8a66597->lock, flags);
1757 for (pipenum = 0; pipenum < R8A66597_MAX_NUM_PIPE; pipenum++) {
1758 if (!(r8a66597->timeout_map & (1 << pipenum)))
1759 continue;
1760 if (timer_pending(&r8a66597->timers[pipenum].td))
1761 continue;
1762
1763 td = r8a66597_get_td(r8a66597, pipenum);
1764 if (!td) {
1765 r8a66597->timeout_map &= ~(1 << pipenum);
1766 continue;
1767 }
1768
1769 if (td->urb->actual_length) {
1770 set_td_timer(r8a66597, td);
1771 break;
1772 }
1773
1774 pipe = td->pipe;
1775 pipe_stop(r8a66597, pipe);
1776
1777 /* Select a different address or endpoint */
1778 new_td = td;
1779 do {
1780 list_move_tail(&new_td->queue,
1781 &r8a66597->pipe_queue[pipenum]);
1782 new_td = r8a66597_get_td(r8a66597, pipenum);
1783 if (!new_td) {
1784 new_td = td;
1785 break;
1786 }
1787 } while (td != new_td && td->address == new_td->address &&
1788 td->pipe->info.epnum == new_td->pipe->info.epnum);
1789
1790 start_transfer(r8a66597, new_td);
1791
1792 if (td == new_td)
1793 r8a66597->timeout_map &= ~(1 << pipenum);
1794 else
1795 set_td_timer(r8a66597, new_td);
1796 break;
1797 }
1798 spin_unlock_irqrestore(&r8a66597->lock, flags);
1799}
1800
1801static void r8a66597_timer(struct timer_list *t)
1802{
1803 struct r8a66597 *r8a66597 = from_timer(r8a66597, t, rh_timer);
1804 unsigned long flags;
1805 int port;
1806
1807 spin_lock_irqsave(&r8a66597->lock, flags);
1808
1809 for (port = 0; port < r8a66597->max_root_hub; port++)
1810 r8a66597_root_hub_control(r8a66597, port);
1811
1812 spin_unlock_irqrestore(&r8a66597->lock, flags);
1813}
1814
1815static int check_pipe_config(struct r8a66597 *r8a66597, struct urb *urb)
1816{
1817 struct r8a66597_device *dev = get_urb_to_r8a66597_dev(r8a66597, urb);
1818
1819 if (dev && dev->address && dev->state != USB_STATE_CONFIGURED &&
1820 (urb->dev->state == USB_STATE_CONFIGURED))
1821 return 1;
1822 else
1823 return 0;
1824}
1825
1826static int r8a66597_start(struct usb_hcd *hcd)
1827{
1828 struct r8a66597 *r8a66597 = hcd_to_r8a66597(hcd);
1829
1830 hcd->state = HC_STATE_RUNNING;
1831 return enable_controller(r8a66597);
1832}
1833
1834static void r8a66597_stop(struct usb_hcd *hcd)
1835{
1836 struct r8a66597 *r8a66597 = hcd_to_r8a66597(hcd);
1837
1838 disable_controller(r8a66597);
1839}
1840
1841static void set_address_zero(struct r8a66597 *r8a66597, struct urb *urb)
1842{
1843 unsigned int usb_address = usb_pipedevice(urb->pipe);
1844 u16 root_port, hub_port;
1845
1846 if (usb_address == 0) {
1847 get_port_number(r8a66597, urb->dev->devpath,
1848 &root_port, &hub_port);
1849 set_devadd_reg(r8a66597, 0,
1850 get_r8a66597_usb_speed(urb->dev->speed),
1851 get_parent_r8a66597_address(r8a66597, urb->dev),
1852 hub_port, root_port);
1853 }
1854}
1855
1856static struct r8a66597_td *r8a66597_make_td(struct r8a66597 *r8a66597,
1857 struct urb *urb,
1858 struct usb_host_endpoint *hep)
1859{
1860 struct r8a66597_td *td;
1861 u16 pipenum;
1862
1863 td = kzalloc(sizeof(struct r8a66597_td), GFP_ATOMIC);
1864 if (td == NULL)
1865 return NULL;
1866
1867 pipenum = r8a66597_get_pipenum(urb, hep);
1868 td->pipenum = pipenum;
1869 td->pipe = hep->hcpriv;
1870 td->urb = urb;
1871 td->address = get_urb_to_r8a66597_addr(r8a66597, urb);
1872 td->maxpacket = usb_maxpacket(urb->dev, urb->pipe,
1873 !usb_pipein(urb->pipe));
1874 if (usb_pipecontrol(urb->pipe))
1875 td->type = USB_PID_SETUP;
1876 else if (usb_pipein(urb->pipe))
1877 td->type = USB_PID_IN;
1878 else
1879 td->type = USB_PID_OUT;
1880 INIT_LIST_HEAD(&td->queue);
1881
1882 return td;
1883}
1884
1885static int r8a66597_urb_enqueue(struct usb_hcd *hcd,
1886 struct urb *urb,
1887 gfp_t mem_flags)
1888{
1889 struct usb_host_endpoint *hep = urb->ep;
1890 struct r8a66597 *r8a66597 = hcd_to_r8a66597(hcd);
1891 struct r8a66597_td *td = NULL;
1892 int ret, request = 0;
1893 unsigned long flags;
1894
1895 spin_lock_irqsave(&r8a66597->lock, flags);
1896 if (!get_urb_to_r8a66597_dev(r8a66597, urb)) {
1897 ret = -ENODEV;
1898 goto error_not_linked;
1899 }
1900
1901 ret = usb_hcd_link_urb_to_ep(hcd, urb);
1902 if (ret)
1903 goto error_not_linked;
1904
1905 if (!hep->hcpriv) {
1906 hep->hcpriv = kzalloc(sizeof(struct r8a66597_pipe),
1907 GFP_ATOMIC);
1908 if (!hep->hcpriv) {
1909 ret = -ENOMEM;
1910 goto error;
1911 }
1912 set_pipe_reg_addr(hep->hcpriv, R8A66597_PIPE_NO_DMA);
1913 if (usb_pipeendpoint(urb->pipe))
1914 init_pipe_info(r8a66597, urb, hep, &hep->desc);
1915 }
1916
1917 if (unlikely(check_pipe_config(r8a66597, urb)))
1918 init_pipe_config(r8a66597, urb);
1919
1920 set_address_zero(r8a66597, urb);
1921 td = r8a66597_make_td(r8a66597, urb, hep);
1922 if (td == NULL) {
1923 ret = -ENOMEM;
1924 goto error;
1925 }
1926 if (list_empty(&r8a66597->pipe_queue[td->pipenum]))
1927 request = 1;
1928 list_add_tail(&td->queue, &r8a66597->pipe_queue[td->pipenum]);
1929 urb->hcpriv = td;
1930
1931 if (request) {
1932 if (td->pipe->info.timer_interval) {
1933 r8a66597->interval_map |= 1 << td->pipenum;
1934 mod_timer(&r8a66597->timers[td->pipenum].interval,
1935 jiffies + msecs_to_jiffies(
1936 td->pipe->info.timer_interval));
1937 } else {
1938 ret = start_transfer(r8a66597, td);
1939 if (ret < 0) {
1940 list_del(&td->queue);
1941 kfree(td);
1942 }
1943 }
1944 } else
1945 set_td_timer(r8a66597, td);
1946
1947error:
1948 if (ret)
1949 usb_hcd_unlink_urb_from_ep(hcd, urb);
1950error_not_linked:
1951 spin_unlock_irqrestore(&r8a66597->lock, flags);
1952 return ret;
1953}
1954
1955static int r8a66597_urb_dequeue(struct usb_hcd *hcd, struct urb *urb,
1956 int status)
1957{
1958 struct r8a66597 *r8a66597 = hcd_to_r8a66597(hcd);
1959 struct r8a66597_td *td;
1960 unsigned long flags;
1961 int rc;
1962
1963 spin_lock_irqsave(&r8a66597->lock, flags);
1964 rc = usb_hcd_check_unlink_urb(hcd, urb, status);
1965 if (rc)
1966 goto done;
1967
1968 if (urb->hcpriv) {
1969 td = urb->hcpriv;
1970 pipe_stop(r8a66597, td->pipe);
1971 pipe_irq_disable(r8a66597, td->pipenum);
1972 disable_irq_empty(r8a66597, td->pipenum);
1973 finish_request(r8a66597, td, td->pipenum, urb, status);
1974 }
1975 done:
1976 spin_unlock_irqrestore(&r8a66597->lock, flags);
1977 return rc;
1978}
1979
1980static void r8a66597_endpoint_disable(struct usb_hcd *hcd,
1981 struct usb_host_endpoint *hep)
1982{
1983 struct r8a66597 *r8a66597 = hcd_to_r8a66597(hcd);
1984 struct r8a66597_pipe *pipe = (struct r8a66597_pipe *)hep->hcpriv;
1985 struct r8a66597_td *td;
1986 struct urb *urb = NULL;
1987 u16 pipenum;
1988 unsigned long flags;
1989
1990 if (pipe == NULL)
1991 return;
1992 pipenum = pipe->info.pipenum;
1993
1994 if (pipenum == 0) {
1995 kfree(hep->hcpriv);
1996 hep->hcpriv = NULL;
1997 return;
1998 }
1999
2000 spin_lock_irqsave(&r8a66597->lock, flags);
2001 pipe_stop(r8a66597, pipe);
2002 pipe_irq_disable(r8a66597, pipenum);
2003 disable_irq_empty(r8a66597, pipenum);
2004 td = r8a66597_get_td(r8a66597, pipenum);
2005 if (td)
2006 urb = td->urb;
2007 finish_request(r8a66597, td, pipenum, urb, -ESHUTDOWN);
2008 kfree(hep->hcpriv);
2009 hep->hcpriv = NULL;
2010 spin_unlock_irqrestore(&r8a66597->lock, flags);
2011}
2012
2013static int r8a66597_get_frame(struct usb_hcd *hcd)
2014{
2015 struct r8a66597 *r8a66597 = hcd_to_r8a66597(hcd);
2016 return r8a66597_read(r8a66597, FRMNUM) & 0x03FF;
2017}
2018
2019static void collect_usb_address_map(struct usb_device *udev, unsigned long *map)
2020{
2021 int chix;
2022 struct usb_device *childdev;
2023
2024 if (udev->state == USB_STATE_CONFIGURED &&
2025 udev->parent && udev->parent->devnum > 1 &&
2026 udev->parent->descriptor.bDeviceClass == USB_CLASS_HUB)
2027 map[udev->devnum/32] |= (1 << (udev->devnum % 32));
2028
2029 usb_hub_for_each_child(udev, chix, childdev)
2030 collect_usb_address_map(childdev, map);
2031}
2032
2033/* this function must be called with interrupt disabled */
2034static struct r8a66597_device *get_r8a66597_device(struct r8a66597 *r8a66597,
2035 int addr)
2036{
2037 struct r8a66597_device *dev;
2038 struct list_head *list = &r8a66597->child_device;
2039
2040 list_for_each_entry(dev, list, device_list) {
2041 if (dev->usb_address != addr)
2042 continue;
2043
2044 return dev;
2045 }
2046
2047 printk(KERN_ERR "r8a66597: get_r8a66597_device fail.(%d)\n", addr);
2048 return NULL;
2049}
2050
2051static void update_usb_address_map(struct r8a66597 *r8a66597,
2052 struct usb_device *root_hub,
2053 unsigned long *map)
2054{
2055 int i, j, addr;
2056 unsigned long diff;
2057 unsigned long flags;
2058
2059 for (i = 0; i < 4; i++) {
2060 diff = r8a66597->child_connect_map[i] ^ map[i];
2061 if (!diff)
2062 continue;
2063
2064 for (j = 0; j < 32; j++) {
2065 if (!(diff & (1 << j)))
2066 continue;
2067
2068 addr = i * 32 + j;
2069 if (map[i] & (1 << j))
2070 set_child_connect_map(r8a66597, addr);
2071 else {
2072 struct r8a66597_device *dev;
2073
2074 spin_lock_irqsave(&r8a66597->lock, flags);
2075 dev = get_r8a66597_device(r8a66597, addr);
2076 disable_r8a66597_pipe_all(r8a66597, dev);
2077 free_usb_address(r8a66597, dev, 0);
2078 put_child_connect_map(r8a66597, addr);
2079 spin_unlock_irqrestore(&r8a66597->lock, flags);
2080 }
2081 }
2082 }
2083}
2084
2085static void r8a66597_check_detect_child(struct r8a66597 *r8a66597,
2086 struct usb_hcd *hcd)
2087{
2088 struct usb_bus *bus;
2089 unsigned long now_map[4];
2090
2091 memset(now_map, 0, sizeof(now_map));
2092
2093 mutex_lock(&usb_bus_idr_lock);
2094 bus = idr_find(&usb_bus_idr, hcd->self.busnum);
2095 if (bus && bus->root_hub) {
2096 collect_usb_address_map(bus->root_hub, now_map);
2097 update_usb_address_map(r8a66597, bus->root_hub, now_map);
2098 }
2099 mutex_unlock(&usb_bus_idr_lock);
2100}
2101
2102static int r8a66597_hub_status_data(struct usb_hcd *hcd, char *buf)
2103{
2104 struct r8a66597 *r8a66597 = hcd_to_r8a66597(hcd);
2105 unsigned long flags;
2106 int i;
2107
2108 r8a66597_check_detect_child(r8a66597, hcd);
2109
2110 spin_lock_irqsave(&r8a66597->lock, flags);
2111
2112 *buf = 0; /* initialize (no change) */
2113
2114 for (i = 0; i < r8a66597->max_root_hub; i++) {
2115 if (r8a66597->root_hub[i].port & 0xffff0000)
2116 *buf |= 1 << (i + 1);
2117 }
2118
2119 spin_unlock_irqrestore(&r8a66597->lock, flags);
2120
2121 return (*buf != 0);
2122}
2123
2124static void r8a66597_hub_descriptor(struct r8a66597 *r8a66597,
2125 struct usb_hub_descriptor *desc)
2126{
2127 desc->bDescriptorType = USB_DT_HUB;
2128 desc->bHubContrCurrent = 0;
2129 desc->bNbrPorts = r8a66597->max_root_hub;
2130 desc->bDescLength = 9;
2131 desc->bPwrOn2PwrGood = 0;
2132 desc->wHubCharacteristics =
2133 cpu_to_le16(HUB_CHAR_INDV_PORT_LPSM | HUB_CHAR_NO_OCPM);
2134 desc->u.hs.DeviceRemovable[0] =
2135 ((1 << r8a66597->max_root_hub) - 1) << 1;
2136 desc->u.hs.DeviceRemovable[1] = ~0;
2137}
2138
2139static int r8a66597_hub_control(struct usb_hcd *hcd, u16 typeReq, u16 wValue,
2140 u16 wIndex, char *buf, u16 wLength)
2141{
2142 struct r8a66597 *r8a66597 = hcd_to_r8a66597(hcd);
2143 int ret;
2144 int port = (wIndex & 0x00FF) - 1;
2145 struct r8a66597_root_hub *rh = &r8a66597->root_hub[port];
2146 unsigned long flags;
2147
2148 ret = 0;
2149
2150 spin_lock_irqsave(&r8a66597->lock, flags);
2151 switch (typeReq) {
2152 case ClearHubFeature:
2153 case SetHubFeature:
2154 switch (wValue) {
2155 case C_HUB_OVER_CURRENT:
2156 case C_HUB_LOCAL_POWER:
2157 break;
2158 default:
2159 goto error;
2160 }
2161 break;
2162 case ClearPortFeature:
2163 if (wIndex > r8a66597->max_root_hub)
2164 goto error;
2165 if (wLength != 0)
2166 goto error;
2167
2168 switch (wValue) {
2169 case USB_PORT_FEAT_ENABLE:
2170 rh->port &= ~USB_PORT_STAT_POWER;
2171 break;
2172 case USB_PORT_FEAT_SUSPEND:
2173 break;
2174 case USB_PORT_FEAT_POWER:
2175 r8a66597_port_power(r8a66597, port, 0);
2176 break;
2177 case USB_PORT_FEAT_C_ENABLE:
2178 case USB_PORT_FEAT_C_SUSPEND:
2179 case USB_PORT_FEAT_C_CONNECTION:
2180 case USB_PORT_FEAT_C_OVER_CURRENT:
2181 case USB_PORT_FEAT_C_RESET:
2182 break;
2183 default:
2184 goto error;
2185 }
2186 rh->port &= ~(1 << wValue);
2187 break;
2188 case GetHubDescriptor:
2189 r8a66597_hub_descriptor(r8a66597,
2190 (struct usb_hub_descriptor *)buf);
2191 break;
2192 case GetHubStatus:
2193 *buf = 0x00;
2194 break;
2195 case GetPortStatus:
2196 if (wIndex > r8a66597->max_root_hub)
2197 goto error;
2198 *(__le32 *)buf = cpu_to_le32(rh->port);
2199 break;
2200 case SetPortFeature:
2201 if (wIndex > r8a66597->max_root_hub)
2202 goto error;
2203 if (wLength != 0)
2204 goto error;
2205
2206 switch (wValue) {
2207 case USB_PORT_FEAT_SUSPEND:
2208 break;
2209 case USB_PORT_FEAT_POWER:
2210 r8a66597_port_power(r8a66597, port, 1);
2211 rh->port |= USB_PORT_STAT_POWER;
2212 break;
2213 case USB_PORT_FEAT_RESET: {
2214 struct r8a66597_device *dev = rh->dev;
2215
2216 rh->port |= USB_PORT_STAT_RESET;
2217
2218 disable_r8a66597_pipe_all(r8a66597, dev);
2219 free_usb_address(r8a66597, dev, 1);
2220
2221 r8a66597_mdfy(r8a66597, USBRST, USBRST | UACT,
2222 get_dvstctr_reg(port));
2223 mod_timer(&r8a66597->rh_timer,
2224 jiffies + msecs_to_jiffies(50));
2225 }
2226 break;
2227 default:
2228 goto error;
2229 }
2230 rh->port |= 1 << wValue;
2231 break;
2232 default:
2233error:
2234 ret = -EPIPE;
2235 break;
2236 }
2237
2238 spin_unlock_irqrestore(&r8a66597->lock, flags);
2239 return ret;
2240}
2241
2242#if defined(CONFIG_PM)
2243static int r8a66597_bus_suspend(struct usb_hcd *hcd)
2244{
2245 struct r8a66597 *r8a66597 = hcd_to_r8a66597(hcd);
2246 int port;
2247
2248 dev_dbg(&r8a66597->device0.udev->dev, "%s\n", __func__);
2249
2250 for (port = 0; port < r8a66597->max_root_hub; port++) {
2251 struct r8a66597_root_hub *rh = &r8a66597->root_hub[port];
2252 unsigned long dvstctr_reg = get_dvstctr_reg(port);
2253
2254 if (!(rh->port & USB_PORT_STAT_ENABLE))
2255 continue;
2256
2257 dev_dbg(&rh->dev->udev->dev, "suspend port = %d\n", port);
2258 r8a66597_bclr(r8a66597, UACT, dvstctr_reg); /* suspend */
2259 rh->port |= USB_PORT_STAT_SUSPEND;
2260
2261 if (rh->dev->udev->do_remote_wakeup) {
2262 msleep(3); /* waiting last SOF */
2263 r8a66597_bset(r8a66597, RWUPE, dvstctr_reg);
2264 r8a66597_write(r8a66597, ~BCHG, get_intsts_reg(port));
2265 r8a66597_bset(r8a66597, BCHGE, get_intenb_reg(port));
2266 }
2267 }
2268
2269 r8a66597->bus_suspended = 1;
2270
2271 return 0;
2272}
2273
2274static int r8a66597_bus_resume(struct usb_hcd *hcd)
2275{
2276 struct r8a66597 *r8a66597 = hcd_to_r8a66597(hcd);
2277 int port;
2278
2279 dev_dbg(&r8a66597->device0.udev->dev, "%s\n", __func__);
2280
2281 for (port = 0; port < r8a66597->max_root_hub; port++) {
2282 struct r8a66597_root_hub *rh = &r8a66597->root_hub[port];
2283 unsigned long dvstctr_reg = get_dvstctr_reg(port);
2284
2285 if (!(rh->port & USB_PORT_STAT_SUSPEND))
2286 continue;
2287
2288 dev_dbg(&rh->dev->udev->dev, "resume port = %d\n", port);
2289 rh->port &= ~USB_PORT_STAT_SUSPEND;
2290 rh->port |= USB_PORT_STAT_C_SUSPEND << 16;
2291 r8a66597_mdfy(r8a66597, RESUME, RESUME | UACT, dvstctr_reg);
2292 msleep(USB_RESUME_TIMEOUT);
2293 r8a66597_mdfy(r8a66597, UACT, RESUME | UACT, dvstctr_reg);
2294 }
2295
2296 return 0;
2297
2298}
2299#else
2300#define r8a66597_bus_suspend NULL
2301#define r8a66597_bus_resume NULL
2302#endif
2303
2304static const struct hc_driver r8a66597_hc_driver = {
2305 .description = hcd_name,
2306 .hcd_priv_size = sizeof(struct r8a66597),
2307 .irq = r8a66597_irq,
2308
2309 /*
2310 * generic hardware linkage
2311 */
2312 .flags = HCD_USB2,
2313
2314 .start = r8a66597_start,
2315 .stop = r8a66597_stop,
2316
2317 /*
2318 * managing i/o requests and associated device resources
2319 */
2320 .urb_enqueue = r8a66597_urb_enqueue,
2321 .urb_dequeue = r8a66597_urb_dequeue,
2322 .endpoint_disable = r8a66597_endpoint_disable,
2323
2324 /*
2325 * periodic schedule support
2326 */
2327 .get_frame_number = r8a66597_get_frame,
2328
2329 /*
2330 * root hub support
2331 */
2332 .hub_status_data = r8a66597_hub_status_data,
2333 .hub_control = r8a66597_hub_control,
2334 .bus_suspend = r8a66597_bus_suspend,
2335 .bus_resume = r8a66597_bus_resume,
2336};
2337
2338#if defined(CONFIG_PM)
2339static int r8a66597_suspend(struct device *dev)
2340{
2341 struct r8a66597 *r8a66597 = dev_get_drvdata(dev);
2342 int port;
2343
2344 dev_dbg(dev, "%s\n", __func__);
2345
2346 disable_controller(r8a66597);
2347
2348 for (port = 0; port < r8a66597->max_root_hub; port++) {
2349 struct r8a66597_root_hub *rh = &r8a66597->root_hub[port];
2350
2351 rh->port = 0x00000000;
2352 }
2353
2354 return 0;
2355}
2356
2357static int r8a66597_resume(struct device *dev)
2358{
2359 struct r8a66597 *r8a66597 = dev_get_drvdata(dev);
2360 struct usb_hcd *hcd = r8a66597_to_hcd(r8a66597);
2361
2362 dev_dbg(dev, "%s\n", __func__);
2363
2364 enable_controller(r8a66597);
2365 usb_root_hub_lost_power(hcd->self.root_hub);
2366
2367 return 0;
2368}
2369
2370static const struct dev_pm_ops r8a66597_dev_pm_ops = {
2371 .suspend = r8a66597_suspend,
2372 .resume = r8a66597_resume,
2373 .poweroff = r8a66597_suspend,
2374 .restore = r8a66597_resume,
2375};
2376
2377#define R8A66597_DEV_PM_OPS (&r8a66597_dev_pm_ops)
2378#else /* if defined(CONFIG_PM) */
2379#define R8A66597_DEV_PM_OPS NULL
2380#endif
2381
2382static int r8a66597_remove(struct platform_device *pdev)
2383{
2384 struct r8a66597 *r8a66597 = platform_get_drvdata(pdev);
2385 struct usb_hcd *hcd = r8a66597_to_hcd(r8a66597);
2386
2387 del_timer_sync(&r8a66597->rh_timer);
2388 usb_remove_hcd(hcd);
2389 iounmap(r8a66597->reg);
2390 if (r8a66597->pdata->on_chip)
2391 clk_put(r8a66597->clk);
2392 usb_put_hcd(hcd);
2393 return 0;
2394}
2395
2396static int r8a66597_probe(struct platform_device *pdev)
2397{
2398 char clk_name[8];
2399 struct resource *res = NULL, *ires;
2400 int irq = -1;
2401 void __iomem *reg = NULL;
2402 struct usb_hcd *hcd = NULL;
2403 struct r8a66597 *r8a66597;
2404 int ret = 0;
2405 int i;
2406 unsigned long irq_trigger;
2407
2408 if (usb_disabled())
2409 return -ENODEV;
2410
2411 if (pdev->dev.dma_mask) {
2412 ret = -EINVAL;
2413 dev_err(&pdev->dev, "dma not supported\n");
2414 goto clean_up;
2415 }
2416
2417 res = platform_get_resource(pdev, IORESOURCE_MEM, 0);
2418 if (!res) {
2419 ret = -ENODEV;
2420 dev_err(&pdev->dev, "platform_get_resource error.\n");
2421 goto clean_up;
2422 }
2423
2424 ires = platform_get_resource(pdev, IORESOURCE_IRQ, 0);
2425 if (!ires) {
2426 ret = -ENODEV;
2427 dev_err(&pdev->dev,
2428 "platform_get_resource IORESOURCE_IRQ error.\n");
2429 goto clean_up;
2430 }
2431
2432 irq = ires->start;
2433 irq_trigger = ires->flags & IRQF_TRIGGER_MASK;
2434
2435 reg = ioremap(res->start, resource_size(res));
2436 if (reg == NULL) {
2437 ret = -ENOMEM;
2438 dev_err(&pdev->dev, "ioremap error.\n");
2439 goto clean_up;
2440 }
2441
2442 if (pdev->dev.platform_data == NULL) {
2443 dev_err(&pdev->dev, "no platform data\n");
2444 ret = -ENODEV;
2445 goto clean_up;
2446 }
2447
2448 /* initialize hcd */
2449 hcd = usb_create_hcd(&r8a66597_hc_driver, &pdev->dev, (char *)hcd_name);
2450 if (!hcd) {
2451 ret = -ENOMEM;
2452 dev_err(&pdev->dev, "Failed to create hcd\n");
2453 goto clean_up;
2454 }
2455 r8a66597 = hcd_to_r8a66597(hcd);
2456 memset(r8a66597, 0, sizeof(struct r8a66597));
2457 platform_set_drvdata(pdev, r8a66597);
2458 r8a66597->pdata = dev_get_platdata(&pdev->dev);
2459 r8a66597->irq_sense_low = irq_trigger == IRQF_TRIGGER_LOW;
2460
2461 if (r8a66597->pdata->on_chip) {
2462 snprintf(clk_name, sizeof(clk_name), "usb%d", pdev->id);
2463 r8a66597->clk = clk_get(&pdev->dev, clk_name);
2464 if (IS_ERR(r8a66597->clk)) {
2465 dev_err(&pdev->dev, "cannot get clock \"%s\"\n",
2466 clk_name);
2467 ret = PTR_ERR(r8a66597->clk);
2468 goto clean_up2;
2469 }
2470 r8a66597->max_root_hub = 1;
2471 } else
2472 r8a66597->max_root_hub = 2;
2473
2474 spin_lock_init(&r8a66597->lock);
2475 timer_setup(&r8a66597->rh_timer, r8a66597_timer, 0);
2476 r8a66597->reg = reg;
2477
2478 /* make sure no interrupts are pending */
2479 ret = r8a66597_clock_enable(r8a66597);
2480 if (ret < 0)
2481 goto clean_up3;
2482 disable_controller(r8a66597);
2483
2484 for (i = 0; i < R8A66597_MAX_NUM_PIPE; i++) {
2485 INIT_LIST_HEAD(&r8a66597->pipe_queue[i]);
2486 r8a66597->timers[i].r8a66597 = r8a66597;
2487 timer_setup(&r8a66597->timers[i].td, r8a66597_td_timer, 0);
2488 timer_setup(&r8a66597->timers[i].interval,
2489 r8a66597_interval_timer, 0);
2490 }
2491 INIT_LIST_HEAD(&r8a66597->child_device);
2492
2493 hcd->rsrc_start = res->start;
2494 hcd->has_tt = 1;
2495
2496 ret = usb_add_hcd(hcd, irq, irq_trigger);
2497 if (ret != 0) {
2498 dev_err(&pdev->dev, "Failed to add hcd\n");
2499 goto clean_up3;
2500 }
2501 device_wakeup_enable(hcd->self.controller);
2502
2503 return 0;
2504
2505clean_up3:
2506 if (r8a66597->pdata->on_chip)
2507 clk_put(r8a66597->clk);
2508clean_up2:
2509 usb_put_hcd(hcd);
2510
2511clean_up:
2512 if (reg)
2513 iounmap(reg);
2514
2515 return ret;
2516}
2517
2518static struct platform_driver r8a66597_driver = {
2519 .probe = r8a66597_probe,
2520 .remove = r8a66597_remove,
2521 .driver = {
2522 .name = hcd_name,
2523 .pm = R8A66597_DEV_PM_OPS,
2524 },
2525};
2526
2527module_platform_driver(r8a66597_driver);