firmware/drivers/isp1583.c

   1 /***************************************************************************
   2  *             __________               __   ___.
   3  *   Open      \______   \ ____   ____ |  | _\_ |__   _______  ___
   4  *   Source     |       _//  _ \_/ ___\|  |/ /| __ \ /  _ \  \/  /
   5  *   Jukebox    |    |   (  <_> )  \___|    < | \_\ (  <_> > <  <
   6  *   Firmware   |____|_  /\____/ \___  >__|_ \|___  /\____/__/\_ \
   7  *                     \/            \/     \/    \/            \/
   8  * $Id$
   9  *
  10  * Copyright (C) 2006 by Tomasz Malesinski
  11  * Copyright (C) 2008 by Maurus Cuelenaere
  12  *
  13  * This program is free software; you can redistribute it and/or
  14  * modify it under the terms of the GNU General Public License
  15  * as published by the Free Software Foundation; either version 2
  16  * of the License, or (at your option) any later version.
  17  *
  18  * This software is distributed on an "AS IS" basis, WITHOUT WARRANTY OF ANY
  19  * KIND, either express or implied.
  20  *
  21  ****************************************************************************/
  22
  23 #include "config.h"
  24 #include "usb_ch9.h"
  25 #include "usb_drv.h"
  26 #include "usb_core.h"
  27 #include "isp1583.h"
  28 #include "thread.h"
  29 #include "logf.h"
  30 #include "stdio.h"
  31
  32 struct usb_endpoint
  33 {
  34     unsigned char *out_buf;
  35     short out_len;
  36     short out_ptr;
  37     void (*out_done)(int, unsigned char *, int);
  38     unsigned char out_in_progress;
  39
  40     unsigned char *in_buf;
  41     short in_min_len;
  42     short in_max_len;
  43     short in_ptr;
  44     void (*in_done)(int, unsigned char *, int);
  45     unsigned char in_ack;
  46
  47     unsigned char halt[2];
  48     unsigned char enabled[2];
  49     short max_pkt_size[2];
  50     short type;
  51     char allocation;
  52 };
  53
  54 static unsigned char setup_pkt_buf[8];
  55 static struct usb_endpoint endpoints[USB_NUM_ENDPOINTS];
  56
  57 static bool high_speed_mode = false;
  58
  59 static inline void or_int_value(volatile unsigned short *a, volatile unsigned short *b, unsigned long r, unsigned long value)
  60 {
  61     set_int_value(*a, *b, (r | value));
  62 }
  63 static inline void bc_int_value(volatile unsigned short *a, volatile unsigned short *b, unsigned long r, unsigned long value)
  64 {
  65     set_int_value(*a, *b, (r & ~value));
  66 }
  67
  68 static inline void nop_f(void)
  69 {
  70     yield();
  71 }
  72
  73 #define NOP     asm volatile("nop\n");
  74
  75 static inline int ep_index(int n, bool dir)
  76 {
  77     return (n << 1) | dir;
  78 }
  79
  80 static inline bool epidx_dir(int idx)
  81 {
  82     return idx & 1;
  83 }
  84
  85 static inline int epidx_n(int idx)
  86 {
  87     return idx >> 1;
  88 }
  89
  90 static inline void usb_select_endpoint(int idx)
  91 {
  92     /* Select the endpoint */
  93     ISP1583_DFLOW_EPINDEX = idx;
  94     /* The delay time from the Write Endpoint Index register to the Read Data Port register must be at least 190 ns.
  95      * The delay time from the Write Endpoint Index register to the Write Data Port register must be at least 100 ns.
  96      */
  97     NOP;
  98 }
  99
 100 static inline void usb_select_setup_endpoint(void)
 101 {
 102     /* Select the endpoint */
 103     ISP1583_DFLOW_EPINDEX = DFLOW_EPINDEX_EP0SETUP;
 104     /* The delay time from the Write Endpoint Index register to the Read Data Port register must be at least 190 ns.
 105      * The delay time from the Write Endpoint Index register to the Write Data Port register must be at least 100 ns.
 106      */
 107     NOP;
 108 }
 109
 110 static void usb_setup_endpoint(int idx, int max_pkt_size, int type)
 111 {
 112     if(epidx_n(idx)!=EP_CONTROL)
 113     {
 114         usb_select_endpoint(idx);
 115         ISP1583_DFLOW_MAXPKSZ = max_pkt_size & 0x7FF;
 116         ISP1583_DFLOW_EPTYPE = (DFLOW_EPTYPE_NOEMPKT | DFLOW_EPTYPE_DBLBUF | (type & 0x3));
 117
 118         /* clear buffer ... */
 119         ISP1583_DFLOW_CTRLFUN |= DFLOW_CTRLFUN_CLBUF;
 120         /* ... twice because of double buffering */
 121         usb_select_endpoint(idx);
 122         ISP1583_DFLOW_CTRLFUN |= DFLOW_CTRLFUN_CLBUF;
 123     }
 124
 125     struct usb_endpoint *ep;
 126     ep = &(endpoints[epidx_n(idx)]);
 127     ep->halt[epidx_dir(idx)] = 0;
 128     ep->enabled[epidx_dir(idx)] = 0;
 129     ep->out_in_progress = 0;
 130     ep->in_min_len = -1;
 131     ep->in_ack = 0;
 132     ep->type = type;
 133     ep->max_pkt_size[epidx_dir(idx)] = max_pkt_size;
 134 }
 135
 136 static void usb_enable_endpoint(int idx)
 137 {
 138     if(epidx_n(idx)!=EP_CONTROL)
 139     {
 140         usb_select_endpoint(idx);
 141         /* Enable interrupt */
 142         or_int_value(&ISP1583_INIT_INTEN_A, &ISP1583_INIT_INTEN_B, ISP1583_INIT_INTEN_READ, 1 << (10 + idx));
 143         /* Enable endpoint */
 144         ISP1583_DFLOW_EPTYPE |= DFLOW_EPTYPE_ENABLE;
 145     }
 146
 147     endpoints[epidx_n(idx)].enabled[epidx_dir(idx)] = 1;
 148 }
 149 /*
 150 static void usb_disable_endpoint(int idx, bool set_struct)
 151 {
 152     usb_select_endpoint(idx);
 153     ISP1583_DFLOW_EPTYPE &= ~DFLOW_EPTYPE_ENABLE;
 154     bc_int_value(&ISP1583_INIT_INTEN_A, &ISP1583_INIT_INTEN_B, ISP1583_INIT_INTEN_READ, 1 << (10 + idx));
 155
 156     if(set_struct)
 157         endpoints[epidx_n(idx)].enabled[epidx_dir(idx)] = 0;
 158 }
 159 */
 160 static int usb_get_packet(unsigned char *buf, int max_len)
 161 {
 162     int len, i;
 163     len = ISP1583_DFLOW_BUFLEN;
 164
 165     if (max_len < 0 || max_len > len)
 166         max_len = len;
 167
 168     i = 0;
 169     while (i < len)
 170     {
 171         unsigned short d = ISP1583_DFLOW_DATA;
 172         if (i < max_len)
 173             buf[i] = d & 0xff;
 174         i++;
 175         if (i < max_len)
 176             buf[i] = (d >> 8) & 0xff;
 177         i++;
 178     }
 179     return max_len;
 180 }
 181
 182 static int usb_receive(int n)
 183 {
 184     logf("usb_receive(%d)", n);
 185     int len;
 186
 187     if (endpoints[n].halt[DIR_RX]
 188         || !endpoints[n].enabled[DIR_RX]
 189         || endpoints[n].in_min_len < 0
 190         || !endpoints[n].in_ack)
 191         return -1;
 192
 193     endpoints[n].in_ack = 0;
 194
 195     usb_select_endpoint(ep_index(n, DIR_RX));
 196
 197     len = usb_get_packet(endpoints[n].in_buf + endpoints[n].in_ptr,
 198                          endpoints[n].in_max_len - endpoints[n].in_ptr);
 199     endpoints[n].in_ptr += len;
 200
 201     if (endpoints[n].in_ptr >= endpoints[n].in_min_len)
 202     {
 203         endpoints[n].in_min_len = -1;
 204         if (endpoints[n].in_done)
 205             (*(endpoints[n].in_done))(n, endpoints[n].in_buf,
 206                                       endpoints[n].in_ptr);
 207     }
 208     logf("receive_end");
 209     return 0;
 210 }
 211
 212 static bool usb_out_buffer_full(int ep)
 213 {
 214     usb_select_endpoint(ep_index(ep, DIR_TX));
 215     if (ISP1583_DFLOW_EPTYPE & 4)   /* Check if type=bulk and double buffering is set */
 216         return (ISP1583_DFLOW_BUFSTAT & 3) == 3; /* Return true if both buffers are filled */
 217     else
 218         return (ISP1583_DFLOW_BUFSTAT & 3) != 0; /* Return true if one of the buffers are filled */
 219 }
 220
 221 static int usb_send(int n)
 222 {
 223     logf("usb_send(%d)", n);
 224     int max_pkt_size, len;
 225     int i;
 226     unsigned char *p;
 227
 228     if (endpoints[n].halt[DIR_TX]
 229         || !endpoints[n].enabled[DIR_TX]
 230         || !endpoints[n].out_in_progress)
 231     {
 232         logf("NOT SEND TO EP!");
 233         return -1;
 234     }
 235
 236     if (endpoints[n].out_ptr < 0)
 237     {
 238         endpoints[n].out_in_progress = 0;
 239         if (endpoints[n].out_done)
 240             (*(endpoints[n].out_done))(n, endpoints[n].out_buf,
 241                                        endpoints[n].out_len);
 242         logf("ALREADY SENT TO EP!");
 243         return -1;
 244     }
 245
 246     if (usb_out_buffer_full(n))
 247     {
 248         logf("BUFFER FULL!");
 249         return -1;
 250     }
 251
 252     usb_select_endpoint(ep_index(n, DIR_TX));
 253     max_pkt_size = endpoints[n].max_pkt_size[DIR_TX];
 254     len = endpoints[n].out_len - endpoints[n].out_ptr;
 255     if (len > max_pkt_size)
 256         len = max_pkt_size;
 257
 258     if(len < max_pkt_size)
 259         ISP1583_DFLOW_BUFLEN = len;
 260
 261     p = endpoints[n].out_buf + endpoints[n].out_ptr;
 262     i = 0;
 263     while (len - i >= 2)
 264     {
 265         ISP1583_DFLOW_DATA = p[i] | (p[i + 1] << 8);
 266         i += 2;
 267     }
 268     if (i < len)
 269         ISP1583_DFLOW_DATA = p[i];
 270
 271     endpoints[n].out_ptr += len;
 272
 273 /*
 274     if (endpoints[n].out_ptr == endpoints[n].out_len
 275         && len < max_pkt_size)
 276 */
 277     if (endpoints[n].out_ptr == endpoints[n].out_len)
 278         endpoints[n].out_ptr = -1;
 279
 280     logf("send_end");
 281     return 0;
 282 }
 283
 284 static void usb_stall_endpoint(int idx)
 285 {
 286     usb_select_endpoint(idx);
 287     ISP1583_DFLOW_CTRLFUN |= DFLOW_CTRLFUN_STALL;
 288     endpoints[epidx_n(idx)].halt[epidx_dir(idx)] = 1;
 289 }
 290
 291 static void usb_unstall_endpoint(int idx)
 292 {
 293     usb_select_endpoint(idx);
 294     ISP1583_DFLOW_CTRLFUN &= ~DFLOW_CTRLFUN_STALL;
 295     ISP1583_DFLOW_EPTYPE &= ~DFLOW_EPTYPE_ENABLE;
 296     ISP1583_DFLOW_EPTYPE |= DFLOW_EPTYPE_ENABLE;
 297     ISP1583_DFLOW_CTRLFUN |= DFLOW_CTRLFUN_CLBUF;
 298     if (epidx_dir(idx) == DIR_TX)
 299         endpoints[epidx_n(idx)].out_in_progress = 0;
 300     else
 301     {
 302         endpoints[epidx_n(idx)].in_min_len = -1;
 303         endpoints[epidx_n(idx)].in_ack = 0;
 304     }
 305     endpoints[epidx_n(idx)].halt[epidx_dir(idx)] = 0;
 306 }
 307
 308 static void usb_status_ack(int ep, int dir)
 309 {
 310     logf("usb_status_ack(%d)", dir);
 311     if(ep == EP_CONTROL)
 312         usb_select_setup_endpoint();
 313     else
 314         usb_select_endpoint(ep_index(ep, dir));
 315
 316     ISP1583_DFLOW_CTRLFUN |= DFLOW_CTRLFUN_STATUS;
 317 }
 318
 319 static void usb_data_stage_enable(int ep, int dir)
 320 {
 321     logf("usb_data_stage_enable(%d)", dir);
 322     usb_select_endpoint(ep_index(ep, dir));
 323     ISP1583_DFLOW_CTRLFUN |= DFLOW_CTRLFUN_DSEN;
 324 }
 325
 326 static void usb_handle_setup_rx(void)
 327 {
 328     int len;
 329     usb_select_setup_endpoint();
 330     len = usb_get_packet(setup_pkt_buf, 8);
 331
 332     if (len == 8)
 333     {
 334         ISP1583_DFLOW_CTRLFUN |= DFLOW_CTRLFUN_STATUS; /* Acknowledge packet */
 335         usb_core_control_request((struct usb_ctrlrequest*)setup_pkt_buf);
 336     }
 337     else
 338     {
 339         usb_drv_stall(EP_CONTROL, true, false);
 340         usb_drv_stall(EP_CONTROL, true, true);
 341         logf("usb_handle_setup_rx() failed");
 342         return;
 343     }
 344
 345     logf("usb_handle_setup_rx(): %02x %02x %02x %02x %02x %02x %02x %02x", setup_pkt_buf[0], setup_pkt_buf[1], setup_pkt_buf[2], setup_pkt_buf[3], setup_pkt_buf[4], setup_pkt_buf[5], setup_pkt_buf[6], setup_pkt_buf[7]);
 346 }
 347
 348 static void usb_handle_data_int(int ep, int dir)
 349 {
 350     int len;
 351     if (dir == DIR_TX)
 352         len = usb_send(ep);
 353     else
 354     {
 355         len = usb_receive(ep);
 356         endpoints[ep].in_ack = 1;
 357     }
 358     logf("usb_handle_data_int(%d, %d) finished", ep, dir);
 359 }
 360
 361 bool usb_drv_powered(void)
 362 {
 363 #if 0
 364     return (ISP1583_INIT_OTG & INIT_OTG_BSESS_VALID) ? true : false;
 365 #else
 366     return (ISP1583_INIT_MODE & INIT_MODE_VBUSSTAT) ? true : false;
 367 #endif
 368 }
 369
 370 static void setup_endpoints(void)
 371 {
 372     int i;
 373     int max_pkt_size = (high_speed_mode ? 512 : 64);
 374
 375     usb_setup_endpoint(ep_index(EP_CONTROL, DIR_RX), 64,
 376             USB_ENDPOINT_XFER_CONTROL);
 377     usb_setup_endpoint(ep_index(EP_CONTROL, DIR_TX), 64,
 378             USB_ENDPOINT_XFER_CONTROL);
 379
 380     for(i = 1; i < USB_NUM_ENDPOINTS-1; i++)
 381     {
 382         usb_setup_endpoint(ep_index(i, DIR_RX), max_pkt_size,
 383                 USB_ENDPOINT_XFER_BULK);
 384         usb_setup_endpoint(ep_index(i, DIR_TX), max_pkt_size,
 385                 USB_ENDPOINT_XFER_BULK);
 386     }
 387
 388     usb_enable_endpoint(ep_index(EP_CONTROL, DIR_RX));
 389     usb_enable_endpoint(ep_index(EP_CONTROL, DIR_TX));
 390
 391     for (i = 1; i < USB_NUM_ENDPOINTS-1; i++)
 392     {
 393         usb_enable_endpoint(ep_index(i, DIR_RX));
 394         usb_enable_endpoint(ep_index(i, DIR_TX));
 395     }
 396
 397     ZVM_SPECIFIC;
 398 }
 399
 400 void usb_helper(void)
 401 {
 402     if(ISP1583_GEN_INT_READ & ISP1583_INIT_INTEN_READ)
 403     {
 404         logf("Helper detected interrupt... [%d]", (int)current_tick);
 405         usb_drv_int();
 406     }
 407     return;
 408 }
 409
 410 void usb_drv_init(void)
 411 {
 412     /* Disable interrupt at CPU level */
 413     DIS_INT_CPU_TARGET;
 414
 415     /* Unlock the device's registers */
 416     ISP1583_GEN_UNLCKDEV = ISP1583_UNLOCK_CODE;
 417
 418     /* Soft reset the device */
 419     ISP1583_INIT_MODE = INIT_MODE_SFRESET;
 420     sleep(10);
 421     /* Enable CLKAON & GLINTENA */
 422     ISP1583_INIT_MODE = STANDARD_INIT_MODE;
 423
 424     /* Disable all OTG functions */
 425     ISP1583_INIT_OTG = 0;
 426
 427 #ifdef DEBUG
 428     logf("BUS_CONF/DA0:%d MODE0/DA1: %d MODE1: %d", (bool)(ISP1583_INIT_MODE & INIT_MODE_TEST0), (bool)(ISP1583_INIT_MODE & INIT_MODE_TEST1), (bool)(ISP1583_INIT_MODE & INIT_MODE_TEST2));
 429     logf("Chip ID: 0x%x", ISP1583_GEN_CHIPID);
 430     //logf("INV0: 0x% IRQEDGE: 0x%x IRQPORT: 0x%x", IO_GIO_INV0, IO_GIO_IRQEDGE, IO_GIO_IRQPORT);
 431 #endif
 432
 433     /*Set interrupt generation to target-specific mode +
 434      * Set the control pipe to ACK only interrupt +
 435      * Set the IN pipe to ACK only interrupt +
 436      * Set OUT pipe to ACK and NYET interrupt
 437      */
 438
 439     ISP1583_INIT_INTCONF = 0x54 | INT_CONF_TARGET;
 440     /* Clear all interrupts */
 441     set_int_value(ISP1583_GEN_INT_A, ISP1583_GEN_INT_B, 0xFFFFFFFF);
 442     /* Enable USB interrupts */
 443     set_int_value(ISP1583_INIT_INTEN_A, ISP1583_INIT_INTEN_B, STANDARD_INTEN);
 444
 445     ZVM_SPECIFIC;
 446
 447     /* Enable interrupt at CPU level */
 448     EN_INT_CPU_TARGET;
 449
 450     setup_endpoints();
 451
 452     /* Clear device address and disable it */
 453     ISP1583_INIT_ADDRESS = 0;
 454
 455     /* Turn SoftConnect on */
 456     ISP1583_INIT_MODE |= INIT_MODE_SOFTCT;
 457
 458     ZVM_SPECIFIC;
 459
 460     //tick_add_task(usb_helper);
 461
 462     logf("usb_init_device() finished");
 463 }
 464
 465 int usb_drv_port_speed(void)
 466 {
 467     return (int)high_speed_mode;
 468 }
 469
 470 void usb_drv_exit(void)
 471 {
 472     logf("usb_drv_exit()");
 473
 474     /* Disable device */
 475     ISP1583_INIT_MODE &= ~INIT_MODE_SOFTCT;
 476     ISP1583_INIT_ADDRESS = 0;
 477
 478     /* Disable interrupts */
 479     set_int_value(ISP1583_INIT_INTEN_A, ISP1583_INIT_INTEN_B, 0);
 480     /* and the CPU's one... */
 481     DIS_INT_CPU_TARGET;
 482
 483
 484     /* Send usb controller to suspend mode */
 485     ISP1583_INIT_MODE = INIT_MODE_GOSUSP;
 486     ISP1583_INIT_MODE = 0;
 487
 488     //tick_remove_task(usb_helper);
 489
 490     ZVM_SPECIFIC;
 491 }
 492
 493 void usb_drv_stall(int endpoint, bool stall, bool in)
 494 {
 495     logf("%sstall EP%d %s", (stall ? "" : "un"), endpoint, (in ? "RX" : "TX" ));
 496     if (stall)
 497         usb_stall_endpoint(ep_index(endpoint, (int)in));
 498     else
 499         usb_unstall_endpoint(ep_index(endpoint, (int)in));
 500 }
 501
 502 bool usb_drv_stalled(int endpoint, bool in)
 503 {
 504     return (endpoints[endpoint].halt[(int)in] == 1);
 505 }
 506
 507 static void out_callback(int ep, unsigned char *buf, int len)
 508 {
 509     (void)buf;
 510     logf("out_callback(%d, 0x%x, %d)", ep, (int)buf, len);
 511     usb_status_ack(ep, DIR_RX);
 512     usb_core_transfer_complete(ep, true, 0, len); /* 0=>status succeeded, haven't worked out status failed yet... */
 513 }
 514
 515 static void in_callback(int ep, unsigned char *buf, int len)
 516 {
 517     (void)buf;
 518     logf("in_callback(%d, 0x%x, %d)", ep, (int)buf, len);
 519     usb_status_ack(ep, DIR_TX);
 520     usb_core_transfer_complete(ep, false, 0, len);
 521 }
 522
 523 int usb_drv_recv(int ep, void* ptr, int length)
 524 {
 525     logf("usb_drv_recv(%d, 0x%x, %d)", ep, (int)ptr, length);
 526     if(ep == EP_CONTROL && length == 0 && ptr == NULL)
 527     {
 528         usb_status_ack(ep, DIR_TX);
 529         return 0;
 530     }
 531     endpoints[ep].in_done = in_callback;
 532     endpoints[ep].in_buf = ptr;
 533     endpoints[ep].in_max_len = length;
 534     endpoints[ep].in_min_len = length;
 535     endpoints[ep].in_ptr = 0;
 536     if(ep == EP_CONTROL)
 537     {
 538         usb_data_stage_enable(ep, DIR_RX);
 539         return usb_receive(ep);
 540     }
 541     else
 542         return usb_receive(ep);
 543 }
 544
 545 int usb_drv_send_nonblocking(int ep, void* ptr, int length)
 546 {
 547     /* First implement DMA... */
 548     return usb_drv_send(ep, ptr, length);
 549 }
 550
 551 static void usb_drv_wait(int ep, bool send)
 552 {
 553     logf("usb_drv_wait(%d, %d)", ep, send);
 554     if(send)
 555     {
 556         while (endpoints[ep].out_in_progress)
 557             nop_f();
 558     }
 559     else
 560     {
 561         while (endpoints[ep].in_ack)
 562             nop_f();
 563     }
 564 }
 565
 566 int usb_drv_send(int ep, void* ptr, int length)
 567 {
 568     logf("usb_drv_send_nb(%d, 0x%x, %d)", ep, (int)ptr, length);
 569     if(ep == EP_CONTROL && length == 0 && ptr == NULL)
 570     {
 571         usb_status_ack(ep, DIR_RX);
 572         return 0;
 573     }
 574     if(endpoints[ep].out_in_progress == 1)
 575         return -1;
 576     endpoints[ep].out_done = out_callback;
 577     endpoints[ep].out_buf = ptr;
 578     endpoints[ep].out_len = length;
 579     endpoints[ep].out_ptr = 0;
 580     endpoints[ep].out_in_progress = 1;
 581     if(ep == EP_CONTROL)
 582     {
 583         int rc = usb_send(ep);
 584         usb_data_stage_enable(ep, DIR_TX);
 585         usb_drv_wait(ep, DIR_TX);
 586         return rc;
 587     }
 588     else
 589         return usb_send(ep);
 590 }
 591
 592 void usb_drv_reset_endpoint(int ep, bool send)
 593 {
 594     logf("reset endpoint(%d, %d)", ep, send);
 595     usb_setup_endpoint(ep_index(ep, (int)send), endpoints[ep].max_pkt_size[(int)send], endpoints[ep].type);
 596     usb_enable_endpoint(ep_index(ep, (int)send));
 597 }
 598
 599 void usb_drv_cancel_all_transfers(void)
 600 {
 601     logf("usb_drv_cancel_all_tranfers()");
 602     int i;
 603
 604     for(i=0;i<USB_NUM_ENDPOINTS-1;i++)
 605         endpoints[i].halt[0] = endpoints[i].halt[1] = 1;
 606 }
 607
 608 int usb_drv_request_endpoint(int type, int dir)
 609 {
 610     int i, bit;
 611
 612     if (type != USB_ENDPOINT_XFER_BULK)
 613         return -1;
 614
 615     bit=(dir & USB_DIR_IN)? 2:1;
 616
 617     for (i=1; i < USB_NUM_ENDPOINTS; i++) {
 618         if((endpoints[i].allocation & bit)!=0)
 619             continue;
 620         endpoints[i].allocation |= bit;
 621         return i | dir;
 622     }
 623
 624     return -1;
 625 }
 626
 627 void usb_drv_release_endpoint(int ep)
 628 {
 629     int mask = (ep & USB_DIR_IN)? ~2:~1;
 630     endpoints[ep & 0x7f].allocation &= mask;
 631 }
 632
 633 static void bus_reset(void)
 634 {
 635     /* Enable CLKAON & GLINTENA */
 636     ISP1583_INIT_MODE = STANDARD_INIT_MODE;
 637     /* Enable USB interrupts */
 638     ISP1583_INIT_INTCONF = 0x54 | INT_CONF_TARGET;
 639     set_int_value(ISP1583_INIT_INTEN_A, ISP1583_INIT_INTEN_B, STANDARD_INTEN);
 640
 641     /* Disable all OTG functions */
 642     ISP1583_INIT_OTG = 0;
 643
 644     /* Clear device address and enable it */
 645     ISP1583_INIT_ADDRESS = INIT_ADDRESS_DEVEN;
 646
 647     ZVM_SPECIFIC;
 648
 649     /* Reset endpoints to default */
 650     setup_endpoints();
 651
 652     logf("bus reset->done");
 653 }
 654
 655 /* Method for handling interrupts, must be called from usb-<target>.c */
 656 void IRAM_ATTR usb_drv_int(void)
 657 {
 658     unsigned long ints;
 659     ints = ISP1583_GEN_INT_READ & ISP1583_INIT_INTEN_READ;
 660
 661     if(!ints)
 662         return;
 663
 664     /* Unlock the device's registers */
 665     ISP1583_GEN_UNLCKDEV = ISP1583_UNLOCK_CODE;
 666
 667     //logf(" handling int [0x%lx & 0x%lx = 0x%x]", ISP1583_GEN_INT_READ, ISP1583_INIT_INTEN_READ, (int)ints);
 668
 669     if(ints & INT_IEBRST) /* Bus reset */
 670     {
 671         logf("BRESET");
 672         high_speed_mode = false;
 673         bus_reset();
 674         usb_core_bus_reset();
 675         /* Mask bus reset interrupt */
 676         set_int_value(ISP1583_GEN_INT_A, ISP1583_GEN_INT_B, INT_IEBRST);
 677         return;
 678     }
 679     if(ints & INT_IEP0SETUP) /* EP0SETUP interrupt */
 680     {
 681         logf("EP0SETUP");
 682         usb_handle_setup_rx();
 683     }
 684     if(ints & INT_IEHS_STA) /* change from full-speed to high-speed mode -> endpoints need to get reconfigured!! */
 685     {
 686         logf("HS_STA");
 687         high_speed_mode = true;
 688         setup_endpoints();
 689     }
 690     if(ints & INT_EP_MASK) /* Endpoints interrupt */
 691     {
 692         unsigned long ep_event;
 693         unsigned short i = 10;
 694         ep_event = ints & INT_EP_MASK;
 695         while(ep_event)
 696         {
 697             if(i>25)
 698                 break;
 699
 700             if(ep_event & (1 << i))
 701             {
 702                 logf("EP%d %s interrupt", (i - 10) / 2, i % 2 ? "RX" : "TX");
 703                 usb_handle_data_int((i - 10) / 2, i % 2);
 704                 ep_event &= ~(1 << i);
 705             }
 706             i++;
 707         }
 708     }
 709     if(ints & INT_IERESM && !(ints & INT_IESUSP)) /* Resume status: status change from suspend to resume (active) */
 710     {
 711         logf("RESM");
 712     }
 713     if(ints & INT_IESUSP && !(ints & INT_IERESM)) /* Suspend status: status change from active to suspend */
 714     {
 715         logf("SUSP");
 716     }
 717     if(ints & INT_IEDMA) /* change in the DMA Interrupt Reason register */
 718     {
 719         logf("DMA");
 720     }
 721     if(ints & INT_IEVBUS) /* transition from LOW to HIGH on VBUS */
 722     {
 723         logf("VBUS");
 724     }
 725     /* Mask all (enabled) interrupts */
 726     set_int_value(ISP1583_GEN_INT_A, ISP1583_GEN_INT_B, ints);
 727
 728     ZVM_SPECIFIC;
 729 }
 730
 731 void usb_drv_set_address(int address)
 732 {
 733     logf("usb_drv_set_address(0x%x)", address);
 734     ISP1583_INIT_ADDRESS = (address & 0x7F) | INIT_ADDRESS_DEVEN;
 735
 736     ZVM_SPECIFIC;
 737 }
 738
 739 void usb_drv_set_test_mode(int mode)
 740 {
 741     logf("usb_drv_set_test_mode(%d)", mode);
 742     switch(mode){
 743         case 0:
 744             ISP1583_GEN_TSTMOD = 0;
 745             /* Power cycle... */
 746             break;
 747         case 1:
 748             ISP1583_GEN_TSTMOD = GEN_TSTMOD_JSTATE;
 749             break;
 750         case 2:
 751             ISP1583_GEN_TSTMOD = GEN_TSTMOD_KSTATE;
 752             break;
 753         case 3:
 754             ISP1583_GEN_TSTMOD = GEN_TSTMOD_SE0_NAK;
 755             break;
 756         case 4:
 757             //REG_PORTSC1 |= PORTSCX_PTC_PACKET;
 758             break;
 759         case 5:
 760             //REG_PORTSC1 |= PORTSCX_PTC_FORCE_EN;
 761             break;
 762     }
 763 }
 764
 765 #ifndef BOOTLOADER
 766 int dbg_usb_num_items(void)
 767 {
 768     return 2+USB_NUM_ENDPOINTS*2;
 769 }
 770
 771 const char* dbg_usb_item(int selected_item, void *data,
 772                          char *buffer, size_t buffer_len)
 773 {
 774     if(selected_item < 2)
 775     {
 776         switch(selected_item)
 777         {
 778             case 0:
 779                 snprintf(buffer, buffer_len, "USB connected: %s", (usb_drv_connected() ? "Yes" : "No"));
 780                 return buffer;
 781             case 1:
 782                 snprintf(buffer, buffer_len, "HS mode: %s", (high_speed_mode ? "Yes" : "No"));
 783                 return buffer;
 784         }
 785     }
 786     else
 787     {
 788         int n = ep_index((selected_item - 2) / 2, (selected_item - 2) % 2);
 789         if(endpoints[n].enabled == false)
 790             snprintf(buffer, buffer_len, "EP%d[%s]: DISABLED", epidx_n(n), (epidx_dir(n) ? "TX" : "RX"));
 791         else
 792         {
 793             if(epidx_dir(n))
 794             {
 795                 if(endpoints[n].out_in_progress)
 796                     snprintf(buffer, buffer_len, "EP%d[TX]: TRANSFERRING DATA -> %d bytes/%d bytes", epidx_n(n), (endpoints[n].out_len - endpoints[n].out_ptr), endpoints[n].out_len);
 797                 else
 798                     snprintf(buffer, buffer_len, "EP%d[TX]: STANDBY", epidx_n(n));
 799             }
 800             else
 801             {
 802                 if(endpoints[n].in_buf && !endpoints[n].in_ack)
 803                     snprintf(buffer, buffer_len, "EP%d[RX]: RECEIVING DATA -> %d bytes/%d bytes", epidx_n(n), endpoints[n].in_ptr, endpoints[n].in_max_len);
 804                 else
 805                     snprintf(buffer, buffer_len, "EP%d[RX]: STANDBY", epidx_n(n));
 806             }
 807         }
 808         return buffer;
 809     }
 810     return NULL;
 811     (void)data;
 812 }
 813 #endif