vhost_xen/xenstore_parse.c

/*-
 *   BSD LICENSE
 *
 *   Copyright(c) 2010-2014 Intel Corporation. All rights reserved.
 *   All rights reserved.
 *
 *   Redistribution and use in source and binary forms, with or without
 *   modification, are permitted provided that the following conditions
 *   are met:
 *
 *     * Redistributions of source code must retain the above copyright
 *       notice, this list of conditions and the following disclaimer.
 *     * Redistributions in binary form must reproduce the above copyright
 *       notice, this list of conditions and the following disclaimer in
 *       the documentation and/or other materials provided with the
 *       distribution.
 *     * Neither the name of Intel Corporation nor the names of its
 *       contributors may be used to endorse or promote products derived
 *       from this software without specific prior written permission.
 *
 *   THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
 *   "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
 *   LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR
 *   A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT
 *   OWNER OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
 *   SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT
 *   LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
 *   DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
 *   THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
 *   (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE
 *   OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
 */

#include <stdint.h>
#include <unistd.h>
#include <inttypes.h>
#include <errno.h>
#include <fcntl.h>
#include <sys/ioctl.h>
#include <sys/mman.h>
#include <xen/sys/gntalloc.h>
#include <xen/sys/gntdev.h>
#include <xen/xen-compat.h>
#if __XEN_LATEST_INTERFACE_VERSION__ < 0x00040200
#include <xs.h>
#else
#include <xenstore.h>
#endif

#include <rte_common.h>
#include <rte_memory.h>
#include <rte_eal.h>
#include <rte_malloc.h>
#include <rte_string_fns.h>
#include <rte_log.h>
#include <rte_debug.h>

#include "xen_vhost.h"

/* xenstore handle */
static struct xs_handle *xs = NULL;

/* gntdev file descriptor to map grant pages */
static int d_fd = -1;

/*
 *  The grant node format in xenstore for vring/mpool is like:
 *  idx#_rx_vring_gref = "gref1#, gref2#, gref3#"
 *  idx#_mempool_gref  = "gref1#, gref2#, gref3#"
 *  each gref# is the grant reference for a shared page.
 *  In each shared page, we store the grant_node_item items.
 */
struct grant_node_item {
        uint32_t gref;
        uint32_t pfn;
} __attribute__((packed));

int cmdline_parse_etheraddr(void *tk, const char *srcbuf,
        void *res, unsigned ressize);

/* Map grant ref refid at addr_ori*/
static void *
xen_grant_mmap(void *addr_ori, int domid, int refid, uint64_t *pindex)
{
        struct ioctl_gntdev_map_grant_ref arg;
        void *addr = NULL;
        int pg_sz = getpagesize();

        arg.count = 1;
        arg.refs[0].domid = domid;
        arg.refs[0].ref = refid;

        int rv = ioctl(d_fd, IOCTL_GNTDEV_MAP_GRANT_REF, &arg);
        if (rv) {
                RTE_LOG(ERR, XENHOST, "  %s: (%d,%d) %s (ioctl failed)\n", __func__,
                                domid, refid, strerror(errno));
                return NULL;
        }

        if (addr_ori == NULL)
                addr = mmap(addr_ori, pg_sz, PROT_READ|PROT_WRITE, MAP_SHARED,
                                d_fd, arg.index);
        else
                addr = mmap(addr_ori, pg_sz, PROT_READ|PROT_WRITE, MAP_SHARED | MAP_FIXED,
                                d_fd, arg.index);

        if (addr == MAP_FAILED) {
                RTE_LOG(ERR, XENHOST, "  %s: (%d, %d) %s (map failed)\n", __func__,
                                domid, refid, strerror(errno));
                return NULL;
        }

        if (pindex)
                *pindex = arg.index;

        return addr;
}

/* Unmap one grant ref, and munmap must be called before this */
static int
xen_unmap_grant_ref(uint64_t index)
{
        struct ioctl_gntdev_unmap_grant_ref arg;
        int rv;

        arg.count = 1;
        arg.index = index;
        rv = ioctl(d_fd, IOCTL_GNTDEV_UNMAP_GRANT_REF, &arg);
        if (rv) {
                RTE_LOG(ERR, XENHOST, "  %s: index 0x%" PRIx64 "unmap failed\n", __func__, index);
                return -1;
        }
        return 0;
}

/*
 * Reserve a virtual address space.
 * On success, returns the pointer. On failure, returns NULL.
 */
static void *
get_xen_virtual(size_t size, size_t page_sz)
{
        void *addr;
        uintptr_t aligned_addr;

        addr = mmap(NULL, size + page_sz, PROT_READ, MAP_SHARED | MAP_ANONYMOUS, -1, 0);
        if (addr == MAP_FAILED) {
                RTE_LOG(ERR, XENHOST, "failed get a virtual area\n");
                return NULL;
        }

        aligned_addr = RTE_ALIGN_CEIL((uintptr_t)addr, page_sz);
        munmap(addr, aligned_addr - (uintptr_t)addr);
        munmap((void *)(aligned_addr + size), page_sz + (uintptr_t)addr - aligned_addr);
        addr = (void *)(aligned_addr);

        return addr;
}

static void
free_xen_virtual(void *addr, size_t size, size_t page_sz __rte_unused)
{
        if (addr)
                munmap(addr, size);
}

/*
 * Returns val str in xenstore.
 * @param path
 *  Full path string for key
 * @return
 *  Pointer to Val str, NULL on failure
 */
static char *
xen_read_node(char *path, uint32_t *len)
{
        char *buf;

        buf = xs_read(xs, XBT_NULL, path, len);
        return buf;
}

static int
cal_pagenum(struct xen_gnt *gnt)
{
        unsigned int i;
        /*
         * the items in the page are in the format of
         * gref#,pfn#,...,gref#,pfn#
         * FIXME, 0 is reserved by system, use it as terminator.
         */
        for (i = 0; i < (PAGE_PFNNUM) / 2; i++) {
                if (gnt->gref_pfn[i * 2].gref <= 0)
                        break;
        }

        return i;
}

/* Frees memory allocated to a grant node */
static void
xen_free_gntnode(struct xen_gntnode *gntnode)
{
        if (gntnode == NULL)
                return;
        free(gntnode->gnt_info);
        free(gntnode);
}

/*
 * Parse a grant node.
 * @param domid
 *  Guest domain id.
 * @param path
 *  Full path string for a grant node, like for the following (key, val) pair
 *  idx#_mempool_gref = "gref#, gref#, gref#"
 *  path = 'local/domain/domid/control/dpdk/idx#_mempool_gref'
 *  gref# is a shared page contain packed (gref,pfn) entries
 * @return
 *  Returns the pointer to xen_gntnode
 */
static struct xen_gntnode *
parse_gntnode(int dom_id, char *path)
{
        char **gref_list = NULL;
        uint32_t i, len, gref_num;
        void *addr = NULL;
        char *buf = NULL;
        struct xen_gntnode *gntnode = NULL;
        struct xen_gnt *gnt = NULL;
        int pg_sz = getpagesize();
        char *end;
        uint64_t index;

        if ((buf = xen_read_node(path, &len)) == NULL)
                goto err;

        gref_list = malloc(MAX_GREF_PER_NODE * sizeof(char *));
        if (gref_list == NULL)
                goto err;

        gref_num = rte_strsplit(buf, len, gref_list, MAX_GREF_PER_NODE,
                        XEN_GREF_SPLITTOKEN);
        if (gref_num == 0) {
                RTE_LOG(ERR, XENHOST, "  %s: invalid grant node format\n", __func__);
                goto err;
        }

        gntnode = calloc(1, sizeof(struct xen_gntnode));
        gnt = calloc(gref_num, sizeof(struct xen_gnt));
        if (gnt == NULL || gntnode == NULL)
                goto err;

        for (i = 0; i < gref_num; i++) {
                errno = 0;
                gnt[i].gref = strtol(gref_list[i], &end, 0);
                if (errno != 0 || end == NULL || end == gref_list[i] ||
                        (*end != '\0' &&  *end != XEN_GREF_SPLITTOKEN)) {
                        RTE_LOG(ERR, XENHOST, "  %s: parse grant node item failed\n", __func__);
                        goto err;
                }
                addr = xen_grant_mmap(NULL, dom_id, gnt[i].gref, &index);
                if (addr == NULL) {
                        RTE_LOG(ERR, XENHOST, "  %s: map gref %u failed\n", __func__, gnt[i].gref);
                        goto err;
                }
                RTE_LOG(INFO, XENHOST, "      %s: map gref %u to %p\n", __func__, gnt[i].gref, addr);
                memcpy(gnt[i].gref_pfn, addr, pg_sz);
                if (munmap(addr, pg_sz)) {
                        RTE_LOG(INFO, XENHOST, "  %s: unmap gref %u failed\n", __func__, gnt[i].gref);
                        goto err;
                }
                if (xen_unmap_grant_ref(index)) {
                        RTE_LOG(INFO, XENHOST, "  %s: release gref %u failed\n", __func__, gnt[i].gref);
                        goto err;
                }

        }

        gntnode->gnt_num  = gref_num;
        gntnode->gnt_info = gnt;

        free(buf);
        free(gref_list);
        return gntnode;

err:
        free(gnt);
        free(gntnode);
        free(gref_list);
        free(buf);
        return NULL;
}

/*
 * This function maps grant node of vring or mbuf pool to a continous virtual address space,
 * and returns mapped address, pfn array, index array
 * @param gntnode
 *  Pointer to grant node
 * @param domid
 *  Guest domain id
 * @param ppfn
 *  Pointer to pfn array, caller should free this array
 * @param pgs
 *  Pointer to number of pages
 * @param ppindex
 *  Pointer to index array, used to release grefs when to free this node
 * @return
 *  Pointer to mapped virtual address, NULL on failure
 */
static void *
map_gntnode(struct xen_gntnode *gntnode, int domid, uint32_t **ppfn, uint32_t *pgs, uint64_t **ppindex)
{
        struct xen_gnt *gnt;
        uint32_t i, j;
        size_t total_pages = 0;
        void *addr;
        uint32_t *pfn;
        uint64_t *pindex;
        uint32_t pfn_num = 0;
        int pg_sz;

        if (gntnode == NULL)
                return NULL;

        pg_sz = getpagesize();
        for (i = 0; i < gntnode->gnt_num; i++) {
                gnt = gntnode->gnt_info + i;
                total_pages += cal_pagenum(gnt);
        }
        if ((addr = get_xen_virtual(total_pages * pg_sz, pg_sz)) == NULL) {
                RTE_LOG(ERR, XENHOST, "  %s: failed get_xen_virtual\n", __func__);
                return NULL;
        }
        pfn = calloc(total_pages, (size_t)sizeof(uint32_t));
        pindex = calloc(total_pages, (size_t)sizeof(uint64_t));
        if (pfn == NULL || pindex == NULL) {
                free_xen_virtual(addr, total_pages * pg_sz, pg_sz);
                free(pfn);
                free(pindex);
                return NULL;
        }

        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));
        for (i = 0; i < gntnode->gnt_num; i++) {
                gnt = gntnode->gnt_info + i;
                for (j = 0; j < (PAGE_PFNNUM) / 2; j++) {
                        if ((gnt->gref_pfn[j * 2].gref) <= 0)
                                goto _end;
                        /*alternative: batch map, or through libxc*/
                        if (xen_grant_mmap(RTE_PTR_ADD(addr, pfn_num * pg_sz),
                                        domid,
                                        gnt->gref_pfn[j * 2].gref,
                                        &pindex[pfn_num]) == NULL) {
                                goto mmap_failed;
                        }
                        pfn[pfn_num] = gnt->gref_pfn[j * 2 + 1].pfn_num;
                        pfn_num++;
                }
        }

mmap_failed:
        if (pfn_num)
                munmap(addr, pfn_num * pg_sz);
        for (i = 0; i < pfn_num; i++) {
                xen_unmap_grant_ref(pindex[i]);
        }
        free(pindex);
        free(pfn);
        return NULL;

_end:
        if (ppindex)
                *ppindex = pindex;
        else
                free(pindex);
        if (ppfn)
                *ppfn = pfn;
        else
                free(pfn);
        if (pgs)
                *pgs = total_pages;

        return addr;
}

static int
parse_mpool_va(struct xen_mempool *mempool)
{
        char path[PATH_MAX] = {0};
        char *buf;
        uint32_t len;
        char *end;
        int ret = -1;

        errno = 0;
        snprintf(path, sizeof(path),
                XEN_VM_ROOTNODE_FMT"/%d_"XEN_GVA_SUFFIX,
                mempool->dom_id, mempool->pool_idx);

        if((buf = xen_read_node(path, &len)) == NULL)
                goto out;
        mempool->gva = (void *)strtoul(buf, &end, 16);
        if (errno != 0 || end == NULL || end == buf || *end != '\0') {
                mempool->gva = NULL;
                goto out;
        }
        ret = 0;
out:
        free(buf);
        return ret;
}

/*
 * map mbuf pool
 */
static int
map_mempoolnode(struct xen_gntnode *gntnode,
                        struct xen_mempool *mempool)
{
        if (gntnode == NULL || mempool == NULL)
                return -1;

        mempool->hva =
                map_gntnode(gntnode, mempool->dom_id, &mempool->mempfn_tbl, &mempool->mempfn_num, &mempool->pindex);

        RTE_LOG(INFO, XENHOST, "  %s: map mempool at %p\n", __func__, (void *)mempool->hva);
        if (mempool->hva)
                return 0;
        else {
                return -1;
        }
}

void
cleanup_mempool(struct xen_mempool *mempool)
{
        int pg_sz = getpagesize();
        uint32_t i;

        if (mempool->hva)
                munmap(mempool->hva, mempool->mempfn_num * pg_sz);
        mempool->hva = NULL;

        if (mempool->pindex) {
                RTE_LOG(INFO, XENHOST, "  %s: unmap dom %02u mempool%02u %u grefs\n",
                        __func__,
                        mempool->dom_id,
                        mempool->pool_idx,
                        mempool->mempfn_num);
                for (i = 0; i < mempool->mempfn_num; i ++) {
                        xen_unmap_grant_ref(mempool->pindex[i]);
                }
        }
        mempool->pindex = NULL;

        free(mempool->mempfn_tbl);
        mempool->mempfn_tbl = NULL;
}

/*
 * process mempool node idx#_mempool_gref, idx = 0, 1, 2...
 * untill we encounter a node that doesn't exist.
 */
int
parse_mempoolnode(struct xen_guest *guest)
{
        uint32_t i, len;
        char path[PATH_MAX] = {0};
        struct xen_gntnode *gntnode = NULL;
        struct xen_mempool *mempool = NULL;
        char *buf;

        bzero(&guest->mempool, MAX_XENVIRT_MEMPOOL * sizeof(guest->mempool[0]));
        guest->pool_num = 0;

        while (1) {
                /* check if null terminated */
                snprintf(path, sizeof(path),
                        XEN_VM_ROOTNODE_FMT"/%d_"XEN_MEMPOOL_SUFFIX,
                        guest->dom_id,
                        guest->pool_num);

                if ((buf = xen_read_node(path, &len)) != NULL) {
                        /* this node exists */
                        free(buf);
                } else {
                        if (guest->pool_num == 0) {
                                RTE_LOG(ERR, PMD, "no mempool found\n");
                                return -1;
                        }
                        break;
                }

                mempool = &guest->mempool[guest->pool_num];
                mempool->dom_id = guest->dom_id;
                mempool->pool_idx = guest->pool_num;

                RTE_LOG(INFO, XENHOST, "  %s: mempool %u parse gntnode %s\n", __func__, guest->pool_num, path);
                gntnode = parse_gntnode(guest->dom_id, path);
                if (gntnode == NULL)
                        goto err;

                if (parse_mpool_va(mempool))
                        goto err;

                RTE_LOG(INFO, XENHOST, "  %s: mempool %u map gntnode %s\n", __func__, guest->pool_num, path);
                if (map_mempoolnode(gntnode, mempool))
                        goto err;

                xen_free_gntnode(gntnode);
                guest->pool_num++;
        }

        return 0;
err:
        if (gntnode)
                xen_free_gntnode(gntnode);
        for (i = 0; i <  MAX_XENVIRT_MEMPOOL ; i++) {
                cleanup_mempool(&guest->mempool[i]);
        }
        /* reinitialise mempool */
        bzero(&guest->mempool, MAX_XENVIRT_MEMPOOL * sizeof(guest->mempool[0]));
        return -1;
}

static int
xen_map_vringflag(struct xen_vring *vring)
{
        char path[PATH_MAX] = {0};
        char *buf;
        uint32_t len,gref;
        int pg_sz = getpagesize();
        char *end;

        snprintf(path, sizeof(path),
                XEN_VM_ROOTNODE_FMT"/%d_"XEN_VRINGFLAG_SUFFIX,
                vring->dom_id, vring->virtio_idx);

        if((buf = xen_read_node(path, &len)) == NULL)
                goto err;

        errno = 0;
        gref = strtol(buf, &end, 0);
        if (errno != 0 || end == NULL || end == buf) {
                goto err;
        }
        vring->flag = xen_grant_mmap(0, vring->dom_id, gref, &vring->flag_index);
        if (vring->flag == NULL || *vring->flag == 0)
                goto err;

        free(buf);
        return 0;
err:
        free(buf);
        if (vring->flag) {
                munmap(vring->flag, pg_sz);
                vring->flag = NULL;
                xen_unmap_grant_ref(vring->flag_index);
        }
        return -1;
}


static int
xen_map_rxvringnode(struct xen_gntnode *gntnode,
                                struct xen_vring *vring)
{
        vring->rxvring_addr =
                map_gntnode(gntnode, vring->dom_id, &vring->rxpfn_tbl, &vring->rxpfn_num, &vring->rx_pindex);
        RTE_LOG(INFO, XENHOST, "  %s: map rx vring at %p\n", __func__, (void *)vring->rxvring_addr);
        if (vring->rxvring_addr)
                return 0;
        else
                return -1;
}

static int
xen_map_txvringnode(struct xen_gntnode *gntnode,
                                struct xen_vring *vring)
{
        vring->txvring_addr =
                map_gntnode(gntnode, vring->dom_id, &vring->txpfn_tbl, &vring->txpfn_num, &vring->tx_pindex);
        RTE_LOG(INFO, XENHOST, "  %s: map tx vring at %p\n", __func__, (void *)vring->txvring_addr);
        if (vring->txvring_addr)
                return 0;
        else
                return -1;
}

void
cleanup_vring(struct xen_vring *vring)
{
        int pg_sz = getpagesize();
        uint32_t i;

        RTE_LOG(INFO, XENHOST, "  %s: cleanup dom %u vring %u\n", __func__, vring->dom_id, vring->virtio_idx);
        if (vring->rxvring_addr) {
                munmap(vring->rxvring_addr, vring->rxpfn_num * pg_sz);
                RTE_LOG(INFO, XENHOST, "  %s: unmap rx vring [%p, %p]\n",
                        __func__,
                        vring->rxvring_addr,
                        RTE_PTR_ADD(vring->rxvring_addr,
                        vring->rxpfn_num * pg_sz - 1));
        }
        vring->rxvring_addr = NULL;


        if (vring->rx_pindex) {
                RTE_LOG(INFO, XENHOST, "  %s: unmap rx vring %u grefs\n", __func__, vring->rxpfn_num);
                for (i = 0; i < vring->rxpfn_num; i++) {
                        xen_unmap_grant_ref(vring->rx_pindex[i]);
                }
        }
        vring->rx_pindex = NULL;

        free(vring->rxpfn_tbl);
        vring->rxpfn_tbl = NULL;

        if (vring->txvring_addr) {
                munmap(vring->txvring_addr, vring->txpfn_num * pg_sz);
                RTE_LOG(INFO, XENHOST, "  %s: unmap tx vring [%p, %p]\n",
                        __func__,
                        vring->txvring_addr,
                        RTE_PTR_ADD(vring->txvring_addr,
                        vring->txpfn_num * pg_sz - 1));
        }
        vring->txvring_addr = NULL;

        if (vring->tx_pindex) {
                RTE_LOG(INFO, XENHOST, "  %s: unmap tx vring %u grefs\n", __func__, vring->txpfn_num);
                for (i = 0; i < vring->txpfn_num; i++) {
                        xen_unmap_grant_ref(vring->tx_pindex[i]);
                }
        }
        vring->tx_pindex = NULL;

        free(vring->txpfn_tbl);
        vring->txpfn_tbl = NULL;

        if (vring->flag) {
                if (!munmap((void *)vring->flag, pg_sz))
                        RTE_LOG(INFO, XENHOST, "  %s: unmap flag page at %p\n", __func__, vring->flag);
                if (!xen_unmap_grant_ref(vring->flag_index))
                        RTE_LOG(INFO, XENHOST, "  %s: release flag ref index 0x%" PRIx64 "\n", __func__, vring->flag_index);
        }
        vring->flag = NULL;
        return;
}



static int
xen_parse_etheraddr(struct xen_vring *vring)
{
        char path[PATH_MAX] = {0};
        char *buf;
        uint32_t len;
        int ret = -1;

        snprintf(path, sizeof(path),
                XEN_VM_ROOTNODE_FMT"/%d_"XEN_ADDR_SUFFIX,
                vring->dom_id, vring->virtio_idx);

        if ((buf = xen_read_node(path, &len)) == NULL)
                goto out;

        if (cmdline_parse_etheraddr(NULL, buf, &vring->addr,
                        sizeof(vring->addr)) < 0)
                goto out;
        ret = 0;
out:
        free(buf);
        return ret;
}


int
parse_vringnode(struct xen_guest *guest, uint32_t virtio_idx)
{
        char path[PATH_MAX] = {0};
        struct xen_gntnode *rx_gntnode = NULL;
        struct xen_gntnode *tx_gntnode = NULL;
        struct xen_vring *vring = NULL;

        /*check if null terminated */
        snprintf(path, sizeof(path),
                XEN_VM_ROOTNODE_FMT"/%d_"XEN_RXVRING_SUFFIX,
                guest->dom_id,
                virtio_idx);

        RTE_LOG(INFO, XENHOST, "  %s: virtio %u parse rx gntnode %s\n", __func__, virtio_idx, path);
        rx_gntnode = parse_gntnode(guest->dom_id, path);
        if (rx_gntnode == NULL)
                goto err;

        /*check if null terminated */
        snprintf(path, sizeof(path),
                XEN_VM_ROOTNODE_FMT"/%d_"XEN_TXVRING_SUFFIX,
                guest->dom_id,
                virtio_idx);

        RTE_LOG(INFO, XENHOST, "  %s: virtio %u parse tx gntnode %s\n", __func__, virtio_idx, path);
        tx_gntnode = parse_gntnode(guest->dom_id, path);
        if (tx_gntnode == NULL)
                goto err;

        vring = &guest->vring[virtio_idx];
        bzero(vring, sizeof(*vring));
        vring->dom_id = guest->dom_id;
        vring->virtio_idx = virtio_idx;

        if (xen_parse_etheraddr(vring) != 0)
                goto err;

        RTE_LOG(INFO, XENHOST, "  %s: virtio %u map rx gntnode %s\n", __func__, virtio_idx, path);
        if (xen_map_rxvringnode(rx_gntnode, vring) != 0)
                goto err;

        RTE_LOG(INFO, XENHOST, "  %s: virtio %u map tx gntnode %s\n", __func__, virtio_idx, path);
        if (xen_map_txvringnode(tx_gntnode, vring) != 0)
                goto err;

        if (xen_map_vringflag(vring) != 0)
                goto err;

        guest->vring_num++;

        xen_free_gntnode(rx_gntnode);
        xen_free_gntnode(tx_gntnode);

        return 0;

err:
        if (rx_gntnode)
                xen_free_gntnode(rx_gntnode);
        if (tx_gntnode)
                xen_free_gntnode(tx_gntnode);
        if (vring) {
                cleanup_vring(vring);
                bzero(vring, sizeof(*vring));
        }
        return -1;
}

/*
 * Open xen grant dev driver
 * @return
 *  0 on success, -1 on failure.
 */
static int
xen_grant_init(void)
{
        d_fd = open(XEN_GNTDEV_FNAME, O_RDWR);

        return d_fd == -1? (-1): (0);
}

/*
 * Initialise xenstore handle and open grant dev driver.
 * @return
 *  0 on success, -1 on failure.
 */
int
xenhost_init(void)
{
        xs = xs_daemon_open();
        if (xs == NULL) {
                rte_panic("failed initialize xen daemon handler");
                return -1;
        }
        if (xen_grant_init())
                return -1;
        return 0;
}