1 /*
2 * Copyright (c) 1999-2016 Apple Inc. All rights reserved.
3 *
4 * @APPLE_LICENSE_HEADER_START@
5 *
6 * "Portions Copyright (c) 1999 Apple Computer, Inc. All Rights
7 * Reserved. This file contains Original Code and/or Modifications of
8 * Original Code as defined in and that are subject to the Apple Public
9 * Source License Version 1.0 (the 'License'). You may not use this file
10 * except in compliance with the License. Please obtain a copy of the
11 * License at http://www.apple.com/publicsource and read it before using
12 * this file.
13 *
14 * The Original Code and all software distributed under the License are
15 * distributed on an 'AS IS' basis, WITHOUT WARRANTY OF ANY KIND, EITHER
16 * EXPRESS OR IMPLIED, AND APPLE HEREBY DISCLAIMS ALL SUCH WARRANTIES,
17 * INCLUDING WITHOUT LIMITATION, ANY WARRANTIES OF MERCHANTABILITY,
18 * FITNESS FOR A PARTICULAR PURPOSE OR NON-INFRINGEMENT. Please see the
19 * License for the specific language governing rights and limitations
20 * under the License."
21 *
22 * @APPLE_LICENSE_HEADER_END@
23 */
24 /*
25 * Mach Operating System
26 * Copyright (c) 1990 Carnegie-Mellon University
27 * Copyright (c) 1989 Carnegie-Mellon University
28 * Copyright (c) 1988 Carnegie-Mellon University
29 * Copyright (c) 1987 Carnegie-Mellon University
30 * All rights reserved. The CMU software License Agreement specifies
31 * the terms and conditions for use and redistribution.
32 */
33
34 /*
35 * Copyright (c) 1980 Regents of the University of California.
36 * All rights reserved.
37 *
38 * Redistribution and use in source and binary forms are permitted
39 * provided that the above copyright notice and this paragraph are
40 * duplicated in all such forms and that any documentation,
41 * advertising materials, and other materials related to such
42 * distribution and use acknowledge that the software was developed
43 * by the University of California, Berkeley. The name of the
44 * University may not be used to endorse or promote products derived
45 * from this software without specific prior written permission.
46 * THIS SOFTWARE IS PROVIDED ``AS IS'' AND WITHOUT ANY EXPRESS OR
47 * IMPLIED WARRANTIES, INCLUDING, WITHOUT LIMITATION, THE IMPLIED
48 * WARRANTIES OF MERCHANTIBILITY AND FITNESS FOR A PARTICULAR PURPOSE.
49 */
50
51 #ifndef lint
52 static char sccsid[] __attribute__((used)) = "@(#)mkmakefile.c 5.21 (Berkeley) 6/18/88";
53 #endif /* not lint */
54
55 /*
56 * Build the makefile for the system, from
57 * the information in the files files and the
58 * additional files for the machine being compiled to.
59 */
60
61 #include <stdio.h>
62 #include <unistd.h> /* for unlink */
63 #include <ctype.h>
64 #include "parser.h"
65 #include "config.h"
66
67 void read_files(void);
68 void do_objs(FILE *fp, const char *msg, int ext, int flags);
69 void do_files(FILE *fp, const char *msg, char ext);
70 void do_machdep(FILE *ofp);
71 void do_rules(FILE *f);
72 void copy_dependencies(FILE *makin, FILE *makout);
73
74 struct file_list *fl_lookup(char *file);
75 struct file_list *fltail_lookup(char *file);
76 struct file_list *new_fent(void);
77
78 void put_source_file_name(FILE *fp, struct file_list *tp);
79
80
81 #define next_word(fp, wd) \
82 { const char *word = get_word(fp); \
83 if (word == (char *)EOF) \
84 return; \
85 else \
86 wd = word; \
87 }
88
89 static struct file_list *fcur;
90 const char *tail(const char *fn);
91 char *allCaps(char *str);
92
93 /*
94 * Lookup a file, by name.
95 */
96 struct file_list *
fl_lookup(char * file)97 fl_lookup(char *file)
98 {
99 struct file_list *fp;
100
101 for (fp = ftab; fp != 0; fp = fp->f_next) {
102 if (eq(fp->f_fn, file)) {
103 return fp;
104 }
105 }
106 return 0;
107 }
108
109 /*
110 * Lookup a file, by final component name.
111 */
112 struct file_list *
fltail_lookup(char * file)113 fltail_lookup(char *file)
114 {
115 struct file_list *fp;
116
117 for (fp = ftab; fp != 0; fp = fp->f_next) {
118 if (eq(tail(fp->f_fn), tail(file))) {
119 return fp;
120 }
121 }
122 return 0;
123 }
124
125 /*
126 * Make a new file list entry
127 */
128 struct file_list *
new_fent(void)129 new_fent(void)
130 {
131 struct file_list *fp;
132
133 fp = (struct file_list *) malloc(sizeof *fp);
134 fp->f_needs = 0;
135 fp->f_next = 0;
136 fp->f_flags = 0;
137 fp->f_type = 0;
138 fp->f_extra = (char *) 0;
139 if (fcur == 0) {
140 fcur = ftab = fp;
141 } else {
142 fcur->f_next = fp;
143 }
144 fcur = fp;
145 return fp;
146 }
147
148 char *COPTS;
149
150 const char *
get_VPATH(void)151 get_VPATH(void)
152 {
153 static char *vpath = NULL;
154
155 if ((vpath == NULL) &&
156 ((vpath = getenv("VPATH")) != NULL) &&
157 (*vpath != ':')) {
158 char *buf = malloc((unsigned)(strlen(vpath) + 2));
159
160 vpath = strcat(strcpy(buf, ":"), vpath);
161 }
162
163 return vpath ? vpath : "";
164 }
165
166
167 /*
168 * Build the makefile from the skeleton
169 */
170 void
makefile(void)171 makefile(void)
172 {
173 FILE *ifp, *ofp;
174 FILE *dfp;
175 char pname[BUFSIZ];
176 char line[BUFSIZ];
177 struct opt *op;
178
179 read_files();
180 (void) sprintf(line, "%s/Makefile.template", config_directory);
181 ifp = fopenp(VPATH, line, pname, "r");
182 if (ifp == 0) {
183 perror(line);
184 exit(1);
185 }
186 dfp = fopen(path("Makefile"), "r");
187 rename(path("Makefile"), path("Makefile.old"));
188 unlink(path("Makefile.old"));
189 ofp = fopen(path("Makefile"), "w");
190 if (ofp == 0) {
191 perror(path("Makefile"));
192 exit(1);
193 }
194 fprintf(ofp, "SOURCE_DIR=%s\n", source_directory);
195
196 fprintf(ofp, "export CONFIG_DEFINES =");
197 if (profiling) {
198 fprintf(ofp, " -DGPROF");
199 }
200
201 for (op = opt; op; op = op->op_next) {
202 if (op->op_value) {
203 fprintf(ofp, " -D%s=\"%s\"", op->op_name, op->op_value);
204 } else {
205 fprintf(ofp, " -D%s", op->op_name);
206 }
207 }
208 fprintf(ofp, "\n");
209 for (op = mkopt; op; op = op->op_next) {
210 if (op->op_value) {
211 fprintf(ofp, "%s=%s\n", op->op_name, op->op_value);
212 } else {
213 fprintf(ofp, "%s\n", op->op_name);
214 }
215 }
216
217 while (fgets(line, BUFSIZ, ifp) != 0) {
218 if (*line == '%') {
219 goto percent;
220 }
221 if (profiling && strncmp(line, "COPTS=", 6) == 0) {
222 char *cp;
223 fprintf(ofp,
224 "GPROF.EX=$(SOURCE_DIR)/machdep/%s/gmon.ex\n", machinename);
225 cp = index(line, '\n');
226 if (cp) {
227 *cp = 0;
228 }
229 cp = line + 6;
230 while (*cp && (*cp == ' ' || *cp == '\t')) {
231 cp++;
232 }
233 COPTS = malloc((unsigned)(strlen(cp) + 1));
234 if (COPTS == 0) {
235 printf("config: out of memory\n");
236 exit(1);
237 }
238 strcpy(COPTS, cp);
239 fprintf(ofp, "%s -pg\n", line);
240 continue;
241 }
242 fprintf(ofp, "%s", line);
243 continue;
244 percent:
245 if (eq(line, "%OBJS\n")) {
246 do_objs(ofp, "OBJS=", -1, 0);
247 } else if (eq(line, "%LIBOBJS\n")) {
248 do_objs(ofp, "LIBOBJS=", -1, LIBRARYDEP);
249 } else if (eq(line, "%CFILES\n")) {
250 do_files(ofp, "CFILES=", 'c');
251 do_objs(ofp, "COBJS=", 'c', 0);
252 } else if (eq(line, "%CXXFILES\n")) {
253 do_files(ofp, "CXXFILES=", 'p');
254 do_objs(ofp, "CXXOBJS=", 'p', 0);
255 } else if (eq(line, "%SFILES\n")) {
256 do_files(ofp, "SFILES=", 's');
257 do_objs(ofp, "SOBJS=", 's', 0);
258 } else if (eq(line, "%MACHDEP\n")) {
259 do_machdep(ofp);
260 } else if (eq(line, "%RULES\n")) {
261 do_rules(ofp);
262 } else {
263 fprintf(stderr,
264 "Unknown %% construct in generic makefile: %s",
265 line);
266 }
267 }
268 if (dfp != NULL) {
269 copy_dependencies(dfp, ofp);
270 (void) fclose(dfp);
271 }
272 (void) fclose(ifp);
273 (void) fclose(ofp);
274 }
275
276 /*
277 * Read in the information about files used in making the system.
278 * Store it in the ftab linked list.
279 */
280 void
read_files(void)281 read_files(void)
282 {
283 FILE *fp;
284 struct file_list *tp, *pf;
285 struct device *dp;
286 struct opt *op;
287 const char *wd;
288 char *this, *needs;
289 const char *devorprof;
290 int options;
291 int not_option;
292 int f_flags;
293 char pname[BUFSIZ];
294 char fname[1024];
295 char *rest = (char *) 0;
296 int nreqs, first = 1, isdup;
297
298 ftab = 0;
299 (void) sprintf(fname, "%s/files", config_directory);
300 openit:
301 fp = fopenp(VPATH, fname, pname, "r");
302 if (fp == 0) {
303 perror(fname);
304 exit(1);
305 }
306 next:
307 options = 0;
308 rest = (char *) 0;
309 /*
310 * filename [ standard | optional ]
311 * [ dev* | profiling-routine ] [ device-driver]
312 */
313 wd = get_word(fp);
314 if (wd == (char *)EOF) {
315 (void) fclose(fp);
316 if (first == 1) {
317 (void) sprintf(fname, "%s/files.%s", config_directory, machinename);
318 first++;
319 goto openit;
320 }
321 return;
322 }
323 if (wd == 0) {
324 goto next;
325 }
326 /*
327 * Allow comment lines beginning witha '#' character.
328 */
329 if (*wd == '#') {
330 while ((wd = get_word(fp)) && wd != (char *)EOF) {
331 ;
332 }
333 goto next;
334 }
335
336 this = ns(wd);
337 next_word(fp, wd);
338 if (wd == 0) {
339 printf("%s: No type for %s.\n",
340 fname, this);
341 exit(1);
342 }
343 if ((pf = fl_lookup(this)) && (pf->f_type != INVISIBLE || pf->f_flags)) {
344 isdup = 1;
345 } else {
346 isdup = 0;
347 }
348 tp = 0;
349 nreqs = 0;
350 devorprof = "";
351 needs = 0;
352 f_flags = 0;
353 if (eq(wd, "standard")) {
354 goto checkdev;
355 }
356 if (!eq(wd, "optional")) {
357 printf("%s: %s must be optional or standard\n", fname, this);
358 exit(1);
359 }
360 if (strncmp(this, "OPTIONS/", 8) == 0) {
361 options++;
362 }
363 not_option = 0;
364 nextopt:
365 next_word(fp, wd);
366 if (wd == 0) {
367 goto doneopt;
368 }
369 if (eq(wd, "not")) {
370 not_option = !not_option;
371 goto nextopt;
372 }
373 devorprof = wd;
374 if (eq(wd, "device-driver") || eq(wd, "profiling-routine")) {
375 next_word(fp, wd);
376 goto save;
377 }
378 if (eq(wd, "xnu-library")) {
379 f_flags |= LIBRARYDEP;
380 goto nextopt;
381 }
382 if (eq(wd, "bound-checks")) {
383 f_flags |= BOUND_CHECKS;
384 goto nextopt;
385 }
386 if (eq(wd, "bound-checks-soft")) {
387 if (f_flags & BOUND_CHECKS_DEBUG) {
388 printf("%s: cannot combine bound-checks-soft and bound-checks-debug\n", fname);
389 exit(1);
390 }
391 f_flags |= BOUND_CHECKS | BOUND_CHECKS_SOFT;
392 goto nextopt;
393 }
394 if (eq(wd, "bound-checks-debug")) {
395 if (f_flags & BOUND_CHECKS_SOFT) {
396 printf("%s: cannot combine bound-checks-soft and bound-checks-debug\n", fname);
397 exit(1);
398 }
399 f_flags |= BOUND_CHECKS | BOUND_CHECKS_DEBUG;
400 goto nextopt;
401 }
402 nreqs++;
403 if (needs == 0 && nreqs == 1) {
404 needs = ns(wd);
405 }
406 if (isdup) {
407 goto invis;
408 }
409 if (options) {
410 struct opt *lop = 0;
411 struct device tdev;
412
413 /*
414 * Allocate a pseudo-device entry which we will insert into
415 * the device list below. The flags field is set non-zero to
416 * indicate an internal entry rather than one generated from
417 * the configuration file. The slave field is set to define
418 * the corresponding symbol as 0 should we fail to find the
419 * option in the option list.
420 */
421 init_dev(&tdev);
422 tdev.d_name = ns(wd);
423 tdev.d_type = PSEUDO_DEVICE;
424 tdev.d_flags++;
425 tdev.d_slave = 0;
426
427 for (op = opt; op; lop = op, op = op->op_next) {
428 char *od = allCaps(ns(wd));
429
430 /*
431 * Found an option which matches the current device
432 * dependency identifier. Set the slave field to
433 * define the option in the header file.
434 */
435 if (strcmp(op->op_name, od) == 0) {
436 tdev.d_slave = 1;
437 if (lop == 0) {
438 opt = op->op_next;
439 } else {
440 lop->op_next = op->op_next;
441 }
442 free(op);
443 op = 0;
444 }
445 free(od);
446 if (op == 0) {
447 break;
448 }
449 }
450 newdev(&tdev);
451 }
452 for (dp = dtab; dp != 0; dp = dp->d_next) {
453 if (eq(dp->d_name, wd) && (dp->d_type != PSEUDO_DEVICE || dp->d_slave)) {
454 if (not_option) {
455 goto invis; /* dont want file if option present */
456 } else {
457 goto nextopt;
458 }
459 }
460 }
461 if (not_option) {
462 goto nextopt; /* want file if option missing */
463 }
464 for (op = opt; op != 0; op = op->op_next) {
465 if (op->op_value == 0 && opteq(op->op_name, wd)) {
466 if (nreqs == 1) {
467 free(needs);
468 needs = 0;
469 }
470 goto nextopt;
471 }
472 }
473
474 invis:
475 while ((wd = get_word(fp)) != 0) {
476 ;
477 }
478 if (tp == 0) {
479 tp = new_fent();
480 }
481 tp->f_fn = this;
482 tp->f_type = INVISIBLE;
483 tp->f_needs = needs;
484 tp->f_flags = isdup;
485 goto next;
486
487 doneopt:
488 if (nreqs == 0) {
489 printf("%s: what is %s optional on?\n",
490 fname, this);
491 exit(1);
492 }
493
494 checkdev:
495 if (wd) {
496 if (*wd == '|') {
497 goto getrest;
498 }
499 next_word(fp, wd);
500 while (wd) {
501 if (eq(wd, "xnu-library")) {
502 f_flags |= LIBRARYDEP;
503 next_word(fp, wd);
504 continue;
505 }
506 if (eq(wd, "bound-checks")) {
507 f_flags |= BOUND_CHECKS;
508 next_word(fp, wd);
509 continue;
510 }
511 if (eq(wd, "bound-checks-soft")) {
512 if (f_flags & BOUND_CHECKS_DEBUG) {
513 printf("%s: cannot combine bound-checks-soft and bound-checks-debug\n", fname);
514 exit(1);
515 }
516 f_flags |= BOUND_CHECKS | BOUND_CHECKS_SOFT;
517 next_word(fp, wd);
518 continue;
519 }
520 if (eq(wd, "bound-checks-debug")) {
521 if (f_flags & BOUND_CHECKS_SOFT) {
522 printf("%s: cannot combine bound-checks-soft and bound-checks-debug\n", fname);
523 exit(1);
524 }
525 f_flags |= BOUND_CHECKS | BOUND_CHECKS_DEBUG;
526 next_word(fp, wd);
527 continue;
528 }
529
530 devorprof = wd;
531 next_word(fp, wd);
532 break;
533 }
534 }
535
536 save:
537 getrest:
538 if (wd) {
539 if (*wd == '|') {
540 rest = ns(get_rest(fp));
541 } else {
542 printf("%s: syntax error describing %s\n",
543 fname, this);
544 exit(1);
545 }
546 }
547 if (eq(devorprof, "profiling-routine") && profiling == 0) {
548 goto next;
549 }
550 if (tp == 0) {
551 tp = new_fent();
552 }
553 tp->f_fn = this;
554 tp->f_extra = rest;
555 if (options) {
556 tp->f_type = INVISIBLE;
557 } else if (eq(devorprof, "device-driver")) {
558 tp->f_type = DRIVER;
559 } else if (eq(devorprof, "profiling-routine")) {
560 tp->f_type = PROFILING;
561 } else {
562 tp->f_type = NORMAL;
563 }
564 tp->f_flags = f_flags;
565 tp->f_needs = needs;
566 if (pf && pf->f_type == INVISIBLE) {
567 pf->f_flags = 1; /* mark as duplicate */
568 }
569 goto next;
570 }
571
572 int
opteq(const char * cp,const char * dp)573 opteq(const char *cp, const char *dp)
574 {
575 char c, d;
576
577 for (;; cp++, dp++) {
578 if (*cp != *dp) {
579 c = isupper(*cp) ? tolower(*cp) : *cp;
580 d = isupper(*dp) ? tolower(*dp) : *dp;
581 if (c != d) {
582 return 0;
583 }
584 }
585 if (*cp == 0) {
586 return 1;
587 }
588 }
589 }
590
591 void
put_source_file_name(FILE * fp,struct file_list * tp)592 put_source_file_name(FILE *fp, struct file_list *tp)
593 {
594 if ((tp->f_fn[0] == '.') && (tp->f_fn[1] == '/')) {
595 fprintf(fp, "%s ", tp->f_fn);
596 } else {
597 fprintf(fp, "$(SOURCE_DIR)/%s ", tp->f_fn);
598 }
599 }
600
601 void
do_objs(FILE * fp,const char * msg,int ext,int flags)602 do_objs(FILE *fp, const char *msg, int ext, int flags)
603 {
604 struct file_list *tp;
605 int lpos, len;
606 char *cp;
607 char och;
608 const char *sp;
609
610 fprintf(fp, "%s", msg);
611 lpos = strlen(msg);
612 for (tp = ftab; tp != 0; tp = tp->f_next) {
613 if (tp->f_type == INVISIBLE) {
614 continue;
615 }
616
617 /*
618 * Check flags (if any)
619 */
620 if (flags && ((tp->f_flags & flags) != flags)) {
621 continue;
622 }
623
624 /*
625 * Check for '.o' file in list
626 */
627 cp = tp->f_fn + (len = strlen(tp->f_fn)) - 1;
628 if (ext != -1 && *cp != ext) {
629 continue;
630 } else if (*cp == 'o') {
631 if (len + lpos > 72) {
632 lpos = 8;
633 fprintf(fp, "\\\n\t");
634 }
635 put_source_file_name(fp, tp);
636 fprintf(fp, " ");
637 lpos += len + 1;
638 continue;
639 }
640 sp = tail(tp->f_fn);
641 cp = (char *)sp + (len = strlen(sp)) - 1;
642 och = *cp;
643 *cp = 'o';
644 if (len + lpos > 72) {
645 lpos = 8;
646 fprintf(fp, "\\\n\t");
647 }
648 fprintf(fp, "%s ", sp);
649 lpos += len + 1;
650 *cp = och;
651 }
652 putc('\n', fp);
653 }
654
655 void
do_files(FILE * fp,const char * msg,char ext)656 do_files(FILE *fp, const char *msg, char ext)
657 {
658 struct file_list *tp;
659 int lpos, len = 0; /* dvw: init to 0 */
660
661 fprintf(fp, "%s", msg);
662 lpos = 8;
663 for (tp = ftab; tp != 0; tp = tp->f_next) {
664 if (tp->f_type == INVISIBLE) {
665 continue;
666 }
667 if (tp->f_fn[strlen(tp->f_fn) - 1] != ext) {
668 continue;
669 }
670 /*
671 * Always generate a newline.
672 * Our Makefile's aren't readable anyway.
673 */
674
675 lpos = 8;
676 fprintf(fp, "\\\n\t");
677 put_source_file_name(fp, tp);
678 lpos += len + 1;
679 }
680 putc('\n', fp);
681 }
682
683 /*
684 * Include machine dependent makefile in output
685 */
686
687 void
do_machdep(FILE * ofp)688 do_machdep(FILE *ofp)
689 {
690 FILE *ifp;
691 char pname[BUFSIZ];
692 char line[BUFSIZ];
693
694 (void) sprintf(line, "%s/Makefile.%s", config_directory, machinename);
695 ifp = fopenp(VPATH, line, pname, "r");
696 if (ifp == 0) {
697 perror(line);
698 exit(1);
699 }
700 while (fgets(line, BUFSIZ, ifp) != 0) {
701 if (profiling && (strncmp(line, "LIBS=", 5) == 0)) {
702 fprintf(ofp, "LIBS=${LIBS_P}\n");
703 } else {
704 fputs(line, ofp);
705 }
706 }
707 fclose(ifp);
708 }
709
710 const char *
tail(const char * fn)711 tail(const char *fn)
712 {
713 const char *cp;
714
715 cp = rindex(fn, '/');
716 if (cp == 0) {
717 return fn;
718 }
719 return cp + 1;
720 }
721
722 /*
723 * Create the makerules for each file
724 * which is part of the system.
725 * Devices are processed with the special c2 option -i
726 * which avoids any problem areas with i/o addressing
727 * (e.g. for the VAX); assembler files are processed by as.
728 */
729 void
do_rules(FILE * f)730 do_rules(FILE *f)
731 {
732 char *cp;
733 char *np, och;
734 const char *tp;
735 struct file_list *ftp;
736 const char *extras = ""; /* dvw: init to "" */
737 char *source_dir;
738 char och_upper;
739 const char *nl = "";
740
741 for (ftp = ftab; ftp != 0; ftp = ftp->f_next) {
742 if (ftp->f_type == INVISIBLE) {
743 continue;
744 }
745 cp = (np = ftp->f_fn) + strlen(ftp->f_fn) - 1;
746 och = *cp;
747 /*
748 * Don't compile '.o' files
749 */
750 if (och == 'o') {
751 continue;
752 }
753 /*
754 * Determine where sources should come from
755 */
756 if ((np[0] == '.') && (np[1] == '/')) {
757 source_dir = "";
758 np += 2;
759 } else {
760 source_dir = "$(SOURCE_DIR)/";
761 }
762 *cp = '\0';
763 tp = tail(np); /* dvw: init tp before 'if' */
764 fprintf(f, "-include %sd\n", tp);
765 if (ftp->f_flags & BOUND_CHECKS) {
766 fprintf(f, "%so_CFLAGS_ADD += ${CFLAGS_BOUND_CHECKS}\n", tp);
767 if (ftp->f_flags & BOUND_CHECKS_SOFT) {
768 fprintf(f, "%so_CFLAGS_ADD += ${CFLAGS_BOUND_CHECKS_SOFT}\n", tp);
769 } else if (ftp->f_flags & BOUND_CHECKS_DEBUG) {
770 fprintf(f, "%so_CFLAGS_ADD += ${CFLAGS_BOUND_CHECKS_DEBUG}\n", tp);
771 }
772 }
773 fprintf(f, "%so: %s%s%c\n", tp, source_dir, np, och);
774 if (och == 's') {
775 fprintf(f, "\t${S_RULE_0}\n");
776 fprintf(f, "\t${S_RULE_1A} %s%.*s${S_RULE_1B}%s\n",
777 source_dir, (int)(tp - np), np, nl);
778 fprintf(f, "\t${S_RULE_2}%s\n", nl);
779 continue;
780 }
781 extras = "";
782 switch (ftp->f_type) {
783 case NORMAL:
784 goto common;
785 break;
786
787 case DRIVER:
788 extras = "_D";
789 goto common;
790 break;
791
792 case PROFILING:
793 if (!profiling) {
794 continue;
795 }
796 if (COPTS == 0) {
797 fprintf(stderr,
798 "config: COPTS undefined in generic makefile");
799 COPTS = "";
800 }
801 extras = "_P";
802 goto common;
803
804 common:
805 och_upper = och + 'A' - 'a';
806 fprintf(f, "\t${%c_RULE_0%s}\n", och_upper, extras);
807 fprintf(f, "\t${%c_RULE_1A%s}", och_upper, extras);
808 if (ftp->f_extra) {
809 fprintf(f, "%s", ftp->f_extra);
810 }
811 fprintf(f, " %s%.*s${%c_RULE_1B%s}%s\n",
812 source_dir, (int)(tp - np), np, och_upper, extras, nl);
813
814 fprintf(f, "\t${%c_RULE_2%s}%s\n", och_upper, extras, nl);
815 fprintf(f, "\t${%c_RULE_3%s}%s\n", och_upper, extras, nl);
816 fprintf(f, "\t$(if ${%c_RULE_4A%s},${%c_RULE_4A%s}",
817 och_upper, extras, och_upper, extras);
818 if (ftp->f_extra) {
819 fprintf(f, "%s", ftp->f_extra);
820 }
821 fprintf(f, "%s%.*s${%c_RULE_4B%s}%s)\n",
822 source_dir, (int)(tp - np), np, och_upper, extras, nl);
823 break;
824
825 default:
826 printf("Don't know rules for %s\n", np);
827 break;
828 }
829 *cp = och;
830 }
831 }
832
833 char *
allCaps(char * str)834 allCaps(char *str)
835 {
836 char *cp = str;
837
838 while (*str) {
839 if (islower(*str)) {
840 *str = toupper(*str);
841 }
842 str++;
843 }
844 return cp;
845 }
846
847 #define OLDSALUTATION "# DO NOT DELETE THIS LINE"
848
849 #define LINESIZE 1024
850 static char makbuf[LINESIZE]; /* one line buffer for makefile */
851
852 void
copy_dependencies(FILE * makin,FILE * makout)853 copy_dependencies(FILE *makin, FILE *makout)
854 {
855 int oldlen = (sizeof OLDSALUTATION - 1);
856
857 while (fgets(makbuf, LINESIZE, makin) != NULL) {
858 if (!strncmp(makbuf, OLDSALUTATION, oldlen)) {
859 break;
860 }
861 }
862 while (fgets(makbuf, LINESIZE, makin) != NULL) {
863 if (oldlen != 0) {
864 if (makbuf[0] == '\n') {
865 continue;
866 } else {
867 oldlen = 0;
868 }
869 }
870 fputs(makbuf, makout);
871 }
872 }
873