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 
47 int
48 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
72 crunched_here(char *path)
73 {
74     char *slash, *basename;
75     struct stub *ep;
76 
77     slash = strrchr(path, '/');
78     basename = slash? slash+1 : path;
79 
80     for(ep=entry_points; ep->name != NULL; ep++)
81 	if(!strcmp(basename, ep->name))
82 	    return 1;
83     return 0;
84 }
85 
86 
87 int
88 crunched_main(int argc, char **argv, char **envp)
89 {
90     char *slash;
91     struct stub *ep;
92     int columns, 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