1 /*-
2 * SPDX-License-Identifier: BSD-2-Clause
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
30 #include <sys/types.h>
31 #include <sys/stat.h>
32 #include <sys/ioctl.h>
33 #include <sys/mman.h>
34 #include <fcntl.h>
35 #include <stdlib.h>
36 #include <stdio.h>
37 #include <stdarg.h>
38 #include <string.h>
39 #include <unistd.h>
40 #include <errno.h>
41 #include <net/netmap_user.h>
42 #define LIBNETMAP_NOTHREADSAFE
43 #include "libnetmap.h"
44
45 static void
nmctx_default_error(struct nmctx * ctx,const char * errmsg)46 nmctx_default_error(struct nmctx *ctx, const char *errmsg)
47 {
48 (void)ctx;
49 fprintf(stderr, "%s\n", errmsg);
50 }
51
52 static void *
nmctx_default_malloc(struct nmctx * ctx,size_t sz)53 nmctx_default_malloc(struct nmctx *ctx, size_t sz)
54 {
55 (void)ctx;
56 return malloc(sz);
57 }
58
59 static void
nmctx_default_free(struct nmctx * ctx,void * p)60 nmctx_default_free(struct nmctx *ctx, void *p)
61 {
62 (void)ctx;
63 free(p);
64 }
65
66 static struct nmctx nmctx_global = {
67 .verbose = 1,
68 .error = nmctx_default_error,
69 .malloc = nmctx_default_malloc,
70 .free = nmctx_default_free,
71 .lock = NULL,
72 };
73
74 static struct nmctx *nmctx_default = &nmctx_global;
75
76 struct nmctx *
nmctx_get(void)77 nmctx_get(void)
78 {
79 return nmctx_default;
80 }
81
82 struct nmctx *
nmctx_set_default(struct nmctx * ctx)83 nmctx_set_default(struct nmctx *ctx)
84 {
85 struct nmctx *old = nmctx_default;
86 nmctx_default = ctx;
87 return old;
88 }
89
90 #define MAXERRMSG 1000
91 void
nmctx_ferror(struct nmctx * ctx,const char * fmt,...)92 nmctx_ferror(struct nmctx *ctx, const char *fmt, ...)
93 {
94 char errmsg[MAXERRMSG];
95 va_list ap;
96 int rv;
97
98 if (!ctx->verbose)
99 return;
100
101 va_start(ap, fmt);
102 rv = vsnprintf(errmsg, MAXERRMSG, fmt, ap);
103 va_end(ap);
104
105 if (rv > 0) {
106 if (rv < MAXERRMSG) {
107 ctx->error(ctx, errmsg);
108 } else {
109 ctx->error(ctx, "error message too long");
110 }
111 } else {
112 ctx->error(ctx, "internal error");
113 }
114 }
115
116 void *
nmctx_malloc(struct nmctx * ctx,size_t sz)117 nmctx_malloc(struct nmctx *ctx, size_t sz)
118 {
119 return ctx->malloc(ctx, sz);
120 }
121
122 void
nmctx_free(struct nmctx * ctx,void * p)123 nmctx_free(struct nmctx *ctx, void *p)
124 {
125 ctx->free(ctx, p);
126 }
127
128 void
nmctx_lock(struct nmctx * ctx)129 nmctx_lock(struct nmctx *ctx)
130 {
131 if (ctx->lock != NULL)
132 ctx->lock(ctx, 1);
133 }
134
135 void
nmctx_unlock(struct nmctx * ctx)136 nmctx_unlock(struct nmctx *ctx)
137 {
138 if (ctx->lock != NULL)
139 ctx->lock(ctx, 0);
140 }
141