?  search:
summary | log | graphiclog1 | graphiclog2 | commit | commitdiff | tree | refs | edit | fork
blame | history | raw | HEAD
repo init
[linux-rt-nao.git] / drivers / usb / host / r8a66597-hcd.c
blob319041205b57c878b38b7b60b9ad1a9f3bf47dab
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 static int __init r8a66597_probe(struct platform_device *pdev)
2279 {
2280 #if defined(CONFIG_SUPERH_ON_CHIP_R8A66597) && defined(CONFIG_HAVE_CLK)
2281 char clk_name[8];
2282 #endif
2283 struct resource *res = NULL, *ires;
2284 int irq = -1;
2285 void __iomem *reg = NULL;
2286 struct usb_hcd *hcd = NULL;
2287 struct r8a66597 *r8a66597;
2288 int ret = 0;
2289 int i;
2290 unsigned long irq_trigger;
2291
2292 if (pdev->dev.dma_mask) {
2293 ret = -EINVAL;
2294 dev_err(&pdev->dev, "dma not supported\n");
2295 goto clean_up;
2296 }
2297
2298 res = platform_get_resource(pdev, IORESOURCE_MEM, 0);
2299 if (!res) {
2300 ret = -ENODEV;
2301 dev_err(&pdev->dev, "platform_get_resource error.\n");
2302 goto clean_up;
2303 }
2304
2305 ires = platform_get_resource(pdev, IORESOURCE_IRQ, 0);
2306 if (!ires) {
2307 ret = -ENODEV;
2308 dev_err(&pdev->dev,
2309 "platform_get_resource IORESOURCE_IRQ error.\n");
2310 goto clean_up;
2311 }
2312
2313 irq = ires->start;
2314 irq_trigger = ires->flags & IRQF_TRIGGER_MASK;
2315
2316 reg = ioremap(res->start, resource_size(res));
2317 if (reg == NULL) {
2318 ret = -ENOMEM;
2319 dev_err(&pdev->dev, "ioremap error.\n");
2320 goto clean_up;
2321 }
2322
2323 /* initialize hcd */
2324 hcd = usb_create_hcd(&r8a66597_hc_driver, &pdev->dev, (char *)hcd_name);
2325 if (!hcd) {
2326 ret = -ENOMEM;
2327 dev_err(&pdev->dev, "Failed to create hcd\n");
2328 goto clean_up;
2329 }
2330 r8a66597 = hcd_to_r8a66597(hcd);
2331 memset(r8a66597, 0, sizeof(struct r8a66597));
2332 dev_set_drvdata(&pdev->dev, r8a66597);
2333
2334 #if defined(CONFIG_SUPERH_ON_CHIP_R8A66597) && defined(CONFIG_HAVE_CLK)
2335 snprintf(clk_name, sizeof(clk_name), "usb%d", pdev->id);
2336 r8a66597->clk = clk_get(&pdev->dev, clk_name);
2337 if (IS_ERR(r8a66597->clk)) {
2338 dev_err(&pdev->dev, "cannot get clock \"%s\"\n", clk_name);
2339 ret = PTR_ERR(r8a66597->clk);
2340 goto clean_up2;
2341 }
2342 #endif
2343
2344 spin_lock_init(&r8a66597->lock);
2345 init_timer(&r8a66597->rh_timer);
2346 r8a66597->rh_timer.function = r8a66597_timer;
2347 r8a66597->rh_timer.data = (unsigned long)r8a66597;
2348 r8a66597->reg = (unsigned long)reg;
2349
2350 for (i = 0; i < R8A66597_MAX_NUM_PIPE; i++) {
2351 INIT_LIST_HEAD(&r8a66597->pipe_queue[i]);
2352 init_timer(&r8a66597->td_timer[i]);
2353 r8a66597->td_timer[i].function = r8a66597_td_timer;
2354 r8a66597->td_timer[i].data = (unsigned long)r8a66597;
2355 setup_timer(&r8a66597->interval_timer[i],
2356 r8a66597_interval_timer,
2357 (unsigned long)r8a66597);
2358 }
2359 INIT_LIST_HEAD(&r8a66597->child_device);
2360
2361 hcd->rsrc_start = res->start;
2362
2363 /* irq_sense setting on cmdline takes precedence over resource
2364 * settings, so the introduction of irqflags in IRQ resourse
2365 * won't disturb existing setups */
2366 switch (irq_sense) {
2367 case INTL:
2368 irq_trigger = IRQF_TRIGGER_LOW;
2369 break;
2370 case 0:
2371 irq_trigger = IRQF_TRIGGER_FALLING;
2372 break;
2373 case 0xff:
2374 if (irq_trigger)
2375 irq_sense = (irq_trigger & IRQF_TRIGGER_LOW) ?
2376 INTL : 0;
2377 else {
2378 irq_sense = INTL;
2379 irq_trigger = IRQF_TRIGGER_LOW;
2380 }
2381 break;
2382 default:
2383 dev_err(&pdev->dev, "Unknown irq_sense value.\n");
2384 }
2385
2386 ret = usb_add_hcd(hcd, irq, IRQF_DISABLED | irq_trigger);
2387 if (ret != 0) {
2388 dev_err(&pdev->dev, "Failed to add hcd\n");
2389 goto clean_up3;
2390 }
2391
2392 return 0;
2393
2394 clean_up3:
2395 #if defined(CONFIG_SUPERH_ON_CHIP_R8A66597) && defined(CONFIG_HAVE_CLK)
2396 clk_put(r8a66597->clk);
2397 clean_up2:
2398 #endif
2399 usb_put_hcd(hcd);
2400
2401 clean_up:
2402 if (reg)
2403 iounmap(reg);
2404
2405 return ret;
2406 }
2407
2408 static struct platform_driver r8a66597_driver = {
2409 .probe = r8a66597_probe,
2410 .remove = r8a66597_remove,
2411 .suspend = r8a66597_suspend,
2412 .resume = r8a66597_resume,
2413 .driver = {
2414 .name = (char *) hcd_name,
2415 .owner = THIS_MODULE,
2416 },
2417 };
2418
2419 static int __init r8a66597_init(void)
2420 {
2421 if (usb_disabled())
2422 return -ENODEV;
2423
2424 printk(KERN_INFO KBUILD_MODNAME ": driver %s, %s\n", hcd_name,
2425 DRIVER_VERSION);
2426 return platform_driver_register(&r8a66597_driver);
2427 }
2428 module_init(r8a66597_init);
2429
2430 static void __exit r8a66597_cleanup(void)
2431 {
2432 platform_driver_unregister(&r8a66597_driver);
2433 }
2434 module_exit(r8a66597_cleanup);
2435
(Inofficial) Linux kernel tree running on the Nao robot