home *** CD-ROM | disk | FTP | other *** search
/ Source Code 1992 March / Source_Code_CD-ROM_Walnut_Creek_March_1992.iso / usenet / altsrcs / 3 / 3918 < prev    next >
Internet Message Format  |  1991-08-28  |  42KB
  1. Xref: wupost comp.unix.xenix.sco:4108 alt.sources:3918
  2. Path: wupost!uunet!mcsun!ukc!stl!robobar!ronald
  3. From: Steve.Bleazard@robobar.Co.Uk
  4. Newsgroups: comp.unix.xenix.sco,alt.sources
  5. Subject: Xenix Patch Kit for GAS 1.38.1/GCC 1.40/GDB 3.5 (part 3/4)
  6. Message-ID: <Xenix/gcc-1.40.pch@robobar.co.uk>
  7. Date: 27 Aug 91 14:27:13 GMT
  8. Sender: ronald@robobar.co.uk (Ronald S H Khoo)
  9. Organization: Robobar Ltd., Perivale, Middx., ENGLAND.
  10. Lines: 1351
  11. X-Md4-Signature: e1d76c98f31452d65b8c0e7ece839772
  12.  
  13. Archive-Name: Xenix/gcc-1.40.pch
  14.  
  15. This is part 3 of a 4 part posting.
  16. Part 1 (the README) describes this package
  17.  
  18. *** gcc-1.40/Makefile    Mon Jul 29 13:15:49 1991
  19. --- Makefile    Mon Jul 29 13:45:38 1991
  20. ***************
  21. *** 157,162 ****
  22. --- 157,167 ----
  23.   # HARD_PARAMS_FLAGS= -Anansi
  24.   # (Says vasta@apollo.com.)
  25.   
  26. + # To compile GCC with Microsoft CC use the following CFLAGS and then
  27. + # 'make msc'.  Note that the resultant cc1 CANNOT compile with optimization
  28. + # switched on, ie stage 2 should not have '-O' in CFLAGS
  29. + CFLAGS = -g $(XCFLAGS)
  30. + PRAGMA=pragmapack.o
  31.   
  32.   # Dependency on obstack, alloca, malloc or whatever library facilities
  33.   # are not installed in the system libraries.
  34. ***************
  35. *** 192,198 ****
  36.    symout.o dbxout.o sdbout.o emit-rtl.o insn-emit.o \
  37.    integrate.o jump.o cse.o loop.o flow.o stupid.o combine.o \
  38.    regclass.o local-alloc.o global-alloc.o reload.o reload1.o caller-save.o \
  39. !  insn-peep.o final.o recog.o insn-recog.o insn-extract.o insn-output.o
  40.   
  41.   # Files to be copied away after each stage in building.
  42.   STAGE_GCC=gcc
  43. --- 197,203 ----
  44.    symout.o dbxout.o sdbout.o emit-rtl.o insn-emit.o \
  45.    integrate.o jump.o cse.o loop.o flow.o stupid.o combine.o \
  46.    regclass.o local-alloc.o global-alloc.o reload.o reload1.o caller-save.o \
  47. !  insn-peep.o final.o recog.o insn-recog.o insn-extract.o insn-output.o $(PRAGMA)
  48.   
  49.   # Files to be copied away after each stage in building.
  50.   STAGE_GCC=gcc
  51. ***************
  52. *** 239,244 ****
  53. --- 244,257 ----
  54.   # is include the system varargs.h.
  55.   
  56.   all: config.status gnulib gcc cc1 cpp float.h gnulib2 # cc1plus
  57. + msc: config.status gnulib cc1 cpp float.h gcc.msc gnulib2 # cc1plus
  58. + 
  59. + gcc.msc:    cc1 cpp version.o $(LIBDEPS)
  60. +     ./cpp -I/usr/include $(CPPFLAGS) $(INCLUDES) gcc.c > tmpgcc.i
  61. +     -./cc1 -quiet $(CFLAGS) -o tmpgcc.s tmpgcc.i
  62. +     /usr/local/lib/gcc-as -o gcc.o tmpgcc.s
  63. +     rm -f tmpgcc.s
  64. +     $(CC) $(CFLAGS) $(LDFLAGS) -o gcc gcc.o version.o $(LIBS)
  65.   
  66.   # Use this instead of `all' if you need to convert the libraries
  67.   # before you can use the compiler.
  68. ***************
  69. *** 433,440 ****
  70.   # from the GNU Emacs distribution.
  71.   # Note some machines won't allow $(CC) without -S on this source file.
  72.   alloca.o:    alloca.c
  73. !     $(CC) $(CFLAGS) -S `echo $(srcdir)/alloca.c | sed 's,^\./,,'`
  74. !     as alloca.s -o alloca.o
  75.   
  76.   # Now the source files that are generated from the machine description.
  77.   
  78. --- 446,452 ----
  79.   # from the GNU Emacs distribution.
  80.   # Note some machines won't allow $(CC) without -S on this source file.
  81.   alloca.o:    alloca.c
  82. !     $(CC) $(CFLAGS) -c `echo $(srcdir)/alloca.c | sed 's,^\./,,'`
  83.   
  84.   # Now the source files that are generated from the machine description.
  85.   
  86. *** gcc-1.40/Makefile.msc
  87. --- Makefile.msc    Wed Jul 10 16:36:39 1991
  88. ***************
  89. *** 0 ****
  90. --- 1,22 ----
  91. + # Microsoft C 5.1's built in cpp does not grok the large macros.
  92. + # Therefore use the AT&T cpp instead for the files that fail.
  93. + # Use this command line:
  94. + #    make -f Makefile -f Makefile.msc msc ALLOCA=alloca.o
  95. + 
  96. + explow.o:    explow.c
  97. +     /lib/cpp -P ${INCLUDES} explow.c >explow.i
  98. +     mv explow.i x.c
  99. +     cc ${CFLAGS} -c x.c
  100. +     mv x.o explow.o
  101. + 
  102. + reload.o:    reload.c
  103. +     /lib/cpp -P ${INCLUDES} reload.c >reload.i
  104. +     mv reload.i x.c
  105. +     cc ${CFLAGS} -c x.c
  106. +     mv x.o reload.o
  107. + 
  108. + recog.o:    recog.c
  109. +     /lib/cpp -P ${INCLUDES} recog.c >recog.i
  110. +     mv recog.i x.c
  111. +     cc ${CFLAGS} -c x.c
  112. +     mv x.o recog.o
  113. *** gcc-1.40/c-parse.y    Mon Jul 29 13:15:54 1991
  114. --- c-parse.y    Wed Jul 10 15:56:21 1991
  115. ***************
  116. *** 1803,1808 ****
  117. --- 1803,1849 ----
  118.             && getc (finput) == 'm'
  119.             && getc (finput) == 'a'
  120.             && ((c = getc (finput)) == ' ' || c == '\t' || c == '\n'))
  121. + #ifdef PRAGMA_PACK
  122. +       {
  123. +         token = yylex();
  124. +             if (token != IDENTIFIER) 
  125. +             goto skipline;
  126. + 
  127. +             if (strcmp(token_buffer, "pack") != 0)
  128. +                 goto skipline;
  129. +         
  130. +         token = yylex();
  131. +           if (token != '(') {
  132. +             error ("invalid #pragma pack expecting '('");
  133. +             goto skipline;
  134. +         }
  135. + 
  136. +         /* setup default alignment first */
  137. + 
  138. +         pragma_pack_default();
  139. + 
  140. +         token = yylex();
  141. +         if (token != ')')
  142. +         {
  143. +             if (token == CONSTANT
  144. +                 && TREE_CODE (yylval.ttype) == INTEGER_CST) {
  145. +                 int l = TREE_INT_CST_LOW (yylval.ttype);
  146. +                 pragma_pack(l);
  147. +             }
  148. +             else {
  149. +                 error ("invalid #pragma pack expecting 1, 2 or 4");
  150. +                 goto skipline;
  151. +             }
  152. + 
  153. +             token = yylex();
  154. +         }
  155. + 
  156. +           if (token != ')') {
  157. +             error ("invalid #pragma pack expecting ')'");
  158. +             goto skipline;
  159. +         }
  160. +         }
  161. + #endif
  162.           goto skipline;
  163.       }
  164.   
  165. *** gcc-1.40/config/tm-xenix386.h
  166. --- config/tm-xenix386.h    Thu Aug 22 15:28:27 1991
  167. ***************
  168. *** 0 ****
  169. --- 1,146 ----
  170. + /* Definitions for Intel 386 running SCO XENIX 386.
  171. +    Copyright (C) 1988 Free Software Foundation, Inc.
  172. + 
  173. + This file is part of GNU CC.
  174. + 
  175. + GNU CC is free software; you can redistribute it and/or modify
  176. + it under the terms of the GNU General Public License as published by
  177. + the Free Software Foundation; either version 1, or (at your option)
  178. + any later version.
  179. + 
  180. + GNU CC is distributed in the hope that it will be useful,
  181. + but WITHOUT ANY WARRANTY; without even the implied warranty of
  182. + MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  183. + GNU General Public License for more details.
  184. + 
  185. + You should have received a copy of the GNU General Public License
  186. + along with GNU CC; see the file COPYING.  If not, write to
  187. + the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA.  */
  188. + 
  189. + 
  190. + #include "tm-i386.h"
  191. + 
  192. + /* Use the XENIX GAS assembler syntax.  */
  193. + 
  194. + #include "tm-xgas386.h"
  195. + 
  196. + /* By default, target has a 80387 -- XENIX emulates it anyway  */
  197. + 
  198. + #define TARGET_DEFAULT 1
  199. + 
  200. + /* Use crt1.o as a startup file and crtn.o as a closing file.  */
  201. + 
  202. + #define STARTFILE_SPEC  "Sseg.o%s %{!p:Scrt0.o%s} %{p:Smcrt0.o%s}"
  203. + #define STANDARD_STARTFILE_PREFIX_1 "/lib/386/"
  204. + 
  205. + /* -v is appropriate for use with GAS */
  206. + 
  207. + #define ASM_SPEC    "%{v} %{g}"
  208. + 
  209. + #define LIB_SPEC "Slibcfp.a%s Slibc.a%s"
  210. + 
  211. + #define FULL_LINK_SPEC "%{!c:%{!M*:%{!E:%{!S:ld %{o*} %l %{g:-g} \
  212. +  %{A} %{r} %{s} %{u*} \
  213. +  %{!nostdlib:%S} %{L*} %{!o:-o a.out} %o %{!nostdlib:gnulib%s %L gnulib%s}\n \
  214. +   }}}}";
  215. + #define LINK_SPEC "-i"
  216. + 
  217. + /* This is for use with G++.  FASCIST_LDR is defined in G++'s Makefile */
  218. + 
  219. + #ifdef FASCIST_LDR
  220. + 
  221. + #define FULL_COLLECT_SPEC \
  222. +   "%{!c:%{!M*:%{!E:%{!S:collect -o %g.S %g.R\n\
  223. + as %g.S -o %g.O\n\
  224. + ld %{o*} %{!o:-o a.out} %{!nostdlib:%S } %l %{g:-g} \
  225. + %{L*} %o %g.O %{!nostdlib:gnulib++%s gnulib%s %L } \n\
  226. + }}}}"
  227. + 
  228. + #define PLUS_FULL_LINK_SPEC \
  229. +   "%{!c:%{!M*:%{!E:%{!S:ld -o %g.R \
  230. +   %{!nostdlib:%S } %l %{g:-g}\
  231. +   %{L*} %o %{!nostdlib:gnulib++%s gnulib%s g++dummy%s %L }\n }}}}";
  232. + 
  233. + #else /* not FASCIST_LDR */
  234. + 
  235. + #define FULL_COLLECT_SPEC \
  236. +   "%{!c:%{!M*:%{!E:%{!S:collect -o %g.S %g.R\n\
  237. + as %g.S -o %g.O\n\
  238. + ld %{o*} %{!o:-o a.out} %{!nostdlib:%S } %g.R %g.O \
  239. +   %{!nostdlib:gnulib++%s gnulib%s %L } \n\
  240. + }}}}"
  241. + 
  242. + #define PLUS_FULL_LINK_SPEC \
  243. +   "%{!c:%{!M*:%{!E:%{!S:ld -r -o %g.R %l %{g:-g}\
  244. +   %{L*} %o %{!nostdlib:%L }\n }}}}";
  245. + 
  246. + #endif /* not FASCIST_LDR */
  247. + 
  248. + /* Specify predefined symbols in preprocessor.  */
  249. + /* You may wish to add -DM_INTERNAT, depending on your libraries. */
  250. + 
  251. + #define CPP_PREDEFINES "-Dunix \
  252. + -DM_I86 -DM_I86SM -DM_SDATA -DM_STEXT -DM_I386 -DM_XENIX -DM_BITFIELDS \
  253. + -Di386 -DM_XOUT -DM_SYS5 -DM_SYSV -DM_SYS3 -DM_SYSIII \
  254. + -DM_WORDSWAP"
  255. + 
  256. + /* no #sccs in preprocessor.  */
  257. + 
  258. + #undef SCCS_DIRECTIVE
  259. + 
  260. + /* no #ident */
  261. + 
  262. + /* #define ASM_OUTPUT_IDENT(FILE, NAME) fprintf (FILE, "\t.ident \"%s\"\n", NAME); */
  263. + 
  264. + /* We dont want to output SDB debugging information.  */
  265. + 
  266. + #undef SDB_DEBUGGING_INFO
  267. + 
  268. + /* We want to output DBX debugging information, for use with GDB only  */
  269. + 
  270. + #define DBX_DEBUGGING_INFO
  271. + 
  272. + /* Implicit library calls should use memcpy, not bcopy, etc.  */
  273. + 
  274. + #define TARGET_MEM_FUNCTIONS
  275. + 
  276. + /* Writing `int' for a bitfield forces int alignment for the structure.  */
  277. + 
  278. + #undef PCC_BITFIELD_TYPE_MATTERS
  279. + 
  280. + /* Generate an external symbol request for __fltused if 80387 selected */
  281. + 
  282. + #undef ASM_FILE_START
  283. + #define ASM_FILE_START(FILE)                    \
  284. +   { fprintf (FILE, "\t.file\t\"%s\"\n", dump_base_name);     \
  285. +     if (TARGET_80387)                         \
  286. +       fprintf (FILE, "\t.stabs\t\"__fltused\",0,0,0,0\n"); }
  287. + 
  288. + 
  289. + /* Machines that use the AT&T assembler syntax
  290. +    also return floating point values in an FP register.  */
  291. + /* Define how to find the value returned by a function.
  292. +    VALTYPE is the data type of the value (as a tree).
  293. +    If the precise function being called is known, FUNC is its FUNCTION_DECL;
  294. +    otherwise, FUNC is 0.  */
  295. + 
  296. + #define VALUE_REGNO(MODE) \
  297. +   (((MODE)==SFmode || (MODE)==DFmode) ? FIRST_FLOAT_REG : 0)
  298. + 
  299. + /* 1 if N is a possible register number for a function value. */
  300. + 
  301. + #define FUNCTION_VALUE_REGNO_P(N) ((N) == 0 || (N)== FIRST_FLOAT_REG)
  302. + 
  303. + /* Put address tables in data segment */
  304. + 
  305. + #undef ASM_OUTPUT_CASE_LABEL
  306. + #define ASM_OUTPUT_CASE_LABEL(FILE,PREFIX,NUM,JUMPTABLE)    \
  307. +   { data_section();                        \
  308. +     ASM_OUTPUT_INTERNAL_LABEL(FILE,PREFIX,NUM); }
  309. + 
  310. + #undef ASM_OUTPUT_CASE_END
  311. + #define ASM_OUTPUT_CASE_END(FILE,NUM,INSN) text_section()
  312. + 
  313. + #undef FUNCTION_PROFILER
  314. + #define FUNCTION_PROFILER(FILE, LABELNO)  \
  315. +    fprintf (FILE, "\tmovl $%sP%d,%%edx\n\tcall __mcount\n", LPREFIX, (LABELNO));
  316. *** gcc-1.40/config/tm-xgas386.h
  317. --- config/tm-xgas386.h    Wed Jul 10 15:56:17 1991
  318. ***************
  319. *** 0 ****
  320. --- 1,253 ----
  321. + /* Definitions for AT&T assembler syntax for the Intel 80386.
  322. +    Copyright (C) 1988 Free Software Foundation, Inc.
  323. + 
  324. + This file is part of GNU CC.
  325. + 
  326. + GNU CC is free software; you can redistribute it and/or modify
  327. + it under the terms of the GNU General Public License as published by
  328. + the Free Software Foundation; either version 1, or (at your option)
  329. + any later version.
  330. + 
  331. + GNU CC is distributed in the hope that it will be useful,
  332. + but WITHOUT ANY WARRANTY; without even the implied warranty of
  333. + MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  334. + GNU General Public License for more details.
  335. + 
  336. + You should have received a copy of the GNU General Public License
  337. + along with GNU CC; see the file COPYING.  If not, write to
  338. + the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA.  */
  339. + 
  340. + 
  341. + #ifdef PRAGMA_PACK
  342. + #define TARGET_VERSION fprintf (stderr, " (80386, Xenix GAS syntax, #pragma pack() support included)");
  343. + #else
  344. + #define TARGET_VERSION fprintf (stderr, " (80386, Xenix GAS syntax)");
  345. + #endif
  346. + 
  347. + /* Define the syntax of instructions and addresses.  */
  348. + 
  349. + /* Define some concatenation macros to concatenate an opcode
  350. +    and one, two or three operands.  In other assembler syntaxes
  351. +    they may alter the order of ther operands.  */
  352. + 
  353. + #ifdef __STDC__
  354. + #define AS2(a,b,c) #a " " #b "," #c
  355. + #define AS3(a,b,c,d) #a " " #b "," #c "," #d
  356. + #define AS1(a,b) #a " " #b
  357. + #else
  358. + #define AS1(a,b) "a b"
  359. + #define AS2(a,b,c) "a b,c"
  360. + #define AS3(a,b,c,d) "a b,c,d"
  361. + #endif  
  362. + 
  363. + /* Output the size-letter for an opcode.
  364. +    CODE is the letter used in an operand spec (L, B, W, S or Q).
  365. +    CH is the corresponding lower case letter
  366. +      (except if CODE is L then CH is `l').  */
  367. + #define PUT_OP_SIZE(CODE,CH,FILE) putc (CH,(FILE))
  368. + 
  369. + /* Opcode suffix for fullword insn.  */
  370. + #define L_SIZE "l"
  371. + 
  372. + /* Prefix for register names in this syntax.  */
  373. + #define RP "%"
  374. + 
  375. + /* Prefix for immediate operands in this syntax.  */
  376. + #define IP "$"
  377. + 
  378. + /* Prefix for internally generated assembler labels.  */
  379. + #define LPREFIX ".L"
  380. + 
  381. + /* Output the prefix for an immediate operand, or for an offset operand.  */
  382. + #define PRINT_IMMED_PREFIX(FILE)  fputs ("$", (FILE))
  383. + #define PRINT_OFFSET_PREFIX(FILE)  fputs ("$", (FILE))
  384. + 
  385. + /* Indirect call instructions should use `*'.  */
  386. + #define USE_STAR 1
  387. + 
  388. + /* Prefix for a memory-operand X.  */
  389. + #define PRINT_PTR(X, FILE)
  390. + 
  391. + /* Delimiters that surround base reg and index reg.  */
  392. + #define ADDR_BEG(FILE) putc('(', (FILE))
  393. + #define ADDR_END(FILE) putc(')', (FILE))
  394. + 
  395. + /* Print an index register (whose rtx is IREG).  */
  396. + #define PRINT_IREG(FILE,IREG) \
  397. +   do                                \
  398. +   { fputs (",", (FILE)); PRINT_REG ((IREG), 0, (FILE)); }    \
  399. +   while (0)
  400. +   
  401. + /* Print an index scale factor SCALE.  */
  402. + #define PRINT_SCALE(FILE,SCALE) \
  403. +   if ((SCALE) != 1) fprintf ((FILE), ",%d", (SCALE))
  404. + 
  405. + /* Print a base/index combination.
  406. +    BREG is the base reg rtx, IREG is the index reg rtx,
  407. +    and SCALE is the index scale factor (an integer).  */
  408. + 
  409. + #define PRINT_B_I_S(BREG,IREG,SCALE,FILE) \
  410. +   { ADDR_BEG (FILE);                 \
  411. +     if (BREG) PRINT_REG ((BREG), 0, (FILE));    \
  412. +     if ((IREG) != 0)                \
  413. +       { PRINT_IREG ((FILE), (IREG));        \
  414. +         PRINT_SCALE ((FILE), (SCALE)); }    \
  415. +     ADDR_END (FILE); }
  416. + 
  417. + /* Define the syntax of pseudo-ops, labels and comments.  */
  418. + 
  419. + /* Assembler pseudos to introduce constants of various size.  */
  420. + 
  421. + #define ASM_BYTE "\t.byte "
  422. + #define ASM_SHORT "\t.value "
  423. + #define ASM_LONG "\t.long "
  424. + #define ASM_DOUBLE "\t.double "
  425. + 
  426. + /* String containing the assembler's comment-starter.  */
  427. + 
  428. + #define COMMENT_BEGIN "/"
  429. + 
  430. + /* Output at beginning of assembler file.  */
  431. + /* The .file command should always begin the output.  */
  432. + 
  433. + #undef ASM_FILE_START
  434. + #define ASM_FILE_START(FILE) \
  435. +   fprintf (FILE, "\t.file\t\"%s\"\n", dump_base_name);
  436. + 
  437. + /* Don't write a `.optim' pseudo; this assembler doesn't handle them.  */
  438. + 
  439. + #undef ASM_FILE_START_1
  440. + #define ASM_FILE_START_1(FILE)
  441. + 
  442. + /* Output to assembler file text saying following lines
  443. +    may contain character constants, extra white space, comments, etc.  */
  444. + 
  445. + #define ASM_APP_ON "/APP\n"
  446. + 
  447. + /* Output to assembler file text saying following lines
  448. +    no longer contain unusual constructs.  */
  449. + 
  450. + #define ASM_APP_OFF "/NO_APP\n"
  451. + 
  452. + /* This is how to output an assembler line
  453. +    that says to advance the location counter by SIZE bytes.  */
  454. + 
  455. + #define ASM_OUTPUT_SKIP(FILE,SIZE)  \
  456. +   fprintf ((FILE), "\t.set .,.+%d\n", (SIZE))
  457. + 
  458. + /* Output before read-only data.  */
  459. + 
  460. + #define TEXT_SECTION_ASM_OP ".text"
  461. + 
  462. + /* Output before writable data.  */
  463. + 
  464. + #define DATA_SECTION_ASM_OP ".data"
  465. + 
  466. + /* Define the syntax of labels and symbol definitions/declarations.  */
  467. + 
  468. + /* This says how to output an assembler line
  469. +    to define a global common symbol.  */
  470. + /* We don't use ROUNDED because the standard compiler doesn't,
  471. +    and the linker gives error messages if a common symbol
  472. +    has more than one length value.  */
  473. + 
  474. + #define ASM_OUTPUT_COMMON(FILE, NAME, SIZE, ROUNDED)  \
  475. + ( fputs (".comm ", (FILE)),            \
  476. +   assemble_name ((FILE), (NAME)),        \
  477. +   fprintf ((FILE), ",%d\n", (SIZE)))
  478. + 
  479. + /* This says how to output an assembler line
  480. +    to define a local common symbol.  */
  481. + 
  482. + /* Try lcomm to generate local bss 
  483. +  *
  484. +  * #define ASM_OUTPUT_LOCAL(FILE, NAME, SIZE, ROUNDED)  \
  485. +  *   (data_section (),                \
  486. +  *    ASM_OUTPUT_LABEL ((FILE), (NAME)),        \
  487. +  *    fprintf ((FILE), "\t.set .,.+%d\n", (ROUNDED)))
  488. +  */
  489. + #define ASM_OUTPUT_LOCAL(FILE, NAME, SIZE, ROUNDED)  \
  490. + ( fputs (".lcomm ", (FILE)),            \
  491. +   assemble_name ((FILE), (NAME)),        \
  492. +   fprintf ((FILE), ",%d\n", (SIZE)))
  493. + 
  494. + 
  495. + /* This is how to output an assembler line
  496. +    that says to advance the location counter
  497. +    by a multiple of 2**LOG bytes.  */
  498. + 
  499. + #define ASM_OUTPUT_ALIGN(FILE,LOG)    \
  500. +      if ((LOG)!=0) fprintf ((FILE), "\t.align %d\n", (LOG))
  501. + 
  502. + /* This is how to store into the string BUF
  503. +    the symbol_ref name of an internal numbered label where
  504. +    PREFIX is the class of label and NUM is the number within the class.
  505. +    This is suitable for output with `assemble_name'.  */
  506. + 
  507. + #define ASM_GENERATE_INTERNAL_LABEL(BUF,PREFIX,NUMBER)    \
  508. +   sprintf ((BUF), "*.%s%d", (PREFIX), (NUMBER))
  509. + 
  510. + /* This is how to output an internal numbered label where
  511. +    PREFIX is the class of label and NUM is the number within the class.  */
  512. + 
  513. + #define ASM_OUTPUT_INTERNAL_LABEL(FILE,PREFIX,NUM)    \
  514. +   fprintf (FILE, ".%s%d:\n", PREFIX, NUM)
  515. + 
  516. + /* This is how to output a reference to a user-level label named NAME.  */
  517. + 
  518. + #define ASM_OUTPUT_LABELREF(FILE,NAME)    \
  519. +   fprintf (FILE, "_%s", NAME)
  520. + 
  521. + /* This is how to output a command to make the user-level label named NAME
  522. +    defined for reference from other files.  */
  523. + 
  524. + #define ASM_GLOBALIZE_LABEL(FILE,NAME)    \
  525. +   (fputs (".globl ", FILE), assemble_name (FILE, NAME), fputs ("\n", FILE))
  526. + 
  527. + /* How to output an ASCII string constant.  */
  528. + 
  529. + #define ASM_OUTPUT_ASCII(FILE, p, size) \
  530. + { int i=0;                         \
  531. +   while (i < size)                    \
  532. +     { if (i%10 == 0) { if (i!=0) fprintf (FILE, "\n");    \
  533. +                fprintf (FILE, ASM_BYTE); }    \
  534. +       else fprintf (FILE, ",");                \
  535. +     fprintf (FILE, "0x%x",(p[i++] & 0377)) ;}    \
  536. +       fprintf (FILE, "\n"); }
  537. + 
  538. + #define EXTRA_SECTIONS in_cdata
  539. + 
  540. + /* Define the additional functions to select our additional sections.  */
  541. + 
  542. + #define CDATA_SECTION_ASM_OP ".data 1"
  543. + 
  544. + #define EXTRA_SECTION_FUNCTIONS                        \
  545. + void                                    \
  546. + cdata_section ()                            \
  547. + {                                    \
  548. +   if (in_section != in_cdata)                        \
  549. +     {                                    \
  550. +       fprintf (asm_out_file, "%s\n", CDATA_SECTION_ASM_OP);        \
  551. +       in_section = in_cdata;                        \
  552. +     }                                \
  553. + }
  554. + 
  555. + /* Given a decl node or constant node, choose the section to output it in
  556. +    and select that section.  */
  557. + 
  558. +        /* following takes  care of constants  emitted from
  559. +       the hash table entries (see above comment)
  560. +        */
  561. + #define SELECT_SECTION_MODE(MODE,RTX) cdata_section();
  562. + #define SELECT_RTX_SECTION(MODE, RTX) cdata_section();
  563. + #define SELECT_SECTION(DECL)                        \
  564. +   { if (TREE_CODE (DECL) == STRING_CST) {                \
  565. +        if (flag_writable_strings)                    \
  566. +           data_section ();                        \
  567. +        else                                \
  568. +         cdata_section ();                        \
  569. +     }                                    \
  570. +     else if (TREE_READONLY (DECL) && ! TREE_VOLATILE (DECL))        \
  571. +       cdata_section ();                            \
  572. +     else                                \
  573. +       data_section (); }
  574. *** gcc-1.40/config/xm-xenix386.h
  575. --- config/xm-xenix386.h    Fri Jul 12 07:43:58 1991
  576. ***************
  577. *** 0 ****
  578. --- 1,55 ----
  579. + /* Configuration for GNU C-compiler for Intel 80386 running SCO Xenix 386
  580. +    Copyright (C) 1988 Free Software Foundation, Inc.
  581. + 
  582. + This file is part of GNU CC.
  583. + 
  584. + GNU CC is free software; you can redistribute it and/or modify
  585. + it under the terms of the GNU General Public License as published by
  586. + the Free Software Foundation; either version 1, or (at your option)
  587. + any later version.
  588. + 
  589. + GNU CC is distributed in the hope that it will be useful,
  590. + but WITHOUT ANY WARRANTY; without even the implied warranty of
  591. + MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  592. + GNU General Public License for more details.
  593. + 
  594. + You should have received a copy of the GNU General Public License
  595. + along with GNU CC; see the file COPYING.  If not, write to
  596. + the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA.  */
  597. + 
  598. + 
  599. + /* #defines that need visibility everywhere.  */
  600. + #define FALSE 0
  601. + #define TRUE 1
  602. + 
  603. + /* This describes the machine the compiler is hosted on.  */
  604. + #define HOST_BITS_PER_CHAR 8
  605. + #define HOST_BITS_PER_SHORT 16
  606. + #define HOST_BITS_PER_INT 32
  607. + #define HOST_BITS_PER_LONG 32
  608. + 
  609. + /* Arguments to use with `exit'.  */
  610. + #define SUCCESS_EXIT_CODE 0
  611. + #define FATAL_EXIT_CODE 33
  612. + 
  613. + #define USG
  614. + 
  615. + #ifndef __GNUC__
  616. + #define register auto /* Register variables are broken */
  617. + #endif
  618. + 
  619. + /* target machine dependencies.
  620. +    tm.h is a symbolic link to the actual target specific file.   */
  621. + #include "tm.h"
  622. + 
  623. + #define bcopy(a,b,c) memcpy (b,a,c)
  624. + #define bzero(a,b) memset (a,0,b)
  625. + #define bcmp(a,b,c) memcmp (a,b,c)
  626. + 
  627. + #ifdef __GNUC__
  628. + #define alloca(n) __builtin_alloca(n)
  629. + #endif
  630. + 
  631. + /* Implement Microsoft C compatible #pragma pack() */
  632. + 
  633. + #define PRAGMA_PACK
  634. *** gcc-1.40/config.gcc    Mon Jul 29 13:16:42 1991
  635. --- config.gcc    Wed Jul 10 15:56:16 1991
  636. ***************
  637. *** 331,336 ****
  638. --- 331,340 ----
  639.   #    370)
  640.   #        machine=370
  641.   #        ;;
  642. +     xenix386)        # for SCO Xenix/386
  643. +         cpu_type=i386
  644. +         configuration_file=xm-${machine}.h
  645. +         ;;
  646.       esac
  647.   
  648.           # if cpu_type is not set, define cpu_type to machine.
  649. *** gcc-1.40/gcc.c    Mon Jul 29 13:16:57 1991
  650. --- gcc.c    Fri Jul 12 08:15:31 1991
  651. ***************
  652. *** 303,312 ****
  653. --- 303,316 ----
  654.   };
  655.   
  656.   /* Here is the spec for running the linker, after compiling all files.  */
  657. + #ifdef FULL_LINK_SPEC
  658. + char *link_spec = FULL_LINK_SPEC
  659. + #else
  660.   char *link_spec = "%{!c:%{!M*:%{!E:%{!S:ld %{o*} %l\
  661.    %{A} %{d} %{e*} %{N} %{n} %{r} %{s} %{S} %{T*} %{t} %{u*} %{X} %{x} %{z}\
  662.    %{y*} %{!A:%{!nostdlib:%S}} \
  663.    %{L*} %o %{!nostdlib:%G gnulib%s %L gnulib%s %{!A:%E}}\n }}}}";
  664. + #endif
  665.   
  666.   /* Accumulate a command (program name and args), and run it.  */
  667.   
  668. ***************
  669. *** 361,368 ****
  670.   #define STANDARD_STARTFILE_PREFIX "/usr/local/lib/"
  671.   #endif /* !defined STANDARD_STARTFILE_PREFIX */
  672.   
  673.   char *standard_startfile_prefix = STANDARD_STARTFILE_PREFIX;
  674. ! char *standard_startfile_prefix_1 = "/lib/";
  675.   char *standard_startfile_prefix_2 = "/usr/lib/";
  676.   
  677.   /* Clear out the vector of arguments (after a command is executed).  */
  678. --- 365,376 ----
  679.   #define STANDARD_STARTFILE_PREFIX "/usr/local/lib/"
  680.   #endif /* !defined STANDARD_STARTFILE_PREFIX */
  681.   
  682. + #ifndef STANDARD_STARTFILE_PREFIX_1
  683. + #define STANDARD_STARTFILE_PREFIX_1 "/lib/"
  684. + #endif /* !defined STANDARD_STARTFILE_PREFIX_1 */
  685. + 
  686.   char *standard_startfile_prefix = STANDARD_STARTFILE_PREFIX;
  687. ! char *standard_startfile_prefix_1 = STANDARD_STARTFILE_PREFIX_1;
  688.   char *standard_startfile_prefix_2 = "/usr/lib/";
  689.   
  690.   /* Clear out the vector of arguments (after a command is executed).  */
  691. ***************
  692. *** 1383,1389 ****
  693.   
  694.   char *
  695.   handle_braces (p)
  696. !      register char *p;
  697.   {
  698.     register char *q;
  699.     char *filter;
  700. --- 1391,1397 ----
  701.   
  702.   char *
  703.   handle_braces (p)
  704. !      char *p;
  705.   {
  706.     register char *q;
  707.     char *filter;
  708. *** gcc-1.40/pragmapack.c
  709. --- pragmapack.c    Wed Jul 10 16:57:32 1991
  710. ***************
  711. *** 0 ****
  712. --- 1,26 ----
  713. + #define DEFAULT_ALIGN    32
  714. + 
  715. + static int pack_align = DEFAULT_ALIGN;
  716. + static int was_pragma = 0;
  717. + 
  718. + pragma_pack(val)
  719. + int val;
  720. + {
  721. +     pack_align = 8 * val;
  722. +     was_pragma = 1;
  723. + }
  724. + 
  725. + pragma_align_val()
  726. + {
  727. +     return pack_align;
  728. + }
  729. + 
  730. + pragma_pack_default()
  731. + {
  732. +     pack_align = DEFAULT_ALIGN;
  733. + }
  734. + 
  735. + int pragma_pack_seen()
  736. + {
  737. +     return was_pragma;
  738. + }
  739. *** gcc-1.40/stor-layout.c    Mon Jul 29 13:17:35 1991
  740. --- stor-layout.c    Wed Jul 10 15:56:23 1991
  741. ***************
  742. *** 514,519 ****
  743. --- 514,523 ----
  744.        or some divisor of it.  */
  745.   
  746.         layout_decl (field, var_size ? size_unit : const_size);
  747. + #ifdef PRAGMA_PACK
  748. +       if (pragma_pack_seen())
  749. +         DECL_ALIGN(field) = MIN(pragma_align_val(), DECL_ALIGN(field));
  750. + #endif
  751.         desired_align = DECL_ALIGN (field);
  752.   
  753.         /* Record must have at least as much alignment as any field.
  754. *** gcc-1.40/c-parse.tab.c    Mon Jul 29 13:21:25 1991
  755. --- c-parse.tab.c    Mon Jul 29 13:53:35 1991
  756. ***************
  757. *** 3201,3206 ****
  758. --- 3205,3251 ----
  759.             && getc (finput) == 'm'
  760.             && getc (finput) == 'a'
  761.             && ((c = getc (finput)) == ' ' || c == '\t' || c == '\n'))
  762. + #ifdef PRAGMA_PACK
  763. +       {
  764. +         token = yylex();
  765. +             if (token != IDENTIFIER) 
  766. +             goto skipline;
  767. + 
  768. +             if (strcmp(token_buffer, "pack") != 0)
  769. +                 goto skipline;
  770. +         
  771. +         token = yylex();
  772. +           if (token != '(') {
  773. +             error ("invalid #pragma pack expecting '('");
  774. +             goto skipline;
  775. +         }
  776. + 
  777. +         /* setup default alignment first */
  778. + 
  779. +         pragma_pack_default();
  780. + 
  781. +         token = yylex();
  782. +         if (token != ')')
  783. +         {
  784. +             if (token == CONSTANT
  785. +                 && TREE_CODE (yylval.ttype) == INTEGER_CST) {
  786. +                 int l = TREE_INT_CST_LOW (yylval.ttype);
  787. +                 pragma_pack(l);
  788. +             }
  789. +             else {
  790. +                 error ("invalid #pragma pack expecting 1, 2 or 4");
  791. +                 goto skipline;
  792. +             }
  793. + 
  794. +             token = yylex();
  795. +         }
  796. + 
  797. +           if (token != ')') {
  798. +             error ("invalid #pragma pack expecting ')'");
  799. +             goto skipline;
  800. +         }
  801. +         }
  802. + #endif
  803.           goto skipline;
  804.       }
  805.   
  806. *** fix.h.xenix
  807. --- fix.h.xenix    Thu Aug 22 21:18:21 1991
  808. ***************
  809. *** 0 ****
  810. --- 1,198 ----
  811. + # @(#) $Id: fix.h.xenix,v 1.3 1991/08/22 05:39:05 ronald Exp $
  812. + #
  813. + # (C) Copyright 1990, 1991 Ronald Khoo <ronald@ibmpcug.co.uk>
  814. + # Permission granted to use or abuse this program for any purpose,
  815. + # provided that all modified copies are clearly marked as such.
  816. + # No warranty is given for the fitness of this program for any purpose.
  817. + #
  818. + # Please treat this file as a document saying what I did and not really
  819. + # a program.  i.e.  Please read it through before considering running it.
  820. + #
  821. + # This is a quick hack to fix the SCO Xenix 386 include files so that
  822. + # they work with gcc at all.  No attempt has been made to do this
  823. + # in a general way whatsoever, and this script was not made with any
  824. + # reference to the GCC fixincludes script:  I still have no idea what
  825. + # that does.  This works (ish) for me.  Your mileage may vary.
  826. + # My include files were from the 2.3.4 operating system and the 2.3.1b
  827. + # development system.
  828. + #
  829. + # What the script does do:
  830. + #
  831. + # * stream edit files from /usr/include and /usr/include/sys
  832. + #   into /usr/local/lib/gcc-include, skipping those which are
  833. + #   provided by GCC.
  834. + # * make all references to M_I386 refer to __M_I386__ instead.
  835. + #   This enables programs compiled with gcc -ansi not to coredump.
  836. + #   This only works with gcc so don't give these hacked .h files to cc !!
  837. + # * put protection #ifdef tests to all files to allow them to be safely
  838. + #   multiply included.
  839. + # * time_t and size_t seem to be typedefed all over the place.  Protect them.
  840. + # * remove definition and use of va_list in stdio.h -- that's bogus.
  841. + #   (SCO has already fixed this one in 2.3.1)
  842. + # * make types of SIG_IGN, etc consistently void * in sys/signal.h
  843. + #   (to be consistent with <signal.h>)
  844. + # * various other individual hacks I've come across.  Note that these
  845. + #   are entirely ad-hoc.  You can find them in the lines starting with
  846. + #   sed_<name>="
  847. + #
  848. + # In particular, the ad-hocery was intended to make rcs 5.5 compile without
  849. + # hacking, even with all the recommended warning options set.
  850. + # It doesn't quite work -- rcs 5.5's configuration script is slightly broken.
  851. + # I hate gratuitous declarations.
  852. + #
  853. + # Note that this is only a beginning.  I keep finding annoyances which
  854. + # have to be fixed by hand.  Many prototypes are wrong in places like
  855. + # <stdio.h>, <stdlib.h> etc.  An afternoon spent with an editor in one
  856. + # hand and the ANSI standard in the other would probably not go amiss.
  857. + #
  858. + # This script will probably fall flat on its face if you've already
  859. + # modified the system include files to do what it wants to do.
  860. + # Starting from a fresh set may be a reasonable approach.
  861. + #
  862. + # $Log: fix.h.xenix,v $
  863. + # Revision 1.3  1991/08/22  05:39:05  ronald
  864. + # pre-release version for gfm@mencon.oz to try out.
  865. + #
  866. + # Revision 1.2  1991/08/19  10:55:30  ronald
  867. + # Interim release for gcc 1.40, beta testers.
  868. + #
  869. + # Revision 1.1  90/04/25  18:51:21  ronald
  870. + # Initial revision
  871. + # 
  872. + 
  873. + PATH=/etc:/bin:/usr/bin export PATH
  874. + 
  875. + # usage: /usr/local/lib/fix.h.xenix
  876. + 
  877. + lib=${lib-/usr/local/lib}
  878. + include=$lib/gcc-include
  879. + stdinc=${stdinc-/usr/include}
  880. + 
  881. + sed_mi386=" -e '/\\([^_]\\)M_I386/s//\\1__M_I386__/g'"
  882. + sed_timet=" -e '/typedef.*[     ]time_t/ {
  883. + i\\
  884. + #ifndef _TIME_T
  885. + i\\
  886. + #define _TIME_T
  887. + a\\
  888. + #endif /* _TIME_T */
  889. + }'"
  890. + sed_sizet=" -e '/typedef.*[     ]size_t/ {
  891. + i\\
  892. + #ifndef _SIZE_T
  893. + i\\
  894. + #define _SIZE_T
  895. + a\\
  896. + #endif /* _SIZE_T */
  897. + }'"
  898. + # No prizes for guessing what this macro is used for.
  899. + # Also, no prizes for guessing which editor I use.
  900. + # :s/^[     ]*\([^( ]*\)[     ]*\((.*\);[     ]*$/    \/\\\\(\1[     ]*\\\\)([^)][^)]*)\/s\/\/\\\\1 \2\//
  901. + #
  902. + sed_param=" -e '
  903. +     /\(\/\*[^/]*\)\/\*/s//\1 *\/ \/*/
  904. +     /^\/\*.*\/\*.*pdp11[     ]*\$/s/\$/*\//
  905. + '"
  906. + sed_errno=" -e '
  907. +     /\\(perror[     ]*\\)([^)][^)]*)/s//\\1 ( const char * )/
  908. + '"
  909. + sed_stdlib=" -e '
  910. +     /\\(getenv[     ]*\\)([^)][^)]*)/s//\\1 (const char *)/
  911. +     /\\(atoi[     ]*\\)([^)][^)]*)/s//\\1 (const char *)/
  912. +     /.*\\(free[     ]*\\)([^)][^)]*)/s//extern void \\1 ( void * )/
  913. +     /.*\\(malloc[     ]*\\)([^)][^)]*)/s//extern void *\\1 (unsigned)/
  914. +     /.*\\(realloc[     ]*\\)([^)][^)]*)/s//extern void *\\1 (void *, unsigned)/
  915. +     /.*\\(calloc[     ]*\\)([^)][^)]*)/s//extern void *\\1 (unsigned, unsigned)/
  916. + '"
  917. + sed_stdio=" -e '
  918. +     /\\(printf[     ]*\\)([^)][^)]*)/s//\\1 ( const char *, ...)/
  919. +     /\\(fprintf[     ]*\\)([^)][^)]*)/s//\\1 ( FILE *, const char *, ... )/
  920. +     /\\(vfprintf[     ]*\\)([^)][^)]*)/s//\\1 ( FILE *, const char *, char * )/
  921. +     /\\(vprintf[     ]*\\)([^)][^)]*)/s//\\1 ( const char *, char * )/
  922. +     /\\(sprintf[     ]*\\)([^)][^)]*)/s//\\1 ( char *, const char *, ... )/
  923. +     /\\(vsprintf[     ]*\\)([^)][^)]*)/s//\\1 ( char *, const char *, char * )/
  924. +     /\\(fopen[     ]*\\)([^)][^)]*)/s//\\1 ( const char *, const char * )/
  925. +     /\\(fdopen[     ]*\\)([^)][^)]*)/s//\\1 ( int, const char * )/
  926. +     /\\(fputs[     ]*\\)([^)][^)]*)/s//\\1 ( const char *, FILE * )/
  927. +     /\\(fread[     ]*\\)([^)][^)]*)/s//\\1 ( void *, size_t, size_t, FILE * )/
  928. +     /\\(fwrite[     ]*\\)([^)][^)]*)/s//\\1 ( const void *, size_t, size_t, FILE * )/
  929. +     /typedef.*va_list/d
  930. +     /va_list/s//char */
  931. + '"
  932. + sed_string=" -e '
  933. +      /\\(strlen[     ]*\\)([^)][^)]*)/s//\\1 ( const char * )/
  934. +      /\\(strcat[     ]*\\)([^)][^)]*)/s//\\1 ( char *, const char * )/
  935. +      /\\(strncat[     ]*\\)([^)][^)]*)/s//\\1 ( char *, const char *, int )/
  936. +      /\\(strcpy[     ]*\\)([^)][^)]*)/s//\\1 ( char *, const char * )/
  937. +      /\\(strncpy[     ]*\\)([^)][^)]*)/s//\\1 ( char *, const char *, int )/
  938. +      /\\(strchr[     ]*\\)([^)][^)]*)/s//\\1 ( const char *, int )/
  939. +      /\\(strrchr[     ]*\\)([^)][^)]*)/s//\\1 ( const char *, int )/
  940. +      /\\(strcmp[     ]*\\)([^)][^)]*)/s//\\1 ( const char *, const char * )/
  941. +      /\\(strncmp[     ]*\\)([^)][^)]*)/s//\\1 ( const char *, const char *, int )/
  942. +     /define.*strerror.*;[     ]*\$/s/;[     ]*\$//
  943. + '"
  944. + sed_signal=" -e '/int.*(\\*)/s/int/void/g'"
  945. + sed_error=" -e '/^[     ]*ERROR[     ]\\(.*\\)\$/ {
  946. + s//\\1/
  947. + s/\"//g
  948. + s/[     ][     ]*/ /g
  949. + s/.*/    #error \"&\"/
  950. + }'"
  951. + 
  952. + hackit()
  953. + {
  954. +     echo "\r                         \rHacking $1\c"  >&2 
  955. +     idemp=
  956. +     expr "`sed 1q $1`" : '.*ifn.*_H.*' > /dev/null && idemp=yes
  957. +     test "$idemp" || {
  958. +         name=_INCLUDED_`echo $1 | tr './[a-z]' '__[A-Z]'`_AUTOFIX
  959. +         echo "#ifndef $name" > $include/$1
  960. +         echo "#define $name" >> $include/$1
  961. +     }
  962. +     script="$sed_mi386"
  963. +     grep -s size_t $1 > /dev/null &&
  964. +         grep -s _SIZE_T $1 > /dev/null || script="$script $sed_sizet"
  965. +     grep -s time_t $1 > /dev/null &&
  966. +         grep -s _TIME_T $1 > /dev/null || script="$script $sed_timet"
  967. +     case $1 in
  968. +         errno.h)    script="$script $sed_errno"    ;;
  969. +         stdlib.h)    script="$script $sed_stdlib"    ;;
  970. +         string.h)    script="$script $sed_string"    ;;
  971. +         stdio.h)    script="$script $sed_errno $sed_stdio"    ;;
  972. +         sys/param.h)    script="$script $sed_param"    ;;
  973. +         sys/signal.h)    script="$script $sed_signal"    ;;
  974. +         curses.h|sys/emap.h|sys/param.h|sys/sxt.h)
  975. +                 script="$script $sed_error"    ;;
  976. +     esac
  977. +     eval sed "$script" $1 >> $include/$1
  978. +     test "$idemp" || echo "#endif /* $name */" >> $include/$1
  979. + }
  980. + 
  981. + [ -d $include ] || mkdir $include
  982. + [ -d $include/sys ] || mkdir $include/sys
  983. + 
  984. + cd $stdinc || exit 1
  985. + echo "\rHacking files from $stdinc into $include" >&2
  986. + 
  987. + # This bit is useful for hacking the sed scripts above.
  988. + # for i in sys/param.h # stdio.h stdlib.h errno.h curses.h string.h 
  989. + # do hackit $i ; done
  990. + # exit 1
  991. + 
  992. + for i in *.h 
  993. + do
  994. +     case $i in
  995. +         # Use the GCC supplied versions of these files:
  996. +         assert.h|float.h|limits.h|stdarg.h|stddef.h|varargs.h)    ;;
  997. +         *) hackit $i ;;
  998. +     esac
  999. + done
  1000. + 
  1001. + echo "\rHacking files from $stdinc/sys into $include/sys" >&2
  1002. + for i in sys/*.h ; do hackit $i ; done
  1003. + 
  1004. + cd $include
  1005. + cd sys ; chgrp bin . *.h ; chmod 664 *.h ; chmod 775 . ; chown bin . *.h
  1006. + cd .. ; chgrp bin . *.h ; chmod 664 *.h ; chmod 775 . ; chown bin . *.h
  1007. + 
  1008. + echo '\r..... done.  Have a nice day.  --Ronald' >&2
  1009. *** fixmin.xenix
  1010. --- fixmin.xenix    Thu Aug 22 21:09:28 1991
  1011. ***************
  1012. *** 0 ****
  1013. --- 1,76 ----
  1014. + # $Id: fixmin.xenix,v 1.1 1991/08/22 20:06:32 ronald Exp $
  1015. + # Change Log is at the end of the file.
  1016. + #
  1017. + # This is the bare minimum of header fixing that I could get away with
  1018. + # in order to compile GCC.  This applies to Xenix 2.3.3 with 2.3.1
  1019. + # Development System.  You're on your own with other versions.
  1020. + # These changes should only be in effect while building gcc.
  1021. + # You should undo them, and replace the fixes with something better
  1022. + # in /usr/local/lib/gcc-include once you've installed gcc.
  1023. + 
  1024. + # usage: fixmin.xenix [ undo ]
  1025. + # If the "undo" parameter is specified, reverses the actions of a
  1026. + # previous run of fixmin.
  1027. + 
  1028. + cd /usr/include
  1029. + 
  1030. + if test "$1" = undo ; then
  1031. +     for i in *.bfm ; do
  1032. +         j=`basename $i .bfm`
  1033. +         mv $i $j
  1034. +         echo restored $j >&2
  1035. +     done
  1036. +     cd sys
  1037. +     for i in *.bfm ; do
  1038. +         j=`basename $i .bfm`
  1039. +         mv $i $j
  1040. +         echo restored sys/$j >&2
  1041. +     done
  1042. +     exit 0
  1043. + fi
  1044. + 
  1045. + for i in stdio.h time.h string.h sys/types.h ; do
  1046. +     if egrep '(_SIZE_T|_TIME_T)' $i  > /dev/null || test -r $i.bfm; then
  1047. +         : do nothing, already there
  1048. +     else
  1049. +         echo fixing $i
  1050. +         sed '/typedef.*[     ]size_t/ {
  1051. + i\
  1052. + #ifndef _SIZE_T
  1053. + i\
  1054. + #define _SIZE_T
  1055. + a\
  1056. + #endif
  1057. + }
  1058. + /typedef.*[     ]time_t/ {
  1059. + i\
  1060. + #ifndef _TIME_T
  1061. + i\
  1062. + #define _TIME_T
  1063. + a\
  1064. + #endif
  1065. + }'        $i > $i.new
  1066. +         mv $i $i.bfm
  1067. +         mv $i.new $i
  1068. +     fi
  1069. + done
  1070. + 
  1071. + if sed 1q stdio.h | grep -s 'ifndef[     ][     ]*FILE' > /dev/null ; then
  1072. +     : do nothing -- already there.
  1073. + else
  1074. +     echo stdio.h once more ...
  1075. +     ed stdio.h <<-\EOF
  1076. +         0a
  1077. +         #ifndef FILE
  1078. +         .
  1079. +         $a
  1080. +         #endif
  1081. +         .
  1082. +         w
  1083. + EOF
  1084. + fi
  1085. + #
  1086. + # $Log: fixmin.xenix,v $
  1087. + # Revision 1.1  1991/08/22  20:06:32  ronald
  1088. + # Initial revision
  1089. + #
  1090. *** xenixld.c
  1091. --- xenixld.c    Thu Aug 22 21:17:40 1991
  1092. ***************
  1093. *** 0 ****
  1094. --- 1,264 ----
  1095. + static char rcsid[] = "@(#) $Id: xenixld.c,v 1.2 1991/08/22 20:17:03 ronald Exp $\n";
  1096. + /*
  1097. +  * This is the version distributed by RoboBar limited, currently maintained
  1098. +  * by Ronald Khoo <ronald@ibmpcug.co.uk>
  1099. +  *
  1100. +  * $Log: xenixld.c,v $
  1101. +  * Revision 1.2  1991/08/22  20:17:03  ronald
  1102. +  * Baseline for release with GCC 1.40
  1103. +  * Various mods by Steve, and a hack to prevent loading of COFF files.
  1104. +  *
  1105. +  */
  1106. + /* Linker driver program for Xenix that can handle gcc command lines
  1107. +    Copyright (C) 1990 Christoph Badura
  1108. + 
  1109. +    Comments and buggestions are welcome. Write to bad@flatlin.sub.org.
  1110. + 
  1111. + This file is not part of GNU CC.
  1112. + 
  1113. + This program is free software; you can redistribute it and/or modify
  1114. + it under the terms of the GNU General Public License as published by
  1115. + the Free Software Foundation; either version 1, or (at your option)
  1116. + any later version.
  1117. + 
  1118. + This program is distributed in the hope that it will be useful,
  1119. + but WITHOUT ANY WARRANTY; without even the implied warranty of
  1120. + MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  1121. + GNU General Public License for more details.
  1122. + 
  1123. + You should have received a copy of the GNU General Public License
  1124. + along with GNU CC; see the file COPYING.  If not, write to
  1125. + the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA.
  1126. + 
  1127. + */
  1128. + 
  1129. + #include <stdio.h>
  1130. + 
  1131. + #include "config.h"
  1132. + 
  1133. + #ifdef USG
  1134. + #define R_OK 4
  1135. + #define W_OK 2
  1136. + #define X_OK 1
  1137. + #define vfork fork
  1138. + #endif /* USG */
  1139. + 
  1140. + extern void free ();
  1141. + 
  1142. + /* Default prefixes to attach to command names.  */
  1143. + 
  1144. + #ifndef STANDARD_STARTFILE_PREFIX
  1145. + #define STANDARD_STARTFILE_PREFIX "/usr/local/lib/"
  1146. + #endif /* !defined STANDARD_STARTFILE_PREFIX */
  1147. + 
  1148. + char *standard_startfile_prefix = STANDARD_STARTFILE_PREFIX;
  1149. + char *standard_startfile_prefix_1 = "/lib/386/";
  1150. + char *standard_startfile_prefix_2 = "/usr/lib/";
  1151. + 
  1152. + char * progname;        /* who am i */
  1153. + 
  1154. + fatal (char *msg)
  1155. + {
  1156. +     fprintf (stderr, "%s:%s\n", progname, msg);
  1157. +     exit (1);
  1158. + }
  1159. + 
  1160. + xmalloc (size)
  1161. +      int size;
  1162. + {
  1163. +   register int value = malloc (size);
  1164. +   if (!value)
  1165. +     fatal ("Virtual memory full.");
  1166. +   return value;
  1167. + }
  1168. + 
  1169. + xrealloc (void *ptr, int size)
  1170. + {
  1171. +   register int value = realloc (ptr, size);
  1172. +   if (!value)
  1173. +     fatal ("Virtual memory full.");
  1174. +   return value;
  1175. + }
  1176. + 
  1177. + struct lib_path {
  1178. +     struct lib_path *next;
  1179. +     int    length;            /* length of following string */
  1180. +     char *path;
  1181. + };
  1182. + 
  1183. + struct lib_path *lib_path;    /* the library search path */
  1184. + 
  1185. + struct lib_path *
  1186. + add_path (char *name, struct lib_path *prev)
  1187. + {
  1188. +     int size;
  1189. +     struct lib_path *lp;
  1190. + 
  1191. + #ifdef DEBUG
  1192. +     fprintf (stderr, "%s: adding %s to library path\n", progname, name);
  1193. + #endif
  1194. +     lp = (struct lib_path *) xmalloc (sizeof (struct lib_path));
  1195. +     lp->next = prev;
  1196. +     lp->length = strlen (name);
  1197. +     lp->path = name;
  1198. +     return lp;
  1199. + }
  1200. + 
  1201. + /*
  1202. +  * Added by Ronald.Khoo@ibmpcug.co.uk:
  1203. +  * SCO systems have two kinds of libraries, OMF and COFF.  XENIX GCC/G++
  1204. +  * only works with OMF, this hack prevents the program accidentally finding
  1205. +  * COFF libraries earlier in the search path from the corresponding OMF one.
  1206. +  */
  1207. + int
  1208. + islib(char *name)
  1209. + {
  1210. +     int i;
  1211. +     FILE *fp = fopen(name, "r");
  1212. +     if (fp == 0)
  1213. +         return 0;
  1214. +     i = getw(fp);
  1215. +     fclose(fp);
  1216. +     return (i & 0xff) == 0x80 /* OMF */ || (i & 0xffff) == 0xff65 /* ar */;
  1217. + }
  1218. + 
  1219. + char *
  1220. + find_library_1 (char *name)
  1221. + {
  1222. +     struct lib_path *lp;
  1223. +     int name_size, size = 0;
  1224. +     char *temp_name = 0;
  1225. +     int win = 0;
  1226. + 
  1227. +     name_size = strlen (name) + 1;
  1228. +     for (lp=lib_path; lp && !win; lp=lp->next) {
  1229. +     if ((lp->length + name_size + 1) > size) {
  1230. +         size = lp->length + name_size + 1;
  1231. +         if (temp_name)
  1232. +         free (temp_name);
  1233. +         temp_name = 0;
  1234. +     }
  1235. +     if (!temp_name)
  1236. +         temp_name = (char *)xmalloc (size);
  1237. +     strcpy (temp_name, lp->path);
  1238. +     if (temp_name[lp->length - 1] != '/')
  1239. +         strcat (temp_name, "/");
  1240. +     strcat (temp_name, name);
  1241. +     win = islib(temp_name);
  1242. + #ifdef DEBUG
  1243. +     fprintf (stderr, "%s: searching %s -> %d\n", progname, temp_name, win);
  1244. + #endif
  1245. +     }
  1246. +     if (win)
  1247. +     return temp_name;
  1248. +     else {
  1249. +     free (temp_name);
  1250. +     return name;
  1251. +     }
  1252. + }
  1253. + 
  1254. + char *
  1255. + find_library (char *name)
  1256. + {
  1257. +     char *temp_name;
  1258. +     char *lib_name;
  1259. + 
  1260. +     temp_name = (char *)xmalloc (strlen (name) + 7); /* 6 chars for "Slib" and ".a" */
  1261. +     strcpy (temp_name, "lib");
  1262. +     strcat (temp_name, name);
  1263. +     strcat (temp_name, ".a");
  1264. +     if ((lib_name = find_library_1 (temp_name)) == temp_name) {
  1265. +     strcpy (temp_name, "Slib"); /* system libraries start with "Slib" */
  1266. +     strcat (temp_name, name);
  1267. +     strcat (temp_name, ".a");
  1268. +     lib_name = find_library_1 (temp_name);
  1269. +     }
  1270. +     free (temp_name);
  1271. + #ifdef DEBUG
  1272. +     fprintf (stderr, "%s: library name is %s\n", progname, lib_name);
  1273. +     fprintf (stderr, "%s: returning %s\n", progname,
  1274. +          (lib_name == temp_name) ? name : lib_name);
  1275. + #endif
  1276. +     return (lib_name == temp_name) ? name : lib_name;
  1277. + }
  1278. + 
  1279. + 
  1280. + char **argbuf;            /* this holds the argument vector for ld */
  1281. + int argbuf_index, argbuf_length;
  1282. + 
  1283. + /* Add one argument to the vector at the end. */
  1284. + 
  1285. + void
  1286. + store_arg (char *arg)
  1287. + {
  1288. +   if (argbuf_index + 1 == argbuf_length)
  1289. +     {
  1290. +       argbuf = (char **) xrealloc (argbuf, (argbuf_length*=2)*sizeof (char *));
  1291. +     }
  1292. + 
  1293. +   argbuf[argbuf_index++] = arg;
  1294. +   argbuf[argbuf_index] = 0;
  1295. + }
  1296. + 
  1297. + /*
  1298. +  * The standard Xenix ld is seriously braindamaged. It does not understand
  1299. +  * -llib options.  So we expand them here and furthermore we process -Lpath
  1300. +  * options as used by the GNU tools.
  1301. +  */
  1302. + 
  1303. + int
  1304. + main (int argc, char **argv)
  1305. + {
  1306. +     int size;
  1307. +     char *lib_name;
  1308. + #ifdef DEBUG
  1309. +     char **argp;
  1310. + #endif
  1311. + 
  1312. +     progname = *argv;
  1313. + 
  1314. +     argbuf_length = 10;
  1315. +     argbuf_index = 0;
  1316. +     argbuf = (char **) xmalloc (argbuf_length * sizeof (char *));
  1317. + 
  1318. +     /* push default library search paths on lib_stack */
  1319. +     lib_path = add_path (standard_startfile_prefix_2, (struct lib_path *)0);
  1320. +     lib_path = add_path (standard_startfile_prefix_1, lib_path);
  1321. +     lib_path = add_path (standard_startfile_prefix, lib_path);
  1322. + 
  1323. +     /*
  1324. +      * Copy argv to argbuf processing -L switches and
  1325. +      * resolving library names. Preserve the order of the arguments.
  1326. +      */
  1327. +     store_arg ("ld"); /* provide argv[0] for ld */
  1328. +     for (++argv; --argc > 0; ++argv) {
  1329. +     if ((*argv)[0] == '-')
  1330. +         switch ((*argv)[1]) {
  1331. +         case 'L':
  1332. +         lib_path = add_path ((*argv)+2, lib_path);
  1333. +         break;
  1334. +         case 'l':
  1335. +         lib_name = find_library ((*argv)+2);
  1336. + #ifdef DEBUG
  1337. +         fprintf (stderr, "%s: found library %s\n", progname, lib_name);
  1338. + #endif
  1339. +         store_arg (lib_name);
  1340. +         break;
  1341. +         default:
  1342. +         store_arg (*argv);
  1343. +         }
  1344. +     else
  1345. +         /* just an input file */
  1346. +         store_arg (*argv);
  1347. +     }
  1348. + #ifdef DEBUG
  1349. +     fprintf (stderr, "%s: linker call: \"", progname);
  1350. +     for (argp=argbuf; *argp; argp++)
  1351. +     fprintf (stderr, "%s ", *argp);
  1352. +     putc ('\n', stderr);
  1353. + #endif
  1354. +     execv ("/bin/ld", argbuf);
  1355. +     /* maybe ld is not ld */
  1356. +     fprintf (stderr, "%s: unable to run /bin/ld", progname);
  1357. +     exit (1);
  1358. + }
  1359. -- 
  1360. Steve.Bleazard@RoboBar.Co.Uk        | Phone:  +44 81 991 1142 x153
  1361. Snr Software Engineer, Robobar Ltd. | Fax:    +44 81 998 8343 (G3)
  1362. 22 Wadsworth Road, Perivale.        |
  1363. Middx., UB6 7JD ENGLAND.            | ...!ukc!robobar!steve
  1364.