examples/vhost_xen/xenstore_parse.c

   1 /*-
   2  *   BSD LICENSE
   3  *
   4  *   Copyright(c) 2010-2014 Intel Corporation. All rights reserved.
   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  *
  11  *     * Redistributions of source code must retain the above copyright
  12  *       notice, this list of conditions and the following disclaimer.
  13  *     * Redistributions in binary form must reproduce the above copyright
  14  *       notice, this list of conditions and the following disclaimer in
  15  *       the documentation and/or other materials provided with the
  16  *       distribution.
  17  *     * Neither the name of Intel Corporation nor the names of its
  18  *       contributors may be used to endorse or promote products derived
  19  *       from this software without specific prior written permission.
  20  *
  21  *   THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
  22  *   "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
  23  *   LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR
  24  *   A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT
  25  *   OWNER OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
  26  *   SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT
  27  *   LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
  28  *   DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
  29  *   THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
  30  *   (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE
  31  *   OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
  32  */
  33
  34 #include <stdint.h>
  35 #include <unistd.h>
  36 #include <inttypes.h>
  37 #include <errno.h>
  38 #include <fcntl.h>
  39 #include <sys/ioctl.h>
  40 #include <sys/mman.h>
  41 #include <xen/sys/gntalloc.h>
  42 #include <xen/sys/gntdev.h>
  43 #include <xen/xen-compat.h>
  44 #if __XEN_LATEST_INTERFACE_VERSION__ < 0x00040200
  45 #include <xs.h>
  46 #else
  47 #include <xenstore.h>
  48 #endif
  49
  50 #include <rte_common.h>
  51 #include <rte_memory.h>
  52 #include <rte_eal.h>
  53 #include <rte_malloc.h>
  54 #include <rte_string_fns.h>
  55 #include <rte_log.h>
  56 #include <rte_debug.h>
  57
  58 #include "xen_vhost.h"
  59
  60 /* xenstore handle */
  61 static struct xs_handle *xs = NULL;
  62
  63 /* gntdev file descriptor to map grant pages */
  64 static int d_fd = -1;
  65
  66 /*
  67  *  The grant node format in xenstore for vring/mpool is like:
  68  *  idx#_rx_vring_gref = "gref1#, gref2#, gref3#"
  69  *  idx#_mempool_gref  = "gref1#, gref2#, gref3#"
  70  *  each gref# is the grant reference for a shared page.
  71  *  In each shared page, we store the grant_node_item items.
  72  */
  73 struct grant_node_item {
  74         uint32_t gref;
  75         uint32_t pfn;
  76 } __attribute__((packed));
  77
  78 int cmdline_parse_etheraddr(void *tk, const char *srcbuf,
  79         void *res, unsigned ressize);
  80
  81 /* Map grant ref refid at addr_ori*/
  82 static void *
  83 xen_grant_mmap(void *addr_ori, int domid, int refid, uint64_t *pindex)
  84 {
  85         struct ioctl_gntdev_map_grant_ref arg;
  86         void *addr = NULL;
  87         int pg_sz = getpagesize();
  88
  89         arg.count = 1;
  90         arg.refs[0].domid = domid;
  91         arg.refs[0].ref = refid;
  92
  93         int rv = ioctl(d_fd, IOCTL_GNTDEV_MAP_GRANT_REF, &arg);
  94         if (rv) {
  95                 RTE_LOG(ERR, XENHOST, "  %s: (%d,%d) %s (ioctl failed)\n", __func__,
  96                                 domid, refid, strerror(errno));
  97                 return NULL;
  98         }
  99
 100         if (addr_ori == NULL)
 101                 addr = mmap(addr_ori, pg_sz, PROT_READ|PROT_WRITE, MAP_SHARED,
 102                                 d_fd, arg.index);
 103         else
 104                 addr = mmap(addr_ori, pg_sz, PROT_READ|PROT_WRITE, MAP_SHARED | MAP_FIXED,
 105                                 d_fd, arg.index);
 106
 107         if (addr == MAP_FAILED) {
 108                 RTE_LOG(ERR, XENHOST, "  %s: (%d, %d) %s (map failed)\n", __func__,
 109                                 domid, refid, strerror(errno));
 110                 return NULL;
 111         }
 112
 113         if (pindex)
 114                 *pindex = arg.index;
 115
 116         return addr;
 117 }
 118
 119 /* Unmap one grant ref, and munmap must be called before this */
 120 static int
 121 xen_unmap_grant_ref(uint64_t index)
 122 {
 123         struct ioctl_gntdev_unmap_grant_ref arg;
 124         int rv;
 125
 126         arg.count = 1;
 127         arg.index = index;
 128         rv = ioctl(d_fd, IOCTL_GNTDEV_UNMAP_GRANT_REF, &arg);
 129         if (rv) {
 130                 RTE_LOG(ERR, XENHOST, "  %s: index 0x%" PRIx64 "unmap failed\n", __func__, index);
 131                 return -1;
 132         }
 133         return 0;
 134 }
 135
 136 /*
 137  * Reserve a virtual address space.
 138  * On success, returns the pointer. On failure, returns NULL.
 139  */
 140 static void *
 141 get_xen_virtual(size_t size, size_t page_sz)
 142 {
 143         void *addr;
 144         uintptr_t aligned_addr;
 145
 146         addr = mmap(NULL, size + page_sz, PROT_READ, MAP_SHARED | MAP_ANONYMOUS, -1, 0);
 147         if (addr == MAP_FAILED) {
 148                 RTE_LOG(ERR, XENHOST, "failed get a virtual area\n");
 149                 return NULL;
 150         }
 151
 152         aligned_addr = RTE_ALIGN_CEIL((uintptr_t)addr, page_sz);
 153         munmap(addr, aligned_addr - (uintptr_t)addr);
 154         munmap((void *)(aligned_addr + size), page_sz + (uintptr_t)addr - aligned_addr);
 155         addr = (void *)(aligned_addr);
 156
 157         return addr;
 158 }
 159
 160 static void
 161 free_xen_virtual(void *addr, size_t size, size_t page_sz __rte_unused)
 162 {
 163         if (addr)
 164                 munmap(addr, size);
 165 }
 166
 167 /*
 168  * Returns val str in xenstore.
 169  * @param path
 170  *  Full path string for key
 171  * @return
 172  *  Pointer to Val str, NULL on failure
 173  */
 174 static char *
 175 xen_read_node(char *path, uint32_t *len)
 176 {
 177         char *buf;
 178
 179         buf = xs_read(xs, XBT_NULL, path, len);
 180         return buf;
 181 }
 182
 183 static int
 184 cal_pagenum(struct xen_gnt *gnt)
 185 {
 186         unsigned int i;
 187         /*
 188          * the items in the page are in the format of
 189          * gref#,pfn#,...,gref#,pfn#
 190          * FIXME, 0 is reserved by system, use it as terminator.
 191          */
 192         for (i = 0; i < (PAGE_PFNNUM) / 2; i++) {
 193                 if (gnt->gref_pfn[i * 2].gref <= 0)
 194                         break;
 195         }
 196
 197         return i;
 198 }
 199
 200 /* Frees memory allocated to a grant node */
 201 static void
 202 xen_free_gntnode(struct xen_gntnode *gntnode)
 203 {
 204         if (gntnode == NULL)
 205                 return;
 206         if (gntnode->gnt_info)
 207                 free(gntnode->gnt_info);
 208         free(gntnode);
 209 }
 210
 211 /*
 212  * Parse a grant node.
 213  * @param domid
 214  *  Guest domain id.
 215  * @param path
 216  *  Full path string for a grant node, like for the following (key, val) pair
 217  *  idx#_mempool_gref = "gref#, gref#, gref#"
 218  *  path = 'local/domain/domid/control/dpdk/idx#_mempool_gref'
 219  *  gref# is a shared page contain packed (gref,pfn) entries
 220  * @return
 221  *  Returns the pointer to xen_gntnode
 222  */
 223 static struct xen_gntnode *
 224 parse_gntnode(int dom_id, char *path)
 225 {
 226         char **gref_list = NULL;
 227         uint32_t i, len, gref_num;
 228         void *addr = NULL;
 229         char *buf = NULL;
 230         struct xen_gntnode *gntnode = NULL;
 231         struct xen_gnt *gnt = NULL;
 232         int pg_sz = getpagesize();
 233         char *end;
 234         uint64_t index;
 235
 236         if ((buf = xen_read_node(path, &len)) == NULL)
 237                 goto err;
 238
 239         gref_list = malloc(MAX_GREF_PER_NODE * sizeof(char *));
 240         if (gref_list == NULL)
 241                 goto err;
 242
 243         gref_num = rte_strsplit(buf, len, gref_list, MAX_GREF_PER_NODE,
 244                         XEN_GREF_SPLITTOKEN);
 245         if (gref_num == 0) {
 246                 RTE_LOG(ERR, XENHOST, "  %s: invalid grant node format\n", __func__);
 247                 goto err;
 248         }
 249
 250         gntnode = calloc(1, sizeof(struct xen_gntnode));
 251         gnt = calloc(gref_num, sizeof(struct xen_gnt));
 252         if (gnt == NULL || gntnode == NULL)
 253                 goto err;
 254
 255         for (i = 0; i < gref_num; i++) {
 256                 errno = 0;
 257                 gnt[i].gref = strtol(gref_list[i], &end, 0);
 258                 if (errno != 0 || end == NULL || end == gref_list[i] ||
 259                         (*end != '\0' &&  *end != XEN_GREF_SPLITTOKEN)) {
 260                         RTE_LOG(ERR, XENHOST, "  %s: parse grant node item failed\n", __func__);
 261                         goto err;
 262                 }
 263                 addr = xen_grant_mmap(NULL, dom_id, gnt[i].gref, &index);
 264                 if (addr == NULL) {
 265                         RTE_LOG(ERR, XENHOST, "  %s: map gref %u failed\n", __func__, gnt[i].gref);
 266                         goto err;
 267                 }
 268                 RTE_LOG(INFO, XENHOST, "      %s: map gref %u to %p\n", __func__, gnt[i].gref, addr);
 269                 memcpy(gnt[i].gref_pfn, addr, pg_sz);
 270                 if (munmap(addr, pg_sz)) {
 271                         RTE_LOG(INFO, XENHOST, "  %s: unmap gref %u failed\n", __func__, gnt[i].gref);
 272                         goto err;
 273                 }
 274                 if (xen_unmap_grant_ref(index)) {
 275                         RTE_LOG(INFO, XENHOST, "  %s: release gref %u failed\n", __func__, gnt[i].gref);
 276                         goto err;
 277                 }
 278
 279         }
 280
 281         gntnode->gnt_num  = gref_num;
 282         gntnode->gnt_info = gnt;
 283
 284         free(buf);
 285         free(gref_list);
 286         return gntnode;
 287
 288 err:
 289         if (gnt)
 290                 free(gnt);
 291         if (gntnode)
 292                 free(gntnode);
 293         if (gref_list)
 294                 free(gref_list);
 295         if (buf)
 296                 free(buf);
 297         return NULL;
 298 }
 299
 300 /*
 301  * This function maps grant node of vring or mbuf pool to a continous virtual address space,
 302  * and returns mapped address, pfn array, index array
 303  * @param gntnode
 304  *  Pointer to grant node
 305  * @param domid
 306  *  Guest domain id
 307  * @param ppfn
 308  *  Pointer to pfn array, caller should free this array
 309  * @param pgs
 310  *  Pointer to number of pages
 311  * @param ppindex
 312  *  Pointer to index array, used to release grefs when to free this node
 313  * @return
 314  *  Pointer to mapped virtual address, NULL on failure
 315  */
 316 static void *
 317 map_gntnode(struct xen_gntnode *gntnode, int domid, uint32_t **ppfn, uint32_t *pgs, uint64_t **ppindex)
 318 {
 319         struct xen_gnt *gnt;
 320         uint32_t i, j;
 321         size_t total_pages = 0;
 322         void *addr;
 323         uint32_t *pfn;
 324         uint64_t *pindex;
 325         uint32_t pfn_num = 0;
 326         int pg_sz;
 327
 328         if (gntnode == NULL)
 329                 return NULL;
 330
 331         pg_sz = getpagesize();
 332         for (i = 0; i < gntnode->gnt_num; i++) {
 333                 gnt = gntnode->gnt_info + i;
 334                 total_pages += cal_pagenum(gnt);
 335         }
 336         if ((addr = get_xen_virtual(total_pages * pg_sz, pg_sz)) == NULL) {
 337                 RTE_LOG(ERR, XENHOST, "  %s: failed get_xen_virtual\n", __func__);
 338                 return NULL;
 339         }
 340         pfn = calloc(total_pages, (size_t)sizeof(uint32_t));
 341         pindex = calloc(total_pages, (size_t)sizeof(uint64_t));
 342         if (pfn == NULL || pindex == NULL) {
 343                 free_xen_virtual(addr, total_pages * pg_sz, pg_sz);
 344                 free(pfn);
 345                 free(pindex);
 346                 return NULL;
 347         }
 348
 349         RTE_LOG(INFO, XENHOST, "    %s: total pages:%zu, map to [%p, %p]\n", __func__, total_pages, addr, RTE_PTR_ADD(addr, total_pages * pg_sz - 1));
 350         for (i = 0; i < gntnode->gnt_num; i++) {
 351                 gnt = gntnode->gnt_info + i;
 352                 for (j = 0; j < (PAGE_PFNNUM) / 2; j++) {
 353                         if ((gnt->gref_pfn[j * 2].gref) <= 0)
 354                                 goto _end;
 355                         /*alternative: batch map, or through libxc*/
 356                         if (xen_grant_mmap(RTE_PTR_ADD(addr, pfn_num * pg_sz),
 357                                         domid,
 358                                         gnt->gref_pfn[j * 2].gref,
 359                                         &pindex[pfn_num]) == NULL) {
 360                                 goto mmap_failed;
 361                         }
 362                         pfn[pfn_num] = gnt->gref_pfn[j * 2 + 1].pfn_num;
 363                         pfn_num++;
 364                 }
 365         }
 366
 367 mmap_failed:
 368         if (pfn_num)
 369                 munmap(addr, pfn_num * pg_sz);
 370         for (i = 0; i < pfn_num; i++) {
 371                 xen_unmap_grant_ref(pindex[i]);
 372         }
 373         free(pindex);
 374         free(pfn);
 375         return NULL;
 376
 377 _end:
 378         if (ppindex)
 379                 *ppindex = pindex;
 380         else
 381                 free(pindex);
 382         if (ppfn)
 383                 *ppfn = pfn;
 384         else
 385                 free(pfn);
 386         if (pgs)
 387                 *pgs = total_pages;
 388
 389         return addr;
 390 }
 391
 392 static int
 393 parse_mpool_va(struct xen_mempool *mempool)
 394 {
 395         char path[PATH_MAX] = {0};
 396         char *buf;
 397         uint32_t len;
 398         char *end;
 399         int ret = -1;
 400
 401         errno = 0;
 402         snprintf(path, sizeof(path),
 403                 XEN_VM_ROOTNODE_FMT"/%d_"XEN_GVA_SUFFIX,
 404                 mempool->dom_id, mempool->pool_idx);
 405
 406         if((buf = xen_read_node(path, &len)) == NULL)
 407                 goto out;
 408         mempool->gva = (void *)strtoul(buf, &end, 16);
 409         if (errno != 0 || end == NULL || end == buf || *end != '\0') {
 410                 mempool->gva = NULL;
 411                 goto out;
 412         }
 413         ret = 0;
 414 out:
 415         if (buf)
 416                 free(buf);
 417         return ret;
 418 }
 419
 420 /*
 421  * map mbuf pool
 422  */
 423 static int
 424 map_mempoolnode(struct xen_gntnode *gntnode,
 425                         struct xen_mempool *mempool)
 426 {
 427         if (gntnode == NULL || mempool == NULL)
 428                 return -1;
 429
 430         mempool->hva =
 431                 map_gntnode(gntnode, mempool->dom_id, &mempool->mempfn_tbl, &mempool->mempfn_num, &mempool->pindex);
 432
 433         RTE_LOG(INFO, XENHOST, "  %s: map mempool at %p\n", __func__, (void *)mempool->hva);
 434         if (mempool->hva)
 435                 return 0;
 436         else {
 437                 return -1;
 438         }
 439 }
 440
 441 void
 442 cleanup_mempool(struct xen_mempool *mempool)
 443 {
 444         int pg_sz = getpagesize();
 445         uint32_t i;
 446
 447         if (mempool->hva)
 448                 munmap(mempool->hva, mempool->mempfn_num * pg_sz);
 449         mempool->hva = NULL;
 450
 451         if (mempool->pindex) {
 452                 RTE_LOG(INFO, XENHOST, "  %s: unmap dom %02u mempool%02u %u grefs\n",
 453                         __func__,
 454                         mempool->dom_id,
 455                         mempool->pool_idx,
 456                         mempool->mempfn_num);
 457                 for (i = 0; i < mempool->mempfn_num; i ++) {
 458                         xen_unmap_grant_ref(mempool->pindex[i]);
 459                 }
 460         }
 461         mempool->pindex = NULL;
 462
 463         if (mempool->mempfn_tbl)
 464                 free(mempool->mempfn_tbl);
 465         mempool->mempfn_tbl = NULL;
 466 }
 467
 468 /*
 469  * process mempool node idx#_mempool_gref, idx = 0, 1, 2...
 470  * untill we encounter a node that doesn't exist.
 471  */
 472 int
 473 parse_mempoolnode(struct xen_guest *guest)
 474 {
 475         uint32_t i, len;
 476         char path[PATH_MAX] = {0};
 477         struct xen_gntnode *gntnode = NULL;
 478         struct xen_mempool *mempool = NULL;
 479         char *buf;
 480
 481         bzero(&guest->mempool, MAX_XENVIRT_MEMPOOL * sizeof(guest->mempool[0]));
 482         guest->pool_num = 0;
 483
 484         while (1) {
 485                 /* check if null terminated */
 486                 snprintf(path, sizeof(path),
 487                         XEN_VM_ROOTNODE_FMT"/%d_"XEN_MEMPOOL_SUFFIX,
 488                         guest->dom_id,
 489                         guest->pool_num);
 490
 491                 if ((buf = xen_read_node(path, &len)) != NULL) {
 492                         /* this node exists */
 493                         free(buf);
 494                 } else {
 495                         if (guest->pool_num == 0) {
 496                                 RTE_LOG(ERR, PMD, "no mempool found\n");
 497                                 return -1;
 498                         }
 499                         break;
 500                 }
 501
 502                 mempool = &guest->mempool[guest->pool_num];
 503                 mempool->dom_id = guest->dom_id;
 504                 mempool->pool_idx = guest->pool_num;
 505
 506                 RTE_LOG(INFO, XENHOST, "  %s: mempool %u parse gntnode %s\n", __func__, guest->pool_num, path);
 507                 gntnode = parse_gntnode(guest->dom_id, path);
 508                 if (gntnode == NULL)
 509                         goto err;
 510
 511                 if (parse_mpool_va(mempool))
 512                         goto err;
 513
 514                 RTE_LOG(INFO, XENHOST, "  %s: mempool %u map gntnode %s\n", __func__, guest->pool_num, path);
 515                 if (map_mempoolnode(gntnode, mempool))
 516                         goto err;
 517
 518                 xen_free_gntnode(gntnode);
 519                 guest->pool_num++;
 520         }
 521
 522         return 0;
 523 err:
 524         if (gntnode)
 525                 xen_free_gntnode(gntnode);
 526         for (i = 0; i <  MAX_XENVIRT_MEMPOOL ; i++) {
 527                 cleanup_mempool(&guest->mempool[i]);
 528         }
 529         /* reinitialise mempool */
 530         bzero(&guest->mempool, MAX_XENVIRT_MEMPOOL * sizeof(guest->mempool[0]));
 531         return -1;
 532 }
 533
 534 static int
 535 xen_map_vringflag(struct xen_vring *vring)
 536 {
 537         char path[PATH_MAX] = {0};
 538         char *buf;
 539         uint32_t len,gref;
 540         int pg_sz = getpagesize();
 541         char *end;
 542
 543         snprintf(path, sizeof(path),
 544                 XEN_VM_ROOTNODE_FMT"/%d_"XEN_VRINGFLAG_SUFFIX,
 545                 vring->dom_id, vring->virtio_idx);
 546
 547         if((buf = xen_read_node(path, &len)) == NULL)
 548                 goto err;
 549
 550         errno = 0;
 551         gref = strtol(buf, &end, 0);
 552         if (errno != 0 || end == NULL || end == buf) {
 553                 goto err;
 554         }
 555         vring->flag = xen_grant_mmap(0, vring->dom_id, gref, &vring->flag_index);
 556         if (vring->flag == NULL || *vring->flag == 0)
 557                 goto err;
 558
 559         free(buf);
 560         return 0;
 561 err:
 562         if (buf)
 563                 free(buf);
 564         if (vring->flag) {
 565                 munmap(vring->flag, pg_sz);
 566                 vring->flag = NULL;
 567                 xen_unmap_grant_ref(vring->flag_index);
 568         }
 569         return -1;
 570 }
 571
 572
 573 static int
 574 xen_map_rxvringnode(struct xen_gntnode *gntnode,
 575                                 struct xen_vring *vring)
 576 {
 577         vring->rxvring_addr =
 578                 map_gntnode(gntnode, vring->dom_id, &vring->rxpfn_tbl, &vring->rxpfn_num, &vring->rx_pindex);
 579         RTE_LOG(INFO, XENHOST, "  %s: map rx vring at %p\n", __func__, (void *)vring->rxvring_addr);
 580         if (vring->rxvring_addr)
 581                 return 0;
 582         else
 583                 return -1;
 584 }
 585
 586 static int
 587 xen_map_txvringnode(struct xen_gntnode *gntnode,
 588                                 struct xen_vring *vring)
 589 {
 590         vring->txvring_addr =
 591                 map_gntnode(gntnode, vring->dom_id, &vring->txpfn_tbl, &vring->txpfn_num, &vring->tx_pindex);
 592         RTE_LOG(INFO, XENHOST, "  %s: map tx vring at %p\n", __func__, (void *)vring->txvring_addr);
 593         if (vring->txvring_addr)
 594                 return 0;
 595         else
 596                 return -1;
 597 }
 598
 599 void
 600 cleanup_vring(struct xen_vring *vring)
 601 {
 602         int pg_sz = getpagesize();
 603         uint32_t i;
 604
 605         RTE_LOG(INFO, XENHOST, "  %s: cleanup dom %u vring %u\n", __func__, vring->dom_id, vring->virtio_idx);
 606         if (vring->rxvring_addr) {
 607                 munmap(vring->rxvring_addr, vring->rxpfn_num * pg_sz);
 608                 RTE_LOG(INFO, XENHOST, "  %s: unmap rx vring [%p, %p]\n",
 609                         __func__,
 610                         vring->rxvring_addr,
 611                         RTE_PTR_ADD(vring->rxvring_addr,
 612                         vring->rxpfn_num * pg_sz - 1));
 613         }
 614         vring->rxvring_addr = NULL;
 615
 616
 617         if (vring->rx_pindex) {
 618                 RTE_LOG(INFO, XENHOST, "  %s: unmap rx vring %u grefs\n", __func__, vring->rxpfn_num);
 619                 for (i = 0; i < vring->rxpfn_num; i++) {
 620                         xen_unmap_grant_ref(vring->rx_pindex[i]);
 621                 }
 622         }
 623         vring->rx_pindex = NULL;
 624
 625         if (vring->rxpfn_tbl)
 626                 free(vring->rxpfn_tbl);
 627         vring->rxpfn_tbl = NULL;
 628
 629         if (vring->txvring_addr) {
 630                 munmap(vring->txvring_addr, vring->txpfn_num * pg_sz);
 631                 RTE_LOG(INFO, XENHOST, "  %s: unmap tx vring [%p, %p]\n",
 632                         __func__,
 633                         vring->txvring_addr,
 634                         RTE_PTR_ADD(vring->txvring_addr,
 635                         vring->txpfn_num * pg_sz - 1));
 636         }
 637         vring->txvring_addr = NULL;
 638
 639         if (vring->tx_pindex) {
 640                 RTE_LOG(INFO, XENHOST, "  %s: unmap tx vring %u grefs\n", __func__, vring->txpfn_num);
 641                 for (i = 0; i < vring->txpfn_num; i++) {
 642                         xen_unmap_grant_ref(vring->tx_pindex[i]);
 643                 }
 644         }
 645         vring->tx_pindex = NULL;
 646
 647         if (vring->txpfn_tbl)
 648                 free(vring->txpfn_tbl);
 649         vring->txpfn_tbl = NULL;
 650
 651         if (vring->flag) {
 652                 if (!munmap((void *)vring->flag, pg_sz))
 653                         RTE_LOG(INFO, XENHOST, "  %s: unmap flag page at %p\n", __func__, vring->flag);
 654                 if (!xen_unmap_grant_ref(vring->flag_index))
 655                         RTE_LOG(INFO, XENHOST, "  %s: release flag ref index 0x%" PRIx64 "\n", __func__, vring->flag_index);
 656         }
 657         vring->flag = NULL;
 658         return;
 659 }
 660
 661
 662
 663 static int
 664 xen_parse_etheraddr(struct xen_vring *vring)
 665 {
 666         char path[PATH_MAX] = {0};
 667         char *buf;
 668         uint32_t len;
 669         int ret = -1;
 670
 671         snprintf(path, sizeof(path),
 672                 XEN_VM_ROOTNODE_FMT"/%d_"XEN_ADDR_SUFFIX,
 673                 vring->dom_id, vring->virtio_idx);
 674
 675         if ((buf = xen_read_node(path, &len)) == NULL)
 676                 goto out;
 677
 678         if (cmdline_parse_etheraddr(NULL, buf, &vring->addr,
 679                         sizeof(vring->addr)) < 0)
 680                 goto out;
 681         ret = 0;
 682 out:
 683         if (buf)
 684                 free(buf);
 685         return ret;
 686 }
 687
 688
 689 int
 690 parse_vringnode(struct xen_guest *guest, uint32_t virtio_idx)
 691 {
 692         char path[PATH_MAX] = {0};
 693         struct xen_gntnode *rx_gntnode = NULL;
 694         struct xen_gntnode *tx_gntnode = NULL;
 695         struct xen_vring *vring = NULL;
 696
 697         /*check if null terminated */
 698         snprintf(path, sizeof(path),
 699                 XEN_VM_ROOTNODE_FMT"/%d_"XEN_RXVRING_SUFFIX,
 700                 guest->dom_id,
 701                 virtio_idx);
 702
 703         RTE_LOG(INFO, XENHOST, "  %s: virtio %u parse rx gntnode %s\n", __func__, virtio_idx, path);
 704         rx_gntnode = parse_gntnode(guest->dom_id, path);
 705         if (rx_gntnode == NULL)
 706                 goto err;
 707
 708         /*check if null terminated */
 709         snprintf(path, sizeof(path),
 710                 XEN_VM_ROOTNODE_FMT"/%d_"XEN_TXVRING_SUFFIX,
 711                 guest->dom_id,
 712                 virtio_idx);
 713
 714         RTE_LOG(INFO, XENHOST, "  %s: virtio %u parse tx gntnode %s\n", __func__, virtio_idx, path);
 715         tx_gntnode = parse_gntnode(guest->dom_id, path);
 716         if (tx_gntnode == NULL)
 717                 goto err;
 718
 719         vring = &guest->vring[virtio_idx];
 720         bzero(vring, sizeof(*vring));
 721         vring->dom_id = guest->dom_id;
 722         vring->virtio_idx = virtio_idx;
 723
 724         if (xen_parse_etheraddr(vring) != 0)
 725                 goto err;
 726
 727         RTE_LOG(INFO, XENHOST, "  %s: virtio %u map rx gntnode %s\n", __func__, virtio_idx, path);
 728         if (xen_map_rxvringnode(rx_gntnode, vring) != 0)
 729                 goto err;
 730
 731         RTE_LOG(INFO, XENHOST, "  %s: virtio %u map tx gntnode %s\n", __func__, virtio_idx, path);
 732         if (xen_map_txvringnode(tx_gntnode, vring) != 0)
 733                 goto err;
 734
 735         if (xen_map_vringflag(vring) != 0)
 736                 goto err;
 737
 738         guest->vring_num++;
 739
 740         xen_free_gntnode(rx_gntnode);
 741         xen_free_gntnode(tx_gntnode);
 742
 743         return 0;
 744
 745 err:
 746         if (rx_gntnode)
 747                 xen_free_gntnode(rx_gntnode);
 748         if (tx_gntnode)
 749                 xen_free_gntnode(tx_gntnode);
 750         if (vring) {
 751                 cleanup_vring(vring);
 752                 bzero(vring, sizeof(*vring));
 753         }
 754         return -1;
 755 }
 756
 757 /*
 758  * Open xen grant dev driver
 759  * @return
 760  *  0 on success, -1 on failure.
 761  */
 762 static int
 763 xen_grant_init(void)
 764 {
 765         d_fd = open(XEN_GNTDEV_FNAME, O_RDWR);
 766
 767         return d_fd == -1? (-1): (0);
 768 }
 769
 770 /*
 771  * Initialise xenstore handle and open grant dev driver.
 772  * @return
 773  *  0 on success, -1 on failure.
 774  */
 775 int
 776 xenhost_init(void)
 777 {
 778         xs = xs_daemon_open();
 779         if (xs == NULL) {
 780                 rte_panic("failed initialize xen daemon handler");
 781                 return -1;
 782         }
 783         if (xen_grant_init())
 784                 return -1;
 785         return 0;
 786 }