1*11be35a1SLionel Sambuc /* $NetBSD: k_helper3.c,v 1.3 2012/04/17 21:39:19 martin Exp $ */
2*11be35a1SLionel Sambuc
3*11be35a1SLionel Sambuc /*-
4*11be35a1SLionel Sambuc * Copyright (c) 2012 The NetBSD Foundation, Inc.
5*11be35a1SLionel Sambuc * All rights reserved.
6*11be35a1SLionel Sambuc *
7*11be35a1SLionel Sambuc * This code is derived from software contributed to The NetBSD Foundation
8*11be35a1SLionel Sambuc * by Jukka Ruohonen.
9*11be35a1SLionel Sambuc *
10*11be35a1SLionel Sambuc * Redistribution and use in source and binary forms, with or without
11*11be35a1SLionel Sambuc * modification, are permitted provided that the following conditions
12*11be35a1SLionel Sambuc * are met:
13*11be35a1SLionel Sambuc * 1. Redistributions of source code must retain the above copyright
14*11be35a1SLionel Sambuc * notice, this list of conditions and the following disclaimer.
15*11be35a1SLionel Sambuc * 2. Redistributions in binary form must reproduce the above copyright
16*11be35a1SLionel Sambuc * notice, this list of conditions and the following disclaimer in the
17*11be35a1SLionel Sambuc * documentation and/or other materials provided with the distribution.
18*11be35a1SLionel Sambuc *
19*11be35a1SLionel Sambuc * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
20*11be35a1SLionel Sambuc * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
21*11be35a1SLionel Sambuc * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
22*11be35a1SLionel Sambuc * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
23*11be35a1SLionel Sambuc * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
24*11be35a1SLionel Sambuc * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
25*11be35a1SLionel Sambuc * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
26*11be35a1SLionel Sambuc * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
27*11be35a1SLionel Sambuc * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
28*11be35a1SLionel Sambuc * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
29*11be35a1SLionel Sambuc * POSSIBILITY OF SUCH DAMAGE.
30*11be35a1SLionel Sambuc */
31*11be35a1SLionel Sambuc #include <sys/cdefs.h>
32*11be35a1SLionel Sambuc __RCSID("$NetBSD: k_helper3.c,v 1.3 2012/04/17 21:39:19 martin Exp $");
33*11be35a1SLionel Sambuc
34*11be35a1SLionel Sambuc #include <sys/module.h>
35*11be35a1SLionel Sambuc
36*11be35a1SLionel Sambuc #include <assert.h>
37*11be35a1SLionel Sambuc #include <errno.h>
38*11be35a1SLionel Sambuc #include <stdarg.h>
39*11be35a1SLionel Sambuc #include <stdio.h>
40*11be35a1SLionel Sambuc #include <stdlib.h>
41*11be35a1SLionel Sambuc #include <string.h>
42*11be35a1SLionel Sambuc
43*11be35a1SLionel Sambuc #include <prop/proplib.h>
44*11be35a1SLionel Sambuc
45*11be35a1SLionel Sambuc static int load(const char *, ...);
46*11be35a1SLionel Sambuc
47*11be35a1SLionel Sambuc /*
48*11be35a1SLionel Sambuc * A program that loads a module and returns the errno(2) from modctl(8).
49*11be35a1SLionel Sambuc */
50*11be35a1SLionel Sambuc int
main(int argc,char * argv[])51*11be35a1SLionel Sambuc main(int argc, char *argv[])
52*11be35a1SLionel Sambuc {
53*11be35a1SLionel Sambuc assert(argc == 3);
54*11be35a1SLionel Sambuc
55*11be35a1SLionel Sambuc return load(argv[1], argv[2]);
56*11be35a1SLionel Sambuc }
57*11be35a1SLionel Sambuc
58*11be35a1SLionel Sambuc static __printflike(1, 2) int
load(const char * fmt,...)59*11be35a1SLionel Sambuc load(const char *fmt, ...)
60*11be35a1SLionel Sambuc {
61*11be35a1SLionel Sambuc char filename[MAXPATHLEN], *propsstr, *shortname, *dot;
62*11be35a1SLionel Sambuc prop_dictionary_t props;
63*11be35a1SLionel Sambuc modctl_load_t ml;
64*11be35a1SLionel Sambuc int serrno, rv;
65*11be35a1SLionel Sambuc va_list ap;
66*11be35a1SLionel Sambuc
67*11be35a1SLionel Sambuc props = prop_dictionary_create();
68*11be35a1SLionel Sambuc propsstr = prop_dictionary_externalize(props);
69*11be35a1SLionel Sambuc assert(propsstr != NULL);
70*11be35a1SLionel Sambuc prop_object_release(props);
71*11be35a1SLionel Sambuc
72*11be35a1SLionel Sambuc va_start(ap, fmt);
73*11be35a1SLionel Sambuc (void)vsnprintf(filename, sizeof(filename), fmt, ap);
74*11be35a1SLionel Sambuc va_end(ap);
75*11be35a1SLionel Sambuc
76*11be35a1SLionel Sambuc ml.ml_filename = filename;
77*11be35a1SLionel Sambuc ml.ml_flags = 0;
78*11be35a1SLionel Sambuc ml.ml_props = propsstr;
79*11be35a1SLionel Sambuc ml.ml_propslen = strlen(propsstr);
80*11be35a1SLionel Sambuc
81*11be35a1SLionel Sambuc printf("Loading module %s\n", filename);
82*11be35a1SLionel Sambuc errno = serrno = 0;
83*11be35a1SLionel Sambuc
84*11be35a1SLionel Sambuc rv = modctl(MODCTL_LOAD, &ml);
85*11be35a1SLionel Sambuc
86*11be35a1SLionel Sambuc if (rv != 0)
87*11be35a1SLionel Sambuc serrno = errno;
88*11be35a1SLionel Sambuc
89*11be35a1SLionel Sambuc shortname = strrchr(filename, '/');
90*11be35a1SLionel Sambuc if (shortname != NULL)
91*11be35a1SLionel Sambuc shortname++;
92*11be35a1SLionel Sambuc else
93*11be35a1SLionel Sambuc shortname = filename;
94*11be35a1SLionel Sambuc dot = strrchr(shortname, '.');
95*11be35a1SLionel Sambuc if (dot)
96*11be35a1SLionel Sambuc *dot = 0;
97*11be35a1SLionel Sambuc (void)modctl(MODCTL_UNLOAD, shortname);
98*11be35a1SLionel Sambuc
99*11be35a1SLionel Sambuc free(propsstr);
100*11be35a1SLionel Sambuc
101*11be35a1SLionel Sambuc return serrno;
102*11be35a1SLionel Sambuc }
103