1 /*
2  * Copyright (c) 1994 University of Maryland
3  * All Rights Reserved.
4  *
5  * Permission to use, copy, modify, distribute, and sell this software and its
6  * documentation for any purpose is hereby granted without fee, provided that
7  * the above copyright notice appear in all copies and that both that
8  * copyright notice and this permission notice appear in supporting
9  * documentation, and that the name of U.M. not be used in advertising or
10  * publicity pertaining to distribution of the software without specific,
11  * written prior permission.  U.M. makes no representations about the
12  * suitability of this software for any purpose.  It is provided "as is"
13  * without express or implied warranty.
14  *
15  * U.M. DISCLAIMS ALL WARRANTIES WITH REGARD TO THIS SOFTWARE, INCLUDING ALL
16  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS, IN NO EVENT SHALL U.M.
17  * BE LIABLE FOR ANY SPECIAL, INDIRECT OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
18  * WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN ACTION
19  * OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF OR IN
20  * CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
21  *
22  * Author: James da Silva, Systems Design and Analysis Group
23  *			   Computer Science Department
24  *			   University of Maryland at College Park
25  *
26  * $FreeBSD$
27  */
28 /*
29  * crunched_main.c - main program for crunched binaries, it branches to a
30  * 	particular subprogram based on the value of argv[0].  Also included
31  *	is a little program invoked when the crunched binary is called via
32  *	its EXECNAME.  This one prints out the list of compiled-in binaries,
33  *	or calls one of them based on argv[1].   This allows the testing of
34  *	the crunched binary without creating all the links.
35  */
36 #include <stdio.h>
37 #include <stdlib.h>
38 #include <string.h>
39 
40 struct stub {
41     char *name;
42     int (*f)();
43 };
44 
45 extern char *__progname;
46 extern struct stub entry_points[];
47 
48 int main(int argc, char **argv, char **envp)
49 {
50     char *slash, *basename;
51     struct stub *ep;
52 
53     if(argv[0] == NULL || *argv[0] == '\0')
54 	crunched_usage();
55 
56     slash = strrchr(argv[0], '/');
57     basename = slash? slash+1 : argv[0];
58 
59     for(ep=entry_points; ep->name != NULL; ep++)
60 	if(!strcmp(basename, ep->name)) break;
61 
62     if(ep->name)
63 	return ep->f(argc, argv, envp);
64     else {
65 	fprintf(stderr, "%s: %s not compiled in\n", EXECNAME, basename);
66 	crunched_usage();
67     }
68 }
69 
70 
71 int crunched_here(char *path)
72 {
73     char *slash, *basename;
74     struct stub *ep;
75 
76     slash = strrchr(path, '/');
77     basename = slash? slash+1 : path;
78 
79     for(ep=entry_points; ep->name != NULL; ep++)
80 	if(!strcmp(basename, ep->name))
81 	    return 1;
82     return 0;
83 }
84 
85 
86 int crunched_main(int argc, char **argv, char **envp)
87 {
88     char *slash;
89     struct stub *ep;
90     int columns, len;
91 
92     if(argc <= 1)
93 	crunched_usage();
94 
95     slash = strrchr(argv[1], '/');
96     __progname = slash? slash+1 : argv[1];
97 
98     return main(--argc, ++argv, envp);
99 }
100 
101 
102 int crunched_usage()
103 {
104     int columns, len;
105     struct stub *ep;
106 
107     fprintf(stderr, "usage: %s <prog> <args> ..., where <prog> is one of:\n",
108 	    EXECNAME);
109     columns = 0;
110     for(ep=entry_points; ep->name != NULL; ep++) {
111 	len = strlen(ep->name) + 1;
112 	if(columns+len < 80)
113 	    columns += len;
114 	else {
115 	    fprintf(stderr, "\n");
116 	    columns = len;
117 	}
118 	fprintf(stderr, " %s", ep->name);
119     }
120     fprintf(stderr, "\n");
121     exit(1);
122 }
123 
124 /* end of crunched_main.c */
125 
126