drivers/usb/gadget/udc/atmel_usba_udc.c

   1 /*
   2  * Driver for the Atmel USBA high speed USB device controller
   3  *
   4  * Copyright (C) 2005-2007 Atmel Corporation
   5  *
   6  * This program is free software; you can redistribute it and/or modify
   7  * it under the terms of the GNU General Public License version 2 as
   8  * published by the Free Software Foundation.
   9  */
  10 #include <linux/clk.h>
  11 #include <linux/clk/at91_pmc.h>
  12 #include <linux/module.h>
  13 #include <linux/init.h>
  14 #include <linux/interrupt.h>
  15 #include <linux/io.h>
  16 #include <linux/slab.h>
  17 #include <linux/device.h>
  18 #include <linux/dma-mapping.h>
  19 #include <linux/list.h>
  20 #include <linux/platform_device.h>
  21 #include <linux/usb/ch9.h>
  22 #include <linux/usb/gadget.h>
  23 #include <linux/usb/atmel_usba_udc.h>
  24 #include <linux/delay.h>
  25 #include <linux/of.h>
  26 #include <linux/of_gpio.h>
  27
  28 #include <asm/gpio.h>
  29
  30 #include "atmel_usba_udc.h"
  31 #define USBA_VBUS_IRQFLAGS (IRQF_ONESHOT \
  32                            | IRQF_TRIGGER_FALLING | IRQF_TRIGGER_RISING)
  33
  34 #ifdef CONFIG_USB_GADGET_DEBUG_FS
  35 #include <linux/debugfs.h>
  36 #include <linux/uaccess.h>
  37
  38 static int queue_dbg_open(struct inode *inode, struct file *file)
  39 {
  40         struct usba_ep *ep = inode->i_private;
  41         struct usba_request *req, *req_copy;
  42         struct list_head *queue_data;
  43
  44         queue_data = kmalloc(sizeof(*queue_data), GFP_KERNEL);
  45         if (!queue_data)
  46                 return -ENOMEM;
  47         INIT_LIST_HEAD(queue_data);
  48
  49         spin_lock_irq(&ep->udc->lock);
  50         list_for_each_entry(req, &ep->queue, queue) {
  51                 req_copy = kmemdup(req, sizeof(*req_copy), GFP_ATOMIC);
  52                 if (!req_copy)
  53                         goto fail;
  54                 list_add_tail(&req_copy->queue, queue_data);
  55         }
  56         spin_unlock_irq(&ep->udc->lock);
  57
  58         file->private_data = queue_data;
  59         return 0;
  60
  61 fail:
  62         spin_unlock_irq(&ep->udc->lock);
  63         list_for_each_entry_safe(req, req_copy, queue_data, queue) {
  64                 list_del(&req->queue);
  65                 kfree(req);
  66         }
  67         kfree(queue_data);
  68         return -ENOMEM;
  69 }
  70
  71 /*
  72  * bbbbbbbb llllllll IZS sssss nnnn FDL\n\0
  73  *
  74  * b: buffer address
  75  * l: buffer length
  76  * I/i: interrupt/no interrupt
  77  * Z/z: zero/no zero
  78  * S/s: short ok/short not ok
  79  * s: status
  80  * n: nr_packets
  81  * F/f: submitted/not submitted to FIFO
  82  * D/d: using/not using DMA
  83  * L/l: last transaction/not last transaction
  84  */
  85 static ssize_t queue_dbg_read(struct file *file, char __user *buf,
  86                 size_t nbytes, loff_t *ppos)
  87 {
  88         struct list_head *queue = file->private_data;
  89         struct usba_request *req, *tmp_req;
  90         size_t len, remaining, actual = 0;
  91         char tmpbuf[38];
  92
  93         if (!access_ok(VERIFY_WRITE, buf, nbytes))
  94                 return -EFAULT;
  95
  96         mutex_lock(&file_inode(file)->i_mutex);
  97         list_for_each_entry_safe(req, tmp_req, queue, queue) {
  98                 len = snprintf(tmpbuf, sizeof(tmpbuf),
  99                                 "%8p %08x %c%c%c %5d %c%c%c\n",
 100                                 req->req.buf, req->req.length,
 101                                 req->req.no_interrupt ? 'i' : 'I',
 102                                 req->req.zero ? 'Z' : 'z',
 103                                 req->req.short_not_ok ? 's' : 'S',
 104                                 req->req.status,
 105                                 req->submitted ? 'F' : 'f',
 106                                 req->using_dma ? 'D' : 'd',
 107                                 req->last_transaction ? 'L' : 'l');
 108                 len = min(len, sizeof(tmpbuf));
 109                 if (len > nbytes)
 110                         break;
 111
 112                 list_del(&req->queue);
 113                 kfree(req);
 114
 115                 remaining = __copy_to_user(buf, tmpbuf, len);
 116                 actual += len - remaining;
 117                 if (remaining)
 118                         break;
 119
 120                 nbytes -= len;
 121                 buf += len;
 122         }
 123         mutex_unlock(&file_inode(file)->i_mutex);
 124
 125         return actual;
 126 }
 127
 128 static int queue_dbg_release(struct inode *inode, struct file *file)
 129 {
 130         struct list_head *queue_data = file->private_data;
 131         struct usba_request *req, *tmp_req;
 132
 133         list_for_each_entry_safe(req, tmp_req, queue_data, queue) {
 134                 list_del(&req->queue);
 135                 kfree(req);
 136         }
 137         kfree(queue_data);
 138         return 0;
 139 }
 140
 141 static int regs_dbg_open(struct inode *inode, struct file *file)
 142 {
 143         struct usba_udc *udc;
 144         unsigned int i;
 145         u32 *data;
 146         int ret = -ENOMEM;
 147
 148         mutex_lock(&inode->i_mutex);
 149         udc = inode->i_private;
 150         data = kmalloc(inode->i_size, GFP_KERNEL);
 151         if (!data)
 152                 goto out;
 153
 154         spin_lock_irq(&udc->lock);
 155         for (i = 0; i < inode->i_size / 4; i++)
 156                 data[i] = usba_io_readl(udc->regs + i * 4);
 157         spin_unlock_irq(&udc->lock);
 158
 159         file->private_data = data;
 160         ret = 0;
 161
 162 out:
 163         mutex_unlock(&inode->i_mutex);
 164
 165         return ret;
 166 }
 167
 168 static ssize_t regs_dbg_read(struct file *file, char __user *buf,
 169                 size_t nbytes, loff_t *ppos)
 170 {
 171         struct inode *inode = file_inode(file);
 172         int ret;
 173
 174         mutex_lock(&inode->i_mutex);
 175         ret = simple_read_from_buffer(buf, nbytes, ppos,
 176                         file->private_data,
 177                         file_inode(file)->i_size);
 178         mutex_unlock(&inode->i_mutex);
 179
 180         return ret;
 181 }
 182
 183 static int regs_dbg_release(struct inode *inode, struct file *file)
 184 {
 185         kfree(file->private_data);
 186         return 0;
 187 }
 188
 189 const struct file_operations queue_dbg_fops = {
 190         .owner          = THIS_MODULE,
 191         .open           = queue_dbg_open,
 192         .llseek         = no_llseek,
 193         .read           = queue_dbg_read,
 194         .release        = queue_dbg_release,
 195 };
 196
 197 const struct file_operations regs_dbg_fops = {
 198         .owner          = THIS_MODULE,
 199         .open           = regs_dbg_open,
 200         .llseek         = generic_file_llseek,
 201         .read           = regs_dbg_read,
 202         .release        = regs_dbg_release,
 203 };
 204
 205 static void usba_ep_init_debugfs(struct usba_udc *udc,
 206                 struct usba_ep *ep)
 207 {
 208         struct dentry *ep_root;
 209
 210         ep_root = debugfs_create_dir(ep->ep.name, udc->debugfs_root);
 211         if (!ep_root)
 212                 goto err_root;
 213         ep->debugfs_dir = ep_root;
 214
 215         ep->debugfs_queue = debugfs_create_file("queue", 0400, ep_root,
 216                                                 ep, &queue_dbg_fops);
 217         if (!ep->debugfs_queue)
 218                 goto err_queue;
 219
 220         if (ep->can_dma) {
 221                 ep->debugfs_dma_status
 222                         = debugfs_create_u32("dma_status", 0400, ep_root,
 223                                         &ep->last_dma_status);
 224                 if (!ep->debugfs_dma_status)
 225                         goto err_dma_status;
 226         }
 227         if (ep_is_control(ep)) {
 228                 ep->debugfs_state
 229                         = debugfs_create_u32("state", 0400, ep_root,
 230                                         &ep->state);
 231                 if (!ep->debugfs_state)
 232                         goto err_state;
 233         }
 234
 235         return;
 236
 237 err_state:
 238         if (ep->can_dma)
 239                 debugfs_remove(ep->debugfs_dma_status);
 240 err_dma_status:
 241         debugfs_remove(ep->debugfs_queue);
 242 err_queue:
 243         debugfs_remove(ep_root);
 244 err_root:
 245         dev_err(&ep->udc->pdev->dev,
 246                 "failed to create debugfs directory for %s\n", ep->ep.name);
 247 }
 248
 249 static void usba_ep_cleanup_debugfs(struct usba_ep *ep)
 250 {
 251         debugfs_remove(ep->debugfs_queue);
 252         debugfs_remove(ep->debugfs_dma_status);
 253         debugfs_remove(ep->debugfs_state);
 254         debugfs_remove(ep->debugfs_dir);
 255         ep->debugfs_dma_status = NULL;
 256         ep->debugfs_dir = NULL;
 257 }
 258
 259 static void usba_init_debugfs(struct usba_udc *udc)
 260 {
 261         struct dentry *root, *regs;
 262         struct resource *regs_resource;
 263
 264         root = debugfs_create_dir(udc->gadget.name, NULL);
 265         if (IS_ERR(root) || !root)
 266                 goto err_root;
 267         udc->debugfs_root = root;
 268
 269         regs_resource = platform_get_resource(udc->pdev, IORESOURCE_MEM,
 270                                 CTRL_IOMEM_ID);
 271
 272         if (regs_resource) {
 273                 regs = debugfs_create_file_size("regs", 0400, root, udc,
 274                                                 &regs_dbg_fops,
 275                                                 resource_size(regs_resource));
 276                 if (!regs)
 277                         goto err_regs;
 278                 udc->debugfs_regs = regs;
 279         }
 280
 281         usba_ep_init_debugfs(udc, to_usba_ep(udc->gadget.ep0));
 282
 283         return;
 284
 285 err_regs:
 286         debugfs_remove(root);
 287 err_root:
 288         udc->debugfs_root = NULL;
 289         dev_err(&udc->pdev->dev, "debugfs is not available\n");
 290 }
 291
 292 static void usba_cleanup_debugfs(struct usba_udc *udc)
 293 {
 294         usba_ep_cleanup_debugfs(to_usba_ep(udc->gadget.ep0));
 295         debugfs_remove(udc->debugfs_regs);
 296         debugfs_remove(udc->debugfs_root);
 297         udc->debugfs_regs = NULL;
 298         udc->debugfs_root = NULL;
 299 }
 300 #else
 301 static inline void usba_ep_init_debugfs(struct usba_udc *udc,
 302                                          struct usba_ep *ep)
 303 {
 304
 305 }
 306
 307 static inline void usba_ep_cleanup_debugfs(struct usba_ep *ep)
 308 {
 309
 310 }
 311
 312 static inline void usba_init_debugfs(struct usba_udc *udc)
 313 {
 314
 315 }
 316
 317 static inline void usba_cleanup_debugfs(struct usba_udc *udc)
 318 {
 319
 320 }
 321 #endif
 322
 323 static inline u32 usba_int_enb_get(struct usba_udc *udc)
 324 {
 325         return udc->int_enb_cache;
 326 }
 327
 328 static inline void usba_int_enb_set(struct usba_udc *udc, u32 val)
 329 {
 330         usba_writel(udc, INT_ENB, val);
 331         udc->int_enb_cache = val;
 332 }
 333
 334 static int vbus_is_present(struct usba_udc *udc)
 335 {
 336         if (gpio_is_valid(udc->vbus_pin))
 337                 return gpio_get_value(udc->vbus_pin) ^ udc->vbus_pin_inverted;
 338
 339         /* No Vbus detection: Assume always present */
 340         return 1;
 341 }
 342
 343 static void toggle_bias(struct usba_udc *udc, int is_on)
 344 {
 345         if (udc->errata && udc->errata->toggle_bias)
 346                 udc->errata->toggle_bias(udc, is_on);
 347 }
 348
 349 static void generate_bias_pulse(struct usba_udc *udc)
 350 {
 351         if (!udc->bias_pulse_needed)
 352                 return;
 353
 354         if (udc->errata && udc->errata->pulse_bias)
 355                 udc->errata->pulse_bias(udc);
 356
 357         udc->bias_pulse_needed = false;
 358 }
 359
 360 static void next_fifo_transaction(struct usba_ep *ep, struct usba_request *req)
 361 {
 362         unsigned int transaction_len;
 363
 364         transaction_len = req->req.length - req->req.actual;
 365         req->last_transaction = 1;
 366         if (transaction_len > ep->ep.maxpacket) {
 367                 transaction_len = ep->ep.maxpacket;
 368                 req->last_transaction = 0;
 369         } else if (transaction_len == ep->ep.maxpacket && req->req.zero)
 370                 req->last_transaction = 0;
 371
 372         DBG(DBG_QUEUE, "%s: submit_transaction, req %p (length %d)%s\n",
 373                 ep->ep.name, req, transaction_len,
 374                 req->last_transaction ? ", done" : "");
 375
 376         memcpy_toio(ep->fifo, req->req.buf + req->req.actual, transaction_len);
 377         usba_ep_writel(ep, SET_STA, USBA_TX_PK_RDY);
 378         req->req.actual += transaction_len;
 379 }
 380
 381 static void submit_request(struct usba_ep *ep, struct usba_request *req)
 382 {
 383         DBG(DBG_QUEUE, "%s: submit_request: req %p (length %d)\n",
 384                 ep->ep.name, req, req->req.length);
 385
 386         req->req.actual = 0;
 387         req->submitted = 1;
 388
 389         if (req->using_dma) {
 390                 if (req->req.length == 0) {
 391                         usba_ep_writel(ep, CTL_ENB, USBA_TX_PK_RDY);
 392                         return;
 393                 }
 394
 395                 if (req->req.zero)
 396                         usba_ep_writel(ep, CTL_ENB, USBA_SHORT_PACKET);
 397                 else
 398                         usba_ep_writel(ep, CTL_DIS, USBA_SHORT_PACKET);
 399
 400                 usba_dma_writel(ep, ADDRESS, req->req.dma);
 401                 usba_dma_writel(ep, CONTROL, req->ctrl);
 402         } else {
 403                 next_fifo_transaction(ep, req);
 404                 if (req->last_transaction) {
 405                         usba_ep_writel(ep, CTL_DIS, USBA_TX_PK_RDY);
 406                         if (ep_is_control(ep))
 407                                 usba_ep_writel(ep, CTL_ENB, USBA_TX_COMPLETE);
 408                 } else {
 409                         if (ep_is_control(ep))
 410                                 usba_ep_writel(ep, CTL_DIS, USBA_TX_COMPLETE);
 411                         usba_ep_writel(ep, CTL_ENB, USBA_TX_PK_RDY);
 412                 }
 413         }
 414 }
 415
 416 static void submit_next_request(struct usba_ep *ep)
 417 {
 418         struct usba_request *req;
 419
 420         if (list_empty(&ep->queue)) {
 421                 usba_ep_writel(ep, CTL_DIS, USBA_TX_PK_RDY | USBA_RX_BK_RDY);
 422                 return;
 423         }
 424
 425         req = list_entry(ep->queue.next, struct usba_request, queue);
 426         if (!req->submitted)
 427                 submit_request(ep, req);
 428 }
 429
 430 static void send_status(struct usba_udc *udc, struct usba_ep *ep)
 431 {
 432         ep->state = STATUS_STAGE_IN;
 433         usba_ep_writel(ep, SET_STA, USBA_TX_PK_RDY);
 434         usba_ep_writel(ep, CTL_ENB, USBA_TX_COMPLETE);
 435 }
 436
 437 static void receive_data(struct usba_ep *ep)
 438 {
 439         struct usba_udc *udc = ep->udc;
 440         struct usba_request *req;
 441         unsigned long status;
 442         unsigned int bytecount, nr_busy;
 443         int is_complete = 0;
 444
 445         status = usba_ep_readl(ep, STA);
 446         nr_busy = USBA_BFEXT(BUSY_BANKS, status);
 447
 448         DBG(DBG_QUEUE, "receive data: nr_busy=%u\n", nr_busy);
 449
 450         while (nr_busy > 0) {
 451                 if (list_empty(&ep->queue)) {
 452                         usba_ep_writel(ep, CTL_DIS, USBA_RX_BK_RDY);
 453                         break;
 454                 }
 455                 req = list_entry(ep->queue.next,
 456                                  struct usba_request, queue);
 457
 458                 bytecount = USBA_BFEXT(BYTE_COUNT, status);
 459
 460                 if (status & (1 << 31))
 461                         is_complete = 1;
 462                 if (req->req.actual + bytecount >= req->req.length) {
 463                         is_complete = 1;
 464                         bytecount = req->req.length - req->req.actual;
 465                 }
 466
 467                 memcpy_fromio(req->req.buf + req->req.actual,
 468                                 ep->fifo, bytecount);
 469                 req->req.actual += bytecount;
 470
 471                 usba_ep_writel(ep, CLR_STA, USBA_RX_BK_RDY);
 472
 473                 if (is_complete) {
 474                         DBG(DBG_QUEUE, "%s: request done\n", ep->ep.name);
 475                         req->req.status = 0;
 476                         list_del_init(&req->queue);
 477                         usba_ep_writel(ep, CTL_DIS, USBA_RX_BK_RDY);
 478                         spin_unlock(&udc->lock);
 479                         usb_gadget_giveback_request(&ep->ep, &req->req);
 480                         spin_lock(&udc->lock);
 481                 }
 482
 483                 status = usba_ep_readl(ep, STA);
 484                 nr_busy = USBA_BFEXT(BUSY_BANKS, status);
 485
 486                 if (is_complete && ep_is_control(ep)) {
 487                         send_status(udc, ep);
 488                         break;
 489                 }
 490         }
 491 }
 492
 493 static void
 494 request_complete(struct usba_ep *ep, struct usba_request *req, int status)
 495 {
 496         struct usba_udc *udc = ep->udc;
 497
 498         WARN_ON(!list_empty(&req->queue));
 499
 500         if (req->req.status == -EINPROGRESS)
 501                 req->req.status = status;
 502
 503         if (req->using_dma)
 504                 usb_gadget_unmap_request(&udc->gadget, &req->req, ep->is_in);
 505
 506         DBG(DBG_GADGET | DBG_REQ,
 507                 "%s: req %p complete: status %d, actual %u\n",
 508                 ep->ep.name, req, req->req.status, req->req.actual);
 509
 510         spin_unlock(&udc->lock);
 511         usb_gadget_giveback_request(&ep->ep, &req->req);
 512         spin_lock(&udc->lock);
 513 }
 514
 515 static void
 516 request_complete_list(struct usba_ep *ep, struct list_head *list, int status)
 517 {
 518         struct usba_request *req, *tmp_req;
 519
 520         list_for_each_entry_safe(req, tmp_req, list, queue) {
 521                 list_del_init(&req->queue);
 522                 request_complete(ep, req, status);
 523         }
 524 }
 525
 526 static int
 527 usba_ep_enable(struct usb_ep *_ep, const struct usb_endpoint_descriptor *desc)
 528 {
 529         struct usba_ep *ep = to_usba_ep(_ep);
 530         struct usba_udc *udc = ep->udc;
 531         unsigned long flags, ept_cfg, maxpacket;
 532         unsigned int nr_trans;
 533
 534         DBG(DBG_GADGET, "%s: ep_enable: desc=%p\n", ep->ep.name, desc);
 535
 536         maxpacket = usb_endpoint_maxp(desc) & 0x7ff;
 537
 538         if (((desc->bEndpointAddress & USB_ENDPOINT_NUMBER_MASK) != ep->index)
 539                         || ep->index == 0
 540                         || desc->bDescriptorType != USB_DT_ENDPOINT
 541                         || maxpacket == 0
 542                         || maxpacket > ep->fifo_size) {
 543                 DBG(DBG_ERR, "ep_enable: Invalid argument");
 544                 return -EINVAL;
 545         }
 546
 547         ep->is_isoc = 0;
 548         ep->is_in = 0;
 549
 550         if (maxpacket <= 8)
 551                 ept_cfg = USBA_BF(EPT_SIZE, USBA_EPT_SIZE_8);
 552         else
 553                 /* LSB is bit 1, not 0 */
 554                 ept_cfg = USBA_BF(EPT_SIZE, fls(maxpacket - 1) - 3);
 555
 556         DBG(DBG_HW, "%s: EPT_SIZE = %lu (maxpacket = %lu)\n",
 557                         ep->ep.name, ept_cfg, maxpacket);
 558
 559         if (usb_endpoint_dir_in(desc)) {
 560                 ep->is_in = 1;
 561                 ept_cfg |= USBA_EPT_DIR_IN;
 562         }
 563
 564         switch (usb_endpoint_type(desc)) {
 565         case USB_ENDPOINT_XFER_CONTROL:
 566                 ept_cfg |= USBA_BF(EPT_TYPE, USBA_EPT_TYPE_CONTROL);
 567                 ept_cfg |= USBA_BF(BK_NUMBER, USBA_BK_NUMBER_ONE);
 568                 break;
 569         case USB_ENDPOINT_XFER_ISOC:
 570                 if (!ep->can_isoc) {
 571                         DBG(DBG_ERR, "ep_enable: %s is not isoc capable\n",
 572                                         ep->ep.name);
 573                         return -EINVAL;
 574                 }
 575
 576                 /*
 577                  * Bits 11:12 specify number of _additional_
 578                  * transactions per microframe.
 579                  */
 580                 nr_trans = ((usb_endpoint_maxp(desc) >> 11) & 3) + 1;
 581                 if (nr_trans > 3)
 582                         return -EINVAL;
 583
 584                 ep->is_isoc = 1;
 585                 ept_cfg |= USBA_BF(EPT_TYPE, USBA_EPT_TYPE_ISO);
 586
 587                 /*
 588                  * Do triple-buffering on high-bandwidth iso endpoints.
 589                  */
 590                 if (nr_trans > 1 && ep->nr_banks == 3)
 591                         ept_cfg |= USBA_BF(BK_NUMBER, USBA_BK_NUMBER_TRIPLE);
 592                 else
 593                         ept_cfg |= USBA_BF(BK_NUMBER, USBA_BK_NUMBER_DOUBLE);
 594                 ept_cfg |= USBA_BF(NB_TRANS, nr_trans);
 595                 break;
 596         case USB_ENDPOINT_XFER_BULK:
 597                 ept_cfg |= USBA_BF(EPT_TYPE, USBA_EPT_TYPE_BULK);
 598                 ept_cfg |= USBA_BF(BK_NUMBER, USBA_BK_NUMBER_DOUBLE);
 599                 break;
 600         case USB_ENDPOINT_XFER_INT:
 601                 ept_cfg |= USBA_BF(EPT_TYPE, USBA_EPT_TYPE_INT);
 602                 ept_cfg |= USBA_BF(BK_NUMBER, USBA_BK_NUMBER_DOUBLE);
 603                 break;
 604         }
 605
 606         spin_lock_irqsave(&ep->udc->lock, flags);
 607
 608         ep->ep.desc = desc;
 609         ep->ep.maxpacket = maxpacket;
 610
 611         usba_ep_writel(ep, CFG, ept_cfg);
 612         usba_ep_writel(ep, CTL_ENB, USBA_EPT_ENABLE);
 613
 614         if (ep->can_dma) {
 615                 u32 ctrl;
 616
 617                 usba_int_enb_set(udc, usba_int_enb_get(udc) |
 618                                       USBA_BF(EPT_INT, 1 << ep->index) |
 619                                       USBA_BF(DMA_INT, 1 << ep->index));
 620                 ctrl = USBA_AUTO_VALID | USBA_INTDIS_DMA;
 621                 usba_ep_writel(ep, CTL_ENB, ctrl);
 622         } else {
 623                 usba_int_enb_set(udc, usba_int_enb_get(udc) |
 624                                       USBA_BF(EPT_INT, 1 << ep->index));
 625         }
 626
 627         spin_unlock_irqrestore(&udc->lock, flags);
 628
 629         DBG(DBG_HW, "EPT_CFG%d after init: %#08lx\n", ep->index,
 630                         (unsigned long)usba_ep_readl(ep, CFG));
 631         DBG(DBG_HW, "INT_ENB after init: %#08lx\n",
 632                         (unsigned long)usba_int_enb_get(udc));
 633
 634         return 0;
 635 }
 636
 637 static int usba_ep_disable(struct usb_ep *_ep)
 638 {
 639         struct usba_ep *ep = to_usba_ep(_ep);
 640         struct usba_udc *udc = ep->udc;
 641         LIST_HEAD(req_list);
 642         unsigned long flags;
 643
 644         DBG(DBG_GADGET, "ep_disable: %s\n", ep->ep.name);
 645
 646         spin_lock_irqsave(&udc->lock, flags);
 647
 648         if (!ep->ep.desc) {
 649                 spin_unlock_irqrestore(&udc->lock, flags);
 650                 /* REVISIT because this driver disables endpoints in
 651                  * reset_all_endpoints() before calling disconnect(),
 652                  * most gadget drivers would trigger this non-error ...
 653                  */
 654                 if (udc->gadget.speed != USB_SPEED_UNKNOWN)
 655                         DBG(DBG_ERR, "ep_disable: %s not enabled\n",
 656                                         ep->ep.name);
 657                 return -EINVAL;
 658         }
 659         ep->ep.desc = NULL;
 660
 661         list_splice_init(&ep->queue, &req_list);
 662         if (ep->can_dma) {
 663                 usba_dma_writel(ep, CONTROL, 0);
 664                 usba_dma_writel(ep, ADDRESS, 0);
 665                 usba_dma_readl(ep, STATUS);
 666         }
 667         usba_ep_writel(ep, CTL_DIS, USBA_EPT_ENABLE);
 668         usba_int_enb_set(udc, usba_int_enb_get(udc) &
 669                               ~USBA_BF(EPT_INT, 1 << ep->index));
 670
 671         request_complete_list(ep, &req_list, -ESHUTDOWN);
 672
 673         spin_unlock_irqrestore(&udc->lock, flags);
 674
 675         return 0;
 676 }
 677
 678 static struct usb_request *
 679 usba_ep_alloc_request(struct usb_ep *_ep, gfp_t gfp_flags)
 680 {
 681         struct usba_request *req;
 682
 683         DBG(DBG_GADGET, "ep_alloc_request: %p, 0x%x\n", _ep, gfp_flags);
 684
 685         req = kzalloc(sizeof(*req), gfp_flags);
 686         if (!req)
 687                 return NULL;
 688
 689         INIT_LIST_HEAD(&req->queue);
 690
 691         return &req->req;
 692 }
 693
 694 static void
 695 usba_ep_free_request(struct usb_ep *_ep, struct usb_request *_req)
 696 {
 697         struct usba_request *req = to_usba_req(_req);
 698
 699         DBG(DBG_GADGET, "ep_free_request: %p, %p\n", _ep, _req);
 700
 701         kfree(req);
 702 }
 703
 704 static int queue_dma(struct usba_udc *udc, struct usba_ep *ep,
 705                 struct usba_request *req, gfp_t gfp_flags)
 706 {
 707         unsigned long flags;
 708         int ret;
 709
 710         DBG(DBG_DMA, "%s: req l/%u d/%pad %c%c%c\n",
 711                 ep->ep.name, req->req.length, &req->req.dma,
 712                 req->req.zero ? 'Z' : 'z',
 713                 req->req.short_not_ok ? 'S' : 's',
 714                 req->req.no_interrupt ? 'I' : 'i');
 715
 716         if (req->req.length > 0x10000) {
 717                 /* Lengths from 0 to 65536 (inclusive) are supported */
 718                 DBG(DBG_ERR, "invalid request length %u\n", req->req.length);
 719                 return -EINVAL;
 720         }
 721
 722         ret = usb_gadget_map_request(&udc->gadget, &req->req, ep->is_in);
 723         if (ret)
 724                 return ret;
 725
 726         req->using_dma = 1;
 727         req->ctrl = USBA_BF(DMA_BUF_LEN, req->req.length)
 728                         | USBA_DMA_CH_EN | USBA_DMA_END_BUF_IE
 729                         | USBA_DMA_END_BUF_EN;
 730
 731         if (!ep->is_in)
 732                 req->ctrl |= USBA_DMA_END_TR_EN | USBA_DMA_END_TR_IE;
 733
 734         /*
 735          * Add this request to the queue and submit for DMA if
 736          * possible. Check if we're still alive first -- we may have
 737          * received a reset since last time we checked.
 738          */
 739         ret = -ESHUTDOWN;
 740         spin_lock_irqsave(&udc->lock, flags);
 741         if (ep->ep.desc) {
 742                 if (list_empty(&ep->queue))
 743                         submit_request(ep, req);
 744
 745                 list_add_tail(&req->queue, &ep->queue);
 746                 ret = 0;
 747         }
 748         spin_unlock_irqrestore(&udc->lock, flags);
 749
 750         return ret;
 751 }
 752
 753 static int
 754 usba_ep_queue(struct usb_ep *_ep, struct usb_request *_req, gfp_t gfp_flags)
 755 {
 756         struct usba_request *req = to_usba_req(_req);
 757         struct usba_ep *ep = to_usba_ep(_ep);
 758         struct usba_udc *udc = ep->udc;
 759         unsigned long flags;
 760         int ret;
 761
 762         DBG(DBG_GADGET | DBG_QUEUE | DBG_REQ, "%s: queue req %p, len %u\n",
 763                         ep->ep.name, req, _req->length);
 764
 765         if (!udc->driver || udc->gadget.speed == USB_SPEED_UNKNOWN ||
 766             !ep->ep.desc)
 767                 return -ESHUTDOWN;
 768
 769         req->submitted = 0;
 770         req->using_dma = 0;
 771         req->last_transaction = 0;
 772
 773         _req->status = -EINPROGRESS;
 774         _req->actual = 0;
 775
 776         if (ep->can_dma)
 777                 return queue_dma(udc, ep, req, gfp_flags);
 778
 779         /* May have received a reset since last time we checked */
 780         ret = -ESHUTDOWN;
 781         spin_lock_irqsave(&udc->lock, flags);
 782         if (ep->ep.desc) {
 783                 list_add_tail(&req->queue, &ep->queue);
 784
 785                 if ((!ep_is_control(ep) && ep->is_in) ||
 786                         (ep_is_control(ep)
 787                                 && (ep->state == DATA_STAGE_IN
 788                                         || ep->state == STATUS_STAGE_IN)))
 789                         usba_ep_writel(ep, CTL_ENB, USBA_TX_PK_RDY);
 790                 else
 791                         usba_ep_writel(ep, CTL_ENB, USBA_RX_BK_RDY);
 792                 ret = 0;
 793         }
 794         spin_unlock_irqrestore(&udc->lock, flags);
 795
 796         return ret;
 797 }
 798
 799 static void
 800 usba_update_req(struct usba_ep *ep, struct usba_request *req, u32 status)
 801 {
 802         req->req.actual = req->req.length - USBA_BFEXT(DMA_BUF_LEN, status);
 803 }
 804
 805 static int stop_dma(struct usba_ep *ep, u32 *pstatus)
 806 {
 807         unsigned int timeout;
 808         u32 status;
 809
 810         /*
 811          * Stop the DMA controller. When writing both CH_EN
 812          * and LINK to 0, the other bits are not affected.
 813          */
 814         usba_dma_writel(ep, CONTROL, 0);
 815
 816         /* Wait for the FIFO to empty */
 817         for (timeout = 40; timeout; --timeout) {
 818                 status = usba_dma_readl(ep, STATUS);
 819                 if (!(status & USBA_DMA_CH_EN))
 820                         break;
 821                 udelay(1);
 822         }
 823
 824         if (pstatus)
 825                 *pstatus = status;
 826
 827         if (timeout == 0) {
 828                 dev_err(&ep->udc->pdev->dev,
 829                         "%s: timed out waiting for DMA FIFO to empty\n",
 830                         ep->ep.name);
 831                 return -ETIMEDOUT;
 832         }
 833
 834         return 0;
 835 }
 836
 837 static int usba_ep_dequeue(struct usb_ep *_ep, struct usb_request *_req)
 838 {
 839         struct usba_ep *ep = to_usba_ep(_ep);
 840         struct usba_udc *udc = ep->udc;
 841         struct usba_request *req;
 842         unsigned long flags;
 843         u32 status;
 844
 845         DBG(DBG_GADGET | DBG_QUEUE, "ep_dequeue: %s, req %p\n",
 846                         ep->ep.name, _req);
 847
 848         spin_lock_irqsave(&udc->lock, flags);
 849
 850         list_for_each_entry(req, &ep->queue, queue) {
 851                 if (&req->req == _req)
 852                         break;
 853         }
 854
 855         if (&req->req != _req) {
 856                 spin_unlock_irqrestore(&udc->lock, flags);
 857                 return -EINVAL;
 858         }
 859
 860         if (req->using_dma) {
 861                 /*
 862                  * If this request is currently being transferred,
 863                  * stop the DMA controller and reset the FIFO.
 864                  */
 865                 if (ep->queue.next == &req->queue) {
 866                         status = usba_dma_readl(ep, STATUS);
 867                         if (status & USBA_DMA_CH_EN)
 868                                 stop_dma(ep, &status);
 869
 870 #ifdef CONFIG_USB_GADGET_DEBUG_FS
 871                         ep->last_dma_status = status;
 872 #endif
 873
 874                         usba_writel(udc, EPT_RST, 1 << ep->index);
 875
 876                         usba_update_req(ep, req, status);
 877                 }
 878         }
 879
 880         /*
 881          * Errors should stop the queue from advancing until the
 882          * completion function returns.
 883          */
 884         list_del_init(&req->queue);
 885
 886         request_complete(ep, req, -ECONNRESET);
 887
 888         /* Process the next request if any */
 889         submit_next_request(ep);
 890         spin_unlock_irqrestore(&udc->lock, flags);
 891
 892         return 0;
 893 }
 894
 895 static int usba_ep_set_halt(struct usb_ep *_ep, int value)
 896 {
 897         struct usba_ep *ep = to_usba_ep(_ep);
 898         struct usba_udc *udc = ep->udc;
 899         unsigned long flags;
 900         int ret = 0;
 901
 902         DBG(DBG_GADGET, "endpoint %s: %s HALT\n", ep->ep.name,
 903                         value ? "set" : "clear");
 904
 905         if (!ep->ep.desc) {
 906                 DBG(DBG_ERR, "Attempted to halt uninitialized ep %s\n",
 907                                 ep->ep.name);
 908                 return -ENODEV;
 909         }
 910         if (ep->is_isoc) {
 911                 DBG(DBG_ERR, "Attempted to halt isochronous ep %s\n",
 912                                 ep->ep.name);
 913                 return -ENOTTY;
 914         }
 915
 916         spin_lock_irqsave(&udc->lock, flags);
 917
 918         /*
 919          * We can't halt IN endpoints while there are still data to be
 920          * transferred
 921          */
 922         if (!list_empty(&ep->queue)
 923                         || ((value && ep->is_in && (usba_ep_readl(ep, STA)
 924                                         & USBA_BF(BUSY_BANKS, -1L))))) {
 925                 ret = -EAGAIN;
 926         } else {
 927                 if (value)
 928                         usba_ep_writel(ep, SET_STA, USBA_FORCE_STALL);
 929                 else
 930                         usba_ep_writel(ep, CLR_STA,
 931                                         USBA_FORCE_STALL | USBA_TOGGLE_CLR);
 932                 usba_ep_readl(ep, STA);
 933         }
 934
 935         spin_unlock_irqrestore(&udc->lock, flags);
 936
 937         return ret;
 938 }
 939
 940 static int usba_ep_fifo_status(struct usb_ep *_ep)
 941 {
 942         struct usba_ep *ep = to_usba_ep(_ep);
 943
 944         return USBA_BFEXT(BYTE_COUNT, usba_ep_readl(ep, STA));
 945 }
 946
 947 static void usba_ep_fifo_flush(struct usb_ep *_ep)
 948 {
 949         struct usba_ep *ep = to_usba_ep(_ep);
 950         struct usba_udc *udc = ep->udc;
 951
 952         usba_writel(udc, EPT_RST, 1 << ep->index);
 953 }
 954
 955 static const struct usb_ep_ops usba_ep_ops = {
 956         .enable         = usba_ep_enable,
 957         .disable        = usba_ep_disable,
 958         .alloc_request  = usba_ep_alloc_request,
 959         .free_request   = usba_ep_free_request,
 960         .queue          = usba_ep_queue,
 961         .dequeue        = usba_ep_dequeue,
 962         .set_halt       = usba_ep_set_halt,
 963         .fifo_status    = usba_ep_fifo_status,
 964         .fifo_flush     = usba_ep_fifo_flush,
 965 };
 966
 967 static int usba_udc_get_frame(struct usb_gadget *gadget)
 968 {
 969         struct usba_udc *udc = to_usba_udc(gadget);
 970
 971         return USBA_BFEXT(FRAME_NUMBER, usba_readl(udc, FNUM));
 972 }
 973
 974 static int usba_udc_wakeup(struct usb_gadget *gadget)
 975 {
 976         struct usba_udc *udc = to_usba_udc(gadget);
 977         unsigned long flags;
 978         u32 ctrl;
 979         int ret = -EINVAL;
 980
 981         spin_lock_irqsave(&udc->lock, flags);
 982         if (udc->devstatus & (1 << USB_DEVICE_REMOTE_WAKEUP)) {
 983                 ctrl = usba_readl(udc, CTRL);
 984                 usba_writel(udc, CTRL, ctrl | USBA_REMOTE_WAKE_UP);
 985                 ret = 0;
 986         }
 987         spin_unlock_irqrestore(&udc->lock, flags);
 988
 989         return ret;
 990 }
 991
 992 static int
 993 usba_udc_set_selfpowered(struct usb_gadget *gadget, int is_selfpowered)
 994 {
 995         struct usba_udc *udc = to_usba_udc(gadget);
 996         unsigned long flags;
 997
 998         gadget->is_selfpowered = (is_selfpowered != 0);
 999         spin_lock_irqsave(&udc->lock, flags);
1000         if (is_selfpowered)
1001                 udc->devstatus |= 1 << USB_DEVICE_SELF_POWERED;
1002         else
1003                 udc->devstatus &= ~(1 << USB_DEVICE_SELF_POWERED);
1004         spin_unlock_irqrestore(&udc->lock, flags);
1005
1006         return 0;
1007 }
1008
1009 static int atmel_usba_start(struct usb_gadget *gadget,
1010                 struct usb_gadget_driver *driver);
1011 static int atmel_usba_stop(struct usb_gadget *gadget);
1012
1013 static const struct usb_gadget_ops usba_udc_ops = {
1014         .get_frame              = usba_udc_get_frame,
1015         .wakeup                 = usba_udc_wakeup,
1016         .set_selfpowered        = usba_udc_set_selfpowered,
1017         .udc_start              = atmel_usba_start,
1018         .udc_stop               = atmel_usba_stop,
1019 };
1020
1021 static struct usb_endpoint_descriptor usba_ep0_desc = {
1022         .bLength = USB_DT_ENDPOINT_SIZE,
1023         .bDescriptorType = USB_DT_ENDPOINT,
1024         .bEndpointAddress = 0,
1025         .bmAttributes = USB_ENDPOINT_XFER_CONTROL,
1026         .wMaxPacketSize = cpu_to_le16(64),
1027         /* FIXME: I have no idea what to put here */
1028         .bInterval = 1,
1029 };
1030
1031 static struct usb_gadget usba_gadget_template = {
1032         .ops            = &usba_udc_ops,
1033         .max_speed      = USB_SPEED_HIGH,
1034         .name           = "atmel_usba_udc",
1035 };
1036
1037 /*
1038  * Called with interrupts disabled and udc->lock held.
1039  */
1040 static void reset_all_endpoints(struct usba_udc *udc)
1041 {
1042         struct usba_ep *ep;
1043         struct usba_request *req, *tmp_req;
1044
1045         usba_writel(udc, EPT_RST, ~0UL);
1046
1047         ep = to_usba_ep(udc->gadget.ep0);
1048         list_for_each_entry_safe(req, tmp_req, &ep->queue, queue) {
1049                 list_del_init(&req->queue);
1050                 request_complete(ep, req, -ECONNRESET);
1051         }
1052
1053         /* NOTE:  normally, the next call to the gadget driver is in
1054          * charge of disabling endpoints... usually disconnect().
1055          * The exception would be entering a high speed test mode.
1056          *
1057          * FIXME remove this code ... and retest thoroughly.
1058          */
1059         list_for_each_entry(ep, &udc->gadget.ep_list, ep.ep_list) {
1060                 if (ep->ep.desc) {
1061                         spin_unlock(&udc->lock);
1062                         usba_ep_disable(&ep->ep);
1063                         spin_lock(&udc->lock);
1064                 }
1065         }
1066 }
1067
1068 static struct usba_ep *get_ep_by_addr(struct usba_udc *udc, u16 wIndex)
1069 {
1070         struct usba_ep *ep;
1071
1072         if ((wIndex & USB_ENDPOINT_NUMBER_MASK) == 0)
1073                 return to_usba_ep(udc->gadget.ep0);
1074
1075         list_for_each_entry (ep, &udc->gadget.ep_list, ep.ep_list) {
1076                 u8 bEndpointAddress;
1077
1078                 if (!ep->ep.desc)
1079                         continue;
1080                 bEndpointAddress = ep->ep.desc->bEndpointAddress;
1081                 if ((wIndex ^ bEndpointAddress) & USB_DIR_IN)
1082                         continue;
1083                 if ((bEndpointAddress & USB_ENDPOINT_NUMBER_MASK)
1084                                 == (wIndex & USB_ENDPOINT_NUMBER_MASK))
1085                         return ep;
1086         }
1087
1088         return NULL;
1089 }
1090
1091 /* Called with interrupts disabled and udc->lock held */
1092 static inline void set_protocol_stall(struct usba_udc *udc, struct usba_ep *ep)
1093 {
1094         usba_ep_writel(ep, SET_STA, USBA_FORCE_STALL);
1095         ep->state = WAIT_FOR_SETUP;
1096 }
1097
1098 static inline int is_stalled(struct usba_udc *udc, struct usba_ep *ep)
1099 {
1100         if (usba_ep_readl(ep, STA) & USBA_FORCE_STALL)
1101                 return 1;
1102         return 0;
1103 }
1104
1105 static inline void set_address(struct usba_udc *udc, unsigned int addr)
1106 {
1107         u32 regval;
1108
1109         DBG(DBG_BUS, "setting address %u...\n", addr);
1110         regval = usba_readl(udc, CTRL);
1111         regval = USBA_BFINS(DEV_ADDR, addr, regval);
1112         usba_writel(udc, CTRL, regval);
1113 }
1114
1115 static int do_test_mode(struct usba_udc *udc)
1116 {
1117         static const char test_packet_buffer[] = {
1118                 /* JKJKJKJK * 9 */
1119                 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,
1120                 /* JJKKJJKK * 8 */
1121                 0xAA, 0xAA, 0xAA, 0xAA, 0xAA, 0xAA, 0xAA, 0xAA,
1122                 /* JJKKJJKK * 8 */
1123                 0xEE, 0xEE, 0xEE, 0xEE, 0xEE, 0xEE, 0xEE, 0xEE,
1124                 /* JJJJJJJKKKKKKK * 8 */
1125                 0xFE, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF,
1126                 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF,
1127                 /* JJJJJJJK * 8 */
1128                 0x7F, 0xBF, 0xDF, 0xEF, 0xF7, 0xFB, 0xFD,
1129                 /* {JKKKKKKK * 10}, JK */
1130                 0xFC, 0x7E, 0xBF, 0xDF, 0xEF, 0xF7, 0xFB, 0xFD, 0x7E
1131         };
1132         struct usba_ep *ep;
1133         struct device *dev = &udc->pdev->dev;
1134         int test_mode;
1135
1136         test_mode = udc->test_mode;
1137
1138         /* Start from a clean slate */
1139         reset_all_endpoints(udc);
1140
1141         switch (test_mode) {
1142         case 0x0100:
1143                 /* Test_J */
1144                 usba_writel(udc, TST, USBA_TST_J_MODE);
1145                 dev_info(dev, "Entering Test_J mode...\n");
1146                 break;
1147         case 0x0200:
1148                 /* Test_K */
1149                 usba_writel(udc, TST, USBA_TST_K_MODE);
1150                 dev_info(dev, "Entering Test_K mode...\n");
1151                 break;
1152         case 0x0300:
1153                 /*
1154                  * Test_SE0_NAK: Force high-speed mode and set up ep0
1155                  * for Bulk IN transfers
1156                  */
1157                 ep = &udc->usba_ep[0];
1158                 usba_writel(udc, TST,
1159                                 USBA_BF(SPEED_CFG, USBA_SPEED_CFG_FORCE_HIGH));
1160                 usba_ep_writel(ep, CFG,
1161                                 USBA_BF(EPT_SIZE, USBA_EPT_SIZE_64)
1162                                 | USBA_EPT_DIR_IN
1163                                 | USBA_BF(EPT_TYPE, USBA_EPT_TYPE_BULK)
1164                                 | USBA_BF(BK_NUMBER, 1));
1165                 if (!(usba_ep_readl(ep, CFG) & USBA_EPT_MAPPED)) {
1166                         set_protocol_stall(udc, ep);
1167                         dev_err(dev, "Test_SE0_NAK: ep0 not mapped\n");
1168                 } else {
1169                         usba_ep_writel(ep, CTL_ENB, USBA_EPT_ENABLE);
1170                         dev_info(dev, "Entering Test_SE0_NAK mode...\n");
1171                 }
1172                 break;
1173         case 0x0400:
1174                 /* Test_Packet */
1175                 ep = &udc->usba_ep[0];
1176                 usba_ep_writel(ep, CFG,
1177                                 USBA_BF(EPT_SIZE, USBA_EPT_SIZE_64)
1178                                 | USBA_EPT_DIR_IN
1179                                 | USBA_BF(EPT_TYPE, USBA_EPT_TYPE_BULK)
1180                                 | USBA_BF(BK_NUMBER, 1));
1181                 if (!(usba_ep_readl(ep, CFG) & USBA_EPT_MAPPED)) {
1182                         set_protocol_stall(udc, ep);
1183                         dev_err(dev, "Test_Packet: ep0 not mapped\n");
1184                 } else {
1185                         usba_ep_writel(ep, CTL_ENB, USBA_EPT_ENABLE);
1186                         usba_writel(udc, TST, USBA_TST_PKT_MODE);
1187                         memcpy_toio(ep->fifo, test_packet_buffer,
1188                                         sizeof(test_packet_buffer));
1189                         usba_ep_writel(ep, SET_STA, USBA_TX_PK_RDY);
1190                         dev_info(dev, "Entering Test_Packet mode...\n");
1191                 }
1192                 break;
1193         default:
1194                 dev_err(dev, "Invalid test mode: 0x%04x\n", test_mode);
1195                 return -EINVAL;
1196         }
1197
1198         return 0;
1199 }
1200
1201 /* Avoid overly long expressions */
1202 static inline bool feature_is_dev_remote_wakeup(struct usb_ctrlrequest *crq)
1203 {
1204         if (crq->wValue == cpu_to_le16(USB_DEVICE_REMOTE_WAKEUP))
1205                 return true;
1206         return false;
1207 }
1208
1209 static inline bool feature_is_dev_test_mode(struct usb_ctrlrequest *crq)
1210 {
1211         if (crq->wValue == cpu_to_le16(USB_DEVICE_TEST_MODE))
1212                 return true;
1213         return false;
1214 }
1215
1216 static inline bool feature_is_ep_halt(struct usb_ctrlrequest *crq)
1217 {
1218         if (crq->wValue == cpu_to_le16(USB_ENDPOINT_HALT))
1219                 return true;
1220         return false;
1221 }
1222
1223 static int handle_ep0_setup(struct usba_udc *udc, struct usba_ep *ep,
1224                 struct usb_ctrlrequest *crq)
1225 {
1226         int retval = 0;
1227
1228         switch (crq->bRequest) {
1229         case USB_REQ_GET_STATUS: {
1230                 u16 status;
1231
1232                 if (crq->bRequestType == (USB_DIR_IN | USB_RECIP_DEVICE)) {
1233                         status = cpu_to_le16(udc->devstatus);
1234                 } else if (crq->bRequestType
1235                                 == (USB_DIR_IN | USB_RECIP_INTERFACE)) {
1236                         status = cpu_to_le16(0);
1237                 } else if (crq->bRequestType
1238                                 == (USB_DIR_IN | USB_RECIP_ENDPOINT)) {
1239                         struct usba_ep *target;
1240
1241                         target = get_ep_by_addr(udc, le16_to_cpu(crq->wIndex));
1242                         if (!target)
1243                                 goto stall;
1244
1245                         status = 0;
1246                         if (is_stalled(udc, target))
1247                                 status |= cpu_to_le16(1);
1248                 } else
1249                         goto delegate;
1250
1251                 /* Write directly to the FIFO. No queueing is done. */
1252                 if (crq->wLength != cpu_to_le16(sizeof(status)))
1253                         goto stall;
1254                 ep->state = DATA_STAGE_IN;
1255                 usba_io_writew(status, ep->fifo);
1256                 usba_ep_writel(ep, SET_STA, USBA_TX_PK_RDY);
1257                 break;
1258         }
1259
1260         case USB_REQ_CLEAR_FEATURE: {
1261                 if (crq->bRequestType == USB_RECIP_DEVICE) {
1262                         if (feature_is_dev_remote_wakeup(crq))
1263                                 udc->devstatus
1264                                         &= ~(1 << USB_DEVICE_REMOTE_WAKEUP);
1265                         else
1266                                 /* Can't CLEAR_FEATURE TEST_MODE */
1267                                 goto stall;
1268                 } else if (crq->bRequestType == USB_RECIP_ENDPOINT) {
1269                         struct usba_ep *target;
1270
1271                         if (crq->wLength != cpu_to_le16(0)
1272                                         || !feature_is_ep_halt(crq))
1273                                 goto stall;
1274                         target = get_ep_by_addr(udc, le16_to_cpu(crq->wIndex));
1275                         if (!target)
1276                                 goto stall;
1277
1278                         usba_ep_writel(target, CLR_STA, USBA_FORCE_STALL);
1279                         if (target->index != 0)
1280                                 usba_ep_writel(target, CLR_STA,
1281                                                 USBA_TOGGLE_CLR);
1282                 } else {
1283                         goto delegate;
1284                 }
1285
1286                 send_status(udc, ep);
1287                 break;
1288         }
1289
1290         case USB_REQ_SET_FEATURE: {
1291                 if (crq->bRequestType == USB_RECIP_DEVICE) {
1292                         if (feature_is_dev_test_mode(crq)) {
1293                                 send_status(udc, ep);
1294                                 ep->state = STATUS_STAGE_TEST;
1295                                 udc->test_mode = le16_to_cpu(crq->wIndex);
1296                                 return 0;
1297                         } else if (feature_is_dev_remote_wakeup(crq)) {
1298                                 udc->devstatus |= 1 << USB_DEVICE_REMOTE_WAKEUP;
1299                         } else {
1300                                 goto stall;
1301                         }
1302                 } else if (crq->bRequestType == USB_RECIP_ENDPOINT) {
1303                         struct usba_ep *target;
1304
1305                         if (crq->wLength != cpu_to_le16(0)
1306                                         || !feature_is_ep_halt(crq))
1307                                 goto stall;
1308
1309                         target = get_ep_by_addr(udc, le16_to_cpu(crq->wIndex));
1310                         if (!target)
1311                                 goto stall;
1312
1313                         usba_ep_writel(target, SET_STA, USBA_FORCE_STALL);
1314                 } else
1315                         goto delegate;
1316
1317                 send_status(udc, ep);
1318                 break;
1319         }
1320
1321         case USB_REQ_SET_ADDRESS:
1322                 if (crq->bRequestType != (USB_DIR_OUT | USB_RECIP_DEVICE))
1323                         goto delegate;
1324
1325                 set_address(udc, le16_to_cpu(crq->wValue));
1326                 send_status(udc, ep);
1327                 ep->state = STATUS_STAGE_ADDR;
1328                 break;
1329
1330         default:
1331 delegate:
1332                 spin_unlock(&udc->lock);
1333                 retval = udc->driver->setup(&udc->gadget, crq);
1334                 spin_lock(&udc->lock);
1335         }
1336
1337         return retval;
1338
1339 stall:
1340         pr_err("udc: %s: Invalid setup request: %02x.%02x v%04x i%04x l%d, "
1341                 "halting endpoint...\n",
1342                 ep->ep.name, crq->bRequestType, crq->bRequest,
1343                 le16_to_cpu(crq->wValue), le16_to_cpu(crq->wIndex),
1344                 le16_to_cpu(crq->wLength));
1345         set_protocol_stall(udc, ep);
1346         return -1;
1347 }
1348
1349 static void usba_control_irq(struct usba_udc *udc, struct usba_ep *ep)
1350 {
1351         struct usba_request *req;
1352         u32 epstatus;
1353         u32 epctrl;
1354
1355 restart:
1356         epstatus = usba_ep_readl(ep, STA);
1357         epctrl = usba_ep_readl(ep, CTL);
1358
1359         DBG(DBG_INT, "%s [%d]: s/%08x c/%08x\n",
1360                         ep->ep.name, ep->state, epstatus, epctrl);
1361
1362         req = NULL;
1363         if (!list_empty(&ep->queue))
1364                 req = list_entry(ep->queue.next,
1365                                  struct usba_request, queue);
1366
1367         if ((epctrl & USBA_TX_PK_RDY) && !(epstatus & USBA_TX_PK_RDY)) {
1368                 if (req->submitted)
1369                         next_fifo_transaction(ep, req);
1370                 else
1371                         submit_request(ep, req);
1372
1373                 if (req->last_transaction) {
1374                         usba_ep_writel(ep, CTL_DIS, USBA_TX_PK_RDY);
1375                         usba_ep_writel(ep, CTL_ENB, USBA_TX_COMPLETE);
1376                 }
1377                 goto restart;
1378         }
1379         if ((epstatus & epctrl) & USBA_TX_COMPLETE) {
1380                 usba_ep_writel(ep, CLR_STA, USBA_TX_COMPLETE);
1381
1382                 switch (ep->state) {
1383                 case DATA_STAGE_IN:
1384                         usba_ep_writel(ep, CTL_ENB, USBA_RX_BK_RDY);
1385                         usba_ep_writel(ep, CTL_DIS, USBA_TX_COMPLETE);
1386                         ep->state = STATUS_STAGE_OUT;
1387                         break;
1388                 case STATUS_STAGE_ADDR:
1389                         /* Activate our new address */
1390                         usba_writel(udc, CTRL, (usba_readl(udc, CTRL)
1391                                                 | USBA_FADDR_EN));
1392                         usba_ep_writel(ep, CTL_DIS, USBA_TX_COMPLETE);
1393                         ep->state = WAIT_FOR_SETUP;
1394                         break;
1395                 case STATUS_STAGE_IN:
1396                         if (req) {
1397                                 list_del_init(&req->queue);
1398                                 request_complete(ep, req, 0);
1399                                 submit_next_request(ep);
1400                         }
1401                         usba_ep_writel(ep, CTL_DIS, USBA_TX_COMPLETE);
1402                         ep->state = WAIT_FOR_SETUP;
1403                         break;
1404                 case STATUS_STAGE_TEST:
1405                         usba_ep_writel(ep, CTL_DIS, USBA_TX_COMPLETE);
1406                         ep->state = WAIT_FOR_SETUP;
1407                         if (do_test_mode(udc))
1408                                 set_protocol_stall(udc, ep);
1409                         break;
1410                 default:
1411                         pr_err("udc: %s: TXCOMP: Invalid endpoint state %d, "
1412                                 "halting endpoint...\n",
1413                                 ep->ep.name, ep->state);
1414                         set_protocol_stall(udc, ep);
1415                         break;
1416                 }
1417
1418                 goto restart;
1419         }
1420         if ((epstatus & epctrl) & USBA_RX_BK_RDY) {
1421                 switch (ep->state) {
1422                 case STATUS_STAGE_OUT:
1423                         usba_ep_writel(ep, CLR_STA, USBA_RX_BK_RDY);
1424                         usba_ep_writel(ep, CTL_DIS, USBA_RX_BK_RDY);
1425
1426                         if (req) {
1427                                 list_del_init(&req->queue);
1428                                 request_complete(ep, req, 0);
1429                         }
1430                         ep->state = WAIT_FOR_SETUP;
1431                         break;
1432
1433                 case DATA_STAGE_OUT:
1434                         receive_data(ep);
1435                         break;
1436
1437                 default:
1438                         usba_ep_writel(ep, CLR_STA, USBA_RX_BK_RDY);
1439                         usba_ep_writel(ep, CTL_DIS, USBA_RX_BK_RDY);
1440                         pr_err("udc: %s: RXRDY: Invalid endpoint state %d, "
1441                                 "halting endpoint...\n",
1442                                 ep->ep.name, ep->state);
1443                         set_protocol_stall(udc, ep);
1444                         break;
1445                 }
1446
1447                 goto restart;
1448         }
1449         if (epstatus & USBA_RX_SETUP) {
1450                 union {
1451                         struct usb_ctrlrequest crq;
1452                         unsigned long data[2];
1453                 } crq;
1454                 unsigned int pkt_len;
1455                 int ret;
1456
1457                 if (ep->state != WAIT_FOR_SETUP) {
1458                         /*
1459                          * Didn't expect a SETUP packet at this
1460                          * point. Clean up any pending requests (which
1461                          * may be successful).
1462                          */
1463                         int status = -EPROTO;
1464
1465                         /*
1466                          * RXRDY and TXCOMP are dropped when SETUP
1467                          * packets arrive.  Just pretend we received
1468                          * the status packet.
1469                          */
1470                         if (ep->state == STATUS_STAGE_OUT
1471                                         || ep->state == STATUS_STAGE_IN) {
1472                                 usba_ep_writel(ep, CTL_DIS, USBA_RX_BK_RDY);
1473                                 status = 0;
1474                         }
1475
1476                         if (req) {
1477                                 list_del_init(&req->queue);
1478                                 request_complete(ep, req, status);
1479                         }
1480                 }
1481
1482                 pkt_len = USBA_BFEXT(BYTE_COUNT, usba_ep_readl(ep, STA));
1483                 DBG(DBG_HW, "Packet length: %u\n", pkt_len);
1484                 if (pkt_len != sizeof(crq)) {
1485                         pr_warning("udc: Invalid packet length %u "
1486                                 "(expected %zu)\n", pkt_len, sizeof(crq));
1487                         set_protocol_stall(udc, ep);
1488                         return;
1489                 }
1490
1491                 DBG(DBG_FIFO, "Copying ctrl request from 0x%p:\n", ep->fifo);
1492                 memcpy_fromio(crq.data, ep->fifo, sizeof(crq));
1493
1494                 /* Free up one bank in the FIFO so that we can
1495                  * generate or receive a reply right away. */
1496                 usba_ep_writel(ep, CLR_STA, USBA_RX_SETUP);
1497
1498                 /* printk(KERN_DEBUG "setup: %d: %02x.%02x\n",
1499                         ep->state, crq.crq.bRequestType,
1500                         crq.crq.bRequest); */
1501
1502                 if (crq.crq.bRequestType & USB_DIR_IN) {
1503                         /*
1504                          * The USB 2.0 spec states that "if wLength is
1505                          * zero, there is no data transfer phase."
1506                          * However, testusb #14 seems to actually
1507                          * expect a data phase even if wLength = 0...
1508                          */
1509                         ep->state = DATA_STAGE_IN;
1510                 } else {
1511                         if (crq.crq.wLength != cpu_to_le16(0))
1512                                 ep->state = DATA_STAGE_OUT;
1513                         else
1514                                 ep->state = STATUS_STAGE_IN;
1515                 }
1516
1517                 ret = -1;
1518                 if (ep->index == 0)
1519                         ret = handle_ep0_setup(udc, ep, &crq.crq);
1520                 else {
1521                         spin_unlock(&udc->lock);
1522                         ret = udc->driver->setup(&udc->gadget, &crq.crq);
1523                         spin_lock(&udc->lock);
1524                 }
1525
1526                 DBG(DBG_BUS, "req %02x.%02x, length %d, state %d, ret %d\n",
1527                         crq.crq.bRequestType, crq.crq.bRequest,
1528                         le16_to_cpu(crq.crq.wLength), ep->state, ret);
1529
1530                 if (ret < 0) {
1531                         /* Let the host know that we failed */
1532                         set_protocol_stall(udc, ep);
1533                 }
1534         }
1535 }
1536
1537 static void usba_ep_irq(struct usba_udc *udc, struct usba_ep *ep)
1538 {
1539         struct usba_request *req;
1540         u32 epstatus;
1541         u32 epctrl;
1542
1543         epstatus = usba_ep_readl(ep, STA);
1544         epctrl = usba_ep_readl(ep, CTL);
1545
1546         DBG(DBG_INT, "%s: interrupt, status: 0x%08x\n", ep->ep.name, epstatus);
1547
1548         while ((epctrl & USBA_TX_PK_RDY) && !(epstatus & USBA_TX_PK_RDY)) {
1549                 DBG(DBG_BUS, "%s: TX PK ready\n", ep->ep.name);
1550
1551                 if (list_empty(&ep->queue)) {
1552                         dev_warn(&udc->pdev->dev, "ep_irq: queue empty\n");
1553                         usba_ep_writel(ep, CTL_DIS, USBA_TX_PK_RDY);
1554                         return;
1555                 }
1556
1557                 req = list_entry(ep->queue.next, struct usba_request, queue);
1558
1559                 if (req->using_dma) {
1560                         /* Send a zero-length packet */
1561                         usba_ep_writel(ep, SET_STA,
1562                                         USBA_TX_PK_RDY);
1563                         usba_ep_writel(ep, CTL_DIS,
1564                                         USBA_TX_PK_RDY);
1565                         list_del_init(&req->queue);
1566                         submit_next_request(ep);
1567                         request_complete(ep, req, 0);
1568                 } else {
1569                         if (req->submitted)
1570                                 next_fifo_transaction(ep, req);
1571                         else
1572                                 submit_request(ep, req);
1573
1574                         if (req->last_transaction) {
1575                                 list_del_init(&req->queue);
1576                                 submit_next_request(ep);
1577                                 request_complete(ep, req, 0);
1578                         }
1579                 }
1580
1581                 epstatus = usba_ep_readl(ep, STA);
1582                 epctrl = usba_ep_readl(ep, CTL);
1583         }
1584         if ((epstatus & epctrl) & USBA_RX_BK_RDY) {
1585                 DBG(DBG_BUS, "%s: RX data ready\n", ep->ep.name);
1586                 receive_data(ep);
1587         }
1588 }
1589
1590 static void usba_dma_irq(struct usba_udc *udc, struct usba_ep *ep)
1591 {
1592         struct usba_request *req;
1593         u32 status, control, pending;
1594
1595         status = usba_dma_readl(ep, STATUS);
1596         control = usba_dma_readl(ep, CONTROL);
1597 #ifdef CONFIG_USB_GADGET_DEBUG_FS
1598         ep->last_dma_status = status;
1599 #endif
1600         pending = status & control;
1601         DBG(DBG_INT | DBG_DMA, "dma irq, s/%#08x, c/%#08x\n", status, control);
1602
1603         if (status & USBA_DMA_CH_EN) {
1604                 dev_err(&udc->pdev->dev,
1605                         "DMA_CH_EN is set after transfer is finished!\n");
1606                 dev_err(&udc->pdev->dev,
1607                         "status=%#08x, pending=%#08x, control=%#08x\n",
1608                         status, pending, control);
1609
1610                 /*
1611                  * try to pretend nothing happened. We might have to
1612                  * do something here...
1613                  */
1614         }
1615
1616         if (list_empty(&ep->queue))
1617                 /* Might happen if a reset comes along at the right moment */
1618                 return;
1619
1620         if (pending & (USBA_DMA_END_TR_ST | USBA_DMA_END_BUF_ST)) {
1621                 req = list_entry(ep->queue.next, struct usba_request, queue);
1622                 usba_update_req(ep, req, status);
1623
1624                 list_del_init(&req->queue);
1625                 submit_next_request(ep);
1626                 request_complete(ep, req, 0);
1627         }
1628 }
1629
1630 static irqreturn_t usba_udc_irq(int irq, void *devid)
1631 {
1632         struct usba_udc *udc = devid;
1633         u32 status, int_enb;
1634         u32 dma_status;
1635         u32 ep_status;
1636
1637         spin_lock(&udc->lock);
1638
1639         int_enb = usba_int_enb_get(udc);
1640         status = usba_readl(udc, INT_STA) & (int_enb | USBA_HIGH_SPEED);
1641         DBG(DBG_INT, "irq, status=%#08x\n", status);
1642
1643         if (status & USBA_DET_SUSPEND) {
1644                 toggle_bias(udc, 0);
1645                 usba_writel(udc, INT_CLR, USBA_DET_SUSPEND);
1646                 usba_int_enb_set(udc, int_enb | USBA_WAKE_UP);
1647                 udc->bias_pulse_needed = true;
1648                 DBG(DBG_BUS, "Suspend detected\n");
1649                 if (udc->gadget.speed != USB_SPEED_UNKNOWN
1650                                 && udc->driver && udc->driver->suspend) {
1651                         spin_unlock(&udc->lock);
1652                         udc->driver->suspend(&udc->gadget);
1653                         spin_lock(&udc->lock);
1654                 }
1655         }
1656
1657         if (status & USBA_WAKE_UP) {
1658                 toggle_bias(udc, 1);
1659                 usba_writel(udc, INT_CLR, USBA_WAKE_UP);
1660                 usba_int_enb_set(udc, int_enb & ~USBA_WAKE_UP);
1661                 DBG(DBG_BUS, "Wake Up CPU detected\n");
1662         }
1663
1664         if (status & USBA_END_OF_RESUME) {
1665                 usba_writel(udc, INT_CLR, USBA_END_OF_RESUME);
1666                 generate_bias_pulse(udc);
1667                 DBG(DBG_BUS, "Resume detected\n");
1668                 if (udc->gadget.speed != USB_SPEED_UNKNOWN
1669                                 && udc->driver && udc->driver->resume) {
1670                         spin_unlock(&udc->lock);
1671                         udc->driver->resume(&udc->gadget);
1672                         spin_lock(&udc->lock);
1673                 }
1674         }
1675
1676         dma_status = USBA_BFEXT(DMA_INT, status);
1677         if (dma_status) {
1678                 int i;
1679
1680                 for (i = 1; i <= USBA_NR_DMAS; i++)
1681                         if (dma_status & (1 << i))
1682                                 usba_dma_irq(udc, &udc->usba_ep[i]);
1683         }
1684
1685         ep_status = USBA_BFEXT(EPT_INT, status);
1686         if (ep_status) {
1687                 int i;
1688
1689                 for (i = 0; i < udc->num_ep; i++)
1690                         if (ep_status & (1 << i)) {
1691                                 if (ep_is_control(&udc->usba_ep[i]))
1692                                         usba_control_irq(udc, &udc->usba_ep[i]);
1693                                 else
1694                                         usba_ep_irq(udc, &udc->usba_ep[i]);
1695                         }
1696         }
1697
1698         if (status & USBA_END_OF_RESET) {
1699                 struct usba_ep *ep0;
1700
1701                 usba_writel(udc, INT_CLR, USBA_END_OF_RESET);
1702                 generate_bias_pulse(udc);
1703                 reset_all_endpoints(udc);
1704
1705                 if (udc->gadget.speed != USB_SPEED_UNKNOWN && udc->driver) {
1706                         udc->gadget.speed = USB_SPEED_UNKNOWN;
1707                         spin_unlock(&udc->lock);
1708                         usb_gadget_udc_reset(&udc->gadget, udc->driver);
1709                         spin_lock(&udc->lock);
1710                 }
1711
1712                 if (status & USBA_HIGH_SPEED)
1713                         udc->gadget.speed = USB_SPEED_HIGH;
1714                 else
1715                         udc->gadget.speed = USB_SPEED_FULL;
1716                 DBG(DBG_BUS, "%s bus reset detected\n",
1717                     usb_speed_string(udc->gadget.speed));
1718
1719                 ep0 = &udc->usba_ep[0];
1720                 ep0->ep.desc = &usba_ep0_desc;
1721                 ep0->state = WAIT_FOR_SETUP;
1722                 usba_ep_writel(ep0, CFG,
1723                                 (USBA_BF(EPT_SIZE, EP0_EPT_SIZE)
1724                                 | USBA_BF(EPT_TYPE, USBA_EPT_TYPE_CONTROL)
1725                                 | USBA_BF(BK_NUMBER, USBA_BK_NUMBER_ONE)));
1726                 usba_ep_writel(ep0, CTL_ENB,
1727                                 USBA_EPT_ENABLE | USBA_RX_SETUP);
1728                 usba_int_enb_set(udc, int_enb | USBA_BF(EPT_INT, 1) |
1729                                       USBA_DET_SUSPEND | USBA_END_OF_RESUME);
1730
1731                 /*
1732                  * Unclear why we hit this irregularly, e.g. in usbtest,
1733                  * but it's clearly harmless...
1734                  */
1735                 if (!(usba_ep_readl(ep0, CFG) & USBA_EPT_MAPPED))
1736                         dev_dbg(&udc->pdev->dev,
1737                                  "ODD: EP0 configuration is invalid!\n");
1738         }
1739
1740         spin_unlock(&udc->lock);
1741
1742         return IRQ_HANDLED;
1743 }
1744
1745 static int start_clock(struct usba_udc *udc)
1746 {
1747         int ret;
1748
1749         if (udc->clocked)
1750                 return 0;
1751
1752         ret = clk_prepare_enable(udc->pclk);
1753         if (ret)
1754                 return ret;
1755         ret = clk_prepare_enable(udc->hclk);
1756         if (ret) {
1757                 clk_disable_unprepare(udc->pclk);
1758                 return ret;
1759         }
1760
1761         udc->clocked = true;
1762         return 0;
1763 }
1764
1765 static void stop_clock(struct usba_udc *udc)
1766 {
1767         if (!udc->clocked)
1768                 return;
1769
1770         clk_disable_unprepare(udc->hclk);
1771         clk_disable_unprepare(udc->pclk);
1772
1773         udc->clocked = false;
1774 }
1775
1776 static int usba_start(struct usba_udc *udc)
1777 {
1778         unsigned long flags;
1779         int ret;
1780
1781         ret = start_clock(udc);
1782         if (ret)
1783                 return ret;
1784
1785         spin_lock_irqsave(&udc->lock, flags);
1786         toggle_bias(udc, 1);
1787         usba_writel(udc, CTRL, USBA_ENABLE_MASK);
1788         usba_int_enb_set(udc, USBA_END_OF_RESET);
1789         spin_unlock_irqrestore(&udc->lock, flags);
1790
1791         return 0;
1792 }
1793
1794 static void usba_stop(struct usba_udc *udc)
1795 {
1796         unsigned long flags;
1797
1798         spin_lock_irqsave(&udc->lock, flags);
1799         udc->gadget.speed = USB_SPEED_UNKNOWN;
1800         reset_all_endpoints(udc);
1801
1802         /* This will also disable the DP pullup */
1803         toggle_bias(udc, 0);
1804         usba_writel(udc, CTRL, USBA_DISABLE_MASK);
1805         spin_unlock_irqrestore(&udc->lock, flags);
1806
1807         stop_clock(udc);
1808 }
1809
1810 static irqreturn_t usba_vbus_irq_thread(int irq, void *devid)
1811 {
1812         struct usba_udc *udc = devid;
1813         int vbus;
1814
1815         /* debounce */
1816         udelay(10);
1817
1818         mutex_lock(&udc->vbus_mutex);
1819
1820         vbus = vbus_is_present(udc);
1821         if (vbus != udc->vbus_prev) {
1822                 if (vbus) {
1823                         usba_start(udc);
1824                 } else {
1825                         usba_stop(udc);
1826
1827                         if (udc->driver->disconnect)
1828                                 udc->driver->disconnect(&udc->gadget);
1829                 }
1830                 udc->vbus_prev = vbus;
1831         }
1832
1833         mutex_unlock(&udc->vbus_mutex);
1834         return IRQ_HANDLED;
1835 }
1836
1837 static int atmel_usba_start(struct usb_gadget *gadget,
1838                 struct usb_gadget_driver *driver)
1839 {
1840         int ret;
1841         struct usba_udc *udc = container_of(gadget, struct usba_udc, gadget);
1842         unsigned long flags;
1843
1844         spin_lock_irqsave(&udc->lock, flags);
1845         udc->devstatus = 1 << USB_DEVICE_SELF_POWERED;
1846         udc->driver = driver;
1847         spin_unlock_irqrestore(&udc->lock, flags);
1848
1849         mutex_lock(&udc->vbus_mutex);
1850
1851         if (gpio_is_valid(udc->vbus_pin))
1852                 enable_irq(gpio_to_irq(udc->vbus_pin));
1853
1854         /* If Vbus is present, enable the controller and wait for reset */
1855         udc->vbus_prev = vbus_is_present(udc);
1856         if (udc->vbus_prev) {
1857                 ret = usba_start(udc);
1858                 if (ret)
1859                         goto err;
1860         }
1861
1862         mutex_unlock(&udc->vbus_mutex);
1863         return 0;
1864
1865 err:
1866         if (gpio_is_valid(udc->vbus_pin))
1867                 disable_irq(gpio_to_irq(udc->vbus_pin));
1868
1869         mutex_unlock(&udc->vbus_mutex);
1870
1871         spin_lock_irqsave(&udc->lock, flags);
1872         udc->devstatus &= ~(1 << USB_DEVICE_SELF_POWERED);
1873         udc->driver = NULL;
1874         spin_unlock_irqrestore(&udc->lock, flags);
1875         return ret;
1876 }
1877
1878 static int atmel_usba_stop(struct usb_gadget *gadget)
1879 {
1880         struct usba_udc *udc = container_of(gadget, struct usba_udc, gadget);
1881
1882         if (gpio_is_valid(udc->vbus_pin))
1883                 disable_irq(gpio_to_irq(udc->vbus_pin));
1884
1885         usba_stop(udc);
1886
1887         udc->driver = NULL;
1888
1889         return 0;
1890 }
1891
1892 #ifdef CONFIG_OF
1893 static void at91sam9rl_toggle_bias(struct usba_udc *udc, int is_on)
1894 {
1895         unsigned int uckr = at91_pmc_read(AT91_CKGR_UCKR);
1896
1897         if (is_on)
1898                 at91_pmc_write(AT91_CKGR_UCKR, uckr | AT91_PMC_BIASEN);
1899         else
1900                 at91_pmc_write(AT91_CKGR_UCKR, uckr & ~(AT91_PMC_BIASEN));
1901 }
1902
1903 static void at91sam9g45_pulse_bias(struct usba_udc *udc)
1904 {
1905         unsigned int uckr = at91_pmc_read(AT91_CKGR_UCKR);
1906
1907         at91_pmc_write(AT91_CKGR_UCKR, uckr & ~(AT91_PMC_BIASEN));
1908         at91_pmc_write(AT91_CKGR_UCKR, uckr | AT91_PMC_BIASEN);
1909 }
1910
1911 static const struct usba_udc_errata at91sam9rl_errata = {
1912         .toggle_bias = at91sam9rl_toggle_bias,
1913 };
1914
1915 static const struct usba_udc_errata at91sam9g45_errata = {
1916         .pulse_bias = at91sam9g45_pulse_bias,
1917 };
1918
1919 static const struct of_device_id atmel_udc_dt_ids[] = {
1920         { .compatible = "atmel,at91sam9rl-udc", .data = &at91sam9rl_errata },
1921         { .compatible = "atmel,at91sam9g45-udc", .data = &at91sam9g45_errata },
1922         { .compatible = "atmel,sama5d3-udc" },
1923         { /* sentinel */ }
1924 };
1925
1926 MODULE_DEVICE_TABLE(of, atmel_udc_dt_ids);
1927
1928 static struct usba_ep * atmel_udc_of_init(struct platform_device *pdev,
1929                                                     struct usba_udc *udc)
1930 {
1931         u32 val;
1932         const char *name;
1933         enum of_gpio_flags flags;
1934         struct device_node *np = pdev->dev.of_node;
1935         const struct of_device_id *match;
1936         struct device_node *pp;
1937         int i, ret;
1938         struct usba_ep *eps, *ep;
1939
1940         match = of_match_node(atmel_udc_dt_ids, np);
1941         if (!match)
1942                 return ERR_PTR(-EINVAL);
1943
1944         udc->errata = match->data;
1945
1946         udc->num_ep = 0;
1947
1948         udc->vbus_pin = of_get_named_gpio_flags(np, "atmel,vbus-gpio", 0,
1949                                                 &flags);
1950         udc->vbus_pin_inverted = (flags & OF_GPIO_ACTIVE_LOW) ? 1 : 0;
1951
1952         pp = NULL;
1953         while ((pp = of_get_next_child(np, pp)))
1954                 udc->num_ep++;
1955
1956         eps = devm_kzalloc(&pdev->dev, sizeof(struct usba_ep) * udc->num_ep,
1957                            GFP_KERNEL);
1958         if (!eps)
1959                 return ERR_PTR(-ENOMEM);
1960
1961         udc->gadget.ep0 = &eps[0].ep;
1962
1963         INIT_LIST_HEAD(&eps[0].ep.ep_list);
1964
1965         pp = NULL;
1966         i = 0;
1967         while ((pp = of_get_next_child(np, pp))) {
1968                 ep = &eps[i];
1969
1970                 ret = of_property_read_u32(pp, "reg", &val);
1971                 if (ret) {
1972                         dev_err(&pdev->dev, "of_probe: reg error(%d)\n", ret);
1973                         goto err;
1974                 }
1975                 ep->index = val;
1976
1977                 ret = of_property_read_u32(pp, "atmel,fifo-size", &val);
1978                 if (ret) {
1979                         dev_err(&pdev->dev, "of_probe: fifo-size error(%d)\n", ret);
1980                         goto err;
1981                 }
1982                 ep->fifo_size = val;
1983
1984                 ret = of_property_read_u32(pp, "atmel,nb-banks", &val);
1985                 if (ret) {
1986                         dev_err(&pdev->dev, "of_probe: nb-banks error(%d)\n", ret);
1987                         goto err;
1988                 }
1989                 ep->nr_banks = val;
1990
1991                 ep->can_dma = of_property_read_bool(pp, "atmel,can-dma");
1992                 ep->can_isoc = of_property_read_bool(pp, "atmel,can-isoc");
1993
1994                 ret = of_property_read_string(pp, "name", &name);
1995                 if (ret) {
1996                         dev_err(&pdev->dev, "of_probe: name error(%d)\n", ret);
1997                         goto err;
1998                 }
1999                 ep->ep.name = name;
2000
2001                 ep->ep_regs = udc->regs + USBA_EPT_BASE(i);
2002                 ep->dma_regs = udc->regs + USBA_DMA_BASE(i);
2003                 ep->fifo = udc->fifo + USBA_FIFO_BASE(i);
2004                 ep->ep.ops = &usba_ep_ops;
2005                 usb_ep_set_maxpacket_limit(&ep->ep, ep->fifo_size);
2006                 ep->udc = udc;
2007                 INIT_LIST_HEAD(&ep->queue);
2008
2009                 if (ep->index == 0) {
2010                         ep->ep.caps.type_control = true;
2011                 } else {
2012                         ep->ep.caps.type_iso = ep->can_isoc;
2013                         ep->ep.caps.type_bulk = true;
2014                         ep->ep.caps.type_int = true;
2015                 }
2016
2017                 ep->ep.caps.dir_in = true;
2018                 ep->ep.caps.dir_out = true;
2019
2020                 if (i)
2021                         list_add_tail(&ep->ep.ep_list, &udc->gadget.ep_list);
2022
2023                 i++;
2024         }
2025
2026         if (i == 0) {
2027                 dev_err(&pdev->dev, "of_probe: no endpoint specified\n");
2028                 ret = -EINVAL;
2029                 goto err;
2030         }
2031
2032         return eps;
2033 err:
2034         return ERR_PTR(ret);
2035 }
2036 #else
2037 static struct usba_ep * atmel_udc_of_init(struct platform_device *pdev,
2038                                                     struct usba_udc *udc)
2039 {
2040         return ERR_PTR(-ENOSYS);
2041 }
2042 #endif
2043
2044 static struct usba_ep * usba_udc_pdata(struct platform_device *pdev,
2045                                                  struct usba_udc *udc)
2046 {
2047         struct usba_platform_data *pdata = dev_get_platdata(&pdev->dev);
2048         struct usba_ep *eps;
2049         int i;
2050
2051         if (!pdata)
2052                 return ERR_PTR(-ENXIO);
2053
2054         eps = devm_kzalloc(&pdev->dev, sizeof(struct usba_ep) * pdata->num_ep,
2055                            GFP_KERNEL);
2056         if (!eps)
2057                 return ERR_PTR(-ENOMEM);
2058
2059         udc->gadget.ep0 = &eps[0].ep;
2060
2061         udc->vbus_pin = pdata->vbus_pin;
2062         udc->vbus_pin_inverted = pdata->vbus_pin_inverted;
2063         udc->num_ep = pdata->num_ep;
2064
2065         INIT_LIST_HEAD(&eps[0].ep.ep_list);
2066
2067         for (i = 0; i < pdata->num_ep; i++) {
2068                 struct usba_ep *ep = &eps[i];
2069
2070                 ep->ep_regs = udc->regs + USBA_EPT_BASE(i);
2071                 ep->dma_regs = udc->regs + USBA_DMA_BASE(i);
2072                 ep->fifo = udc->fifo + USBA_FIFO_BASE(i);
2073                 ep->ep.ops = &usba_ep_ops;
2074                 ep->ep.name = pdata->ep[i].name;
2075                 ep->fifo_size = pdata->ep[i].fifo_size;
2076                 usb_ep_set_maxpacket_limit(&ep->ep, ep->fifo_size);
2077                 ep->udc = udc;
2078                 INIT_LIST_HEAD(&ep->queue);
2079                 ep->nr_banks = pdata->ep[i].nr_banks;
2080                 ep->index = pdata->ep[i].index;
2081                 ep->can_dma = pdata->ep[i].can_dma;
2082                 ep->can_isoc = pdata->ep[i].can_isoc;
2083
2084                 if (i == 0) {
2085                         ep->ep.caps.type_control = true;
2086                 } else {
2087                         ep->ep.caps.type_iso = ep->can_isoc;
2088                         ep->ep.caps.type_bulk = true;
2089                         ep->ep.caps.type_int = true;
2090                 }
2091
2092                 ep->ep.caps.dir_in = true;
2093                 ep->ep.caps.dir_out = true;
2094
2095                 if (i)
2096                         list_add_tail(&ep->ep.ep_list, &udc->gadget.ep_list);
2097         }
2098
2099         return eps;
2100 }
2101
2102 static int usba_udc_probe(struct platform_device *pdev)
2103 {
2104         struct resource *regs, *fifo;
2105         struct clk *pclk, *hclk;
2106         struct usba_udc *udc;
2107         int irq, ret, i;
2108
2109         udc = devm_kzalloc(&pdev->dev, sizeof(*udc), GFP_KERNEL);
2110         if (!udc)
2111                 return -ENOMEM;
2112
2113         udc->gadget = usba_gadget_template;
2114         INIT_LIST_HEAD(&udc->gadget.ep_list);
2115
2116         regs = platform_get_resource(pdev, IORESOURCE_MEM, CTRL_IOMEM_ID);
2117         fifo = platform_get_resource(pdev, IORESOURCE_MEM, FIFO_IOMEM_ID);
2118         if (!regs || !fifo)
2119                 return -ENXIO;
2120
2121         irq = platform_get_irq(pdev, 0);
2122         if (irq < 0)
2123                 return irq;
2124
2125         pclk = devm_clk_get(&pdev->dev, "pclk");
2126         if (IS_ERR(pclk))
2127                 return PTR_ERR(pclk);
2128         hclk = devm_clk_get(&pdev->dev, "hclk");
2129         if (IS_ERR(hclk))
2130                 return PTR_ERR(hclk);
2131
2132         spin_lock_init(&udc->lock);
2133         mutex_init(&udc->vbus_mutex);
2134         udc->pdev = pdev;
2135         udc->pclk = pclk;
2136         udc->hclk = hclk;
2137         udc->vbus_pin = -ENODEV;
2138
2139         ret = -ENOMEM;
2140         udc->regs = devm_ioremap(&pdev->dev, regs->start, resource_size(regs));
2141         if (!udc->regs) {
2142                 dev_err(&pdev->dev, "Unable to map I/O memory, aborting.\n");
2143                 return ret;
2144         }
2145         dev_info(&pdev->dev, "MMIO registers at 0x%08lx mapped at %p\n",
2146                  (unsigned long)regs->start, udc->regs);
2147         udc->fifo = devm_ioremap(&pdev->dev, fifo->start, resource_size(fifo));
2148         if (!udc->fifo) {
2149                 dev_err(&pdev->dev, "Unable to map FIFO, aborting.\n");
2150                 return ret;
2151         }
2152         dev_info(&pdev->dev, "FIFO at 0x%08lx mapped at %p\n",
2153                  (unsigned long)fifo->start, udc->fifo);
2154
2155         platform_set_drvdata(pdev, udc);
2156
2157         /* Make sure we start from a clean slate */
2158         ret = clk_prepare_enable(pclk);
2159         if (ret) {
2160                 dev_err(&pdev->dev, "Unable to enable pclk, aborting.\n");
2161                 return ret;
2162         }
2163
2164         usba_writel(udc, CTRL, USBA_DISABLE_MASK);
2165         clk_disable_unprepare(pclk);
2166
2167         if (pdev->dev.of_node)
2168                 udc->usba_ep = atmel_udc_of_init(pdev, udc);
2169         else
2170                 udc->usba_ep = usba_udc_pdata(pdev, udc);
2171
2172         toggle_bias(udc, 0);
2173
2174         if (IS_ERR(udc->usba_ep))
2175                 return PTR_ERR(udc->usba_ep);
2176
2177         ret = devm_request_irq(&pdev->dev, irq, usba_udc_irq, 0,
2178                                 "atmel_usba_udc", udc);
2179         if (ret) {
2180                 dev_err(&pdev->dev, "Cannot request irq %d (error %d)\n",
2181                         irq, ret);
2182                 return ret;
2183         }
2184         udc->irq = irq;
2185
2186         if (gpio_is_valid(udc->vbus_pin)) {
2187                 if (!devm_gpio_request(&pdev->dev, udc->vbus_pin, "atmel_usba_udc")) {
2188                         irq_set_status_flags(gpio_to_irq(udc->vbus_pin),
2189                                         IRQ_NOAUTOEN);
2190                         ret = devm_request_threaded_irq(&pdev->dev,
2191                                         gpio_to_irq(udc->vbus_pin), NULL,
2192                                         usba_vbus_irq_thread, USBA_VBUS_IRQFLAGS,
2193                                         "atmel_usba_udc", udc);
2194                         if (ret) {
2195                                 udc->vbus_pin = -ENODEV;
2196                                 dev_warn(&udc->pdev->dev,
2197                                          "failed to request vbus irq; "
2198                                          "assuming always on\n");
2199                         }
2200                 } else {
2201                         /* gpio_request fail so use -EINVAL for gpio_is_valid */
2202                         udc->vbus_pin = -EINVAL;
2203                 }
2204         }
2205
2206         ret = usb_add_gadget_udc(&pdev->dev, &udc->gadget);
2207         if (ret)
2208                 return ret;
2209         device_init_wakeup(&pdev->dev, 1);
2210
2211         usba_init_debugfs(udc);
2212         for (i = 1; i < udc->num_ep; i++)
2213                 usba_ep_init_debugfs(udc, &udc->usba_ep[i]);
2214
2215         return 0;
2216 }
2217
2218 static int usba_udc_remove(struct platform_device *pdev)
2219 {
2220         struct usba_udc *udc;
2221         int i;
2222
2223         udc = platform_get_drvdata(pdev);
2224
2225         device_init_wakeup(&pdev->dev, 0);
2226         usb_del_gadget_udc(&udc->gadget);
2227
2228         for (i = 1; i < udc->num_ep; i++)
2229                 usba_ep_cleanup_debugfs(&udc->usba_ep[i]);
2230         usba_cleanup_debugfs(udc);
2231
2232         return 0;
2233 }
2234
2235 #ifdef CONFIG_PM_SLEEP
2236 static int usba_udc_suspend(struct device *dev)
2237 {
2238         struct usba_udc *udc = dev_get_drvdata(dev);
2239
2240         /* Not started */
2241         if (!udc->driver)
2242                 return 0;
2243
2244         mutex_lock(&udc->vbus_mutex);
2245
2246         if (!device_may_wakeup(dev)) {
2247                 usba_stop(udc);
2248                 goto out;
2249         }
2250
2251         /*
2252          * Device may wake up. We stay clocked if we failed
2253          * to request vbus irq, assuming always on.
2254          */
2255         if (gpio_is_valid(udc->vbus_pin)) {
2256                 usba_stop(udc);
2257                 enable_irq_wake(gpio_to_irq(udc->vbus_pin));
2258         }
2259
2260 out:
2261         mutex_unlock(&udc->vbus_mutex);
2262         return 0;
2263 }
2264
2265 static int usba_udc_resume(struct device *dev)
2266 {
2267         struct usba_udc *udc = dev_get_drvdata(dev);
2268
2269         /* Not started */
2270         if (!udc->driver)
2271                 return 0;
2272
2273         if (device_may_wakeup(dev) && gpio_is_valid(udc->vbus_pin))
2274                 disable_irq_wake(gpio_to_irq(udc->vbus_pin));
2275
2276         /* If Vbus is present, enable the controller and wait for reset */
2277         mutex_lock(&udc->vbus_mutex);
2278         udc->vbus_prev = vbus_is_present(udc);
2279         if (udc->vbus_prev)
2280                 usba_start(udc);
2281         mutex_unlock(&udc->vbus_mutex);
2282
2283         return 0;
2284 }
2285 #endif
2286
2287 static SIMPLE_DEV_PM_OPS(usba_udc_pm_ops, usba_udc_suspend, usba_udc_resume);
2288
2289 static struct platform_driver udc_driver = {
2290         .remove         = usba_udc_remove,
2291         .driver         = {
2292                 .name           = "atmel_usba_udc",
2293                 .pm             = &usba_udc_pm_ops,
2294                 .of_match_table = of_match_ptr(atmel_udc_dt_ids),
2295         },
2296 };
2297
2298 module_platform_driver_probe(udc_driver, usba_udc_probe);
2299
2300 MODULE_DESCRIPTION("Atmel USBA UDC driver");
2301 MODULE_AUTHOR("Haavard Skinnemoen (Atmel)");
2302 MODULE_LICENSE("GPL");
2303 MODULE_ALIAS("platform:atmel_usba_udc");