drivers/staging/gdm724x/gdm_lte.c

   1 /*
   2  * Copyright (c) 2012 GCT Semiconductor, Inc. All rights reserved.
   3  *
   4  * This software is licensed under the terms of the GNU General Public
   5  * License version 2, as published by the Free Software Foundation, and
   6  * may be copied, distributed, and modified under those terms.
   7  *
   8  * This program is distributed in the hope that it will be useful,
   9  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  10  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
  11  * GNU General Public License for more details.
  12  */
  13
  14 #define pr_fmt(fmt) KBUILD_MODNAME ": " fmt
  15
  16 #include <linux/etherdevice.h>
  17 #include <linux/ip.h>
  18 #include <linux/ipv6.h>
  19 #include <linux/udp.h>
  20 #include <linux/in.h>
  21 #include <linux/if_arp.h>
  22 #include <linux/if_ether.h>
  23 #include <linux/if_vlan.h>
  24 #include <linux/in6.h>
  25 #include <linux/tcp.h>
  26 #include <linux/icmp.h>
  27 #include <linux/icmpv6.h>
  28 #include <linux/uaccess.h>
  29 #include <net/ndisc.h>
  30
  31 #include "gdm_lte.h"
  32 #include "netlink_k.h"
  33 #include "hci.h"
  34 #include "hci_packet.h"
  35 #include "gdm_endian.h"
  36
  37 /*
  38  * Netlink protocol number
  39  */
  40 #define NETLINK_LTE 30
  41
  42 /*
  43  * Default MTU Size
  44  */
  45 #define DEFAULT_MTU_SIZE 1500
  46
  47 #define IP_VERSION_4    4
  48 #define IP_VERSION_6    6
  49
  50 static struct {
  51         int ref_cnt;
  52         struct sock *sock;
  53 } lte_event;
  54
  55 static struct device_type wwan_type = {
  56         .name   = "wwan",
  57 };
  58
  59 static int gdm_lte_open(struct net_device *dev)
  60 {
  61         netif_start_queue(dev);
  62         return 0;
  63 }
  64
  65 static int gdm_lte_close(struct net_device *dev)
  66 {
  67         netif_stop_queue(dev);
  68         return 0;
  69 }
  70
  71 static int gdm_lte_set_config(struct net_device *dev, struct ifmap *map)
  72 {
  73         if (dev->flags & IFF_UP)
  74                 return -EBUSY;
  75         return 0;
  76 }
  77
  78 static void tx_complete(void *arg)
  79 {
  80         struct nic *nic = arg;
  81
  82         if (netif_queue_stopped(nic->netdev))
  83                 netif_wake_queue(nic->netdev);
  84 }
  85
  86 static int gdm_lte_rx(struct sk_buff *skb, struct nic *nic, int nic_type)
  87 {
  88         int ret;
  89
  90         ret = netif_rx_ni(skb);
  91         if (ret == NET_RX_DROP) {
  92                 nic->stats.rx_dropped++;
  93         } else {
  94                 nic->stats.rx_packets++;
  95                 nic->stats.rx_bytes += skb->len + ETH_HLEN;
  96         }
  97
  98         return 0;
  99 }
 100
 101 static int gdm_lte_emulate_arp(struct sk_buff *skb_in, u32 nic_type)
 102 {
 103         struct nic *nic = netdev_priv(skb_in->dev);
 104         struct sk_buff *skb_out;
 105         struct ethhdr eth;
 106         struct vlan_ethhdr vlan_eth;
 107         struct arphdr *arp_in;
 108         struct arphdr *arp_out;
 109         struct arpdata {
 110                 u8 ar_sha[ETH_ALEN];
 111                 u8 ar_sip[4];
 112                 u8 ar_tha[ETH_ALEN];
 113                 u8 ar_tip[4];
 114         };
 115         struct arpdata *arp_data_in;
 116         struct arpdata *arp_data_out;
 117         u8 arp_temp[60];
 118         void *mac_header_data;
 119         u32 mac_header_len;
 120
 121         /* Format the mac header so that it can be put to skb */
 122         if (ntohs(((struct ethhdr *)skb_in->data)->h_proto) == ETH_P_8021Q) {
 123                 memcpy(&vlan_eth, skb_in->data, sizeof(struct vlan_ethhdr));
 124                 mac_header_data = &vlan_eth;
 125                 mac_header_len = VLAN_ETH_HLEN;
 126         } else {
 127                 memcpy(&eth, skb_in->data, sizeof(struct ethhdr));
 128                 mac_header_data = &eth;
 129                 mac_header_len = ETH_HLEN;
 130         }
 131
 132         /* Get the pointer of the original request */
 133         arp_in = (struct arphdr *)(skb_in->data + mac_header_len);
 134         arp_data_in = (struct arpdata *)(skb_in->data + mac_header_len +
 135                                         sizeof(struct arphdr));
 136
 137         /* Get the pointer of the outgoing response */
 138         arp_out = (struct arphdr *)arp_temp;
 139         arp_data_out = (struct arpdata *)(arp_temp + sizeof(struct arphdr));
 140
 141         /* Copy the arp header */
 142         memcpy(arp_out, arp_in, sizeof(struct arphdr));
 143         arp_out->ar_op = htons(ARPOP_REPLY);
 144
 145         /* Copy the arp payload: based on 2 bytes of mac and fill the IP */
 146         arp_data_out->ar_sha[0] = arp_data_in->ar_sha[0];
 147         arp_data_out->ar_sha[1] = arp_data_in->ar_sha[1];
 148         memcpy(&arp_data_out->ar_sha[2], &arp_data_in->ar_tip[0], 4);
 149         memcpy(&arp_data_out->ar_sip[0], &arp_data_in->ar_tip[0], 4);
 150         memcpy(&arp_data_out->ar_tha[0], &arp_data_in->ar_sha[0], 6);
 151         memcpy(&arp_data_out->ar_tip[0], &arp_data_in->ar_sip[0], 4);
 152
 153         /* Fill the destination mac with source mac of the received packet */
 154         memcpy(mac_header_data, mac_header_data + ETH_ALEN, ETH_ALEN);
 155         /* Fill the source mac with nic's source mac */
 156         memcpy(mac_header_data + ETH_ALEN, nic->src_mac_addr, ETH_ALEN);
 157
 158         /* Alloc skb and reserve align */
 159         skb_out = dev_alloc_skb(skb_in->len);
 160         if (!skb_out)
 161                 return -ENOMEM;
 162         skb_reserve(skb_out, NET_IP_ALIGN);
 163
 164         memcpy(skb_put(skb_out, mac_header_len), mac_header_data,
 165                 mac_header_len);
 166         memcpy(skb_put(skb_out, sizeof(struct arphdr)), arp_out,
 167                 sizeof(struct arphdr));
 168         memcpy(skb_put(skb_out, sizeof(struct arpdata)), arp_data_out,
 169                 sizeof(struct arpdata));
 170
 171         skb_out->protocol = ((struct ethhdr *)mac_header_data)->h_proto;
 172         skb_out->dev = skb_in->dev;
 173         skb_reset_mac_header(skb_out);
 174         skb_pull(skb_out, ETH_HLEN);
 175
 176         gdm_lte_rx(skb_out, nic, nic_type);
 177
 178         return 0;
 179 }
 180
 181 static int icmp6_checksum(struct ipv6hdr *ipv6, u16 *ptr, int len)
 182 {
 183         unsigned short *w = ptr;
 184         int sum = 0;
 185         int i;
 186
 187         union {
 188                 struct {
 189                         u8 ph_src[16];
 190                         u8 ph_dst[16];
 191                         u32 ph_len;
 192                         u8 ph_zero[3];
 193                         u8 ph_nxt;
 194                 } ph __packed;
 195                 u16 pa[20];
 196         } pseudo_header;
 197
 198         memset(&pseudo_header, 0, sizeof(pseudo_header));
 199         memcpy(&pseudo_header.ph.ph_src, &ipv6->saddr.in6_u.u6_addr8, 16);
 200         memcpy(&pseudo_header.ph.ph_dst, &ipv6->daddr.in6_u.u6_addr8, 16);
 201         pseudo_header.ph.ph_len = ipv6->payload_len;
 202         pseudo_header.ph.ph_nxt = ipv6->nexthdr;
 203
 204         w = (u16 *)&pseudo_header;
 205         for (i = 0; i < ARRAY_SIZE(pseudo_header.pa); i++)
 206                 sum += pseudo_header.pa[i];
 207
 208         w = ptr;
 209         while (len > 1) {
 210                 sum += *w++;
 211                 len -= 2;
 212         }
 213
 214         sum = (sum >> 16) + (sum & 0xFFFF);
 215         sum += (sum >> 16);
 216         sum = ~sum & 0xffff;
 217
 218         return sum;
 219 }
 220
 221 static int gdm_lte_emulate_ndp(struct sk_buff *skb_in, u32 nic_type)
 222 {
 223         struct nic *nic = netdev_priv(skb_in->dev);
 224         struct sk_buff *skb_out;
 225         struct ethhdr eth;
 226         struct vlan_ethhdr vlan_eth;
 227         struct neighbour_advertisement {
 228                 u8 target_address[16];
 229                 u8 type;
 230                 u8 length;
 231                 u8 link_layer_address[6];
 232         };
 233         struct neighbour_advertisement na;
 234         struct neighbour_solicitation {
 235                 u8 target_address[16];
 236         };
 237         struct neighbour_solicitation *ns;
 238         struct ipv6hdr *ipv6_in;
 239         struct ipv6hdr ipv6_out;
 240         struct icmp6hdr *icmp6_in;
 241         struct icmp6hdr icmp6_out;
 242
 243         void *mac_header_data;
 244         u32 mac_header_len;
 245
 246         /* Format the mac header so that it can be put to skb */
 247         if (ntohs(((struct ethhdr *)skb_in->data)->h_proto) == ETH_P_8021Q) {
 248                 memcpy(&vlan_eth, skb_in->data, sizeof(struct vlan_ethhdr));
 249                 if (ntohs(vlan_eth.h_vlan_encapsulated_proto) != ETH_P_IPV6)
 250                         return -1;
 251                 mac_header_data = &vlan_eth;
 252                 mac_header_len = VLAN_ETH_HLEN;
 253         } else {
 254                 memcpy(&eth, skb_in->data, sizeof(struct ethhdr));
 255                 if (ntohs(eth.h_proto) != ETH_P_IPV6)
 256                         return -1;
 257                 mac_header_data = &eth;
 258                 mac_header_len = ETH_HLEN;
 259         }
 260
 261         /* Check if this is IPv6 ICMP packet */
 262         ipv6_in = (struct ipv6hdr *)(skb_in->data + mac_header_len);
 263         if (ipv6_in->version != 6 || ipv6_in->nexthdr != IPPROTO_ICMPV6)
 264                 return -1;
 265
 266         /* Check if this is NDP packet */
 267         icmp6_in = (struct icmp6hdr *)(skb_in->data + mac_header_len +
 268                                         sizeof(struct ipv6hdr));
 269         if (icmp6_in->icmp6_type == NDISC_ROUTER_SOLICITATION) { /* Check RS */
 270                 return -1;
 271         } else if (icmp6_in->icmp6_type == NDISC_NEIGHBOUR_SOLICITATION) {
 272                 /* Check NS */
 273                 u8 icmp_na[sizeof(struct icmp6hdr) +
 274                         sizeof(struct neighbour_advertisement)];
 275                 u8 zero_addr8[16] = {0,};
 276
 277                 if (memcmp(ipv6_in->saddr.in6_u.u6_addr8, zero_addr8, 16) == 0)
 278                         /* Duplicate Address Detection: Source IP is all zero */
 279                         return 0;
 280
 281                 icmp6_out.icmp6_type = NDISC_NEIGHBOUR_ADVERTISEMENT;
 282                 icmp6_out.icmp6_code = 0;
 283                 icmp6_out.icmp6_cksum = 0;
 284                 icmp6_out.icmp6_dataun.un_data32[0] = htonl(0x60000000); /* R=0, S=1, O=1 */
 285
 286                 ns = (struct neighbour_solicitation *)
 287                         (skb_in->data + mac_header_len +
 288                          sizeof(struct ipv6hdr) + sizeof(struct icmp6hdr));
 289                 memcpy(&na.target_address, ns->target_address, 16);
 290                 na.type = 0x02;
 291                 na.length = 1;
 292                 na.link_layer_address[0] = 0x00;
 293                 na.link_layer_address[1] = 0x0a;
 294                 na.link_layer_address[2] = 0x3b;
 295                 na.link_layer_address[3] = 0xaf;
 296                 na.link_layer_address[4] = 0x63;
 297                 na.link_layer_address[5] = 0xc7;
 298
 299                 memcpy(&ipv6_out, ipv6_in, sizeof(struct ipv6hdr));
 300                 memcpy(ipv6_out.saddr.in6_u.u6_addr8, &na.target_address, 16);
 301                 memcpy(ipv6_out.daddr.in6_u.u6_addr8,
 302                         ipv6_in->saddr.in6_u.u6_addr8, 16);
 303                 ipv6_out.payload_len = htons(sizeof(struct icmp6hdr) +
 304                                 sizeof(struct neighbour_advertisement));
 305
 306                 memcpy(icmp_na, &icmp6_out, sizeof(struct icmp6hdr));
 307                 memcpy(icmp_na + sizeof(struct icmp6hdr), &na,
 308                         sizeof(struct neighbour_advertisement));
 309
 310                 icmp6_out.icmp6_cksum = icmp6_checksum(&ipv6_out,
 311                                         (u16 *)icmp_na, sizeof(icmp_na));
 312         } else {
 313                 return -1;
 314         }
 315
 316         /* Fill the destination mac with source mac of the received packet */
 317         memcpy(mac_header_data, mac_header_data + ETH_ALEN, ETH_ALEN);
 318         /* Fill the source mac with nic's source mac */
 319         memcpy(mac_header_data + ETH_ALEN, nic->src_mac_addr, ETH_ALEN);
 320
 321         /* Alloc skb and reserve align */
 322         skb_out = dev_alloc_skb(skb_in->len);
 323         if (!skb_out)
 324                 return -ENOMEM;
 325         skb_reserve(skb_out, NET_IP_ALIGN);
 326
 327         memcpy(skb_put(skb_out, mac_header_len), mac_header_data,
 328                 mac_header_len);
 329         memcpy(skb_put(skb_out, sizeof(struct ipv6hdr)), &ipv6_out,
 330                 sizeof(struct ipv6hdr));
 331         memcpy(skb_put(skb_out, sizeof(struct icmp6hdr)), &icmp6_out,
 332                 sizeof(struct icmp6hdr));
 333         memcpy(skb_put(skb_out, sizeof(struct neighbour_advertisement)), &na,
 334                 sizeof(struct neighbour_advertisement));
 335
 336         skb_out->protocol = ((struct ethhdr *)mac_header_data)->h_proto;
 337         skb_out->dev = skb_in->dev;
 338         skb_reset_mac_header(skb_out);
 339         skb_pull(skb_out, ETH_HLEN);
 340
 341         gdm_lte_rx(skb_out, nic, nic_type);
 342
 343         return 0;
 344 }
 345
 346 static s32 gdm_lte_tx_nic_type(struct net_device *dev, struct sk_buff *skb)
 347 {
 348         struct nic *nic = netdev_priv(dev);
 349         struct ethhdr *eth;
 350         struct vlan_ethhdr *vlan_eth;
 351         struct iphdr *ip;
 352         struct ipv6hdr *ipv6;
 353         int mac_proto;
 354         void *network_data;
 355         u32 nic_type = 0;
 356
 357         /* NIC TYPE is based on the nic_id of this net_device */
 358         nic_type = 0x00000010 | nic->nic_id;
 359
 360         /* Get ethernet protocol */
 361         eth = (struct ethhdr *)skb->data;
 362         if (ntohs(eth->h_proto) == ETH_P_8021Q) {
 363                 vlan_eth = (struct vlan_ethhdr *)skb->data;
 364                 mac_proto = ntohs(vlan_eth->h_vlan_encapsulated_proto);
 365                 network_data = skb->data + VLAN_ETH_HLEN;
 366                 nic_type |= NIC_TYPE_F_VLAN;
 367         } else {
 368                 mac_proto = ntohs(eth->h_proto);
 369                 network_data = skb->data + ETH_HLEN;
 370         }
 371
 372         /* Process packet for nic type */
 373         switch (mac_proto) {
 374         case ETH_P_ARP:
 375                 nic_type |= NIC_TYPE_ARP;
 376                 break;
 377         case ETH_P_IP:
 378                 nic_type |= NIC_TYPE_F_IPV4;
 379                 ip = (struct iphdr *)network_data;
 380
 381                 /* Check DHCPv4 */
 382                 if (ip->protocol == IPPROTO_UDP) {
 383                         struct udphdr *udp = (struct udphdr *)
 384                                         (network_data + sizeof(struct iphdr));
 385                         if (ntohs(udp->dest) == 67 || ntohs(udp->dest) == 68)
 386                                 nic_type |= NIC_TYPE_F_DHCP;
 387                 }
 388                 break;
 389         case ETH_P_IPV6:
 390                 nic_type |= NIC_TYPE_F_IPV6;
 391                 ipv6 = (struct ipv6hdr *)network_data;
 392
 393                 if (ipv6->nexthdr == IPPROTO_ICMPV6) /* Check NDP request */ {
 394                         struct icmp6hdr *icmp6 = (struct icmp6hdr *)
 395                                         (network_data + sizeof(struct ipv6hdr));
 396                         if (icmp6->icmp6_type == NDISC_NEIGHBOUR_SOLICITATION)
 397                                 nic_type |= NIC_TYPE_ICMPV6;
 398                 } else if (ipv6->nexthdr == IPPROTO_UDP) /* Check DHCPv6 */ {
 399                         struct udphdr *udp = (struct udphdr *)
 400                                         (network_data + sizeof(struct ipv6hdr));
 401                         if (ntohs(udp->dest) == 546 || ntohs(udp->dest) == 547)
 402                                 nic_type |= NIC_TYPE_F_DHCP;
 403                 }
 404                 break;
 405         default:
 406                 break;
 407         }
 408
 409         return nic_type;
 410 }
 411
 412 static int gdm_lte_tx(struct sk_buff *skb, struct net_device *dev)
 413 {
 414         struct nic *nic = netdev_priv(dev);
 415         u32 nic_type;
 416         void *data_buf;
 417         int data_len;
 418         int idx;
 419         int ret = 0;
 420
 421         nic_type = gdm_lte_tx_nic_type(dev, skb);
 422         if (nic_type == 0) {
 423                 netdev_err(dev, "tx - invalid nic_type\n");
 424                 return -1;
 425         }
 426
 427         if (nic_type & NIC_TYPE_ARP) {
 428                 if (gdm_lte_emulate_arp(skb, nic_type) == 0) {
 429                         dev_kfree_skb(skb);
 430                         return 0;
 431                 }
 432         }
 433
 434         if (nic_type & NIC_TYPE_ICMPV6) {
 435                 if (gdm_lte_emulate_ndp(skb, nic_type) == 0) {
 436                         dev_kfree_skb(skb);
 437                         return 0;
 438                 }
 439         }
 440
 441         /*
 442          * Need byte shift (that is, remove VLAN tag) if there is one
 443          * For the case of ARP, this breaks the offset as vlan_ethhdr+4
 444          * is treated as ethhdr However, it shouldn't be a problem as
 445          * the response starts from arp_hdr and ethhdr is created by this
 446          * driver based on the NIC mac
 447          */
 448         if (nic_type & NIC_TYPE_F_VLAN) {
 449                 struct vlan_ethhdr *vlan_eth = (struct vlan_ethhdr *)skb->data;
 450
 451                 nic->vlan_id = ntohs(vlan_eth->h_vlan_TCI) & VLAN_VID_MASK;
 452                 data_buf = skb->data + (VLAN_ETH_HLEN - ETH_HLEN);
 453                 data_len = skb->len - (VLAN_ETH_HLEN - ETH_HLEN);
 454         } else {
 455                 nic->vlan_id = 0;
 456                 data_buf = skb->data;
 457                 data_len = skb->len;
 458         }
 459
 460         /* If it is a ICMPV6 packet, clear all the other bits :
 461          * for backward compatibility with the firmware
 462          */
 463         if (nic_type & NIC_TYPE_ICMPV6)
 464                 nic_type = NIC_TYPE_ICMPV6;
 465
 466         /* If it is not a dhcp packet, clear all the flag bits :
 467          * original NIC, otherwise the special flag (IPVX | DHCP)
 468          */
 469         if (!(nic_type & NIC_TYPE_F_DHCP))
 470                 nic_type &= NIC_TYPE_MASK;
 471
 472         ret = sscanf(dev->name, "lte%d", &idx);
 473         if (ret != 1) {
 474                 dev_kfree_skb(skb);
 475                 return -EINVAL;
 476         }
 477
 478         ret = nic->phy_dev->send_sdu_func(nic->phy_dev->priv_dev,
 479                                           data_buf, data_len,
 480                                           nic->pdn_table.dft_eps_id, 0,
 481                                           tx_complete, nic, idx,
 482                                           nic_type);
 483
 484         if (ret == TX_NO_BUFFER || ret == TX_NO_SPC) {
 485                 netif_stop_queue(dev);
 486                 if (ret == TX_NO_BUFFER)
 487                         ret = 0;
 488                 else
 489                         ret = -ENOSPC;
 490         } else if (ret == TX_NO_DEV) {
 491                 ret = -ENODEV;
 492         }
 493
 494         /* Updates tx stats */
 495         if (ret) {
 496                 nic->stats.tx_dropped++;
 497         } else {
 498                 nic->stats.tx_packets++;
 499                 nic->stats.tx_bytes += data_len;
 500         }
 501         dev_kfree_skb(skb);
 502
 503         return 0;
 504 }
 505
 506 static struct net_device_stats *gdm_lte_stats(struct net_device *dev)
 507 {
 508         struct nic *nic = netdev_priv(dev);
 509
 510         return &nic->stats;
 511 }
 512
 513 static int gdm_lte_event_send(struct net_device *dev, char *buf, int len)
 514 {
 515         struct nic *nic = netdev_priv(dev);
 516         struct hci_packet *hci = (struct hci_packet *)buf;
 517         int idx;
 518         int ret;
 519
 520         ret = sscanf(dev->name, "lte%d", &idx);
 521         if (ret != 1)
 522                 return -EINVAL;
 523
 524         return netlink_send(lte_event.sock, idx, 0, buf,
 525                             gdm_dev16_to_cpu(
 526                                     nic->phy_dev->get_endian(
 527                                             nic->phy_dev->priv_dev), hci->len)
 528                             + HCI_HEADER_SIZE);
 529 }
 530
 531 static void gdm_lte_event_rcv(struct net_device *dev, u16 type,
 532                                 void *msg, int len)
 533 {
 534         struct nic *nic = netdev_priv(dev);
 535
 536         nic->phy_dev->send_hci_func(nic->phy_dev->priv_dev, msg, len, NULL,
 537                                     NULL);
 538 }
 539
 540 int gdm_lte_event_init(void)
 541 {
 542         if (lte_event.ref_cnt == 0)
 543                 lte_event.sock = netlink_init(NETLINK_LTE, gdm_lte_event_rcv);
 544
 545         if (lte_event.sock) {
 546                 lte_event.ref_cnt++;
 547                 return 0;
 548         }
 549
 550         pr_err("event init failed\n");
 551         return -1;
 552 }
 553
 554 void gdm_lte_event_exit(void)
 555 {
 556         if (lte_event.sock && --lte_event.ref_cnt == 0) {
 557                 netlink_exit(lte_event.sock);
 558                 lte_event.sock = NULL;
 559         }
 560 }
 561
 562 static u8 find_dev_index(u32 nic_type)
 563 {
 564         u8 index;
 565
 566         index = (u8)(nic_type & 0x0000000f);
 567         if (index > MAX_NIC_TYPE)
 568                 index = 0;
 569
 570         return index;
 571 }
 572
 573 static void gdm_lte_netif_rx(struct net_device *dev, char *buf,
 574                         int len, int flagged_nic_type)
 575 {
 576         u32 nic_type;
 577         struct nic *nic;
 578         struct sk_buff *skb;
 579         struct ethhdr eth;
 580         struct vlan_ethhdr vlan_eth;
 581         void *mac_header_data;
 582         u32 mac_header_len;
 583         char ip_version = 0;
 584
 585         nic_type = flagged_nic_type & NIC_TYPE_MASK;
 586         nic = netdev_priv(dev);
 587
 588         if (flagged_nic_type & NIC_TYPE_F_DHCP) {
 589                 /* Change the destination mac address
 590                  * with the one requested the IP
 591                  */
 592                 if (flagged_nic_type & NIC_TYPE_F_IPV4) {
 593                         struct dhcp_packet {
 594                                 u8 op;      /* BOOTREQUEST or BOOTREPLY */
 595                                 u8 htype;   /* hardware address type.
 596                                              * 1 = 10mb ethernet
 597                                              */
 598                                 u8 hlen;    /* hardware address length */
 599                                 u8 hops;    /* used by relay agents only */
 600                                 u32 xid;    /* unique id */
 601                                 u16 secs;   /* elapsed since client began
 602                                              * acquisition/renewal
 603                                              */
 604                                 u16 flags;  /* only one flag so far: */
 605                                 #define BROADCAST_FLAG 0x8000
 606                                 /* "I need broadcast replies" */
 607                                 u32 ciaddr; /* client IP (if client is in
 608                                              * BOUND, RENEW or REBINDING state)
 609                                              */
 610                                 u32 yiaddr; /* 'your' (client) IP address */
 611                                 /* IP address of next server to use in
 612                                  * bootstrap, returned in DHCPOFFER,
 613                                  * DHCPACK by server
 614                                  */
 615                                 u32 siaddr_nip;
 616                                 u32 gateway_nip; /* relay agent IP address */
 617                                 u8 chaddr[16];   /* link-layer client hardware
 618                                                   * address (MAC)
 619                                                   */
 620                                 u8 sname[64];    /* server host name (ASCIZ) */
 621                                 u8 file[128];    /* boot file name (ASCIZ) */
 622                                 u32 cookie;      /* fixed first four option
 623                                                   * bytes (99,130,83,99 dec)
 624                                                   */
 625                         } __packed;
 626                         void *addr = buf + sizeof(struct iphdr) +
 627                                 sizeof(struct udphdr) +
 628                                 offsetof(struct dhcp_packet, chaddr);
 629                         memcpy(nic->dest_mac_addr, addr, ETH_ALEN);
 630                 }
 631         }
 632
 633         if (nic->vlan_id > 0) {
 634                 mac_header_data = (void *)&vlan_eth;
 635                 mac_header_len = VLAN_ETH_HLEN;
 636         } else {
 637                 mac_header_data = (void *)&eth;
 638                 mac_header_len = ETH_HLEN;
 639         }
 640
 641         /* Format the data so that it can be put to skb */
 642         memcpy(mac_header_data, nic->dest_mac_addr, ETH_ALEN);
 643         memcpy(mac_header_data + ETH_ALEN, nic->src_mac_addr, ETH_ALEN);
 644
 645         vlan_eth.h_vlan_TCI = htons(nic->vlan_id);
 646         vlan_eth.h_vlan_proto = htons(ETH_P_8021Q);
 647
 648         if (nic_type == NIC_TYPE_ARP) {
 649                 /* Should be response: Only happens because
 650                  * there was a request from the host
 651                  */
 652                 eth.h_proto = htons(ETH_P_ARP);
 653                 vlan_eth.h_vlan_encapsulated_proto = htons(ETH_P_ARP);
 654         } else {
 655                 ip_version = buf[0] >> 4;
 656                 if (ip_version == IP_VERSION_4) {
 657                         eth.h_proto = htons(ETH_P_IP);
 658                         vlan_eth.h_vlan_encapsulated_proto = htons(ETH_P_IP);
 659                 } else if (ip_version == IP_VERSION_6) {
 660                         eth.h_proto = htons(ETH_P_IPV6);
 661                         vlan_eth.h_vlan_encapsulated_proto = htons(ETH_P_IPV6);
 662                 } else {
 663                         netdev_err(dev, "Unknown IP version %d\n", ip_version);
 664                         return;
 665                 }
 666         }
 667
 668         /* Alloc skb and reserve align */
 669         skb = dev_alloc_skb(len + mac_header_len + NET_IP_ALIGN);
 670         if (!skb)
 671                 return;
 672         skb_reserve(skb, NET_IP_ALIGN);
 673
 674         memcpy(skb_put(skb, mac_header_len), mac_header_data, mac_header_len);
 675         memcpy(skb_put(skb, len), buf, len);
 676
 677         skb->protocol = ((struct ethhdr *)mac_header_data)->h_proto;
 678         skb->dev = dev;
 679         skb_reset_mac_header(skb);
 680         skb_pull(skb, ETH_HLEN);
 681
 682         gdm_lte_rx(skb, nic, nic_type);
 683 }
 684
 685 static void gdm_lte_multi_sdu_pkt(struct phy_dev *phy_dev, char *buf, int len)
 686 {
 687         struct net_device *dev;
 688         struct multi_sdu *multi_sdu = (struct multi_sdu *)buf;
 689         struct sdu *sdu = NULL;
 690         u8 *data = (u8 *)multi_sdu->data;
 691         u16 i = 0;
 692         u16 num_packet;
 693         u16 hci_len;
 694         u16 cmd_evt;
 695         u32 nic_type;
 696         u8 index;
 697
 698         hci_len = gdm_dev16_to_cpu(phy_dev->get_endian(phy_dev->priv_dev),
 699                                 multi_sdu->len);
 700         num_packet = gdm_dev16_to_cpu(phy_dev->get_endian(phy_dev->priv_dev),
 701                                 multi_sdu->num_packet);
 702
 703         for (i = 0; i < num_packet; i++) {
 704                 sdu = (struct sdu *)data;
 705
 706                 cmd_evt = gdm_dev16_to_cpu(phy_dev->
 707                                 get_endian(phy_dev->priv_dev), sdu->cmd_evt);
 708                 hci_len = gdm_dev16_to_cpu(phy_dev->
 709                                 get_endian(phy_dev->priv_dev), sdu->len);
 710                 nic_type = gdm_dev32_to_cpu(phy_dev->
 711                                 get_endian(phy_dev->priv_dev), sdu->nic_type);
 712
 713                 if (cmd_evt != LTE_RX_SDU) {
 714                         pr_err("rx sdu wrong hci %04x\n", cmd_evt);
 715                         return;
 716                 }
 717                 if (hci_len < 12) {
 718                         pr_err("rx sdu invalid len %d\n", hci_len);
 719                         return;
 720                 }
 721
 722                 index = find_dev_index(nic_type);
 723                 if (index < MAX_NIC_TYPE) {
 724                         dev = phy_dev->dev[index];
 725                         gdm_lte_netif_rx(dev, (char *)sdu->data,
 726                                         (int)(hci_len-12), nic_type);
 727                 } else {
 728                         pr_err("rx sdu invalid nic_type :%x\n", nic_type);
 729                 }
 730
 731                 data += ((hci_len+3) & 0xfffc) + HCI_HEADER_SIZE;
 732         }
 733 }
 734
 735 static void gdm_lte_pdn_table(struct net_device *dev, char *buf, int len)
 736 {
 737         struct nic *nic = netdev_priv(dev);
 738         struct hci_pdn_table_ind *pdn_table = (struct hci_pdn_table_ind *)buf;
 739
 740         if (pdn_table->activate) {
 741                 nic->pdn_table.activate = pdn_table->activate;
 742                 nic->pdn_table.dft_eps_id = gdm_dev32_to_cpu(
 743                                                 nic->phy_dev->get_endian(
 744                                                         nic->phy_dev->priv_dev),
 745                                                 pdn_table->dft_eps_id);
 746                 nic->pdn_table.nic_type = gdm_dev32_to_cpu(
 747                                                 nic->phy_dev->get_endian(
 748                                                         nic->phy_dev->priv_dev),
 749                                                 pdn_table->nic_type);
 750
 751                 netdev_info(dev, "pdn activated, nic_type=0x%x\n",
 752                             nic->pdn_table.nic_type);
 753         } else {
 754                 memset(&nic->pdn_table, 0x00, sizeof(struct pdn_table));
 755                 netdev_info(dev, "pdn deactivated\n");
 756         }
 757 }
 758
 759 static int gdm_lte_receive_pkt(struct phy_dev *phy_dev, char *buf, int len)
 760 {
 761         struct hci_packet *hci = (struct hci_packet *)buf;
 762         struct hci_pdn_table_ind *pdn_table = (struct hci_pdn_table_ind *)buf;
 763         struct sdu *sdu;
 764         struct net_device *dev;
 765         int ret = 0;
 766         u16 cmd_evt;
 767         u32 nic_type;
 768         u8 index;
 769
 770         if (!len)
 771                 return ret;
 772
 773         cmd_evt = gdm_dev16_to_cpu(phy_dev->get_endian(phy_dev->priv_dev),
 774                                 hci->cmd_evt);
 775
 776         dev = phy_dev->dev[0];
 777         if (dev == NULL)
 778                 return 0;
 779
 780         switch (cmd_evt) {
 781         case LTE_RX_SDU:
 782                 sdu = (struct sdu *)hci->data;
 783                 nic_type = gdm_dev32_to_cpu(phy_dev->
 784                                 get_endian(phy_dev->priv_dev), sdu->nic_type);
 785                 index = find_dev_index(nic_type);
 786                 dev = phy_dev->dev[index];
 787                 gdm_lte_netif_rx(dev, hci->data, len, nic_type);
 788                 break;
 789         case LTE_RX_MULTI_SDU:
 790                 gdm_lte_multi_sdu_pkt(phy_dev, buf, len);
 791                 break;
 792         case LTE_LINK_ON_OFF_INDICATION:
 793                 netdev_info(dev, "link %s\n",
 794                             ((struct hci_connect_ind *)buf)->connect
 795                             ? "on" : "off");
 796                 break;
 797         case LTE_PDN_TABLE_IND:
 798                 pdn_table = (struct hci_pdn_table_ind *)buf;
 799                 nic_type = gdm_dev32_to_cpu(phy_dev->
 800                                 get_endian(phy_dev->priv_dev),
 801                                 pdn_table->nic_type);
 802                 index = find_dev_index(nic_type);
 803                 dev = phy_dev->dev[index];
 804                 gdm_lte_pdn_table(dev, buf, len);
 805                 /* Fall through */
 806         default:
 807                 ret = gdm_lte_event_send(dev, buf, len);
 808                 break;
 809         }
 810
 811         return ret;
 812 }
 813
 814 static int rx_complete(void *arg, void *data, int len, int context)
 815 {
 816         struct phy_dev *phy_dev = (struct phy_dev *)arg;
 817
 818         return gdm_lte_receive_pkt(phy_dev, (char *)data, len);
 819 }
 820
 821 void start_rx_proc(struct phy_dev *phy_dev)
 822 {
 823         int i;
 824
 825         for (i = 0; i < MAX_RX_SUBMIT_COUNT; i++)
 826                 phy_dev->rcv_func(phy_dev->priv_dev,
 827                                 rx_complete, phy_dev, USB_COMPLETE);
 828 }
 829
 830 static struct net_device_ops gdm_netdev_ops = {
 831         .ndo_open                       = gdm_lte_open,
 832         .ndo_stop                       = gdm_lte_close,
 833         .ndo_set_config                 = gdm_lte_set_config,
 834         .ndo_start_xmit                 = gdm_lte_tx,
 835         .ndo_get_stats                  = gdm_lte_stats,
 836 };
 837
 838 static u8 gdm_lte_macaddr[ETH_ALEN] = {0x00, 0x0a, 0x3b, 0x00, 0x00, 0x00};
 839
 840 static void form_mac_address(u8 *dev_addr, u8 *nic_src, u8 *nic_dest,
 841                         u8 *mac_address, u8 index)
 842 {
 843         /* Form the dev_addr */
 844         if (!mac_address)
 845                 memcpy(dev_addr, gdm_lte_macaddr, ETH_ALEN);
 846         else
 847                 memcpy(dev_addr, mac_address, ETH_ALEN);
 848
 849         /* The last byte of the mac address
 850          * should be less than or equal to 0xFC
 851          */
 852         dev_addr[ETH_ALEN-1] += index;
 853
 854         /* Create random nic src and copy the first
 855          * 3 bytes to be the same as dev_addr
 856          */
 857         random_ether_addr(nic_src);
 858         memcpy(nic_src, dev_addr, 3);
 859
 860         /* Copy the nic_dest from dev_addr*/
 861         memcpy(nic_dest, dev_addr, ETH_ALEN);
 862 }
 863
 864 static void validate_mac_address(u8 *mac_address)
 865 {
 866         /* if zero address or multicast bit set, restore the default value */
 867         if (is_zero_ether_addr(mac_address) || (mac_address[0] & 0x01)) {
 868                 pr_err("MAC invalid, restoring default\n");
 869                 memcpy(mac_address, gdm_lte_macaddr, 6);
 870         }
 871 }
 872
 873 int register_lte_device(struct phy_dev *phy_dev,
 874                         struct device *dev, u8 *mac_address)
 875 {
 876         struct nic *nic;
 877         struct net_device *net;
 878         char pdn_dev_name[16];
 879         int ret = 0;
 880         u8 index;
 881
 882         validate_mac_address(mac_address);
 883
 884         for (index = 0; index < MAX_NIC_TYPE; index++) {
 885                 /* Create device name lteXpdnX */
 886                 sprintf(pdn_dev_name, "lte%%dpdn%d", index);
 887
 888                 /* Allocate netdev */
 889                 net = alloc_netdev(sizeof(struct nic), pdn_dev_name,
 890                                 ether_setup);
 891                 if (net == NULL) {
 892                         pr_err("alloc_netdev failed\n");
 893                         ret = -ENOMEM;
 894                         goto err;
 895                 }
 896                 net->netdev_ops = &gdm_netdev_ops;
 897                 net->flags &= ~IFF_MULTICAST;
 898                 net->mtu = DEFAULT_MTU_SIZE;
 899
 900                 nic = netdev_priv(net);
 901                 memset(nic, 0, sizeof(struct nic));
 902                 nic->netdev = net;
 903                 nic->phy_dev = phy_dev;
 904                 nic->nic_id = index;
 905
 906                 form_mac_address(
 907                                 net->dev_addr,
 908                                 nic->src_mac_addr,
 909                                 nic->dest_mac_addr,
 910                                 mac_address,
 911                                 index);
 912
 913                 SET_NETDEV_DEV(net, dev);
 914                 SET_NETDEV_DEVTYPE(net, &wwan_type);
 915
 916                 ret = register_netdev(net);
 917                 if (ret)
 918                         goto err;
 919
 920                 netif_carrier_on(net);
 921
 922                 phy_dev->dev[index] = net;
 923         }
 924
 925         return 0;
 926
 927 err:
 928         unregister_lte_device(phy_dev);
 929
 930         return ret;
 931 }
 932
 933 void unregister_lte_device(struct phy_dev *phy_dev)
 934 {
 935         struct net_device *net;
 936         int index;
 937
 938         for (index = 0; index < MAX_NIC_TYPE; index++) {
 939                 net = phy_dev->dev[index];
 940                 if (net == NULL)
 941                         continue;
 942
 943                 unregister_netdev(net);
 944                 free_netdev(net);
 945         }
 946 }