lib/libnetmap/nmctx.c

   1 /*-
   2  * SPDX-License-Identifier: BSD-2-Clause-FreeBSD
   3  *
   4  * Copyright (C) 2018 Universita` di Pisa
   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  *   1. Redistributions of source code must retain the above copyright
  12  *      notice, this list of conditions and the following 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 AND CONTRIBUTORS ``AS IS'' AND
  18  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
  19  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
  20  * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
  21  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
  22  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
  23  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
  24  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
  25  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
  26  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
  27  * SUCH DAMAGE.
  28  *
  29  * $FreeBSD$
  30  */
  31
  32 #include <sys/types.h>
  33 #include <sys/stat.h>
  34 #include <sys/ioctl.h>
  35 #include <sys/mman.h>
  36 #include <fcntl.h>
  37 #include <stdlib.h>
  38 #include <stdio.h>
  39 #include <stdarg.h>
  40 #include <string.h>
  41 #include <unistd.h>
  42 #include <errno.h>
  43 #include <net/netmap_user.h>
  44 #define LIBNETMAP_NOTHREADSAFE
  45 #include "libnetmap.h"
  46
  47 static void
  48 nmctx_default_error(struct nmctx *ctx, const char *errmsg)
  49 {
  50         (void)ctx;
  51         fprintf(stderr, "%s\n", errmsg);
  52 }
  53
  54 static void *
  55 nmctx_default_malloc(struct nmctx *ctx, size_t sz)
  56 {
  57         (void)ctx;
  58         return malloc(sz);
  59 }
  60
  61 static void
  62 nmctx_default_free(struct nmctx *ctx, void *p)
  63 {
  64         (void)ctx;
  65         free(p);
  66 }
  67
  68 static struct nmctx nmctx_global = {
  69         .verbose = 1,
  70         .error = nmctx_default_error,
  71         .malloc = nmctx_default_malloc,
  72         .free = nmctx_default_free,
  73         .lock = NULL,
  74 };
  75
  76 static struct nmctx *nmctx_default = &nmctx_global;
  77
  78 struct nmctx *
  79 nmctx_get(void)
  80 {
  81         return nmctx_default;
  82 }
  83
  84 struct nmctx *
  85 nmctx_set_default(struct nmctx *ctx)
  86 {
  87         struct nmctx *old = nmctx_default;
  88         nmctx_default = ctx;
  89         return old;
  90 }
  91
  92 #define MAXERRMSG 1000
  93 void
  94 nmctx_ferror(struct nmctx *ctx, const char *fmt, ...)
  95 {
  96         char errmsg[MAXERRMSG];
  97         va_list ap;
  98         int rv;
  99
 100         if (!ctx->verbose)
 101                 return;
 102
 103         va_start(ap, fmt);
 104         rv = vsnprintf(errmsg, MAXERRMSG, fmt, ap);
 105         va_end(ap);
 106
 107         if (rv > 0) {
 108                 if (rv < MAXERRMSG) {
 109                         ctx->error(ctx, errmsg);
 110                 } else {
 111                         ctx->error(ctx, "error message too long");
 112                 }
 113         } else {
 114                 ctx->error(ctx, "internal error");
 115         }
 116 }
 117
 118 void *
 119 nmctx_malloc(struct nmctx *ctx, size_t sz)
 120 {
 121         return ctx->malloc(ctx, sz);
 122 }
 123
 124 void
 125 nmctx_free(struct nmctx *ctx, void *p)
 126 {
 127         ctx->free(ctx, p);
 128 }
 129
 130 void
 131 nmctx_lock(struct nmctx *ctx)
 132 {
 133         if (ctx->lock != NULL)
 134                 ctx->lock(ctx, 1);
 135 }
 136
 137 void
 138 nmctx_unlock(struct nmctx *ctx)
 139 {
 140         if (ctx->lock != NULL)
 141                 ctx->lock(ctx, 0);
 142 }