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 /*
27  * crunched_main.c - main program for crunched binaries, it branches to a
28  * 	particular subprogram based on the value of argv[0].  Also included
29  *	is a little program invoked when the crunched binary is called via
30  *	its EXECNAME.  This one prints out the list of compiled-in binaries,
31  *	or calls one of them based on argv[1].   This allows the testing of
32  *	the crunched binary without creating all the links.
33  */
34 
35 #include <stdio.h>
36 #include <stdlib.h>
37 #include <string.h>
38 
39 struct stub {
40     char *name;
41     int (*f)();
42 };
43 
44 extern char *__progname;
45 extern struct stub entry_points[];
46 static int crunched_usage(void);
47 
48 int
49 main(int argc, char **argv, char **envp)
50 {
51     char *slash, *basename;
52     struct stub *ep;
53 
54     if(argv[0] == NULL || *argv[0] == '\0')
55 	crunched_usage();
56 
57     slash = strrchr(argv[0], '/');
58     basename = slash? slash+1 : argv[0];
59 
60     for(ep=entry_points; ep->name != NULL; ep++)
61 	if(!strcmp(basename, ep->name)) break;
62 
63     if(ep->name)
64 	return ep->f(argc, argv, envp);
65     else {
66 	fprintf(stderr, "%s: %s not compiled in\n", EXECNAME, basename);
67 	crunched_usage();
68     }
69 }
70 
71 
72 int
73 crunched_here(char *path)
74 {
75     char *slash, *basename;
76     struct stub *ep;
77 
78     slash = strrchr(path, '/');
79     basename = slash? slash+1 : path;
80 
81     for(ep=entry_points; ep->name != NULL; ep++)
82 	if(!strcmp(basename, ep->name))
83 	    return 1;
84     return 0;
85 }
86 
87 
88 int
89 crunched_main(int argc, char **argv, char **envp)
90 {
91     char *slash;
92     int len;
93 
94     if(argc <= 1)
95 	crunched_usage();
96 
97     slash = strrchr(argv[1], '/');
98     __progname = slash? slash+1 : argv[1];
99 
100     return main(--argc, ++argv, envp);
101 }
102 
103 
104 int
105 crunched_usage()
106 {
107     int columns, len;
108     struct stub *ep;
109 
110     fprintf(stderr, "usage: %s <prog> <args> ..., where <prog> is one of:\n",
111 	    EXECNAME);
112     columns = 0;
113     for(ep=entry_points; ep->name != NULL; ep++) {
114 	len = strlen(ep->name) + 1;
115 	if(columns+len < 80)
116 	    columns += len;
117 	else {
118 	    fprintf(stderr, "\n");
119 	    columns = len;
120 	}
121 	fprintf(stderr, " %s", ep->name);
122     }
123     fprintf(stderr, "\n");
124     exit(1);
125 }
126 
127 /* end of crunched_main.c */
128