switch.c

   1 #include <unistd.h>
   2 #include "switch.h"
   3
   4 enum {
   5         DATA_MODE,
   6         DATA_MSG,
   7         DATA_INTERFACE,
   8         DATA_MSG_EP,
   9         DATA_RES_EP,
  10         DATA_RESPONSE,
  11         DATA_RELEASE_DELAY,
  12         DATA_CONFIG,
  13         DATA_ALT,
  14         DATA_DEV_CLASS,
  15         __DATA_MAX
  16 };
  17
  18 static void detach_driver(struct usbdev_data *data)
  19 {
  20         libusb_detach_kernel_driver(data->devh, data->interface);
  21 }
  22
  23 struct msg_entry {
  24         char *data;
  25         int len;
  26 };
  27
  28 static int send_msg(struct usbdev_data *data, struct msg_entry *msg)
  29 {
  30         int transferred;
  31
  32         return libusb_bulk_transfer(data->devh, data->msg_endpoint,
  33                                     (void *) msg->data, msg->len,
  34                                     &transferred, 3000);
  35 }
  36
  37 static int read_response(struct usbdev_data *data, int len)
  38 {
  39         unsigned char *buf;
  40         int ret, transferred;
  41
  42         if (len < 13)
  43                 len = 13;
  44         buf = alloca(len);
  45         ret = libusb_bulk_transfer(data->devh, data->response_endpoint,
  46                                    buf, len, &transferred, 3000);
  47         libusb_bulk_transfer(data->devh, data->response_endpoint,
  48                              buf, 13, &transferred, 100);
  49         return ret;
  50 }
  51
  52 static void send_messages(struct usbdev_data *data, struct msg_entry *msg, int n_msg)
  53 {
  54         int i, len;
  55
  56         libusb_claim_interface(data->devh, data->interface);
  57         libusb_clear_halt(data->devh, data->msg_endpoint);
  58
  59         for (i = 0; i < n_msg; i++) {
  60                 if (send_msg(data, &msg[i])) {
  61                         fprintf(stderr, "Failed to send switch message\n");
  62                         continue;
  63                 }
  64
  65                 if (!data->need_response)
  66                         continue;
  67
  68                 if (!memcmp(msg[i].data, "\x55\x53\x42\x43", 4))
  69                         len = 13;
  70                 else
  71                         len = msg[i].len;
  72
  73                 if (read_response(data, len))
  74                         return;
  75         }
  76
  77         libusb_clear_halt(data->devh, data->msg_endpoint);
  78         libusb_clear_halt(data->devh, data->response_endpoint);
  79
  80         usleep(200000);
  81
  82         if (data->release_delay)
  83                 usleep(data->release_delay * 1000);
  84
  85         libusb_release_interface(data->devh, data->interface);
  86         return;
  87 }
  88
  89 static void send_config_messages(struct usbdev_data *data, struct blob_attr *attr)
  90 {
  91         struct blob_attr *cur;
  92         int rem, n_msg = 0;
  93         struct msg_entry *msg;
  94
  95         blobmsg_for_each_attr(cur, attr, rem)
  96                 n_msg++;
  97
  98         msg = alloca(n_msg * sizeof(*msg));
  99         n_msg = 0;
 100         blobmsg_for_each_attr(cur, attr, rem) {
 101                 int msg_nr;
 102
 103                 if (blobmsg_type(cur) != BLOBMSG_TYPE_INT32) {
 104                         fprintf(stderr, "Invalid data in message list\n");
 105                         return;
 106                 }
 107
 108                 msg_nr = blobmsg_get_u32(cur);
 109                 if (msg_nr >= n_messages) {
 110                         fprintf(stderr, "Message index out of range!\n");
 111                         return;
 112                 }
 113
 114                 msg[n_msg].data = messages[msg_nr];
 115                 msg[n_msg++].len = message_len[msg_nr];
 116         }
 117
 118         send_messages(data, msg, n_msg);
 119 }
 120
 121 static void handle_generic(struct usbdev_data *data, struct blob_attr **tb)
 122 {
 123         detach_driver(data);
 124         send_config_messages(data, tb[DATA_MSG]);
 125 }
 126
 127 static void send_control_packet(struct usbdev_data *data, uint8_t type, uint8_t req,
 128                                 uint16_t val, uint16_t idx, int len)
 129 {
 130         unsigned char *buffer = alloca(len ? len : 1);
 131
 132         libusb_control_transfer(data->devh, type, req, val, idx, buffer, len, 1000);
 133 }
 134
 135 static void handle_huawei(struct usbdev_data *data, struct blob_attr **tb)
 136 {
 137         int type = LIBUSB_REQUEST_TYPE_STANDARD | LIBUSB_RECIPIENT_DEVICE;
 138         send_control_packet(data, type, LIBUSB_REQUEST_SET_FEATURE, 1, 0, 0);
 139 }
 140
 141 static void handle_huaweinew(struct usbdev_data *data, struct blob_attr **tb)
 142 {
 143         static struct msg_entry msgs[] = {
 144                 {
 145                         "\x55\x53\x42\x43\x12\x34\x56\x78\x00\x00\x00\x00\x00\x00\x00\x11"
 146                         "\x06\x20\x00\x00\x01\x01\x00\x01\x00\x00\x00\x00\x00\x00\x00", 31
 147                 }
 148         };
 149
 150         detach_driver(data);
 151         data->need_response = false;
 152         send_messages(data, msgs, ARRAY_SIZE(msgs));
 153 }
 154
 155 static void handle_standardeject(struct usbdev_data *data, struct blob_attr **tb)
 156 {
 157         static struct msg_entry msgs[] = {
 158                 {
 159                         "\x55\x53\x42\x43\x12\x34\x56\x78\x00\x00\x00\x00\x00\x00\x06\x1e"
 160                         "\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00", 31
 161                 }, {
 162                         "\x55\x53\x42\x43\x12\x34\x56\x79\x00\x00\x00\x00\x00\x00\x06\x1b"
 163                         "\x00\x00\x00\x02\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00", 31
 164                 }
 165         };
 166
 167         detach_driver(data);
 168         data->need_response = true;
 169         send_messages(data, msgs, ARRAY_SIZE(msgs));
 170 }
 171
 172 static void handle_sierra(struct usbdev_data *data, struct blob_attr **tb)
 173 {
 174         int type = LIBUSB_REQUEST_TYPE_VENDOR | LIBUSB_RECIPIENT_DEVICE;
 175         send_control_packet(data, type, LIBUSB_REQUEST_SET_INTERFACE, 1, 0, 0);
 176 }
 177
 178 static void handle_sony(struct usbdev_data *data, struct blob_attr **tb)
 179 {
 180         int type = LIBUSB_REQUEST_TYPE_VENDOR | LIBUSB_ENDPOINT_IN;
 181         int i;
 182
 183         detach_driver(data);
 184         send_control_packet(data, type, 0x11, 2, 0, 3);
 185
 186         libusb_close(data->devh);
 187         sleep(5);
 188
 189         for (i = 0; i < 25; i++) {
 190                 data->devh = libusb_open_device_with_vid_pid(usb,
 191                         data->desc.idVendor, data->desc.idProduct);
 192                 if (data->devh)
 193                         break;
 194         }
 195
 196         send_control_packet(data, type, 0x11, 2, 0, 3);
 197 }
 198
 199 static void handle_qisda(struct usbdev_data *data, struct blob_attr **tb)
 200 {
 201         static unsigned char buffer[] = "\x05\x8c\x04\x08\xa0\xee\x20\x00\x5c\x01\x04\x08\x98\xcd\xea\xbf";
 202         int type = LIBUSB_REQUEST_TYPE_VENDOR | LIBUSB_RECIPIENT_DEVICE;
 203
 204         libusb_control_transfer(data->devh, type, 0x04, 0, 0, buffer, 16, 1000);
 205 }
 206
 207 static void handle_gct(struct usbdev_data *data, struct blob_attr **tb)
 208 {
 209         int type = LIBUSB_REQUEST_TYPE_CLASS | LIBUSB_RECIPIENT_INTERFACE | LIBUSB_ENDPOINT_IN;
 210
 211         detach_driver(data);
 212
 213         if (libusb_claim_interface(data->devh, data->interface))
 214             return;
 215
 216         send_control_packet(data, type, 0xa0, 0, data->interface, 1);
 217         send_control_packet(data, type, 0xfe, 0, data->interface, 1);
 218
 219         libusb_release_interface(data->devh, data->interface);
 220 }
 221
 222 static void handle_kobil(struct usbdev_data *data, struct blob_attr **tb)
 223 {
 224         int type = LIBUSB_REQUEST_TYPE_VENDOR | LIBUSB_RECIPIENT_DEVICE | LIBUSB_ENDPOINT_IN;
 225
 226         detach_driver(data);
 227         send_control_packet(data, type, 0x88, 0, 0, 8);
 228 }
 229
 230 static void handle_sequans(struct usbdev_data *data, struct blob_attr **tb)
 231 {
 232         int type = LIBUSB_REQUEST_TYPE_VENDOR | LIBUSB_RECIPIENT_DEVICE;
 233         send_control_packet(data, type, LIBUSB_REQUEST_SET_INTERFACE, 2, 0, 0);
 234 }
 235
 236 static void mobile_action_interrupt_msg(struct usbdev_data *data, void *msg, int n_in)
 237 {
 238         unsigned char *buf = alloca(8);
 239         int ep_out = 0x02, ep_in = 0x81;
 240         int transferred;
 241         int i;
 242
 243         if (msg)
 244                 libusb_interrupt_transfer(data->devh, ep_out, msg, 8, &transferred, 1000);
 245         for (i = 0; i < n_in; i++)
 246                 libusb_interrupt_transfer(data->devh, ep_in, buf, 8, &transferred, 1000);
 247 }
 248
 249 static void handle_mobile_action(struct usbdev_data *data, struct blob_attr **tb)
 250 {
 251         int type = LIBUSB_REQUEST_TYPE_CLASS | LIBUSB_RECIPIENT_INTERFACE;
 252         char *msg[] = {
 253                 "\xb0\x04\x00\x00\x02\x90\x26\x86",
 254                 "\x37\x01\xfe\xdb\xc1\x33\x1f\x83",
 255                 "\x37\x0e\xb5\x9d\x3b\x8a\x91\x51",
 256                 "\x34\x87\xba\x0d\xfc\x8a\x91\x51",
 257                 "\x37\x01\xfe\xdb\xc1\x33\x1f\x83",
 258                 "\x37\x0e\xb5\x9d\x3b\x8a\x91\x51",
 259                 "\x34\x87\xba\x0d\xfc\x8a\x91\x51",
 260                 "\x33\x04\xfe\x00\xf4\x6c\x1f\xf0",
 261                 "\x32\x07\xfe\xf0\x29\xb9\x3a\xf0"
 262         };
 263         int i;
 264
 265         for (i = 0; i < 2; i++)
 266                 libusb_control_transfer(data->devh, type, 0x09, 0x0300, 0, (void *) msg[0], 8, 1000);
 267         mobile_action_interrupt_msg(data, NULL, 2);
 268         mobile_action_interrupt_msg(data, msg[1], 1);
 269         mobile_action_interrupt_msg(data, msg[2], 1);
 270         mobile_action_interrupt_msg(data, msg[3], 63);
 271         mobile_action_interrupt_msg(data, msg[4], 1);
 272         mobile_action_interrupt_msg(data, msg[5], 1);
 273         mobile_action_interrupt_msg(data, msg[6], 73);
 274         mobile_action_interrupt_msg(data, msg[7], 1);
 275         mobile_action_interrupt_msg(data, msg[8], 1);
 276 }
 277
 278 static void handle_cisco(struct usbdev_data *data, struct blob_attr **tb)
 279 {
 280         static struct msg_entry msgs[] = {
 281                 {
 282                         "\x55\x53\x42\x43\xf8\x3b\xcd\x81\x00\x02\x00\x00\x80\x00\x0a\xfd"
 283                         "\x00\x00\x00\x03\x00\x00\x00\x01\x00\x00\x00\x00\x00\x00\x00", 31
 284                 }, {
 285                         "\x55\x53\x42\x43\x98\x43\x00\x82\x00\x02\x00\x00\x80\x00\x0a\xfd"
 286                         "\x00\x00\x00\x07\x00\x00\x00\x01\x00\x00\x00\x00\x00\x00\x00", 31
 287                 }, {
 288                         "\x55\x53\x42\x43\x98\x43\x00\x82\x00\x00\x00\x00\x00\x00\x0a\xfd"
 289                         "\x00\x01\x00\x07\x10\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00", 31
 290                 }, {
 291                         "\x55\x53\x42\x43\x98\x43\x00\x82\x00\x02\x00\x00\x80\x00\x0a\xfd"
 292                         "\x00\x02\x00\x23\x00\x00\x00\x01\x00\x00\x00\x00\x00\x00\x00", 31
 293                 }, {
 294                         "\x55\x53\x42\x43\x98\x43\x00\x82\x00\x00\x00\x00\x00\x00\x0a\xfd"
 295                         "\x00\x03\x00\x23\x82\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00", 31
 296                 }, {
 297                         "\x55\x53\x42\x43\x98\x43\x00\x82\x00\x02\x00\x00\x80\x00\x0a\xfd"
 298                         "\x00\x02\x00\x26\x00\x00\x00\x01\x00\x00\x00\x00\x00\x00\x00", 31
 299                 }, {
 300                         "\x55\x53\x42\x43\x98\x43\x00\x82\x00\x00\x00\x00\x00\x00\x0a\xfd"
 301                         "\x00\x03\x00\x26\xc8\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00", 31
 302                 }, {
 303                         "\x55\x53\x42\x43\xd8\x4c\x04\x82\x00\x02\x00\x00\x80\x00\x0a\xfd"
 304                         "\x00\x00\x10\x73\x00\x00\x00\x01\x00\x00\x00\x00\x00\x00\x00", 31
 305                 }, {
 306                         "\x55\x53\x42\x43\xd8\x4c\x04\x82\x00\x02\x00\x00\x80\x00\x0a\xfd"
 307                         "\x00\x02\x00\x24\x00\x00\x00\x01\x00\x00\x00\x00\x00\x00\x00", 31
 308                 }, {
 309                         "\x55\x53\x42\x43\xd8\x4c\x04\x82\x00\x00\x00\x00\x00\x00\x0a\xfd"
 310                         "\x00\x03\x00\x24\x13\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00", 31
 311                 }, {
 312                         "\x55\x53\x42\x43\xd8\x4c\x04\x82\x00\x00\x00\x00\x00\x00\x0a\xfd"
 313                         "\x00\x01\x10\x73\x24\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00", 31
 314                 }
 315
 316         };
 317
 318         detach_driver(data);
 319         data->need_response = true;
 320         send_messages(data, msgs, ARRAY_SIZE(msgs));
 321 }
 322
 323 static void handle_mbim(struct usbdev_data *data, struct blob_attr **tb)
 324 {
 325         int j;
 326
 327         if (data->desc.bNumConfigurations < 2)
 328                 return;
 329
 330         for (j = 0; j < data->desc.bNumConfigurations; j++) {
 331                 struct libusb_config_descriptor *config;
 332                 int i;
 333
 334                 libusb_get_config_descriptor(data->dev, j, &config);
 335
 336                 for (i = 0; i < config->bNumInterfaces; i++) {
 337                         if (config->interface[i].altsetting[0].bInterfaceClass == 2) {
 338                                 if (config->interface[i].altsetting[0].bInterfaceSubClass == 0x0e) {
 339                                         struct libusb_config_descriptor *active;
 340                                         int count = 5;
 341
 342                                         libusb_get_active_config_descriptor(data->dev, &active);
 343                                         if (active->bConfigurationValue == config->bConfigurationValue)
 344                                                 return;
 345                                         while ((libusb_set_configuration(data->devh, config->bConfigurationValue) < 0) && --count)
 346                                                 libusb_detach_kernel_driver(data->devh, active->interface[0].altsetting[0].bInterfaceNumber);
 347
 348                                         libusb_free_config_descriptor(config);
 349                                         return;
 350                                 }
 351                         }
 352                 }
 353
 354                 libusb_free_config_descriptor(config);
 355         }
 356 }
 357
 358 static void set_alt_setting(struct usbdev_data *data, int setting)
 359 {
 360         if (libusb_claim_interface(data->devh, data->interface))
 361                 return;
 362
 363         libusb_set_interface_alt_setting(data->devh, data->interface, setting);
 364         libusb_release_interface(data->devh, data->interface);
 365 }
 366
 367 enum {
 368         MODE_GENERIC,
 369         MODE_HUAWEI,
 370         MODE_HUAWEINEW,
 371         MODE_SIERRA,
 372         MODE_STDEJECT,
 373         MODE_SONY,
 374         MODE_QISDA,
 375         MODE_GCT,
 376         MODE_KOBIL,
 377         MODE_SEQUANS,
 378         MODE_MOBILE_ACTION,
 379         MODE_CISCO,
 380         MODE_MBIM,
 381         __MODE_MAX
 382 };
 383
 384 static const struct {
 385         const char *name;
 386         void (*cb)(struct usbdev_data *data, struct blob_attr **tb);
 387 } modeswitch_cb[__MODE_MAX] = {
 388         [MODE_GENERIC] = { "Generic", handle_generic },
 389         [MODE_STDEJECT] = { "StandardEject", handle_standardeject },
 390         [MODE_HUAWEI] = { "Huawei", handle_huawei },
 391         [MODE_HUAWEINEW] = { "HuaweiNew", handle_huaweinew },
 392         [MODE_SIERRA] = { "Sierra", handle_sierra },
 393         [MODE_SONY] = { "Sony", handle_sony },
 394         [MODE_QISDA] = { "Qisda", handle_qisda },
 395         [MODE_GCT] = { "GCT", handle_gct },
 396         [MODE_KOBIL] = { "Kobil", handle_kobil },
 397         [MODE_SEQUANS] = { "Sequans", handle_sequans },
 398         [MODE_MOBILE_ACTION] = { "MobileAction", handle_mobile_action },
 399         [MODE_CISCO] = { "Cisco", handle_cisco },
 400         [MODE_MBIM] = { "MBIM", handle_mbim },
 401 };
 402
 403 void handle_switch(struct usbdev_data *data)
 404 {
 405         static const struct blobmsg_policy data_policy[__DATA_MAX] = {
 406                 [DATA_MODE] = { .name = "mode", .type = BLOBMSG_TYPE_STRING },
 407                 [DATA_MSG] = { .name = "msg", .type = BLOBMSG_TYPE_ARRAY },
 408                 [DATA_INTERFACE] = { .name = "interface", .type = BLOBMSG_TYPE_INT32 },
 409                 [DATA_MSG_EP] = { .name = "msg_endpoint", .type = BLOBMSG_TYPE_INT32 },
 410                 [DATA_RES_EP] = { .name = "response_endpoint", .type = BLOBMSG_TYPE_INT32 },
 411                 [DATA_RESPONSE] = { .name = "response", .type = BLOBMSG_TYPE_BOOL },
 412                 [DATA_CONFIG] = { .name = "config", .type = BLOBMSG_TYPE_INT32 },
 413                 [DATA_ALT] = { .name = "alt", .type = BLOBMSG_TYPE_INT32 },
 414                 [DATA_DEV_CLASS] = { .name = "t_class", .type = BLOBMSG_TYPE_INT32 },
 415         };
 416         struct blob_attr *tb[__DATA_MAX];
 417         int mode = MODE_GENERIC;
 418         int t_class = 0;
 419
 420         blobmsg_parse(data_policy, __DATA_MAX, tb, blobmsg_data(data->info), blobmsg_data_len(data->info));
 421
 422         if (tb[DATA_DEV_CLASS])
 423                 t_class = blobmsg_get_u32(tb[DATA_DEV_CLASS]);
 424
 425         if (tb[DATA_INTERFACE])
 426                 data->interface = blobmsg_get_u32(tb[DATA_INTERFACE]);
 427
 428         if (tb[DATA_MSG_EP])
 429                 data->msg_endpoint = blobmsg_get_u32(tb[DATA_MSG_EP]);
 430
 431         if (tb[DATA_RES_EP])
 432                 data->response_endpoint = blobmsg_get_u32(tb[DATA_RES_EP]);
 433
 434         if (tb[DATA_RELEASE_DELAY])
 435                 data->release_delay = blobmsg_get_u32(tb[DATA_RELEASE_DELAY]);
 436
 437         if (tb[DATA_RESPONSE])
 438                 data->need_response = blobmsg_get_bool(tb[DATA_RESPONSE]);
 439
 440         if (t_class > 0 && data->dev_class != t_class)
 441                 return;
 442
 443         if (tb[DATA_MODE]) {
 444                 const char *modestr;
 445                 int i;
 446
 447                 modestr = blobmsg_data(tb[DATA_MODE]);
 448                 for (i = 0; i < __MODE_MAX; i++) {
 449                         if (strcmp(modeswitch_cb[i].name, modestr) != 0)
 450                                 continue;
 451
 452                         mode = i;
 453                         break;
 454                 }
 455         }
 456
 457         modeswitch_cb[mode].cb(data, tb);
 458
 459         if (tb[DATA_CONFIG]) {
 460                 int config, config_new;
 461
 462                 config_new = blobmsg_get_u32(tb[DATA_CONFIG]);
 463                 if (libusb_get_configuration(data->devh, &config) ||
 464                     config != config_new)
 465                         libusb_set_configuration(data->devh, config_new);
 466         }
 467
 468         if (tb[DATA_ALT]) {
 469                 int new = blobmsg_get_u32(tb[DATA_ALT]);
 470                 set_alt_setting(data, new);
 471         }
 472 }