sys/dev/hyperv/netvsc/hv_net_vsc.c

   1 /*-
   2  * Copyright (c) 2009-2012 Microsoft Corp.
   3  * Copyright (c) 2010-2012 Citrix Inc.
   4  * Copyright (c) 2012 NetApp Inc.
   5  * All rights reserved.
   6  *
   7  * Redistribution and use in source and binary forms, with or without
   8  * modification, are permitted provided that the following conditions
   9  * are met:
  10  * 1. Redistributions of source code must retain the above copyright
  11  *    notice unmodified, this list of conditions, and the following
  12  *    disclaimer.
  13  * 2. Redistributions in binary form must reproduce the above copyright
  14  *    notice, this list of conditions and the following disclaimer in the
  15  *    documentation and/or other materials provided with the distribution.
  16  *
  17  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
  18  * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
  19  * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
  20  * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
  21  * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
  22  * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
  23  * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
  24  * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
  25  * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
  26  * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
  27  *
  28  * $FreeBSD$
  29  */
  30
  31 /**
  32  * HyperV vmbus network VSC (virtual services client) module
  33  *
  34  */
  35
  36
  37 #include <sys/param.h>
  38 #include <sys/kernel.h>
  39 #include <sys/socket.h>
  40 #include <sys/lock.h>
  41 #include <net/if.h>
  42 #include <net/if_var.h>
  43 #include <net/if_arp.h>
  44 #include <machine/bus.h>
  45 #include <machine/atomic.h>
  46
  47 #include <dev/hyperv/include/hyperv.h>
  48 #include "hv_net_vsc.h"
  49 #include "hv_rndis.h"
  50 #include "hv_rndis_filter.h"
  51
  52 MALLOC_DEFINE(M_NETVSC, "netvsc", "Hyper-V netvsc driver");
  53
  54 /*
  55  * Forward declarations
  56  */
  57 static void hv_nv_on_channel_callback(void *context);
  58 static int  hv_nv_init_send_buffer_with_net_vsp(struct hv_device *device);
  59 static int  hv_nv_init_rx_buffer_with_net_vsp(struct hv_device *device);
  60 static int  hv_nv_destroy_send_buffer(netvsc_dev *net_dev);
  61 static int  hv_nv_destroy_rx_buffer(netvsc_dev *net_dev);
  62 static int  hv_nv_connect_to_vsp(struct hv_device *device);
  63 static void hv_nv_on_send_completion(netvsc_dev *net_dev,
  64     struct hv_device *device, hv_vm_packet_descriptor *pkt);
  65 static void hv_nv_on_receive(netvsc_dev *net_dev,
  66     struct hv_device *device, hv_vm_packet_descriptor *pkt);
  67
  68 /*
  69  *
  70  */
  71 static inline netvsc_dev *
  72 hv_nv_alloc_net_device(struct hv_device *device)
  73 {
  74         netvsc_dev *net_dev;
  75         hn_softc_t *sc = device_get_softc(device->device);
  76
  77         net_dev = malloc(sizeof(netvsc_dev), M_NETVSC, M_NOWAIT | M_ZERO);
  78         if (net_dev == NULL) {
  79                 return (NULL);
  80         }
  81
  82         net_dev->dev = device;
  83         net_dev->destroy = FALSE;
  84         sc->net_dev = net_dev;
  85
  86         return (net_dev);
  87 }
  88
  89 /*
  90  *
  91  */
  92 static inline netvsc_dev *
  93 hv_nv_get_outbound_net_device(struct hv_device *device)
  94 {
  95         hn_softc_t *sc = device_get_softc(device->device);
  96         netvsc_dev *net_dev = sc->net_dev;;
  97
  98         if ((net_dev != NULL) && net_dev->destroy) {
  99                 return (NULL);
 100         }
 101
 102         return (net_dev);
 103 }
 104
 105 /*
 106  *
 107  */
 108 static inline netvsc_dev *
 109 hv_nv_get_inbound_net_device(struct hv_device *device)
 110 {
 111         hn_softc_t *sc = device_get_softc(device->device);
 112         netvsc_dev *net_dev = sc->net_dev;;
 113
 114         if (net_dev == NULL) {
 115                 return (net_dev);
 116         }
 117         /*
 118          * When the device is being destroyed; we only
 119          * permit incoming packets if and only if there
 120          * are outstanding sends.
 121          */
 122         if (net_dev->destroy && net_dev->num_outstanding_sends == 0) {
 123                 return (NULL);
 124         }
 125
 126         return (net_dev);
 127 }
 128
 129 int
 130 hv_nv_get_next_send_section(netvsc_dev *net_dev)
 131 {
 132         unsigned long bitsmap_words = net_dev->bitsmap_words;
 133         unsigned long *bitsmap = net_dev->send_section_bitsmap;
 134         unsigned long idx;
 135         int ret = NVSP_1_CHIMNEY_SEND_INVALID_SECTION_INDEX;
 136         int i;
 137
 138         for (i = 0; i < bitsmap_words; i++) {
 139                 idx = ffs(~bitsmap[i]);
 140                 if (0 == idx)
 141                         continue;
 142
 143                 idx--;
 144                 if (i * BITS_PER_LONG + idx >= net_dev->send_section_count)
 145                         return (ret);
 146
 147                 if (synch_test_and_set_bit(idx, &bitsmap[i]))
 148                         continue;
 149
 150                 ret = i * BITS_PER_LONG + idx;
 151                 break;
 152         }
 153
 154         return (ret);
 155 }
 156
 157 /*
 158  * Net VSC initialize receive buffer with net VSP
 159  *
 160  * Net VSP:  Network virtual services client, also known as the
 161  *     Hyper-V extensible switch and the synthetic data path.
 162  */
 163 static int
 164 hv_nv_init_rx_buffer_with_net_vsp(struct hv_device *device)
 165 {
 166         netvsc_dev *net_dev;
 167         nvsp_msg *init_pkt;
 168         int ret = 0;
 169
 170         net_dev = hv_nv_get_outbound_net_device(device);
 171         if (!net_dev) {
 172                 return (ENODEV);
 173         }
 174
 175         net_dev->rx_buf = contigmalloc(net_dev->rx_buf_size, M_NETVSC,
 176             M_ZERO, 0UL, BUS_SPACE_MAXADDR, PAGE_SIZE, 0);
 177
 178         /*
 179          * Establish the GPADL handle for this buffer on this channel.
 180          * Note:  This call uses the vmbus connection rather than the
 181          * channel to establish the gpadl handle.
 182          * GPADL:  Guest physical address descriptor list.
 183          */
 184         ret = hv_vmbus_channel_establish_gpadl(
 185                 device->channel, net_dev->rx_buf,
 186                 net_dev->rx_buf_size, &net_dev->rx_buf_gpadl_handle);
 187         if (ret != 0) {
 188                 goto cleanup;
 189         }
 190
 191         /* sema_wait(&ext->channel_init_sema); KYS CHECK */
 192
 193         /* Notify the NetVsp of the gpadl handle */
 194         init_pkt = &net_dev->channel_init_packet;
 195
 196         memset(init_pkt, 0, sizeof(nvsp_msg));
 197
 198         init_pkt->hdr.msg_type = nvsp_msg_1_type_send_rx_buf;
 199         init_pkt->msgs.vers_1_msgs.send_rx_buf.gpadl_handle =
 200             net_dev->rx_buf_gpadl_handle;
 201         init_pkt->msgs.vers_1_msgs.send_rx_buf.id =
 202             NETVSC_RECEIVE_BUFFER_ID;
 203
 204         /* Send the gpadl notification request */
 205
 206         ret = hv_vmbus_channel_send_packet(device->channel, init_pkt,
 207             sizeof(nvsp_msg), (uint64_t)(uintptr_t)init_pkt,
 208             HV_VMBUS_PACKET_TYPE_DATA_IN_BAND,
 209             HV_VMBUS_DATA_PACKET_FLAG_COMPLETION_REQUESTED);
 210         if (ret != 0) {
 211                 goto cleanup;
 212         }
 213
 214         sema_wait(&net_dev->channel_init_sema);
 215
 216         /* Check the response */
 217         if (init_pkt->msgs.vers_1_msgs.send_rx_buf_complete.status
 218             != nvsp_status_success) {
 219                 ret = EINVAL;
 220                 goto cleanup;
 221         }
 222
 223         net_dev->rx_section_count =
 224             init_pkt->msgs.vers_1_msgs.send_rx_buf_complete.num_sections;
 225
 226         net_dev->rx_sections = malloc(net_dev->rx_section_count *
 227             sizeof(nvsp_1_rx_buf_section), M_NETVSC, M_NOWAIT);
 228         if (net_dev->rx_sections == NULL) {
 229                 ret = EINVAL;
 230                 goto cleanup;
 231         }
 232         memcpy(net_dev->rx_sections,
 233             init_pkt->msgs.vers_1_msgs.send_rx_buf_complete.sections,
 234             net_dev->rx_section_count * sizeof(nvsp_1_rx_buf_section));
 235
 236
 237         /*
 238          * For first release, there should only be 1 section that represents
 239          * the entire receive buffer
 240          */
 241         if (net_dev->rx_section_count != 1
 242             || net_dev->rx_sections->offset != 0) {
 243                 ret = EINVAL;
 244                 goto cleanup;
 245         }
 246
 247         goto exit;
 248
 249 cleanup:
 250         hv_nv_destroy_rx_buffer(net_dev);
 251
 252 exit:
 253         return (ret);
 254 }
 255
 256 /*
 257  * Net VSC initialize send buffer with net VSP
 258  */
 259 static int
 260 hv_nv_init_send_buffer_with_net_vsp(struct hv_device *device)
 261 {
 262         netvsc_dev *net_dev;
 263         nvsp_msg *init_pkt;
 264         int ret = 0;
 265
 266         net_dev = hv_nv_get_outbound_net_device(device);
 267         if (!net_dev) {
 268                 return (ENODEV);
 269         }
 270
 271         net_dev->send_buf  = contigmalloc(net_dev->send_buf_size, M_NETVSC,
 272             M_ZERO, 0UL, BUS_SPACE_MAXADDR, PAGE_SIZE, 0);
 273         if (net_dev->send_buf == NULL) {
 274                 ret = ENOMEM;
 275                 goto cleanup;
 276         }
 277
 278         /*
 279          * Establish the gpadl handle for this buffer on this channel.
 280          * Note:  This call uses the vmbus connection rather than the
 281          * channel to establish the gpadl handle.
 282          */
 283         ret = hv_vmbus_channel_establish_gpadl(device->channel,
 284             net_dev->send_buf, net_dev->send_buf_size,
 285             &net_dev->send_buf_gpadl_handle);
 286         if (ret != 0) {
 287                 goto cleanup;
 288         }
 289
 290         /* Notify the NetVsp of the gpadl handle */
 291
 292         init_pkt = &net_dev->channel_init_packet;
 293
 294         memset(init_pkt, 0, sizeof(nvsp_msg));
 295
 296         init_pkt->hdr.msg_type = nvsp_msg_1_type_send_send_buf;
 297         init_pkt->msgs.vers_1_msgs.send_rx_buf.gpadl_handle =
 298             net_dev->send_buf_gpadl_handle;
 299         init_pkt->msgs.vers_1_msgs.send_rx_buf.id =
 300             NETVSC_SEND_BUFFER_ID;
 301
 302         /* Send the gpadl notification request */
 303
 304         ret = hv_vmbus_channel_send_packet(device->channel, init_pkt,
 305             sizeof(nvsp_msg), (uint64_t)init_pkt,
 306             HV_VMBUS_PACKET_TYPE_DATA_IN_BAND,
 307             HV_VMBUS_DATA_PACKET_FLAG_COMPLETION_REQUESTED);
 308         if (ret != 0) {
 309                 goto cleanup;
 310         }
 311
 312         sema_wait(&net_dev->channel_init_sema);
 313
 314         /* Check the response */
 315         if (init_pkt->msgs.vers_1_msgs.send_send_buf_complete.status
 316             != nvsp_status_success) {
 317                 ret = EINVAL;
 318                 goto cleanup;
 319         }
 320
 321         net_dev->send_section_size =
 322             init_pkt->msgs.vers_1_msgs.send_send_buf_complete.section_size;
 323         net_dev->send_section_count =
 324             net_dev->send_buf_size / net_dev->send_section_size;
 325         net_dev->bitsmap_words = howmany(net_dev->send_section_count,
 326             BITS_PER_LONG);
 327         net_dev->send_section_bitsmap =
 328             malloc(net_dev->bitsmap_words * sizeof(long), M_NETVSC,
 329             M_NOWAIT | M_ZERO);
 330         if (NULL == net_dev->send_section_bitsmap) {
 331                 ret = ENOMEM;
 332                 goto cleanup;
 333         }
 334
 335         goto exit;
 336
 337 cleanup:
 338         hv_nv_destroy_send_buffer(net_dev);
 339
 340 exit:
 341         return (ret);
 342 }
 343
 344 /*
 345  * Net VSC destroy receive buffer
 346  */
 347 static int
 348 hv_nv_destroy_rx_buffer(netvsc_dev *net_dev)
 349 {
 350         nvsp_msg *revoke_pkt;
 351         int ret = 0;
 352
 353         /*
 354          * If we got a section count, it means we received a
 355          * send_rx_buf_complete msg
 356          * (ie sent nvsp_msg_1_type_send_rx_buf msg) therefore,
 357          * we need to send a revoke msg here
 358          */
 359         if (net_dev->rx_section_count) {
 360                 /* Send the revoke receive buffer */
 361                 revoke_pkt = &net_dev->revoke_packet;
 362                 memset(revoke_pkt, 0, sizeof(nvsp_msg));
 363
 364                 revoke_pkt->hdr.msg_type = nvsp_msg_1_type_revoke_rx_buf;
 365                 revoke_pkt->msgs.vers_1_msgs.revoke_rx_buf.id =
 366                     NETVSC_RECEIVE_BUFFER_ID;
 367
 368                 ret = hv_vmbus_channel_send_packet(net_dev->dev->channel,
 369                     revoke_pkt, sizeof(nvsp_msg),
 370                     (uint64_t)(uintptr_t)revoke_pkt,
 371                     HV_VMBUS_PACKET_TYPE_DATA_IN_BAND, 0);
 372
 373                 /*
 374                  * If we failed here, we might as well return and have a leak
 375                  * rather than continue and a bugchk
 376                  */
 377                 if (ret != 0) {
 378                         return (ret);
 379                 }
 380         }
 381
 382         /* Tear down the gpadl on the vsp end */
 383         if (net_dev->rx_buf_gpadl_handle) {
 384                 ret = hv_vmbus_channel_teardown_gpdal(net_dev->dev->channel,
 385                     net_dev->rx_buf_gpadl_handle);
 386                 /*
 387                  * If we failed here, we might as well return and have a leak
 388                  * rather than continue and a bugchk
 389                  */
 390                 if (ret != 0) {
 391                         return (ret);
 392                 }
 393                 net_dev->rx_buf_gpadl_handle = 0;
 394         }
 395
 396         if (net_dev->rx_buf) {
 397                 /* Free up the receive buffer */
 398                 contigfree(net_dev->rx_buf, net_dev->rx_buf_size, M_NETVSC);
 399                 net_dev->rx_buf = NULL;
 400         }
 401
 402         if (net_dev->rx_sections) {
 403                 free(net_dev->rx_sections, M_NETVSC);
 404                 net_dev->rx_sections = NULL;
 405                 net_dev->rx_section_count = 0;
 406         }
 407
 408         return (ret);
 409 }
 410
 411 /*
 412  * Net VSC destroy send buffer
 413  */
 414 static int
 415 hv_nv_destroy_send_buffer(netvsc_dev *net_dev)
 416 {
 417         nvsp_msg *revoke_pkt;
 418         int ret = 0;
 419
 420         /*
 421          * If we got a section count, it means we received a
 422          * send_rx_buf_complete msg
 423          * (ie sent nvsp_msg_1_type_send_rx_buf msg) therefore,
 424          * we need to send a revoke msg here
 425          */
 426         if (net_dev->send_section_size) {
 427                 /* Send the revoke send buffer */
 428                 revoke_pkt = &net_dev->revoke_packet;
 429                 memset(revoke_pkt, 0, sizeof(nvsp_msg));
 430
 431                 revoke_pkt->hdr.msg_type =
 432                     nvsp_msg_1_type_revoke_send_buf;
 433                 revoke_pkt->msgs.vers_1_msgs.revoke_send_buf.id =
 434                     NETVSC_SEND_BUFFER_ID;
 435
 436                 ret = hv_vmbus_channel_send_packet(net_dev->dev->channel,
 437                     revoke_pkt, sizeof(nvsp_msg),
 438                     (uint64_t)(uintptr_t)revoke_pkt,
 439                     HV_VMBUS_PACKET_TYPE_DATA_IN_BAND, 0);
 440                 /*
 441                  * If we failed here, we might as well return and have a leak
 442                  * rather than continue and a bugchk
 443                  */
 444                 if (ret != 0) {
 445                         return (ret);
 446                 }
 447         }
 448
 449         /* Tear down the gpadl on the vsp end */
 450         if (net_dev->send_buf_gpadl_handle) {
 451                 ret = hv_vmbus_channel_teardown_gpdal(net_dev->dev->channel,
 452                     net_dev->send_buf_gpadl_handle);
 453
 454                 /*
 455                  * If we failed here, we might as well return and have a leak
 456                  * rather than continue and a bugchk
 457                  */
 458                 if (ret != 0) {
 459                         return (ret);
 460                 }
 461                 net_dev->send_buf_gpadl_handle = 0;
 462         }
 463
 464         if (net_dev->send_buf) {
 465                 /* Free up the receive buffer */
 466                 contigfree(net_dev->send_buf, net_dev->send_buf_size, M_NETVSC);
 467                 net_dev->send_buf = NULL;
 468         }
 469
 470         if (net_dev->send_section_bitsmap) {
 471                 free(net_dev->send_section_bitsmap, M_NETVSC);
 472         }
 473
 474         return (ret);
 475 }
 476
 477
 478 /*
 479  * Attempt to negotiate the caller-specified NVSP version
 480  *
 481  * For NVSP v2, Server 2008 R2 does not set
 482  * init_pkt->msgs.init_msgs.init_compl.negotiated_prot_vers
 483  * to the negotiated version, so we cannot rely on that.
 484  */
 485 static int
 486 hv_nv_negotiate_nvsp_protocol(struct hv_device *device, netvsc_dev *net_dev,
 487     uint32_t nvsp_ver)
 488 {
 489         nvsp_msg *init_pkt;
 490         int ret;
 491
 492         init_pkt = &net_dev->channel_init_packet;
 493         memset(init_pkt, 0, sizeof(nvsp_msg));
 494         init_pkt->hdr.msg_type = nvsp_msg_type_init;
 495
 496         /*
 497          * Specify parameter as the only acceptable protocol version
 498          */
 499         init_pkt->msgs.init_msgs.init.p1.protocol_version = nvsp_ver;
 500         init_pkt->msgs.init_msgs.init.protocol_version_2 = nvsp_ver;
 501
 502         /* Send the init request */
 503         ret = hv_vmbus_channel_send_packet(device->channel, init_pkt,
 504             sizeof(nvsp_msg), (uint64_t)(uintptr_t)init_pkt,
 505             HV_VMBUS_PACKET_TYPE_DATA_IN_BAND,
 506             HV_VMBUS_DATA_PACKET_FLAG_COMPLETION_REQUESTED);
 507         if (ret != 0)
 508                 return (-1);
 509
 510         sema_wait(&net_dev->channel_init_sema);
 511
 512         if (init_pkt->msgs.init_msgs.init_compl.status != nvsp_status_success)
 513                 return (EINVAL);
 514
 515         return (0);
 516 }
 517
 518 /*
 519  * Send NDIS version 2 config packet containing MTU.
 520  *
 521  * Not valid for NDIS version 1.
 522  */
 523 static int
 524 hv_nv_send_ndis_config(struct hv_device *device, uint32_t mtu)
 525 {
 526         netvsc_dev *net_dev;
 527         nvsp_msg *init_pkt;
 528         int ret;
 529
 530         net_dev = hv_nv_get_outbound_net_device(device);
 531         if (!net_dev)
 532                 return (-ENODEV);
 533
 534         /*
 535          * Set up configuration packet, write MTU
 536          * Indicate we are capable of handling VLAN tags
 537          */
 538         init_pkt = &net_dev->channel_init_packet;
 539         memset(init_pkt, 0, sizeof(nvsp_msg));
 540         init_pkt->hdr.msg_type = nvsp_msg_2_type_send_ndis_config;
 541         init_pkt->msgs.vers_2_msgs.send_ndis_config.mtu = mtu;
 542         init_pkt->
 543                 msgs.vers_2_msgs.send_ndis_config.capabilities.u1.u2.ieee8021q
 544                 = 1;
 545
 546         /* Send the configuration packet */
 547         ret = hv_vmbus_channel_send_packet(device->channel, init_pkt,
 548             sizeof(nvsp_msg), (uint64_t)(uintptr_t)init_pkt,
 549             HV_VMBUS_PACKET_TYPE_DATA_IN_BAND, 0);
 550         if (ret != 0)
 551                 return (-EINVAL);
 552
 553         return (0);
 554 }
 555
 556 /*
 557  * Net VSC connect to VSP
 558  */
 559 static int
 560 hv_nv_connect_to_vsp(struct hv_device *device)
 561 {
 562         netvsc_dev *net_dev;
 563         nvsp_msg *init_pkt;
 564         uint32_t ndis_version;
 565         uint32_t protocol_list[] = { NVSP_PROTOCOL_VERSION_1,
 566             NVSP_PROTOCOL_VERSION_2,
 567             NVSP_PROTOCOL_VERSION_4,
 568             NVSP_PROTOCOL_VERSION_5 };
 569         int i;
 570         int protocol_number = nitems(protocol_list);
 571         int ret = 0;
 572         device_t dev = device->device;
 573         hn_softc_t *sc = device_get_softc(dev);
 574         struct ifnet *ifp = sc->hn_ifp;
 575
 576         net_dev = hv_nv_get_outbound_net_device(device);
 577         if (!net_dev) {
 578                 return (ENODEV);
 579         }
 580
 581         /*
 582          * Negotiate the NVSP version.  Try the latest NVSP first.
 583          */
 584         for (i = protocol_number - 1; i >= 0; i--) {
 585                 if (hv_nv_negotiate_nvsp_protocol(device, net_dev,
 586                     protocol_list[i]) == 0) {
 587                         net_dev->nvsp_version = protocol_list[i];
 588                         if (bootverbose)
 589                                 device_printf(dev, "Netvsc: got version 0x%x\n",
 590                                     net_dev->nvsp_version);
 591                         break;
 592                 }
 593         }
 594
 595         if (i < 0) {
 596                 if (bootverbose)
 597                         device_printf(dev, "failed to negotiate a valid "
 598                             "protocol.\n");
 599                 return (EPROTO);
 600         }
 601
 602         /*
 603          * Set the MTU if supported by this NVSP protocol version
 604          * This needs to be right after the NVSP init message per Haiyang
 605          */
 606         if (net_dev->nvsp_version >= NVSP_PROTOCOL_VERSION_2)
 607                 ret = hv_nv_send_ndis_config(device, ifp->if_mtu);
 608
 609         /*
 610          * Send the NDIS version
 611          */
 612         init_pkt = &net_dev->channel_init_packet;
 613
 614         memset(init_pkt, 0, sizeof(nvsp_msg));
 615
 616         if (net_dev->nvsp_version <= NVSP_PROTOCOL_VERSION_4) {
 617                 ndis_version = NDIS_VERSION_6_1;
 618         } else {
 619                 ndis_version = NDIS_VERSION_6_30;
 620         }
 621
 622         init_pkt->hdr.msg_type = nvsp_msg_1_type_send_ndis_vers;
 623         init_pkt->msgs.vers_1_msgs.send_ndis_vers.ndis_major_vers =
 624             (ndis_version & 0xFFFF0000) >> 16;
 625         init_pkt->msgs.vers_1_msgs.send_ndis_vers.ndis_minor_vers =
 626             ndis_version & 0xFFFF;
 627
 628         /* Send the init request */
 629
 630         ret = hv_vmbus_channel_send_packet(device->channel, init_pkt,
 631             sizeof(nvsp_msg), (uint64_t)(uintptr_t)init_pkt,
 632             HV_VMBUS_PACKET_TYPE_DATA_IN_BAND, 0);
 633         if (ret != 0) {
 634                 goto cleanup;
 635         }
 636         /*
 637          * TODO:  BUGBUG - We have to wait for the above msg since the netvsp
 638          * uses KMCL which acknowledges packet (completion packet)
 639          * since our Vmbus always set the
 640          * HV_VMBUS_DATA_PACKET_FLAG_COMPLETION_REQUESTED flag
 641          */
 642         /* sema_wait(&NetVscChannel->channel_init_sema); */
 643
 644         /* Post the big receive buffer to NetVSP */
 645         ret = hv_nv_init_rx_buffer_with_net_vsp(device);
 646         if (ret == 0)
 647                 ret = hv_nv_init_send_buffer_with_net_vsp(device);
 648
 649 cleanup:
 650         return (ret);
 651 }
 652
 653 /*
 654  * Net VSC disconnect from VSP
 655  */
 656 static void
 657 hv_nv_disconnect_from_vsp(netvsc_dev *net_dev)
 658 {
 659         hv_nv_destroy_rx_buffer(net_dev);
 660         hv_nv_destroy_send_buffer(net_dev);
 661 }
 662
 663 /*
 664  * Net VSC on device add
 665  *
 666  * Callback when the device belonging to this driver is added
 667  */
 668 netvsc_dev *
 669 hv_nv_on_device_add(struct hv_device *device, void *additional_info)
 670 {
 671         netvsc_dev *net_dev;
 672         int ret = 0;
 673
 674         net_dev = hv_nv_alloc_net_device(device);
 675         if (!net_dev)
 676                 goto cleanup;
 677
 678         /* Initialize the NetVSC channel extension */
 679         net_dev->rx_buf_size = NETVSC_RECEIVE_BUFFER_SIZE;
 680
 681         net_dev->send_buf_size = NETVSC_SEND_BUFFER_SIZE;
 682
 683         sema_init(&net_dev->channel_init_sema, 0, "netdev_sema");
 684
 685         /*
 686          * Open the channel
 687          */
 688         ret = hv_vmbus_channel_open(device->channel,
 689             NETVSC_DEVICE_RING_BUFFER_SIZE, NETVSC_DEVICE_RING_BUFFER_SIZE,
 690             NULL, 0, hv_nv_on_channel_callback, device);
 691         if (ret != 0)
 692                 goto cleanup;
 693
 694         /*
 695          * Connect with the NetVsp
 696          */
 697         ret = hv_nv_connect_to_vsp(device);
 698         if (ret != 0)
 699                 goto close;
 700
 701         return (net_dev);
 702
 703 close:
 704         /* Now, we can close the channel safely */
 705
 706         hv_vmbus_channel_close(device->channel);
 707
 708 cleanup:
 709         /*
 710          * Free the packet buffers on the netvsc device packet queue.
 711          * Release other resources.
 712          */
 713         if (net_dev) {
 714                 sema_destroy(&net_dev->channel_init_sema);
 715                 free(net_dev, M_NETVSC);
 716         }
 717
 718         return (NULL);
 719 }
 720
 721 /*
 722  * Net VSC on device remove
 723  */
 724 int
 725 hv_nv_on_device_remove(struct hv_device *device, boolean_t destroy_channel)
 726 {
 727         hn_softc_t *sc = device_get_softc(device->device);
 728         netvsc_dev *net_dev = sc->net_dev;;
 729
 730         /* Stop outbound traffic ie sends and receives completions */
 731         mtx_lock(&device->channel->inbound_lock);
 732         net_dev->destroy = TRUE;
 733         mtx_unlock(&device->channel->inbound_lock);
 734
 735         /* Wait for all send completions */
 736         while (net_dev->num_outstanding_sends) {
 737                 DELAY(100);
 738         }
 739
 740         hv_nv_disconnect_from_vsp(net_dev);
 741
 742         /* At this point, no one should be accessing net_dev except in here */
 743
 744         /* Now, we can close the channel safely */
 745
 746         if (!destroy_channel) {
 747                 device->channel->state =
 748                     HV_CHANNEL_CLOSING_NONDESTRUCTIVE_STATE;
 749         }
 750
 751         hv_vmbus_channel_close(device->channel);
 752
 753         sema_destroy(&net_dev->channel_init_sema);
 754         free(net_dev, M_NETVSC);
 755
 756         return (0);
 757 }
 758
 759 /*
 760  * Net VSC on send completion
 761  */
 762 static void
 763 hv_nv_on_send_completion(netvsc_dev *net_dev,
 764     struct hv_device *device, hv_vm_packet_descriptor *pkt)
 765 {
 766         nvsp_msg *nvsp_msg_pkt;
 767         netvsc_packet *net_vsc_pkt;
 768
 769         nvsp_msg_pkt =
 770             (nvsp_msg *)((unsigned long)pkt + (pkt->data_offset8 << 3));
 771
 772         if (nvsp_msg_pkt->hdr.msg_type == nvsp_msg_type_init_complete
 773                 || nvsp_msg_pkt->hdr.msg_type
 774                         == nvsp_msg_1_type_send_rx_buf_complete
 775                 || nvsp_msg_pkt->hdr.msg_type
 776                         == nvsp_msg_1_type_send_send_buf_complete) {
 777                 /* Copy the response back */
 778                 memcpy(&net_dev->channel_init_packet, nvsp_msg_pkt,
 779                     sizeof(nvsp_msg));
 780                 sema_post(&net_dev->channel_init_sema);
 781         } else if (nvsp_msg_pkt->hdr.msg_type ==
 782                     nvsp_msg_1_type_send_rndis_pkt_complete) {
 783                 /* Get the send context */
 784                 net_vsc_pkt =
 785                     (netvsc_packet *)(unsigned long)pkt->transaction_id;
 786                 if (NULL != net_vsc_pkt) {
 787                         if (net_vsc_pkt->send_buf_section_idx !=
 788                             NVSP_1_CHIMNEY_SEND_INVALID_SECTION_INDEX) {
 789                                 synch_change_bit(net_vsc_pkt->send_buf_section_idx,
 790                                     net_dev->send_section_bitsmap);
 791                         }
 792
 793                         /* Notify the layer above us */
 794                         net_vsc_pkt->compl.send.on_send_completion(
 795                             net_vsc_pkt->compl.send.send_completion_context);
 796
 797                 }
 798
 799                 atomic_subtract_int(&net_dev->num_outstanding_sends, 1);
 800         }
 801 }
 802
 803 /*
 804  * Net VSC on send
 805  * Sends a packet on the specified Hyper-V device.
 806  * Returns 0 on success, non-zero on failure.
 807  */
 808 int
 809 hv_nv_on_send(struct hv_device *device, netvsc_packet *pkt)
 810 {
 811         netvsc_dev *net_dev;
 812         nvsp_msg send_msg;
 813         int ret;
 814
 815         net_dev = hv_nv_get_outbound_net_device(device);
 816         if (!net_dev)
 817                 return (ENODEV);
 818
 819         send_msg.hdr.msg_type = nvsp_msg_1_type_send_rndis_pkt;
 820         if (pkt->is_data_pkt) {
 821                 /* 0 is RMC_DATA */
 822                 send_msg.msgs.vers_1_msgs.send_rndis_pkt.chan_type = 0;
 823         } else {
 824                 /* 1 is RMC_CONTROL */
 825                 send_msg.msgs.vers_1_msgs.send_rndis_pkt.chan_type = 1;
 826         }
 827
 828         send_msg.msgs.vers_1_msgs.send_rndis_pkt.send_buf_section_idx =
 829             pkt->send_buf_section_idx;
 830         send_msg.msgs.vers_1_msgs.send_rndis_pkt.send_buf_section_size =
 831             pkt->send_buf_section_size;
 832
 833         if (pkt->page_buf_count) {
 834                 ret = hv_vmbus_channel_send_packet_pagebuffer(device->channel,
 835                     pkt->page_buffers, pkt->page_buf_count,
 836                     &send_msg, sizeof(nvsp_msg), (uint64_t)(uintptr_t)pkt);
 837         } else {
 838                 ret = hv_vmbus_channel_send_packet(device->channel,
 839                     &send_msg, sizeof(nvsp_msg), (uint64_t)(uintptr_t)pkt,
 840                     HV_VMBUS_PACKET_TYPE_DATA_IN_BAND,
 841                     HV_VMBUS_DATA_PACKET_FLAG_COMPLETION_REQUESTED);
 842         }
 843
 844         /* Record outstanding send only if send_packet() succeeded */
 845         if (ret == 0)
 846                 atomic_add_int(&net_dev->num_outstanding_sends, 1);
 847
 848         return (ret);
 849 }
 850
 851 /*
 852  * Net VSC on receive
 853  *
 854  * In the FreeBSD Hyper-V virtual world, this function deals exclusively
 855  * with virtual addresses.
 856  */
 857 static void
 858 hv_nv_on_receive(netvsc_dev *net_dev, struct hv_device *device,
 859     hv_vm_packet_descriptor *pkt)
 860 {
 861         hv_vm_transfer_page_packet_header *vm_xfer_page_pkt;
 862         nvsp_msg *nvsp_msg_pkt;
 863         netvsc_packet vsc_pkt;
 864         netvsc_packet *net_vsc_pkt = &vsc_pkt;
 865         device_t dev = device->device;
 866         int count = 0;
 867         int i = 0;
 868         int status = nvsp_status_success;
 869
 870         /*
 871          * All inbound packets other than send completion should be
 872          * xfer page packet.
 873          */
 874         if (pkt->type != HV_VMBUS_PACKET_TYPE_DATA_USING_TRANSFER_PAGES) {
 875                 device_printf(dev, "packet type %d is invalid!\n", pkt->type);
 876                 return;
 877         }
 878
 879         nvsp_msg_pkt = (nvsp_msg *)((unsigned long)pkt
 880                 + (pkt->data_offset8 << 3));
 881
 882         /* Make sure this is a valid nvsp packet */
 883         if (nvsp_msg_pkt->hdr.msg_type != nvsp_msg_1_type_send_rndis_pkt) {
 884                 device_printf(dev, "packet hdr type %d is invalid!\n",
 885                     pkt->type);
 886                 return;
 887         }
 888
 889         vm_xfer_page_pkt = (hv_vm_transfer_page_packet_header *)pkt;
 890
 891         if (vm_xfer_page_pkt->transfer_page_set_id !=
 892             NETVSC_RECEIVE_BUFFER_ID) {
 893                 device_printf(dev, "transfer_page_set_id %d is invalid!\n",
 894                     vm_xfer_page_pkt->transfer_page_set_id);
 895                 return;
 896         }
 897
 898         count = vm_xfer_page_pkt->range_count;
 899         net_vsc_pkt->device = device;
 900
 901         /* Each range represents 1 RNDIS pkt that contains 1 Ethernet frame */
 902         for (i = 0; i < count; i++) {
 903                 net_vsc_pkt->status = nvsp_status_success;
 904                 net_vsc_pkt->data = (void *)((unsigned long)net_dev->rx_buf +
 905                     vm_xfer_page_pkt->ranges[i].byte_offset);
 906                 net_vsc_pkt->tot_data_buf_len =
 907                     vm_xfer_page_pkt->ranges[i].byte_count;
 908
 909                 hv_rf_on_receive(net_dev, device, net_vsc_pkt);
 910                 if (net_vsc_pkt->status != nvsp_status_success) {
 911                         status = nvsp_status_failure;
 912                 }
 913         }
 914
 915         /*
 916          * Moved completion call back here so that all received
 917          * messages (not just data messages) will trigger a response
 918          * message back to the host.
 919          */
 920         hv_nv_on_receive_completion(device, vm_xfer_page_pkt->d.transaction_id,
 921             status);
 922         hv_rf_receive_rollup(net_dev);
 923 }
 924
 925 /*
 926  * Net VSC on receive completion
 927  *
 928  * Send a receive completion packet to RNDIS device (ie NetVsp)
 929  */
 930 void
 931 hv_nv_on_receive_completion(struct hv_device *device, uint64_t tid,
 932     uint32_t status)
 933 {
 934         nvsp_msg rx_comp_msg;
 935         int retries = 0;
 936         int ret = 0;
 937
 938         rx_comp_msg.hdr.msg_type = nvsp_msg_1_type_send_rndis_pkt_complete;
 939
 940         /* Pass in the status */
 941         rx_comp_msg.msgs.vers_1_msgs.send_rndis_pkt_complete.status =
 942             status;
 943
 944 retry_send_cmplt:
 945         /* Send the completion */
 946         ret = hv_vmbus_channel_send_packet(device->channel, &rx_comp_msg,
 947             sizeof(nvsp_msg), tid, HV_VMBUS_PACKET_TYPE_COMPLETION, 0);
 948         if (ret == 0) {
 949                 /* success */
 950                 /* no-op */
 951         } else if (ret == EAGAIN) {
 952                 /* no more room... wait a bit and attempt to retry 3 times */
 953                 retries++;
 954
 955                 if (retries < 4) {
 956                         DELAY(100);
 957                         goto retry_send_cmplt;
 958                 }
 959         }
 960 }
 961
 962 /*
 963  * Net VSC on channel callback
 964  */
 965 static void
 966 hv_nv_on_channel_callback(void *context)
 967 {
 968         struct hv_device *device = (struct hv_device *)context;
 969         netvsc_dev *net_dev;
 970         device_t dev = device->device;
 971         uint32_t bytes_rxed;
 972         uint64_t request_id;
 973         hv_vm_packet_descriptor *desc;
 974         uint8_t *buffer;
 975         int bufferlen = NETVSC_PACKET_SIZE;
 976         int ret = 0;
 977
 978         net_dev = hv_nv_get_inbound_net_device(device);
 979         if (net_dev == NULL)
 980                 return;
 981
 982         buffer = net_dev->callback_buf;
 983
 984         do {
 985                 ret = hv_vmbus_channel_recv_packet_raw(device->channel,
 986                     buffer, bufferlen, &bytes_rxed, &request_id);
 987                 if (ret == 0) {
 988                         if (bytes_rxed > 0) {
 989                                 desc = (hv_vm_packet_descriptor *)buffer;
 990                                 switch (desc->type) {
 991                                 case HV_VMBUS_PACKET_TYPE_COMPLETION:
 992                                         hv_nv_on_send_completion(net_dev, device, desc);
 993                                         break;
 994                                 case HV_VMBUS_PACKET_TYPE_DATA_USING_TRANSFER_PAGES:
 995                                         hv_nv_on_receive(net_dev, device, desc);
 996                                         break;
 997                                 default:
 998                                         device_printf(dev,
 999                                             "hv_cb recv unknow type %d "
1000                                             " packet\n", desc->type);
1001                                         break;
1002                                 }
1003                         } else {
1004                                 break;
1005                         }
1006                 } else if (ret == ENOBUFS) {
1007                         /* Handle large packet */
1008                         if (bufferlen > NETVSC_PACKET_SIZE) {
1009                                 free(buffer, M_NETVSC);
1010                                 buffer = NULL;
1011                         }
1012
1013                         /* alloc new buffer */
1014                         buffer = malloc(bytes_rxed, M_NETVSC, M_NOWAIT);
1015                         if (buffer == NULL) {
1016                                 device_printf(dev,
1017                                     "hv_cb malloc buffer failed, len=%u\n",
1018                                     bytes_rxed);
1019                                 bufferlen = 0;
1020                                 break;
1021                         }
1022                         bufferlen = bytes_rxed;
1023                 }
1024         } while (1);
1025
1026         if (bufferlen > NETVSC_PACKET_SIZE)
1027                 free(buffer, M_NETVSC);
1028 }