Update main.c for GNU/Linux emulation.
[gnuk/neug.git] / src / main.c
index 58cc7bf..f8a1e8d 100644 (file)
@@ -2,7 +2,7 @@
  * main.c - main routine of neug
  *
  * Main routine:
- * Copyright (C) 2011, 2012, 2013, 2015, 2016
+ * Copyright (C) 2011, 2012, 2013, 2015, 2016, 2017
  *              Free Software Initiative of Japan
  * Author: NIIBE Yutaka <gniibe@fsij.org>
  *
 #include "config.h"
 #include "neug.h"
 #include "usb_lld.h"
-#include "mcu/sys-stm32f103.h"
+#include "sys.h"
+#ifndef GNU_LINUX_EMULATION
 #include "mcu/stm32f103.h"
+#endif
 #include "adc.h"
 
 enum {
@@ -47,6 +49,8 @@ enum {
 
 #ifdef FRAUCHEKY_SUPPORT
 static uint8_t running_neug;
+extern void EP6_IN_Callback (uint16_t len);
+extern void EP6_OUT_Callback (uint16_t len);
 #endif
 
 static chopstx_mutex_t usb_mtx;
@@ -180,34 +184,37 @@ static const uint8_t vcom_string0[4] = {
 
 #include "usb-strings.c.inc"
 
-static void neug_setup_endpoints_for_interface (uint16_t interface, int stop);
+static void neug_setup_endpoints_for_interface (struct usb_dev *dev,
+                                               uint16_t interface, int stop);
 #ifdef FRAUCHEKY_SUPPORT
+#define MSC_MASS_STORAGE_RESET_COMMAND 0xFF
 extern int fraucheky_enabled (void);
 extern void fraucheky_main (void);
 
 extern void fraucheky_setup_endpoints_for_interface (int stop);
-extern int fraucheky_setup (uint8_t req, uint8_t req_no,
-                           struct req_args *detail);
-extern int fraucheky_get_descriptor (uint8_t rcp, uint8_t desc_type,
-                                    uint8_t desc_index,
-                                    struct req_args *detail);
+extern int fraucheky_setup (struct usb_dev *dev);
+extern int fraucheky_get_descriptor (struct usb_dev *dev);
 #endif
 
 #define NUM_INTERFACES 2
 
-void
-usb_cb_device_reset (void)
+static void
+usb_device_reset (struct usb_dev *dev)
 {
   int i;
 
-  usb_lld_reset (VCOM_FEATURE_BUS_POWERED);
+  usb_lld_reset (dev, VCOM_FEATURE_BUS_POWERED);
 
   /* Initialize Endpoint 0.  */
+#ifdef GNU_LINUX_EMULATION
+  usb_lld_setup_endp (dev, ENDP0, 1, 1);
+#else
   usb_lld_setup_endpoint (ENDP0, EP_CONTROL, 0, ENDP0_RXADDR, ENDP0_TXADDR, 64);
+#endif
 
   /* Stop the interface */
   for (i = 0; i < NUM_INTERFACES; i++)
-    neug_setup_endpoints_for_interface (i, 1);
+    neug_setup_endpoints_for_interface (dev, i, 1);
 
   /* Notify upper layer.  */
   chopstx_mutex_lock (&usb_mtx);
@@ -217,9 +224,11 @@ usb_cb_device_reset (void)
   chopstx_mutex_unlock (&usb_mtx);
 }
 
+#ifndef GNU_LINUX_EMULATION
 extern uint8_t _regnual_start, __heap_end__;
 
 static const uint8_t *const mem_info[] = { &_regnual_start,  &__heap_end__, };
+#endif
 
 /* USB vendor requests to control pipe */
 #define USB_FSIJ_MEMINFO         0
@@ -229,6 +238,9 @@ static const uint8_t *const mem_info[] = { &_regnual_start,  &__heap_end__, };
 #define USB_NEUG_GET_INFO      254
 #define USB_NEUG_EXIT          255 /* Ask to exit and to receive reGNUal */
 
+#define DEFAULT_PASSWD "12345678"
+#define DEFAULT_PASSWD_LEN 8
+
 uint8_t neug_passwd[33] __attribute__ ((section(".passwd"))) = {
   0xff,
   0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff,
@@ -237,45 +249,36 @@ uint8_t neug_passwd[33] __attribute__ ((section(".passwd"))) = {
 };
 static uint8_t usbbuf[64];
 
-#define DEFAULT_PASSWD "12345678"
-#define DEFAULT_PASSWD_LEN 8
-
+#ifndef GNU_LINUX_EMULATION
 static void set_passwd (void)
 {
   flash_unlock ();
   if (neug_passwd[0] != 0xff)
-    flash_erase_page ((uint32_t)neug_passwd);
+    flash_erase_page ((uintptr_t)neug_passwd);
   if (usbbuf[0] == DEFAULT_PASSWD_LEN
       && !memcmp (usbbuf + 1, DEFAULT_PASSWD, DEFAULT_PASSWD_LEN))
     return;
-  flash_write ((uint32_t)neug_passwd, usbbuf, usbbuf[0] + 1);
+  flash_write ((uintptr_t)neug_passwd, usbbuf, usbbuf[0] + 1);
 }
 
-static uint32_t rbit (uint32_t v)
-{
-  uint32_t r;
-
-  asm ("rbit   %0, %1" : "=r" (r) : "r" (v));
-  return r;
-}
 
 /* After calling this function, CRC module remain enabled.  */
-static int download_check_crc32 (const uint32_t *end_p)
+static int download_check_crc32 (struct usb_dev *dev, const uint32_t *end_p)
 {
   uint32_t crc32 = *end_p;
   const uint32_t *p;
 
-  RCC->AHBENR |= RCC_AHBENR_CRCEN;
-  CRC->CR = CRC_CR_RESET;
+  crc32_rv_reset ();
 
   for (p = (const uint32_t *)&_regnual_start; p < end_p; p++)
-    CRC->DR = rbit (*p);
+    crc32_rv_step (rbit (*p));
 
-  if ((rbit (CRC->DR) ^ crc32) == 0xffffffff)
-    return USB_SUCCESS;
+  if ((rbit (crc32_rv_get ()) ^ crc32) == 0xffffffff)
+    return usb_lld_ctrl_ack (dev);
 
-  return USB_UNSUPPORT;
+  return -1;
 }
+#endif
 
 
 #define NEUG_SPECIAL_BITRATE 110
@@ -297,14 +300,16 @@ static struct line_coding line_coding = {
 
 #define CDC_CTRL_DTR            0x0001
 
-void
-usb_cb_ctrl_write_finish (uint8_t req, uint8_t req_no, struct req_args *arg)
+static void
+usb_ctrl_write_finish (struct usb_dev *dev)
 {
-  uint8_t type_rcp = req & (REQUEST_TYPE|RECIPIENT);
+  struct device_req *arg = &dev->dev_req;
+  uint8_t type_rcp = arg->type & (REQUEST_TYPE|RECIPIENT);
 
-  if (type_rcp == (VENDOR_REQUEST | DEVICE_RECIPIENT) && USB_SETUP_SET (req))
+  if (type_rcp == (VENDOR_REQUEST | DEVICE_RECIPIENT)
+      && USB_SETUP_SET (arg->type))
     {
-      if (req_no == USB_FSIJ_EXEC)
+      if (arg->request == USB_FSIJ_EXEC)
        {
          chopstx_mutex_lock (&usb_mtx);
          if (fsij_device_state == FSIJ_DEVICE_EXITED)
@@ -314,14 +319,19 @@ usb_cb_ctrl_write_finish (uint8_t req, uint8_t req_no, struct req_args *arg)
            }
          chopstx_mutex_unlock (&usb_mtx);
        }
-      else if (req_no == USB_NEUG_SET_PASSWD)
+#ifndef GNU_LINUX_EMULATION
+      else if (arg->request == USB_NEUG_SET_PASSWD)
        set_passwd ();
-      else if (req_no == USB_NEUG_EXIT)
+#endif
+      else if (arg->request == USB_NEUG_EXIT)
        {
          if ((neug_passwd[0] == 0xff && usbbuf[0] == DEFAULT_PASSWD_LEN
               && !memcmp (usbbuf + 1, DEFAULT_PASSWD, DEFAULT_PASSWD_LEN))
+#ifndef GNU_LINUX_EMULATION
              || (neug_passwd[0] == usbbuf[0]
-                 && !memcmp (neug_passwd+1, usbbuf+1, neug_passwd[0])))
+                 && !memcmp (neug_passwd+1, usbbuf+1, neug_passwd[0]))
+#endif
+             )
            {
              chopstx_mutex_lock (&usb_mtx);
              fsij_device_state = FSIJ_DEVICE_NEUG_EXIT_REQUESTED;
@@ -331,9 +341,9 @@ usb_cb_ctrl_write_finish (uint8_t req, uint8_t req_no, struct req_args *arg)
        }
     }
   else if (type_rcp == (CLASS_REQUEST | INTERFACE_RECIPIENT) && arg->index == 0
-          && USB_SETUP_SET (req))
+          && USB_SETUP_SET (arg->type))
     {
-      if (req_no == USB_CDC_REQ_SET_CONTROL_LINE_STATE)
+      if (arg->request == USB_CDC_REQ_SET_CONTROL_LINE_STATE)
        {
          /* Open/close the connection.  */
          chopstx_mutex_lock (&usb_mtx);
@@ -342,7 +352,7 @@ usb_cb_ctrl_write_finish (uint8_t req, uint8_t req_no, struct req_args *arg)
          chopstx_mutex_unlock (&usb_mtx);
        }
 #ifdef FRAUCHEKY_SUPPORT
-      else if (req_no == USB_CDC_REQ_SET_LINE_CODING)
+      else if (running_neug && arg->request == USB_CDC_REQ_SET_LINE_CODING)
        {
          chopstx_mutex_lock (&usb_mtx);
          if (line_coding.bitrate == NEUG_SPECIAL_BITRATE)
@@ -354,136 +364,144 @@ usb_cb_ctrl_write_finish (uint8_t req, uint8_t req_no, struct req_args *arg)
            fsij_device_state = FSIJ_DEVICE_RUNNING;
          chopstx_mutex_unlock (&usb_mtx);
        }
+      else if (!running_neug && arg->request == MSC_MASS_STORAGE_RESET_COMMAND)
+       fraucheky_setup_endpoints_for_interface (0);
 #endif
     }
 }
 
 
 static int
-vcom_port_data_setup (uint8_t req, uint8_t req_no, struct req_args *arg)
+vcom_port_data_setup (struct usb_dev *dev)
 {
-  if (USB_SETUP_GET (req))
+  struct device_req *arg = &dev->dev_req;
+
+  if (USB_SETUP_GET (arg->type))
     {
-      if (req_no == USB_CDC_REQ_GET_LINE_CODING)
-       return usb_lld_reply_request (&line_coding, sizeof(line_coding), arg);
+      if (arg->request == USB_CDC_REQ_GET_LINE_CODING)
+       return usb_lld_ctrl_send (dev, &line_coding, sizeof(line_coding));
     }
   else  /* USB_SETUP_SET (req) */
     {
-      if (req_no == USB_CDC_REQ_SET_LINE_CODING
+      if (arg->request == USB_CDC_REQ_SET_LINE_CODING
          && arg->len == sizeof (line_coding))
-       {
-         usb_lld_set_data_to_recv (&line_coding, sizeof (line_coding));
-         return USB_SUCCESS;
-       }
-      else if (req_no == USB_CDC_REQ_SET_CONTROL_LINE_STATE)
-       return USB_SUCCESS;
+       return usb_lld_ctrl_recv (dev, &line_coding, sizeof (line_coding));
+      else if (arg->request == USB_CDC_REQ_SET_CONTROL_LINE_STATE)
+       return usb_lld_ctrl_ack (dev);
     }
 
-  return USB_UNSUPPORT;
+  return -1;
 }
 
-int
-usb_cb_setup (uint8_t req, uint8_t req_no, struct req_args *arg)
+static int
+usb_setup (struct usb_dev *dev)
 {
-  uint8_t type_rcp = req & (REQUEST_TYPE|RECIPIENT);
+  struct device_req *arg = &dev->dev_req;
+  uint8_t type_rcp = arg->type & (REQUEST_TYPE|RECIPIENT);
 
   if (type_rcp == (VENDOR_REQUEST | DEVICE_RECIPIENT))
     {
-      if (USB_SETUP_GET (req))
+      if (USB_SETUP_GET (arg->type))
        {
-         if (req_no == USB_FSIJ_MEMINFO)
+         if (arg->request == USB_FSIJ_MEMINFO)
            {
+#ifdef GNU_LINUX_EMULATION
+             return -1;
+#else
              chopstx_mutex_lock (&usb_mtx);
              if (fsij_device_state != FSIJ_DEVICE_EXITED)
                {
                  chopstx_mutex_unlock (&usb_mtx);
-                 return USB_UNSUPPORT;
+                 return -1;
                }
              chopstx_mutex_unlock (&usb_mtx);
-             usb_lld_reply_request (mem_info, sizeof (mem_info), arg);
-             return USB_SUCCESS;
+             return usb_lld_ctrl_send (dev, mem_info, sizeof (mem_info));
+#endif
            }
-         else if (req_no == USB_NEUG_GET_INFO)
+         else if (arg->request == USB_NEUG_GET_INFO)
            {
              if (arg->index == 0)
-               usb_lld_reply_request (&neug_mode, sizeof (uint8_t), arg);
+               return usb_lld_ctrl_send (dev, &neug_mode, sizeof (uint8_t));
              else if (arg->index == 1)
-               usb_lld_reply_request (&neug_err_cnt, sizeof (uint16_t), arg);
+               return usb_lld_ctrl_send (dev, &neug_err_cnt, sizeof (uint16_t));
              else if (arg->index == 2)
-               usb_lld_reply_request (&neug_err_cnt_rc, sizeof (uint16_t), arg);
+               return usb_lld_ctrl_send (dev, &neug_err_cnt_rc, sizeof (uint16_t));
              else if (arg->index == 3)
-               usb_lld_reply_request (&neug_err_cnt_p64, sizeof (uint16_t), arg);
+               return usb_lld_ctrl_send (dev, &neug_err_cnt_p64, sizeof (uint16_t));
              else if (arg->index == 4)
-               usb_lld_reply_request (&neug_err_cnt_p4k, sizeof (uint16_t), arg);
+               return usb_lld_ctrl_send (dev, &neug_err_cnt_p4k, sizeof (uint16_t));
              else if (arg->index == 5)
-               usb_lld_reply_request (&neug_rc_max, sizeof (uint16_t), arg);
+               return usb_lld_ctrl_send (dev, &neug_rc_max, sizeof (uint16_t));
              else if (arg->index == 6)
-               usb_lld_reply_request (&neug_p64_max, sizeof (uint16_t), arg);
+               return usb_lld_ctrl_send (dev, &neug_p64_max, sizeof (uint16_t));
              else if (arg->index == 7)
-               usb_lld_reply_request (&neug_p4k_max, sizeof (uint16_t), arg);
+               return usb_lld_ctrl_send (dev, &neug_p4k_max, sizeof (uint16_t));
              else
-               return USB_UNSUPPORT;
-
-             return USB_SUCCESS;
+               return -1;
            }
        }
       else /* SETUP_SET */
        {
-         uint8_t *addr = (uint8_t *)(0x20000000 + arg->value * 0x100 + arg->index);
+         uint8_t *addr = (uint8_t *)(0x20000000UL + arg->value * 0x100 + arg->index);
 
-         if (req_no == USB_FSIJ_DOWNLOAD)
+         if (arg->request == USB_FSIJ_DOWNLOAD)
            {
+#ifdef GNU_LINUX_EMULATION
+             return -1;
+#else
              chopstx_mutex_lock (&usb_mtx);
              if (fsij_device_state != FSIJ_DEVICE_EXITED)
                {
                  chopstx_mutex_unlock (&usb_mtx);
-                 return USB_UNSUPPORT;
+                 return -1;
                }
              chopstx_mutex_unlock (&usb_mtx);
 
              if (addr < &_regnual_start || addr + arg->len > &__heap_end__)
-               return USB_UNSUPPORT;
+               return -1;
 
              if (arg->index + arg->len < 256)
                memset (addr + arg->index + arg->len, 0, 256 - (arg->index + arg->len));
 
-             usb_lld_set_data_to_recv (addr, arg->len);
-             return USB_SUCCESS;
+             return usb_lld_ctrl_recv (dev, addr, arg->len);
+#endif
            }
-         else if (req_no == USB_FSIJ_EXEC && arg->len == 0)
+         else if (arg->request == USB_FSIJ_EXEC && arg->len == 0)
            {
+#ifdef GNU_LINUX_EMULATION
+             return -1;
+#else
              chopstx_mutex_lock (&usb_mtx);
              if (fsij_device_state != FSIJ_DEVICE_EXITED)
                {
                  chopstx_mutex_unlock (&usb_mtx);
-                 return USB_UNSUPPORT;
+                 return -1;
                }
              chopstx_mutex_unlock (&usb_mtx);
 
-             if (((uint32_t)addr & 0x03))
-               return USB_UNSUPPORT;
+             if (((uintptr_t)addr & 0x03))
+               return -1;
 
-             return download_check_crc32 ((uint32_t *)addr);
+             return download_check_crc32 (dev, (uint32_t *)addr);
+#endif
            }
-         else if (req_no == USB_NEUG_SET_PASSWD && arg->len <= 32)
+         else if (arg->request == USB_NEUG_SET_PASSWD && arg->len <= 32)
            {
              usbbuf[0] = arg->len;
-             usb_lld_set_data_to_recv (usbbuf + 1, arg->len);
-             return USB_SUCCESS;
+             return usb_lld_ctrl_recv (dev, usbbuf + 1, arg->len);
            }
-         else if (req_no == USB_NEUG_EXIT && arg->len <= 32)
+         else if (arg->request == USB_NEUG_EXIT && arg->len <= 32)
            {
              chopstx_mutex_lock (&usb_mtx);
              if (fsij_device_state != FSIJ_DEVICE_RUNNING)
                {
                  chopstx_mutex_unlock (&usb_mtx);
-                 return USB_UNSUPPORT;
+                 return -1;
                }
              chopstx_mutex_unlock (&usb_mtx);
 
              usbbuf[0] = arg->len;
-             usb_lld_set_data_to_recv (usbbuf + 1, arg->len);
-             return USB_SUCCESS;
+             return usb_lld_ctrl_recv (dev, usbbuf + 1, arg->len);
            }
        }
     }
@@ -492,35 +510,39 @@ usb_cb_setup (uint8_t req, uint8_t req_no, struct req_args *arg)
     {
 #ifdef FRAUCHEKY_SUPPORT
       if (running_neug)
-       return vcom_port_data_setup (req, req_no, arg);
+       return vcom_port_data_setup (dev);
       else
-       fraucheky_setup (req, req_no, arg);
+       return fraucheky_setup (dev);
 #else
-      return vcom_port_data_setup (req, req_no, arg);
+      return vcom_port_data_setup (dev);
 #endif
     }
 
-  return USB_UNSUPPORT;
+  return -1;
 }
 
-int
-usb_cb_get_descriptor (uint8_t rcp, uint8_t desc_type, uint8_t desc_index,
-                      struct req_args *arg)
+static int
+usb_get_descriptor (struct usb_dev *dev)
 {
+  struct device_req *arg = &dev->dev_req;
+  uint8_t rcp = arg->type & RECIPIENT;
+  uint8_t desc_type = (arg->value >> 8);
+  uint8_t desc_index = (arg->value & 0xff);
+
 #ifdef FRAUCHEKY_SUPPORT
   if (!running_neug)
-    return fraucheky_get_descriptor (rcp, desc_type, desc_index, arg);
+    return fraucheky_get_descriptor (dev);
 #endif
 
   if (rcp != DEVICE_RECIPIENT)
-    return USB_UNSUPPORT;
+    return -1;
 
   if (desc_type == DEVICE_DESCRIPTOR)
-    return usb_lld_reply_request (vcom_device_desc, sizeof (vcom_device_desc),
-                                 arg);
+    return usb_lld_ctrl_send (dev,
+                             vcom_device_desc, sizeof (vcom_device_desc));
   else if (desc_type == CONFIG_DESCRIPTOR)
-    return usb_lld_reply_request (vcom_config_desc, sizeof (vcom_config_desc),
-                                 arg);
+    return usb_lld_ctrl_send (dev,
+                             vcom_config_desc, sizeof (vcom_config_desc));
   else if (desc_type == STRING_DESCRIPTOR)
     {
       const uint8_t *str;
@@ -556,6 +578,7 @@ usb_cb_get_descriptor (uint8_t rcp, uint8_t desc_type, uint8_t desc_index,
          str = sys_version;
          size = sizeof (sys_version);
          break;
+#ifdef USE_SYS3
        case 7:
          {
            int i;
@@ -573,26 +596,36 @@ usb_cb_get_descriptor (uint8_t rcp, uint8_t desc_type, uint8_t desc_index,
            size = i*2 + 2;
          }
          break;
+#endif
        default:
-         return USB_UNSUPPORT;
+         return -1;
        }
 
-      return usb_lld_reply_request (str, size, arg);
+      return usb_lld_ctrl_send (dev, str, size);
     }
 
-  return USB_UNSUPPORT;
+  return -1;
 }
 
 static void
-neug_setup_endpoints_for_interface (uint16_t interface, int stop)
+neug_setup_endpoints_for_interface (struct usb_dev *dev,
+                                   uint16_t interface, int stop)
 {
+#if !defined(GNU_LINUX_EMULATION)
+  (void)dev;
+#endif
+  
   if (interface == 0)
     {
 #ifdef FRAUCHEKY_SUPPORT
       if (running_neug)
        {
          if (!stop)
+#ifdef GNU_LINUX_EMULATION
+           usb_lld_setup_endp (dev, ENDP2, 0, 1);
+#else
            usb_lld_setup_endpoint (ENDP2, EP_INTERRUPT, 0, 0, ENDP2_TXADDR, 0);
+#endif
          else
            usb_lld_stall_tx (ENDP2);
        }
@@ -600,7 +633,11 @@ neug_setup_endpoints_for_interface (uint16_t interface, int stop)
        fraucheky_setup_endpoints_for_interface (stop);
 #else
       if (!stop)
+#ifdef GNU_LINUX_EMULATION
+       usb_lld_setup_endp (dev, ENDP2, 0, 1);
+#else
        usb_lld_setup_endpoint (ENDP2, EP_INTERRUPT, 0, 0, ENDP2_TXADDR, 0);
+#endif
       else
        usb_lld_stall_tx (ENDP2);
 #endif
@@ -609,8 +646,13 @@ neug_setup_endpoints_for_interface (uint16_t interface, int stop)
     {
       if (!stop)
        {
+#ifdef GNU_LINUX_EMULATION
+         usb_lld_setup_endp (dev, ENDP1, 0, 1);
+         usb_lld_setup_endp (dev, ENDP3, 1, 0);
+#else
          usb_lld_setup_endpoint (ENDP1, EP_BULK, 0, 0, ENDP1_TXADDR, 0);
          usb_lld_setup_endpoint (ENDP3, EP_BULK, 0, ENDP3_RXADDR, 0, 64);
+#endif
          /* Start with no data receiving (ENDP3 not enabled) */
        }
       else
@@ -621,102 +663,188 @@ neug_setup_endpoints_for_interface (uint16_t interface, int stop)
     }
 }
 
-int usb_cb_handle_event (uint8_t event_type, uint16_t value)
+static int
+usb_set_configuration (struct usb_dev *dev)
 {
   int i;
   uint8_t current_conf;
 
-  switch (event_type)
+  current_conf = usb_lld_current_configuration (dev);
+  if (current_conf == 0)
     {
-    case USB_EVENT_ADDRESS:
+      if (dev->dev_req.value != 1)
+       return -1;
+
+      usb_lld_set_configuration (dev, 1);
+      for (i = 0; i < NUM_INTERFACES; i++)
+       neug_setup_endpoints_for_interface (dev, i, 0);
       chopstx_mutex_lock (&usb_mtx);
-      bDeviceState = ADDRESSED;
+      bDeviceState = CONFIGURED;
       chopstx_mutex_unlock (&usb_mtx);
-      return USB_SUCCESS;
-    case USB_EVENT_CONFIG:
-      current_conf = usb_lld_current_configuration ();
-      if (current_conf == 0)
-       {
-         if (value != 1)
-           return USB_UNSUPPORT;
-
-         usb_lld_set_configuration (1);
-         for (i = 0; i < NUM_INTERFACES; i++)
-           neug_setup_endpoints_for_interface (i, 0);
-         chopstx_mutex_lock (&usb_mtx);
-         bDeviceState = CONFIGURED;
-         chopstx_mutex_unlock (&usb_mtx);
-       }
-      else if (current_conf != value)
-       {
-         if (value != 0)
-           return USB_UNSUPPORT;
+    }
+  else if (current_conf != dev->dev_req.value)
+    {
+      if (dev->dev_req.value != 0)
+       return -1;
 
-         usb_lld_set_configuration (0);
-         for (i = 0; i < NUM_INTERFACES; i++)
-           neug_setup_endpoints_for_interface (i, 1);
-         chopstx_mutex_lock (&usb_mtx);
-         bDeviceState = ADDRESSED;
-         chopstx_mutex_unlock (&usb_mtx);
-       }
-      /* Do nothing when current_conf == value */
-      return USB_SUCCESS;
-    default:
-      break;
+      usb_lld_set_configuration (dev, 0);
+      for (i = 0; i < NUM_INTERFACES; i++)
+       neug_setup_endpoints_for_interface (dev, i, 1);
+      chopstx_mutex_lock (&usb_mtx);
+      bDeviceState = ADDRESSED;
+      chopstx_cond_signal (&usb_cnd);
+      chopstx_mutex_unlock (&usb_mtx);
     }
 
-  return USB_UNSUPPORT;
+  /* Do nothing when current_conf == value */
+  return usb_lld_ctrl_ack (dev);
 }
 
 
-int usb_cb_interface (uint8_t cmd, struct req_args *arg)
+static int
+usb_set_interface (struct usb_dev *dev)
 {
-  const uint8_t zero = 0;
-  uint16_t interface = arg->index;
-  uint16_t alt = arg->value;
+  uint16_t interface = dev->dev_req.index;
+  uint16_t alt = dev->dev_req.value;
 
   if (interface >= NUM_INTERFACES)
-    return USB_UNSUPPORT;
+    return -1;
 
-  switch (cmd)
+  if (alt != 0)
+    return -1;
+  else
     {
-    case USB_SET_INTERFACE:
-      if (alt != 0)
-       return USB_UNSUPPORT;
-      else
-       {
-         neug_setup_endpoints_for_interface (interface, 0);
-         return USB_SUCCESS;
-       }
+      neug_setup_endpoints_for_interface (dev, interface, 0);
+      return usb_lld_ctrl_ack (dev);
+    }
+}
 
-    case USB_GET_INTERFACE:
-      return usb_lld_reply_request (&zero, 1, arg);
+static int
+usb_get_interface (struct usb_dev *dev)
+{
+  const uint8_t zero = 0;
+  uint16_t interface = dev->dev_req.index;
 
-    default:
-    case USB_QUERY_INTERFACE:
-      return USB_SUCCESS;
-    }
+  if (interface >= NUM_INTERFACES)
+    return -1;
+
+  return usb_lld_ctrl_send (dev, &zero, 1);
 }
 
+
+static int
+usb_get_status_interface (struct usb_dev *dev)
+{
+  const uint16_t status_info = 0;
+  uint16_t interface = dev->dev_req.index;
+
+  if (interface >= NUM_INTERFACES)
+    return -1;
+
+  return usb_lld_ctrl_send (dev, &status_info, 2);
+}
+
+static void usb_tx_done (uint8_t ep_num, uint16_t len);
+static void usb_rx_ready (uint8_t ep_num, uint16_t len);
+
+
 #define INTR_REQ_USB 20
 #define PRIO_USB 3
 
 static void *
-usb_intr (void *arg)
+usb_main (void *arg)
 {
   chopstx_intr_t interrupt;
+  struct usb_dev dev;
+  int e;
 
   (void)arg;
-  usb_lld_init (VCOM_FEATURE_BUS_POWERED);
+  usb_lld_init (&dev, VCOM_FEATURE_BUS_POWERED);
   chopstx_claim_irq (&interrupt, INTR_REQ_USB);
-  usb_interrupt_handler ();    /* For old SYS < 3.0 */
+  goto event_handle;   /* For old SYS < 3.0 */
 
   while (1)
     {
-      chopstx_poll (NULL, 1, &interrupt);
+      chopstx_intr_wait (&interrupt);
 
-      /* Process interrupt. */
-      usb_interrupt_handler ();
+      if (interrupt.ready)
+       {
+         uint8_t ep_num;
+
+       event_handle:
+         e = usb_lld_event_handler (&dev);
+         ep_num = USB_EVENT_ENDP (e);
+
+         if (ep_num != 0)
+           {
+             if (USB_EVENT_TXRX (e))
+               usb_tx_done (ep_num, USB_EVENT_LEN (e));
+             else
+               usb_rx_ready (ep_num, USB_EVENT_LEN (e));
+           }
+         else
+           switch (USB_EVENT_ID (e))
+             {
+             case USB_EVENT_DEVICE_RESET:
+               usb_device_reset (&dev);
+               continue;
+
+             case USB_EVENT_DEVICE_ADDRESSED:
+               chopstx_mutex_lock (&usb_mtx);
+               bDeviceState = ADDRESSED;
+               chopstx_cond_signal (&usb_cnd);
+               chopstx_mutex_unlock (&usb_mtx);
+               continue;
+
+             case USB_EVENT_GET_DESCRIPTOR:
+               if (usb_get_descriptor (&dev) < 0)
+                 usb_lld_ctrl_error (&dev);
+               continue;
+
+             case USB_EVENT_SET_CONFIGURATION:
+               if (usb_set_configuration (&dev) < 0)
+                 usb_lld_ctrl_error (&dev);
+               continue;
+
+             case USB_EVENT_SET_INTERFACE:
+               if (usb_set_interface (&dev) < 0)
+                 usb_lld_ctrl_error (&dev);
+               continue;
+
+             case USB_EVENT_CTRL_REQUEST:
+               /* Device specific device request.  */
+               if (usb_setup (&dev) < 0)
+                 usb_lld_ctrl_error (&dev);
+               continue;
+
+             case USB_EVENT_GET_STATUS_INTERFACE:
+               if (usb_get_status_interface (&dev) < 0)
+                 usb_lld_ctrl_error (&dev);
+               continue;
+
+             case USB_EVENT_GET_INTERFACE:
+               if (usb_get_interface (&dev) < 0)
+                 usb_lld_ctrl_error (&dev);
+               continue;
+
+             case USB_EVENT_SET_FEATURE_DEVICE:
+             case USB_EVENT_SET_FEATURE_ENDPOINT:
+             case USB_EVENT_CLEAR_FEATURE_DEVICE:
+             case USB_EVENT_CLEAR_FEATURE_ENDPOINT:
+               usb_lld_ctrl_ack (&dev);
+               continue;
+
+             case USB_EVENT_CTRL_WRITE_FINISH:
+               /* Control WRITE transfer finished.  */
+               usb_ctrl_write_finish (&dev);
+               continue;
+
+             case USB_EVENT_OK:
+             case USB_EVENT_DEVICE_SUSPEND:
+             default:
+               continue;
+             }
+       }
     }
 
   return NULL;
@@ -747,8 +875,8 @@ static void fill_serial_no_by_unique_id (void)
 }
 
 
-void
-usb_cb_tx_done (uint8_t ep_num)
+static void
+usb_tx_done (uint8_t ep_num, uint16_t len)
 {
   if (ep_num == ENDP1)
     {
@@ -760,13 +888,33 @@ usb_cb_tx_done (uint8_t ep_num)
     {
       /* INTERRUPT Transfer done */
     }
+#ifdef FRAUCHEKY_SUPPORT
+  else if (ep_num == ENDP6)
+    EP6_IN_Callback (len);
+#else
+  (void)len;
+#endif
 }
 
-void
-usb_cb_rx_ready (uint8_t ep_num)
+#ifdef GNU_LINUX_EMULATION
+static uint8_t endp3_buf[64];
+#endif
+
+static void
+usb_rx_ready (uint8_t ep_num, uint16_t len)
 {
   if (ep_num == ENDP3)
+#ifdef GNU_LINUX_EMULATION
+    usb_lld_rx_enable_buf (ENDP3, endp3_buf, 64);
+#else
     usb_lld_rx_enable (ENDP3);
+#endif
+#ifdef FRAUCHEKY_SUPPORT
+  else if (ep_num == ENDP6)
+    EP6_OUT_Callback (len);
+#else
+  (void)len;
+#endif
 }
 \f
 typedef uint32_t eventmask_t;
@@ -809,13 +957,20 @@ static void event_flag_signal (struct event_flag *ev, eventmask_t m)
   chopstx_mutex_unlock (&ev->mutex);
 }
 
-extern uint8_t __process1_stack_base__, __process1_stack_size__;
-extern uint8_t __process3_stack_base__, __process3_stack_size__;
+#ifdef GNU_LINUX_EMULATION
+static char __process1_stack_base__[4096];
+static char __process3_stack_base__[4096];
+#define STACK_SIZE_LED (sizeof __process1_stack_base__)
+#define STACK_SIZE_USB (sizeof __process3_stack_base__)
+#else
+extern uint8_t __process1_stack_base__[], __process1_stack_size__[];
+extern uint8_t __process3_stack_base__[], __process3_stack_size__[];
+#define STACK_SIZE_LED ((uintptr_t)__process1_stack_size__)
+#define STACK_SIZE_USB ((uintptr_t)__process3_stack_size__)
+#endif
 
-const uint32_t __stackaddr_led = (uint32_t)&__process1_stack_base__;
-const size_t __stacksize_led = (size_t)&__process1_stack_size__;
-const uint32_t __stackaddr_usb = (uint32_t)&__process3_stack_base__;
-const size_t __stacksize_usb = (size_t)&__process3_stack_size__;
+#define STACK_ADDR_LED ((uintptr_t)__process1_stack_base__)
+#define STACK_ADDR_USB ((uintptr_t)__process3_stack_base__)
 
 
 #define PRIO_LED 3
@@ -863,11 +1018,20 @@ led_blinker (void *arg)
 #define RANDOM_BYTES_LENGTH 64
 static uint32_t random_word[RANDOM_BYTES_LENGTH/sizeof (uint32_t)];
 
+#ifdef GNU_LINUX_EMULATION
+static uint8_t endp1_buf[RANDOM_BYTES_LENGTH];
+#endif
+
 static void copy_to_tx (uint32_t v, int i)
 {
+#ifdef GNU_LINUX_EMULATION
+  memcpy (&endp1_buf[i], &v, 4);
+#else
   usb_lld_txcpy (&v, ENDP1, i * 4, 4);
+#endif
 }
 
+#ifndef GNU_LINUX_EMULATION
 /*
  * In Gnuk 1.0.[12], reGNUal was not relocatable.
  * Now, it's relocatable, but we need to calculate its entry address
@@ -878,12 +1042,13 @@ static uint32_t
 calculate_regnual_entry_address (const uint8_t *addr)
 {
   const uint8_t *p = addr + 4;
-  uint32_t v = p[0] + (p[1] << 8) + (p[2] << 16) + (p[3] << 24);
+  uintptr_t v = p[0] + (p[1] << 8) + (p[2] << 16) + (p[3] << 24);
 
   v -= REGNUAL_START_ADDRESS_COMPATIBLE;
-  v += (uint32_t)addr;
+  v += (uintptr_t)addr;
   return v;
 }
+#endif
 
 
 static int
@@ -895,6 +1060,13 @@ check_usb_status (void *arg)
          || fsij_device_state != FSIJ_DEVICE_RUNNING);
 }
 
+
+#ifdef GNU_LINUX_EMULATION
+#include <stdlib.h>
+
+#define main emulated_main
+#endif
+
 /*
  * Entry point.
  *
@@ -903,7 +1075,9 @@ check_usb_status (void *arg)
 int
 main (int argc, char **argv)
 {
-  uint32_t entry;
+#ifndef GNU_LINUX_EMULATION
+  uintptr_t entry;
+#endif
   chopstx_t led_thread, usb_thd;
   unsigned int count;
 
@@ -923,24 +1097,28 @@ main (int argc, char **argv)
   if (fraucheky_enabled ())
     {
     go_fraucheky:
+      bDeviceState = UNCONNECTED;
       running_neug = 0;
-      usb_thd = chopstx_create (PRIO_USB, __stackaddr_usb, __stacksize_usb,
-                               usb_intr, NULL);
+      usb_thd = chopstx_create (PRIO_USB, STACK_ADDR_USB, STACK_SIZE_USB,
+                               usb_main, NULL);
+      while (bDeviceState != CONFIGURED)
+       chopstx_usec_wait (250*1000);
       set_led (1);
       fraucheky_main ();
       chopstx_cancel (usb_thd);
       chopstx_join (usb_thd, NULL);
       usb_lld_shutdown ();
+      bDeviceState = UNCONNECTED;
     }
 
   running_neug = 1;
 #endif
 
-  led_thread = chopstx_create (PRIO_LED, __stackaddr_led, __stacksize_led,
+  led_thread = chopstx_create (PRIO_LED, STACK_ADDR_LED, STACK_SIZE_LED,
                               led_blinker, NULL);
 
-  usb_thd = chopstx_create (PRIO_USB, __stackaddr_usb, __stacksize_usb,
-                           usb_intr, NULL);
+  usb_thd = chopstx_create (PRIO_USB, STACK_ADDR_USB, STACK_SIZE_USB,
+                           usb_main, NULL);
 
   neug_init (random_word, RANDOM_BYTES_LENGTH/sizeof (uint32_t));
 
@@ -976,8 +1154,11 @@ main (int argc, char **argv)
       chopstx_mutex_unlock (&usb_mtx);
       while (1)
        {
-         chopstx_poll_cond_t poll_desc;
          uint32_t usec = 5000*1000;
+         chopstx_poll_cond_t poll_desc;
+         struct chx_poll_head *pd_array[1] = {
+           (struct chx_poll_head *)&poll_desc
+         };
 
          poll_desc.type = CHOPSTX_POLL_COND;
          poll_desc.ready = 0;
@@ -986,7 +1167,7 @@ main (int argc, char **argv)
          poll_desc.check = check_usb_status;
          poll_desc.arg = NULL;
 
-         if (chopstx_poll (&usec, 1, &poll_desc))
+         if (chopstx_poll (&usec, 1, pd_array))
            break;
 
          /* Timeout */
@@ -1044,7 +1225,11 @@ main (int argc, char **argv)
                break;
 
              /* Prepare sending random data.  */
+#ifdef GNU_LINUX_EMULATION
+             usb_lld_tx_enable_buf (ENDP1, endp1_buf, i * 4);
+#else
              usb_lld_tx_enable (ENDP1, i * 4);
+#endif
              chopstx_cond_wait (&usb_cnd, &usb_mtx);
              count++;
            }
@@ -1103,8 +1288,11 @@ main (int argc, char **argv)
   chopstx_cancel (usb_thd);
   chopstx_join (usb_thd, NULL);
 
+#ifdef GNU_LINUX_EMULATION
+  exit (0);
+#else
   /* Set vector */
-  SCB->VTOR = (uint32_t)&_regnual_start;
+  SCB->VTOR = (uintptr_t)&_regnual_start;
   entry = calculate_regnual_entry_address (&_regnual_start);
 #ifdef DFU_SUPPORT
 #define FLASH_SYS_START_ADDR 0x08000000
@@ -1136,6 +1324,7 @@ main (int argc, char **argv)
   /* Leave NeuG to exec reGNUal */
   flash_erase_all_and_exec ((void (*)(void))entry);
 #endif
+#endif
 
   /* Never reached */
   return 0;