2 * Copyright (c) 1999 Global Technology Associates, Inc.
5 * Redistribution and use in source and binary forms, with or without
6 * modification, are permitted provided that the following conditions
8 * 1. Redistributions of source code must retain the above copyright
9 * notice, this list of conditions and the following disclaimer.
10 * 2. Redistributions in binary form must reproduce the above copyright
11 * notice, this list of conditions and the following disclaimer in the
12 * documentation and/or other materials provided with the distribution.
14 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS``AS IS'' AND
15 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
16 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
17 * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS
18 * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY,
19 * OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT
20 * OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR
21 * BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY,
22 * WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE
23 * OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE,
24 * EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
28 static const char rcsid[] =
32 #include <sys/types.h>
42 #define FN_SRC 0 /* Filename: source */
43 #define FN_OBJ 1 /* Filename: relocatable */
44 #define FN_KGZ 2 /* Filename: executable */
45 #define FN_CNT 3 /* Number of filenames */
47 #define SFX_OBJ ".o" /* Filename suffix: relocatable */
48 #define SFX_KGZ ".kgz" /* Filename suffix: executable */
49 #define SFX_MAX 5 /* Size of larger filename suffix */
51 const char *loader = "/usr/lib/kgzldr.o"; /* Default loader */
52 int format; /* Output format */
54 char *tname; /* Name of temporary file */
56 static void cleanup(void);
57 static void mk_fn(int, const char *, const char *, char *[]);
58 static void usage(void);
64 main(int argc, char *argv[])
66 static char *fn[FN_CNT];
72 tmpdir = getenv("TMPDIR");
73 if (asprintf(&tname, "%s/kgzXXXXXXXXXX",
74 tmpdir == NULL ? _PATH_TMP : tmpdir) == -1)
75 errx(1, "Out of memory");
78 while ((c = getopt(argc, argv, "cvf:l:o:")) != -1)
87 if (!strcmp(optarg, "aout"))
89 else if (!strcmp(optarg, "elf"))
92 errx(1, "%s: Unknown format", optarg);
108 mk_fn(cflag, *argv, output, fn);
109 memset(&kh, 0, sizeof(kh));
113 kgzcmp(&kh, fn[FN_SRC], fn[FN_OBJ]);
116 kgzld(&kh, fn[FN_OBJ], fn[FN_KGZ]);
118 printf("dload=%#x dsize=%#x isize=%#x entry=%#x nsize=%#x\n",
119 kh.dload, kh.dsize, kh.isize, kh.entry, kh.nsize);
124 * Clean up after processing.
134 * Make the required filenames.
137 mk_fn(int cflag, const char *f1, const char *f2, char *fn[])
145 n = sizeof(SFX_OBJ) - 1;
146 if ((size_t)(s - f1) > n && !memcmp(s - n, SFX_OBJ, n)) {
150 fn[i++] = (char *)f1;
151 if (i == FN_OBJ && !cflag) {
152 if ((fd = mkstemp(tname)) == -1)
157 if (!(fn[i] = (char *)f2)) {
158 p = (p = strrchr(f1, '/')) ? p + 1 : f1;
160 if (!(fn[i] = malloc(n + SFX_MAX)))
163 strcpy(fn[i] + n, i == FN_OBJ ? SFX_OBJ : SFX_KGZ);
168 * Display usage information.
174 "usage: kgzip [-cv] [-f format] [-l loader] [-o output] file\n");