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