Initial import from FreeBSD RELENG_4:
[dragonfly.git] / usr.bin / c89 / c89.c
1 /*-
2  * This is the Posix.2 mandated C compiler.  Basically, a hook to the
3  * cc(1) command.
4  *
5  * Copyright (c) 2001 by Jens Schweikhardt
6  *
7  * Redistribution and use in source and binary forms, with or without
8  * modification, are permitted provided that the following conditions
9  * are met:
10  * 1. Redistributions of source code must retain the above copyright
11  *    notice, this list of conditions and the following disclaimer.
12  * 2. Redistributions in binary form must reproduce the above copyright
13  *    notice, this list of conditions and the following disclaimer in the
14  *    documentation and/or other materials provided with the distribution.
15  *
16  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND
17  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
18  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
19  * ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
20  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
21  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
22  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
23  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
24  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
25  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
26  * SUCH DAMAGE.
27  *
28  */
29 #ifndef lint
30 static const char rcsid[] =
31   "$FreeBSD: src/usr.bin/c89/c89.c,v 1.1.2.1 2001/05/22 19:05:01 schweikh Exp $";
32 #endif /* not lint */
33
34 #include <err.h>
35 #include <stdio.h>
36 #include <stdlib.h>
37 #include <string.h>
38
39 #include <unistd.h>
40
41 #define CC "/usr/bin/cc"        /* The big kahuna doing the actual work. */
42 #define N_ARGS_PREPENDED (sizeof(args_prepended) / sizeof(args_prepended[0]))
43
44 /*
45  * We do not add -D_POSIX_SOURCE here because any POSIX source is supposed to
46  * define it before inclusion of POSIX headers. This has the additional
47  * benefit of making c89 -D_ANSI_SOURCE do the right thing (or any other
48  * -D_FOO_SOURCE feature test macro we support.)
49  */
50 static char     *args_prepended[] = {
51         "-std=iso9899:199409",
52         "-pedantic"
53 };
54
55 static void     usage(void);
56
57 /*
58  * Prepend the strings from args_prepended[] to the arg list; parse options,
59  * accepting only the POSIX c89 mandated options. Then exec cc to do the
60  * actual work.
61  */
62 int
63 main(int argc, char **argv)
64 {
65         int Argc, i;
66         char **Argv;
67
68         Argc = 0;
69         Argv = malloc((argc + 1 + N_ARGS_PREPENDED) * sizeof *Argv);
70         if (Argv == NULL)
71                 err(1, "malloc");
72         Argv[Argc++] = argv[0];
73         for (i = 0; i < N_ARGS_PREPENDED; ++i)
74                 Argv[Argc++] = args_prepended[i];
75         while ((i = getopt(argc, argv, "cD:EgI:l:L:o:OsU:")) != -1) {
76                 if (i == '?')
77                         usage();
78                 if (i == 'l') {
79                         if (argv[optind - 1][0] == '-') /* -llib */
80                                 optind -= 1;
81                         else                            /* -l lib */
82                                 optind -= 2;
83                         break; /* -llib or -l lib starts the operands. */
84                 }
85         }
86         if (argc == optind) {
87                 warnx("missing operand");
88                 usage();
89         }
90
91         /* Append argv[1..] at the end of Argv[]. */
92         for (i = 1; i <= argc; ++i)
93                 Argv[Argc++] = argv[i];
94         (void)execv(CC, Argv);
95         err(1, "execv(" CC ")");
96 }
97
98 static void
99 usage(void)
100 {
101         fprintf(stderr,
102 "usage: c89 [-c] [-D name[=value]] [...] [-E] [-g] [-I directory ...]\n"
103 "       [-L directory ...] [-o outfile] [-O] [-s] [-U name ...] operand ...\n"
104 "\n"
105 "       where operand is one or more of file.c, file.o, file.a\n"
106 "       or -llibrary\n");
107         exit(1);
108 }