home *** CD-ROM | disk | FTP | other *** search
/ Fresh Fish 9 / FreshFishVol9-CD2.bin / bbs / gnu / binutils-1.8.x-diffs.lha / GNU / diffs / binutils-1.8.x.diffs
Encoding:
Text File  |  1995-04-14  |  130.8 KB  |  4,702 lines
  1. diff -rc --new-file binutils-1.8.x-base/Makefile binutils-1.8.x/Makefile
  2. *** binutils-1.8.x-base/Makefile    Wed Nov 27 22:48:58 1991
  3. --- binutils-1.8.x/Makefile    Thu Jan  1 00:00:00 1970
  4. ***************
  5. *** 1,150 ****
  6. - # Makefile for GNU binary-file utilities
  7. - # select a set of CFLAGS and PROGS, below, depending on the system type
  8. - # Copyright (C) 1989, Free Software Foundation, Inc.
  9. - #
  10. - # This file is part of the GNU binutils.
  11. - # 
  12. - # The GNU binutils are free software; you can redistribute them and/or modify
  13. - # them under the terms of the GNU General Public License as published by
  14. - # the Free Software Foundation; either version 1, or (at your option)
  15. - # any later version.
  16. - # 
  17. - # The GNU binutils are distributed in the hope that they will be useful,
  18. - # but WITHOUT ANY WARRANTY; without even the implied warranty of
  19. - # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  20. - # GNU General Public License for more details.
  21. - # 
  22. - # You should have received a copy of the GNU General Public License
  23. - # along with the GNU binutils; see the file COPYING.  If not, write to
  24. - # the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA.
  25. - 
  26. - 
  27. - GNUCC = gcc -O
  28. - #CC = gcc -O
  29. - bindir=/usr/local/bin
  30. - 
  31. - # for BSD systems
  32. - #CFLAGS = -g
  33. - # Don't add robotussin; it won't compile on BSD or GNU systems.
  34. - # objdump is not here because it (at least used to) not compile
  35. - # on most systems (trouble with N_DATADDR).  I've fixed some of
  36. - # those problems, though.
  37. - PROGS = $(archpfx)gprof $(archpfx)ld $(archpfx)size \
  38. -         $(archpfx)nm $(archpfx)strip $(archpfx)ar $(archpfx)ranlib
  39. - 
  40. - # for USG systems using COFF_ENCAPSULATE
  41. - # also, you will want to make the target libc.a (but it takes a long time)
  42. - # Note that you should leave a copy of `ar' in this directory
  43. - # after you install it, since `ranlib' will try to run it from here.
  44. - CFLAGS = -DWYSE -DUSG -DCOFF_ENCAPSULATE -DPORTAR -DNON_NATIVE -DPIGNAL_MISSING
  45. - PROGS = ld size nm strip ar robotussin objdump ranlib gprof
  46. - SIGNAME = signame.o
  47. - # On ALTOS systems, add -DALTOS to CFLAGS.
  48. - 
  49. - #it's better to move a copy of alloca into your libc than to risk getting some
  50. - #incompatiable functions from -lPW (like index()), but if you
  51. - #want to be lazy, uncomment this line
  52. - ALLOCALIBS = -lPW
  53. - 
  54. - # For HP-UX systems
  55. - # Don't add robotussin; use hpxt instead.
  56. - # Note that you should leave a copy of `ar' in this directory
  57. - # after you install it, since `ranlib' will try to run it from here.
  58. - #CFLAGS = -g -Ihp-include -DUSG -DNON_NATIVE
  59. - #PROGS = ld size nm strip ar ranlib
  60. - #ALLOCALIBS = alloca.o
  61. - 
  62. - # For the NeXT:
  63. - # Set GNUCC = cc
  64. - # Add -DHAVE_VPRINTF -DMACH_O to CFLAGS.
  65. - # Comment out MALLOC below to use the system's malloc().
  66. - 
  67. - # Sun386:
  68. - # After applying these diffs, compile with -DPORTAR -DCOFF_ENCAPSULATE
  69. - # Depending on how you configure gcc, you might also want -Dnounderscore,
  70. - # though I did not wind up using it.
  71. - 
  72. - # If you run out of stack space while running GNU ar or GNU ld (this
  73. - # manifests itself as a segment violation), you should link in alloca.c
  74. - # from the gcc sources, and get rid of the "#define alloca" in ar.c and
  75. - # ld.c; or you could try to get Sun to fix this annoying "feature".
  76. - #CFLAGS = -g -DCOFF_ENCAPSULATE -DPORTAR
  77. - #PROGS = ld size nm strip ar robotussin objdump ranlib gprof
  78. - 
  79. - # nm tries to malloc enough space for the string table.  The old GNU malloc
  80. - # rounds this up to a power of two (e.g. 5M becomes 8M), and so it might 
  81. - # fail unnecessarily.  I've also seen some unix malloc's fail, even when
  82. - # there is enough memory.  So use the new GNU malloc.
  83. - #MALLOC = $(archpfx)gmalloc.o
  84. - 
  85. - GNU_GETOPT = $(archpfx)getopt.o
  86. - GNU_GETOPT_LONG = $(archpfx)getopt.o $(archpfx)getopt1.o
  87. - 
  88. - # C++ demangler
  89. - CPLUS_DEM = $(archpfx)cplus-dem.o
  90. - 
  91. - LIBS=$(MALLOC) $(ALLOCALIBS) $(SIGNAME)
  92. - 
  93. - all: $(PROGS)
  94. - 
  95. - $(archpfx)ld: $(archpfx)ld.o $(GNU_GETOPT_LONG) $(CPLUS_DEM)
  96. - # LIBS is used here since ld needs to use alloca.
  97. - # Alternatively, compile it with GNU C--then the compiler handles alloca.
  98. -     $(CC) $(CFLAGS) -o $(archpfx)ld $(archpfx)ld.o $(GNU_GETOPT_LONG) $(CPLUS_DEM) $(LIBS)
  99. - 
  100. - $(archpfx)size: $(archpfx)size.o
  101. -     $(CC) $(CFLAGS) -o $(archpfx)size $(archpfx)size.o
  102. - 
  103. - $(archpfx)nm: $(archpfx)nm.o $(GNU_GETOPT_LONG) $(CPLUS_DEM) $(MALLOC)
  104. -     $(CC) $(CFLAGS) -o $(archpfx)nm $(archpfx)nm.o \
  105. -         $(GNU_GETOPT_LONG) $(CPLUS_DEM) $(LIBS) $(MALLOC)
  106. - 
  107. - $(archpfx)strip: $(archpfx)strip.o $(GNU_GETOPT_LONG)
  108. -     $(CC) $(CFLAGS) -o $(archpfx)strip $(archpfx)strip.o $(GNU_GETOPT_LONG) $(LIBS)
  109. - 
  110. - $(archpfx)ar: $(archpfx)ar.o
  111. -     $(CC) $(CFLAGS) -o $(archpfx)ar $(archpfx)ar.o $(LIBS)
  112. - 
  113. - $(archpfx)gprof: $(archpfx)gprof.o $(GNU_GETOPT_LONG) $(CPLUS_DEM)
  114. -     $(GNUCC) $(CFLAGS) -o $(archpfx)gprof $(archpfx)gprof.o \
  115. -         $(GNU_GETOPT_LONG) $(CPLUS_DEM) $(LIBS)
  116. - $(archpfx)gprof.o: gprof.c gmon.h 
  117. -     $(GNUCC) $(CFLAGS) -c gprof.c $(OUTPUT_OPTION)
  118. - 
  119. - $(archpfx)ranlib: $(archpfx)ranlib.o $(GNU_GETOPT_LONG)
  120. -     $(CC) $(CFLAGS) -o $(archpfx)ranlib $(archpfx)ranlib.o $(GNU_GETOPT_LONG) $(LIBS)
  121. - $(archpfx)ranlib.o: ranlib.c
  122. -     $(CC) -c $(CFLAGS) -DAR_PROG=\"/usr/local/gnu/binutils/ar\" ranlib.c $(OUTPUT_OPTION)
  123. - 
  124. - $(archpfx)objdump: $(archpfx)objdump.o $(GNU_GETOPT_LONG) a.out.gnu.h
  125. -     $(CC) $(CFLAGS) -o $(archpfx)objdump $(archpfx)objdump.o \
  126. -         $(GNU_GETOPT_LONG) $(LIBS)
  127. - 
  128. - # Robotussin is NOT part of `all'.
  129. - $(archpfx)robotussin: $(archpfx)robotussin.o
  130. -     $(CC) $(CFLAGS) -o $(archpfx)robotussin $(archpfx)robotussin.o
  131. - 
  132. - libc.a: $(archpfx)robotussin libconvert $(archpfx)ar
  133. -     libconvert /lib/libc.a libc.a
  134. - 
  135. - # usg-gnulib is the file gcc makes using the usg compiler
  136. - gnulib: $(archpfx)robotussin libconvert usg-gnulib $(archpfx)ar
  137. -     libconvert usg-gnulib gnulib
  138. - 
  139. - clean:
  140. -     -rm -f *.o core
  141. -     -rm -f $(archpfx)*.o
  142. -     -rm -f $(PROGS)
  143. - 
  144. - dist: binutils.tar.Z
  145. - 
  146. - # Requires GNU tar.
  147. - binutils.tar.Z:
  148. -     cd ..; tar -cohz -f binutils/binutils.tar.Z -T binutils/ARCHLIST
  149. - 
  150. - .PHONY: install
  151. - install: $(PROGS)
  152. -     for file in $(PROGS); do \
  153. -     cp $$file $(bindir)/$${file}.new; \
  154. -     mv $(bindir)/$${file}.new $(bindir)/$$file; \
  155. -     done
  156. --- 0 ----
  157. diff -rc --new-file binutils-1.8.x-base/Makefile.in binutils-1.8.x/Makefile.in
  158. *** binutils-1.8.x-base/Makefile.in    Thu Jan  1 00:00:00 1970
  159. --- binutils-1.8.x/Makefile.in    Wed Nov 16 07:04:04 1994
  160. ***************
  161. *** 0 ****
  162. --- 1,138 ----
  163. + # Makefile for GNU binary-file utilities
  164. + # Copyright (C) 1989, Free Software Foundation, Inc.
  165. + #
  166. + # This file is part of the GNU binutils.
  167. + # 
  168. + # The GNU binutils are free software; you can redistribute them and/or modify
  169. + # them under the terms of the GNU General Public License as published by
  170. + # the Free Software Foundation; either version 1, or (at your option)
  171. + # any later version.
  172. + # 
  173. + # The GNU binutils are distributed in the hope that they will be useful,
  174. + # but WITHOUT ANY WARRANTY; without even the implied warranty of
  175. + # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  176. + # GNU General Public License for more details.
  177. + # 
  178. + # You should have received a copy of the GNU General Public License
  179. + # along with the GNU binutils; see the file COPYING.  If not, write to
  180. + # the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA.
  181. + 
  182. + #### Start of system configuration section. ####
  183. + 
  184. + VPATH = @srcdir@
  185. + srcdir = @srcdir@
  186. + 
  187. + # Common prefix for machine-independent installed files.
  188. + prefix = /gnu
  189. + # Common prefix for machine-dependent installed files.
  190. + exec_prefix = $(prefix)
  191. + 
  192. + # Directory to install executables in.
  193. + bindir = $(exec_prefix)/bin
  194. + # Directory to install libraries in.
  195. + libdir = $(exec_prefix)/lib
  196. + # Directory to install the Info files in.
  197. + infodir = $(prefix)/info
  198. + # Directory to install the man page in.
  199. + mandir = $(prefix)/man/man$(manext)
  200. + # Number to put on the man page filename.
  201. + manext = 1
  202. + 
  203. + # Program to install executables.
  204. + INSTALL_PROGRAM = @INSTALL_PROGRAM@
  205. + # Program to install data like man pages.
  206. + INSTALL_DATA = @INSTALL_DATA@
  207. + # Generic install program.
  208. + INSTALL = @INSTALL@
  209. + 
  210. + CC = @CC@
  211. + CFLAGS = @CFLAGS@
  212. + DEFS = @DEFS@
  213. + LDFLAGS = @LDFLAGS@
  214. + LIBS = @LIBS@
  215. + 
  216. + #### End of system configuration section. ####
  217. + 
  218. + # -I. is needed to find config.h in the build directory.
  219. + .c.o:
  220. +     $(CC) -c -I. -I$(srcdir) $(CFLAGS) $< $(OUTPUT_OPTION)
  221. + 
  222. + #Don't include gprof.
  223. + PROGS = $(archpfx)ld $(archpfx)size \
  224. +         $(archpfx)nm $(archpfx)strip $(archpfx)ar $(archpfx)ranlib
  225. + 
  226. + GNU_GETOPT = $(archpfx)getopt.o
  227. + GNU_GETOPT_LONG = $(archpfx)getopt.o $(archpfx)getopt1.o
  228. + 
  229. + # C++ demangler
  230. + CPLUS_DEM = $(archpfx)cplus-dem.o
  231. + 
  232. + all: $(PROGS)
  233. + 
  234. + $(archpfx)ld: $(archpfx)ld.o $(GNU_GETOPT_LONG) $(CPLUS_DEM)
  235. +     $(CC) $(LDFLAGS) -o $(archpfx)ld $(archpfx)ld.o \
  236. +         $(GNU_GETOPT_LONG) $(CPLUS_DEM) $(LIBS)
  237. + 
  238. + $(archpfx)size: $(archpfx)size.o
  239. +     $(CC) $(LDFLAGS) -o $(archpfx)size $(archpfx)size.o $(LIBS)
  240. + 
  241. + $(archpfx)nm: $(archpfx)nm.o $(GNU_GETOPT_LONG) $(CPLUS_DEM)
  242. +     $(CC) $(LDFLAGS) -o $(archpfx)nm $(archpfx)nm.o \
  243. +         $(GNU_GETOPT_LONG) $(CPLUS_DEM) $(LIBS)
  244. + 
  245. + $(archpfx)strip: $(archpfx)strip.o $(GNU_GETOPT_LONG)
  246. +     $(CC) $(LDFLAGS) -o $(archpfx)strip $(archpfx)strip.o \
  247. +         $(GNU_GETOPT_LONG) $(LIBS)
  248. + 
  249. + $(archpfx)ar: $(archpfx)ar.o
  250. +     $(CC) $(LDFLAGS) -o $(archpfx)ar $(archpfx)ar.o $(LIBS)
  251. + 
  252. + $(archpfx)gprof: $(archpfx)gprof.o $(GNU_GETOPT_LONG) $(CPLUS_DEM)
  253. +     $(CC) $(LDFLAGS) -o $(archpfx)gprof $(archpfx)gprof.o \
  254. +         $(GNU_GETOPT_LONG) $(CPLUS_DEM) $(LIBS)
  255. + 
  256. + $(archpfx)gprof.o: gprof.c gmon.h 
  257. +     $(CC) $(CFLAGS) -c gprof.c $(OUTPUT_OPTION)
  258. + 
  259. + $(archpfx)ranlib: $(archpfx)ranlib.o $(GNU_GETOPT_LONG)
  260. +     $(CC) $(LDFLAGS) -o $(archpfx)ranlib $(archpfx)ranlib.o \
  261. +         $(GNU_GETOPT_LONG) $(LIBS)
  262. + 
  263. + $(archpfx)ranlib.o: ranlib.c
  264. +     $(CC) $(CFLAGS) -c -I. -I$(srcdir) \
  265. +         -DAR_PROG=\"$(bindir)/ar\" $(srcdir)/ranlib.c $(OUTPUT_OPTION)
  266. + 
  267. + $(archpfx)objdump: $(archpfx)objdump.o $(GNU_GETOPT_LONG) a.out.gnu.h
  268. +     $(CC) $(LDFLAGS) -o $(archpfx)objdump $(archpfx)objdump.o \
  269. +         $(GNU_GETOPT_LONG) $(LIBS)
  270. + 
  271. + Makefile: config.status $(srcdir)/Makefile.in
  272. +     $(SHELL) config.status
  273. + 
  274. + # Robotussin is NOT part of `all'.
  275. + $(archpfx)robotussin: $(archpfx)robotussin.o
  276. +     $(CC) $(LDFLAGS) -o $(archpfx)robotussin $(archpfx)robotussin.o
  277. + 
  278. + libc.a: $(archpfx)robotussin libconvert $(archpfx)ar
  279. +     libconvert /lib/libc.a libc.a
  280. + 
  281. + # usg-gnulib is the file gcc makes using the usg compiler
  282. + gnulib: $(archpfx)robotussin libconvert usg-gnulib $(archpfx)ar
  283. +     libconvert usg-gnulib gnulib
  284. + 
  285. + clean:
  286. +     -rm -f *.o core
  287. +     -rm -f $(archpfx)*.o
  288. +     -rm -f $(PROGS)
  289. + 
  290. + dist: binutils.tar.Z
  291. + 
  292. + # Requires GNU tar.
  293. + binutils.tar.Z:
  294. +     cd ..; tar -cohz -f binutils/binutils.tar.Z -T binutils/ARCHLIST
  295. + 
  296. + .PHONY: install
  297. + install: $(PROGS)
  298. +     for file in $(PROGS); do \
  299. +     $(INSTALL_PROGRAM) $${file} $(bindir)/$${file}; \
  300. +     done
  301. diff -rc --new-file binutils-1.8.x-base/Product-Info binutils-1.8.x/Product-Info
  302. *** binutils-1.8.x-base/Product-Info    Thu Jan  1 00:00:00 1970
  303. --- binutils-1.8.x/Product-Info    Mon Jul 11 23:11:22 1994
  304. ***************
  305. *** 0 ****
  306. --- 1,21 ----
  307. + .name
  308. + binutils
  309. + .fullname
  310. + GNU binary file utilities
  311. + .type
  312. + Programmer Tool
  313. + .short
  314. + GNU binary file utilities.
  315. + .description
  316. + Various tools for operating on object and executable files.  Includes "ld",
  317. + "size", "nm", "strip", "ar", "objdump", and "ranlib".
  318. + .version
  319. + 1.8.x
  320. + .author
  321. + Free Software Foundation
  322. + .requirements
  323. + Binary versions require ixemul.library.
  324. + .distribution
  325. + GNU Public License
  326. + .described-by
  327. + Fred Fish (fnf@amigalib.com)
  328. diff -rc --new-file binutils-1.8.x-base/ar.c binutils-1.8.x/ar.c
  329. *** binutils-1.8.x-base/ar.c    Wed Jun 13 05:47:50 1990
  330. --- binutils-1.8.x/ar.c    Sun Mar  5 15:26:32 1995
  331. ***************
  332. *** 736,741 ****
  333. --- 736,742 ----
  334.       {
  335.         if (tail->info.name == 0)
  336.       continue;
  337. + #if 0
  338.         if (!strncmp (tail->info.name, name, 13))
  339.       {
  340.         unsigned int eltlen = strlen (tail->info.name);
  341. ***************
  342. *** 751,756 ****
  343. --- 752,764 ----
  344.           return tail;
  345.           }
  346.       }
  347. + #else
  348. +       /* Don't consider length, the name is shortened later if needed. */
  349. +       if (strcmp (tail->info.name, name) == 0)
  350. +     {
  351. +       return (tail);
  352. +     }
  353. + #endif
  354.       }
  355.   
  356.     return 0;
  357. ***************
  358. *** 992,1002 ****
  359. --- 1000,1020 ----
  360.   #endif
  361.     close (outdesc);
  362.   
  363. + #ifndef amigados
  364.     if (!appendflag)
  365.       if (rename (tempname, archive))
  366.         pfatal_with_name (tempname);
  367.   
  368.     close_archive ();
  369. + #else
  370. +   /* we *have* to close the file before we rename it, because otherwise
  371. +    * AmigaDOS will just abort with OBJECT_IN_USE_ERROR */
  372. +   close_archive ();
  373. + 
  374. +   if (!appendflag)
  375. +     if (rename (tempname, archive))
  376. +       pfatal_with_name (tempname);
  377. + #endif
  378.   }
  379.   
  380.   void
  381. ***************
  382. *** 1005,1029 ****
  383.        struct mapelt *mapelt;
  384.   {
  385.     unsigned int namelen;
  386.   
  387.     /* Zero the header, then store in the data as text.  */
  388.     bzero ((char *) header, sizeof (*header));
  389.   
  390. !   strncpy (header->ar_name, mapelt->info.name, sizeof (header->ar_name));
  391. !   namelen = strlen (mapelt->info.name);
  392.     if (namelen >= sizeof (header->ar_name))
  393.       {
  394. !       if (mapelt->info.name[namelen - 2] == '.' &&
  395. !       mapelt->info.name[namelen - 1] == 'o')
  396.       {
  397.         header->ar_name[sizeof (header->ar_name) - 3] = '.';
  398.         header->ar_name[sizeof (header->ar_name) - 2] = 'o';
  399.       }
  400.         header->ar_name[sizeof (header->ar_name) - 1] = '\0';
  401.         error ("member name `%s' truncated to `%s'",
  402.            mapelt->info.name, header->ar_name);
  403.       }
  404. - 
  405.     sprintf (header->ar_date, "%ld", mapelt->info.date);
  406.     sprintf (header->ar_size, "%d", mapelt->info.size);
  407.     sprintf (header->ar_uid, "%d", mapelt->info.uid);
  408. --- 1023,1063 ----
  409.        struct mapelt *mapelt;
  410.   {
  411.     unsigned int namelen;
  412. +   char *ar_name, *tmp;
  413. +   extern char *strchr ();
  414.   
  415.     /* Zero the header, then store in the data as text.  */
  416.     bzero ((char *) header, sizeof (*header));
  417.   
  418. !   /* Strip off leading directory components of the full pathname
  419. !      until the name either fits, or there are no more components.
  420. !      If the name is still to large, it is truncated from the right
  421. !      end later on. */
  422. !   ar_name = mapelt->info.name;
  423. !   while (((namelen = strlen (ar_name)) >= sizeof (header->ar_name)) &&
  424. !      ((tmp = strchr (ar_name, '/')) != NULL))
  425. !     {
  426. !       ar_name = tmp + 1;
  427. !     }
  428. ! 
  429. !   strncpy (header->ar_name, ar_name, sizeof (header->ar_name));
  430. !   namelen = strlen (ar_name);
  431.     if (namelen >= sizeof (header->ar_name))
  432.       {
  433. !       if (ar_name[namelen - 2] == '.' &&
  434. !       ar_name[namelen - 1] == 'o')
  435.       {
  436.         header->ar_name[sizeof (header->ar_name) - 3] = '.';
  437.         header->ar_name[sizeof (header->ar_name) - 2] = 'o';
  438.       }
  439.         header->ar_name[sizeof (header->ar_name) - 1] = '\0';
  440. +     }
  441. + 
  442. +   if (strncmp (header->ar_name, mapelt->info.name, sizeof (header->ar_name)) != 0)
  443. +     {
  444.         error ("member name `%s' truncated to `%s'",
  445.            mapelt->info.name, header->ar_name);
  446.       }
  447.     sprintf (header->ar_date, "%ld", mapelt->info.date);
  448.     sprintf (header->ar_size, "%d", mapelt->info.size);
  449.     sprintf (header->ar_uid, "%d", mapelt->info.uid);
  450. ***************
  451. *** 1957,1962 ****
  452. --- 1991,1997 ----
  453.        unsigned int size;
  454.   {
  455.     extern char *malloc ();
  456. + 
  457.     char *result = malloc (size);
  458.     if (result == 0)
  459.       fatal ("virtual memory exhausted", 0);
  460. ***************
  461. *** 1969,1974 ****
  462. --- 2004,2010 ----
  463.        unsigned int size;
  464.   {
  465.     extern char *realloc ();
  466. + 
  467.     char *result = realloc (ptr, size);
  468.     if (result == 0)
  469.       fatal ("virtual memory exhausted");
  470. diff -rc --new-file binutils-1.8.x-base/configure binutils-1.8.x/configure
  471. *** binutils-1.8.x-base/configure    Thu Jan  1 00:00:00 1970
  472. --- binutils-1.8.x/configure    Tue Jun 21 22:39:22 1994
  473. ***************
  474. *** 0 ****
  475. --- 1,637 ----
  476. + #!/bin/sh
  477. + # Guess values for system-dependent variables and create Makefiles.
  478. + # Generated automatically using autoconf version 1.11 
  479. + # Copyright (C) 1991, 1992, 1993, 1994 Free Software Foundation, Inc.
  480. + 
  481. + # This configure script is free software; you can redistribute it and/or
  482. + # modify it under the terms of the GNU General Public License as published
  483. + # by the Free Software Foundation; either version 2, or (at your option)
  484. + # any later version.
  485. + 
  486. + # This script is distributed in the hope that it will be useful, but
  487. + # WITHOUT ANY WARRANTY; without even the implied warranty of
  488. + # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General
  489. + # Public License for more details.
  490. + 
  491. + # You should have received a copy of the GNU General Public License
  492. + # along with this program; if not, write to the Free Software
  493. + # Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
  494. + 
  495. + # Save the original args to write them into config.status later.
  496. + configure_args="$*"
  497. + 
  498. + # Only options that might do something get documented.
  499. + ac_usage="Usage: configure [options] [host]
  500. + Options: [defaults in brackets after descriptions]
  501. + --build=BUILD        configure for building on BUILD [BUILD=HOST]
  502. + --disable-FEATURE    do not include FEATURE (same as --enable-FEATURE=no)
  503. + --enable-FEATURE[=ARG]    include FEATURE [ARG=yes]
  504. + --exec-prefix=PREFIX    install host dependent files in PREFIX [/usr/local]
  505. + --help            print this message
  506. + --host=HOST        configure for HOST [guessed]
  507. + --prefix=PREFIX        install host independent files in PREFIX [/usr/local]
  508. + --quiet, --silent    do not print \`checking for...' messages
  509. + --srcdir=DIR        find the sources in DIR [configure dir or ..]
  510. + --target=TARGET        configure for TARGET [TARGET=HOST]
  511. + --verbose        print results of checks
  512. + --version        print the version of autoconf that created configure
  513. + --with-PACKAGE[=ARG]    use PACKAGE [ARG=yes]
  514. + --without-PACKAGE    do not use PACKAGE (same as --with-PACKAGE=no)
  515. + --x-includes=DIR    X include files are in DIR
  516. + --x-libraries=DIR    X library files are in DIR"
  517. + 
  518. + # Initialize some variables set by options.
  519. + # The variables have the same names as the options, with
  520. + # dashes changed to underlines.
  521. + build=NONE
  522. + exec_prefix=
  523. + host=NONE
  524. + no_create=
  525. + nonopt=NONE
  526. + norecursion=
  527. + prefix=
  528. + program_prefix=
  529. + program_suffix=
  530. + program_transform_name=
  531. + silent=
  532. + srcdir=
  533. + target=NONE
  534. + verbose=
  535. + x_includes=
  536. + x_libraries=
  537. + 
  538. + ac_prev=
  539. + for ac_option
  540. + do
  541. + 
  542. +   # If the previous option needs an argument, assign it.
  543. +   if test -n "$ac_prev"; then
  544. +     eval "$ac_prev=\$ac_option"
  545. +     ac_prev=
  546. +     continue
  547. +   fi
  548. + 
  549. +   # Accept (but ignore some of) the important Cygnus configure
  550. +   # options, so we can diagnose typos.
  551. + 
  552. +   case "$ac_option" in
  553. +   -*=*) ac_optarg=`/bin/echo "$ac_option" | sed 's/[-_a-zA-Z0-9]*=//'` ;;
  554. +   *) ac_optarg= ;;
  555. +   esac
  556. + 
  557. +   case "$ac_option" in
  558. + 
  559. +   -build | --build | --buil | --bui | --bu | --b)
  560. +     ac_prev=build ;;
  561. +   -build=* | --build=* | --buil=* | --bui=* | --bu=* | --b=*)
  562. +     build="$ac_optarg" ;;
  563. + 
  564. +   -disable-* | --disable-*)
  565. +     ac_feature=`/bin/echo $ac_option|sed -e 's/-*disable-//'`
  566. +     # Reject names that aren't valid shell variable names.
  567. +     if test -n "`/bin/echo $ac_feature| sed 's/[-a-zA-Z0-9_]//g'`"; then
  568. +       /bin/echo "configure: $ac_feature: invalid feature name" >&2; exit 1
  569. +     fi
  570. +     ac_feature=`/bin/echo $ac_feature| sed 's/-/_/g'`
  571. +     eval "enable_${ac_feature}=no" ;;
  572. + 
  573. +   -enable-* | --enable-*)
  574. +     ac_feature=`/bin/echo $ac_option|sed -e 's/-*enable-//' -e 's/=.*//'`
  575. +     # Reject names that aren't valid shell variable names.
  576. +     if test -n "`/bin/echo $ac_feature| sed 's/[-_a-zA-Z0-9]//g'`"; then
  577. +       /bin/echo "configure: $ac_feature: invalid feature name" >&2; exit 1
  578. +     fi
  579. +     ac_feature=`/bin/echo $ac_feature| sed 's/-/_/g'`
  580. +     case "$ac_option" in
  581. +       *=*) ;;
  582. +       *) ac_optarg=yes ;;
  583. +     esac
  584. +     eval "enable_${ac_feature}='$ac_optarg'" ;;
  585. + 
  586. +   # For backward compatibility, recognize -exec-prefix and --exec_prefix.
  587. +   -exec-prefix | --exec_prefix | --exec-prefix | --exec-prefi \
  588. +   | --exec-pref | --exec-pre | --exec-pr | --exec-p | --exec- \
  589. +   | --exec | --exe | --ex)
  590. +     ac_prev=exec_prefix ;;
  591. +   -exec-prefix=* | --exec_prefix=* | --exec-prefix=* | --exec-prefi=* \
  592. +   | --exec-pref=* | --exec-pre=* | --exec-pr=* | --exec-p=* | --exec-=* \
  593. +   | --exec=* | --exe=* | --ex=*)
  594. +     exec_prefix="$ac_optarg" ;;
  595. + 
  596. +   -gas | --gas | --ga | --g)
  597. +     with_gas=yes ;; # Obsolete; use --with-gas.
  598. + 
  599. +   -help | --help | --hel | --he)
  600. +     cat << EOF
  601. + $ac_usage
  602. + EOF
  603. +     exit 0 ;;
  604. + 
  605. +   -host | --host | --hos | --ho)
  606. +     ac_prev=host ;;
  607. +   -host=* | --host=* | --hos=* | --ho=*)
  608. +     host="$ac_optarg" ;;
  609. + 
  610. +   -nfp | --nfp | --nf)
  611. +     with_fp=no ;; # Obsolete; use --without-fp.
  612. + 
  613. +   -no-create | --no-create | --no-creat | --no-crea | --no-cre \
  614. +   | --no-cr | --no-c)
  615. +     no_create=yes ;;
  616. + 
  617. +   -norecursion | --norecursion | --norecursio | --norecursi \
  618. +   | --norecurs | --norecur | --norecu | --norec | --nore | --nor)
  619. +     norecursion=yes ;;
  620. + 
  621. +   -prefix | --prefix | --prefi | --pref | --pre | --pr | --p)
  622. +     ac_prev=prefix ;;
  623. +   -prefix=* | --prefix=* | --prefi=* | --pref=* | --pre=* | --pr=* | --p=*)
  624. +     prefix="$ac_optarg" ;;
  625. + 
  626. +   -program-prefix | --program-prefix | --program-prefi | --program-pref \
  627. +   | --program-pre | --program-pr | --program-p)
  628. +     ac_prev=program_prefix ;;
  629. +   -program-prefix=* | --program-prefix=* | --program-prefi=* \
  630. +   | --program-pref=* | --program-pre=* | --program-pr=* | --program-p=*)
  631. +     program_prefix="$ac_optarg" ;;
  632. + 
  633. +   -program-suffix | --program-suffix | --program-suffi | --program-suff \
  634. +   | --program-suf | --program-su | --program-s)
  635. +     ac_prev=program_suffix ;;
  636. +   -program-suffix=* | --program-suffix=* | --program-suffi=* \
  637. +   | --program-suff=* | --program-suf=* | --program-su=* | --program-s=*)
  638. +     program_suffix="$ac_optarg" ;;
  639. + 
  640. +   -program-transform-name | --program-transform-name \
  641. +   | --program-transform-nam | --program-transform-na \
  642. +   | --program-transform-n | --program-transform- \
  643. +   | --program-transform | --program-transfor \
  644. +   | --program-transfo | --program-transf \
  645. +   | --program-trans | --program-tran \
  646. +   | --progr-tra | --program-tr | --program-t)
  647. +     ac_prev=program_transform_name ;;
  648. +   -program-transform-name=* | --program-transform-name=* \
  649. +   | --program-transform-nam=* | --program-transform-na=* \
  650. +   | --program-transform-n=* | --program-transform-=* \
  651. +   | --program-transform=* | --program-transfor=* \
  652. +   | --program-transfo=* | --program-transf=* \
  653. +   | --program-trans=* | --program-tran=* \
  654. +   | --progr-tra=* | --program-tr=* | --program-t=*)
  655. +     program_transform_name="$ac_optarg" ;;
  656. + 
  657. +   -q | -quiet | --quiet | --quie | --qui | --qu | --q \
  658. +   | -silent | --silent | --silen | --sile | --sil)
  659. +     silent=yes ;;
  660. + 
  661. +   -srcdir | --srcdir | --srcdi | --srcd | --src | --sr)
  662. +     ac_prev=srcdir ;;
  663. +   -srcdir=* | --srcdir=* | --srcdi=* | --srcd=* | --src=* | --sr=*)
  664. +     srcdir="$ac_optarg" ;;
  665. + 
  666. +   -target | --target | --targe | --targ | --tar | --ta | --t)
  667. +     ac_prev=target ;;
  668. +   -target=* | --target=* | --targe=* | --targ=* | --tar=* | --ta=* | --t=*)
  669. +     target="$ac_optarg" ;;
  670. + 
  671. +   -v | -verbose | --verbose | --verbos | --verbo | --verb)
  672. +     verbose=yes ;;
  673. + 
  674. +   -version | --version | --versio | --versi | --vers)
  675. +     /bin/echo "configure generated by autoconf version 1.11"
  676. +     exit 0 ;;
  677. + 
  678. +   -with-* | --with-*)
  679. +     ac_package=`/bin/echo $ac_option|sed -e 's/-*with-//' -e 's/=.*//'`
  680. +     # Reject names that aren't valid shell variable names.
  681. +     if test -n "`/bin/echo $ac_package| sed 's/[-_a-zA-Z0-9]//g'`"; then
  682. +       /bin/echo "configure: $ac_package: invalid package name" >&2; exit 1
  683. +     fi
  684. +     ac_package=`/bin/echo $ac_package| sed 's/-/_/g'`
  685. +     case "$ac_option" in
  686. +       *=*) ;;
  687. +       *) ac_optarg=yes ;;
  688. +     esac
  689. +     eval "with_${ac_package}='$ac_optarg'" ;;
  690. + 
  691. +   -without-* | --without-*)
  692. +     ac_package=`/bin/echo $ac_option|sed -e 's/-*without-//'`
  693. +     # Reject names that aren't valid shell variable names.
  694. +     if test -n "`/bin/echo $ac_package| sed 's/[-a-zA-Z0-9_]//g'`"; then
  695. +       /bin/echo "configure: $ac_package: invalid package name" >&2; exit 1
  696. +     fi
  697. +     ac_package=`/bin/echo $ac_package| sed 's/-/_/g'`
  698. +     eval "with_${ac_package}=no" ;;
  699. + 
  700. +   --x) with_x=yes ;; # Obsolete; use --with-x.
  701. + 
  702. +   -x-includes | --x-includes | --x-include | --x-includ | --x-inclu \
  703. +   | --x-incl | --x-inc | --x-in | --x-i)
  704. +     ac_prev=x_includes ;;
  705. +   -x-includes=* | --x-includes=* | --x-include=* | --x-includ=* | --x-inclu=* \
  706. +   | --x-incl=* | --x-inc=* | --x-in=* | --x-i=*)
  707. +     x_includes="$ac_optarg" ;;
  708. + 
  709. +   -x-libraries | --x-libraries | --x-librarie | --x-librari \
  710. +   | --x-librar | --x-libra | --x-libr | --x-lib | --x-li | --x-l)
  711. +     ac_prev=x_libraries ;;
  712. +   -x-libraries=* | --x-libraries=* | --x-librarie=* | --x-librari=* \
  713. +   | --x-librar=* | --x-libra=* | --x-libr=* | --x-lib=* | --x-li=* | --x-l=*)
  714. +     x_libraries="$ac_optarg" ;;
  715. + 
  716. +   -*) /bin/echo "configure: $ac_option: invalid option; use --help to show usage" >&2; exit 1
  717. +     ;;
  718. + 
  719. +   *) 
  720. +     if test -n "`/bin/echo $ac_option| sed 's/[-a-z0-9.]//g'`"; then
  721. +       /bin/echo "configure: warning: $ac_option: invalid host type" >&2
  722. +     fi
  723. +     if test "x$nonopt" != xNONE; then
  724. +       /bin/echo "configure: can only configure for one host and one target at a time" >&2; exit 1
  725. +     fi
  726. +     nonopt="$ac_option"
  727. +     ;;
  728. + 
  729. +   esac
  730. + done
  731. + 
  732. + if test -n "$ac_prev"; then
  733. +   /bin/echo "configure: missing argument to --`/bin/echo $ac_prev | sed 's/_/-/g'`" >&2; exit 1
  734. + fi
  735. + 
  736. + trap 'rm -fr conftest* confdefs* core $ac_clean_files; exit 1' 1 2 15
  737. + trap 'rm -fr confdefs* $ac_clean_files' 0
  738. + 
  739. + # Save the original args if we used an alternate arg parser.
  740. + ac_configure_temp="${configure_args-$*}"
  741. + # Strip out --no-create and --norecursion so they don't pile up.
  742. + configure_args=
  743. + for ac_arg in $ac_configure_temp; do
  744. +   case "$ac_arg" in
  745. +   -no-create | --no-create | --no-creat | --no-crea | --no-cre \
  746. +   | --no-cr | --no-c) ;;
  747. +   -norecursion | --norecursion | --norecursio | --norecursi \
  748. +   | --norecurs | --norecur | --norecu | --norec | --nore | --nor) ;;
  749. +   *) configure_args="$configure_args $ac_arg" ;;
  750. +   esac
  751. + done
  752. + 
  753. + # NLS nuisances.
  754. + # These must not be set unconditionally because not all systems understand
  755. + # e.g. LANG=C (notably SCO).
  756. + if test "${LC_ALL+set}" = 'set'; then LC_ALL=C; export LC_ALL; fi
  757. + if test "${LANG+set}"   = 'set'; then LANG=C;   export LANG;   fi
  758. + 
  759. + # confdefs.h avoids OS command line length limits that DEFS can exceed.
  760. + rm -rf conftest* confdefs.h
  761. + # AIX cpp loses on an empty file, so make sure it contains at least a newline.
  762. + /bin/echo > confdefs.h
  763. + 
  764. + # A filename unique to this package, relative to the directory that
  765. + # configure is in, which we can look for to find out if srcdir is correct.
  766. + ac_unique_file=ld.c
  767. + 
  768. + # Find the source files, if location was not specified.
  769. + if test -z "$srcdir"; then
  770. +   ac_srcdir_defaulted=yes
  771. +   # Try the directory containing this script, then `..'.
  772. +   ac_prog=$0
  773. +   ac_confdir=`/bin/echo $ac_prog|sed 's%/[^/][^/]*$%%'`
  774. +   test "x$ac_confdir" = "x$ac_prog" && ac_confdir=.
  775. +   srcdir=$ac_confdir
  776. +   if test ! -r $srcdir/$ac_unique_file; then
  777. +     srcdir=..
  778. +   fi
  779. + fi
  780. + if test ! -r $srcdir/$ac_unique_file; then
  781. +   if test x$ac_srcdir_defaulted = xyes; then
  782. +     /bin/echo "configure: can not find sources in ${ac_confdir} or .." >&2; exit 1
  783. +   else
  784. +     /bin/echo "configure: can not find sources in ${srcdir}" >&2; exit 1
  785. +   fi
  786. + fi
  787. + ac_ext=c
  788. + # CFLAGS is not in ac_cpp because -g, -O, etc. are not valid cpp options.
  789. + ac_cpp='${CPP}'
  790. + ac_compile='${CC-cc} $CFLAGS $LDFLAGS conftest.${ac_ext} -o conftest $LIBS >/dev/null 2>&1'
  791. + 
  792. + 
  793. + 
  794. + # We want these before the checks, so the checks can modify their values.
  795. + test -z "$CFLAGS" && CFLAGS= auto_cflags=1
  796. + test -z "$LDFLAGS" && LDFLAGS=
  797. + 
  798. + if test -z "$CC"; then
  799. +   # Extract the first word of `gcc', so it can be a program name with args.
  800. +   set ac_dummy gcc; ac_word=$2
  801. +   test -n "$silent" || /bin/echo "checking for $ac_word"
  802. +   IFS="${IFS=     }"; ac_save_ifs="$IFS"; IFS="${IFS}:"
  803. +   for ac_dir in $PATH; do
  804. +     test -z "$ac_dir" && ac_dir=.
  805. +     if test -f $ac_dir/$ac_word; then
  806. +       CC="gcc"
  807. +       break
  808. +     fi
  809. +   done
  810. +   IFS="$ac_save_ifs"
  811. + fi
  812. + test -z "$CC" && CC="cc"
  813. + test -n "$CC" && test -n "$verbose" && /bin/echo "    setting CC to $CC"
  814. + 
  815. + # Find out if we are using GNU C, under whatever name.
  816. + cat > conftest.c <<EOF
  817. + #ifdef __GNUC__
  818. +   yes
  819. + #endif
  820. + EOF
  821. + ${CC-cc} -E conftest.c > conftest.out 2>&1
  822. + if egrep yes conftest.out >/dev/null 2>&1; then
  823. +   GCC=1 # For later tests.
  824. + fi
  825. + rm -f conftest*
  826. + 
  827. + 
  828. + # If we're using gcc and the user hasn't specified CFLAGS, add -O to CFLAGS.
  829. + test -n "$GCC" && test -n "$auto_cflags" && CFLAGS="$CFLAGS -O2"
  830. + 
  831. + 
  832. + test -n "$silent" || /bin/echo "checking how to run the C preprocessor"
  833. + if test -z "$CPP"; then
  834. +   # This must be in double quotes, not single quotes, because CPP may get
  835. +   # substituted into the Makefile and ``${CC-cc}'' will simply confuse
  836. +   # make.  It must be expanded now.
  837. +   CPP="${CC-cc} -E"
  838. +   cat > conftest.${ac_ext} <<EOF
  839. + #include "confdefs.h"
  840. + #include <stdio.h>
  841. + Syntax Error
  842. + EOF
  843. + # Some shells (Coherent) do redirections in the wrong order, so need
  844. + # the parens.
  845. + ac_err=`eval "($ac_cpp conftest.${ac_ext} >/dev/null) 2>&1"`
  846. + if test -z "$ac_err"; then
  847. +   :
  848. + else
  849. +   rm -rf conftest*
  850. +   CPP="${CC-cc} -E -traditional-cpp"
  851. +   cat > conftest.${ac_ext} <<EOF
  852. + #include "confdefs.h"
  853. + #include <stdio.h>
  854. + Syntax Error
  855. + EOF
  856. + # Some shells (Coherent) do redirections in the wrong order, so need
  857. + # the parens.
  858. + ac_err=`eval "($ac_cpp conftest.${ac_ext} >/dev/null) 2>&1"`
  859. + if test -z "$ac_err"; then
  860. +   :
  861. + else
  862. +   rm -rf conftest*
  863. +   CPP=/lib/cpp
  864. + fi
  865. + rm -f conftest*
  866. + fi
  867. + rm -f conftest*
  868. + fi
  869. + test -n "$verbose" && /bin/echo "    setting CPP to $CPP"
  870. + 
  871. + if test -n "$GCC"; then
  872. +   test -n "$silent" || /bin/echo "checking whether -traditional is needed"
  873. +   ac_pattern="Autoconf.*'x'"
  874. +   ac_prog='#include <sgtty.h>
  875. + Autoconf TIOCGETP'
  876. +   cat > conftest.${ac_ext} <<EOF
  877. + #include "confdefs.h"
  878. + $ac_prog
  879. + EOF
  880. + eval "$ac_cpp conftest.${ac_ext} > conftest.out 2>&1"
  881. + if egrep "$ac_pattern" conftest.out >/dev/null 2>&1; then
  882. +   rm -rf conftest*
  883. +   ac_need_trad=1
  884. + 
  885. + fi
  886. + rm -f conftest*
  887. + 
  888. + 
  889. +   if test -z "$ac_need_trad"; then
  890. +     ac_prog='#include <termio.h>
  891. + Autoconf TCGETA'
  892. +     cat > conftest.${ac_ext} <<EOF
  893. + #include "confdefs.h"
  894. + $ac_prog
  895. + EOF
  896. + eval "$ac_cpp conftest.${ac_ext} > conftest.out 2>&1"
  897. + if egrep "$ac_pattern" conftest.out >/dev/null 2>&1; then
  898. +   rm -rf conftest*
  899. +   ac_need_trad=1
  900. + 
  901. + fi
  902. + rm -f conftest*
  903. + 
  904. +   fi
  905. +   test -n "$ac_need_trad" && CC="$CC -traditional"
  906. + fi
  907. + 
  908. + # Make sure to not get the incompatible SysV /etc/install and
  909. + # /usr/sbin/install, which might be in PATH before a BSD-like install,
  910. + # or the SunOS /usr/etc/install directory, or the AIX /bin/install,
  911. + # or the AFS install, which mishandles nonexistent args, or
  912. + # /usr/ucb/install on SVR4, which tries to use the nonexistent group
  913. + # `staff', or /sbin/install on IRIX which has incompatible command-line
  914. + # syntax.  Sigh.
  915. + #
  916. + #     On most BSDish systems install is in /usr/bin, not /usr/ucb
  917. + #     anyway.
  918. + # This turns out not to be true, so the mere pathname isn't an indication
  919. + # of whether the program works.  What we really need is a set of tests for
  920. + # the install program to see if it actually works in all the required ways.
  921. + #
  922. + # Avoid using ./install, which might have been erroneously created
  923. + # by make from ./install.sh.
  924. + if test -z "${INSTALL}"; then
  925. +   test -n "$silent" || /bin/echo "checking for a BSD compatible install"
  926. +   IFS="${IFS=     }"; ac_save_ifs="$IFS"; IFS="${IFS}:"
  927. +   for ac_dir in $PATH; do
  928. +     case "$ac_dir" in
  929. +     ''|.|/gnu/etc|/sbin|/usr/sbin|/usr/etc|/usr/afsws/bin|/usr/ucb) ;;
  930. +     *)
  931. +       # OSF1 and SCO ODT 3.0 have their own names for install.
  932. +       for ac_prog in installbsd scoinst install; do
  933. +         if test -f $ac_dir/$ac_prog; then
  934. +       if test $ac_prog = install &&
  935. +             grep dspmsg $ac_dir/$ac_prog >/dev/null 2>&1; then
  936. +         # AIX install.  It has an incompatible calling convention.
  937. +         # OSF/1 installbsd also uses dspmsg, but is usable.
  938. +         :
  939. +       else
  940. +         INSTALL="$ac_dir/$ac_prog -c"
  941. +         break 2
  942. +       fi
  943. +     fi
  944. +       done
  945. +       ;;
  946. +     esac
  947. +   done
  948. +   IFS="$ac_save_ifs"
  949. + fi
  950. + 
  951. + if test -z "$INSTALL"; then
  952. +   # As a last resort, use the slow shell script.
  953. +   for ac_dir in ${srcdir} ${srcdir}/.. ${srcdir}/../..; do
  954. +     if test -f $ac_dir/install.sh; then
  955. +       INSTALL="$ac_dir/install.sh -c"; break
  956. +     fi
  957. +   done
  958. + fi
  959. + if test -z "$INSTALL"; then
  960. +   /bin/echo "configure: can not find install.sh in ${srcdir} or ${srcdir}/.. or ${srcdir}/../.." >&2; exit 1
  961. + fi
  962. + test -n "$verbose" && /bin/echo "    setting INSTALL to $INSTALL"
  963. + 
  964. + # Use test -z because SunOS4 sh mishandles ${INSTALL_PROGRAM-'${INSTALL}'}.
  965. + # It thinks the first close brace ends the variable substitution.
  966. + test -z "$INSTALL_PROGRAM" && INSTALL_PROGRAM='${INSTALL}'
  967. + test -n "$verbose" && /bin/echo "    setting INSTALL_PROGRAM to $INSTALL_PROGRAM"
  968. + 
  969. + test -z "$INSTALL_DATA" && INSTALL_DATA='${INSTALL} -m 644'
  970. + test -n "$verbose" && /bin/echo "    setting INSTALL_DATA to $INSTALL_DATA"
  971. + 
  972. + 
  973. + 
  974. + # The preferred way to propogate these variables is regular @ substitutions.
  975. + if test -n "$prefix"; then
  976. +   ac_prsub="s%^prefix\\([     ]*\\)=\\([     ]*\\).*$%prefix\\1=\\2$prefix%"
  977. + else
  978. +   prefix=/usr/local
  979. + fi
  980. + if test -n "$exec_prefix"; then
  981. +   ac_prsub="$ac_prsub
  982. + s%^exec_prefix\\([     ]*\\)=\\([     ]*\\).*$%exec_prefix\\1=\\2$exec_prefix%"
  983. + else
  984. +   exec_prefix='${prefix}' # Let make expand it.
  985. + fi
  986. + 
  987. + # Any assignment to VPATH causes Sun make to only execute
  988. + # the first set of double-colon rules, so remove it if not needed.
  989. + # If there is a colon in the path, we need to keep it.
  990. + if test "x$srcdir" = x.; then
  991. +   ac_vpsub='/^[     ]*VPATH[     ]*=[^:]*$/d'
  992. + fi
  993. + 
  994. + # Quote sed substitution magic chars in DEFS.
  995. + cat >conftest.def <<EOF
  996. + $DEFS
  997. + EOF
  998. + ac_escape_ampersand_and_backslash='s%[&\\]%\\&%g'
  999. + DEFS=`sed "$ac_escape_ampersand_and_backslash" <conftest.def`
  1000. + rm -f conftest.def
  1001. + # Substitute for predefined variables.
  1002. + 
  1003. + trap 'rm -f config.status; exit 1' 1 2 15
  1004. + /bin/echo creating config.status
  1005. + # Some systems, like AmigaDOS, won't allow you to remove a script that is
  1006. + # being executed, so just move it out of the way instead.
  1007. + if test -f config.status; then mv config.status config.status.old; else true; fi
  1008. + cat > config.status <<EOF
  1009. + #!/bin/sh
  1010. + # Generated automatically by configure.
  1011. + # Run this file to recreate the current configuration.
  1012. + # This directory was configured as follows,
  1013. + # on host `(hostname || uname -n) 2>/dev/null | sed 1q`:
  1014. + #
  1015. + # $0 $configure_args
  1016. + 
  1017. + ac_cs_usage="Usage: config.status [--recheck] [--version] [--help]"
  1018. + for ac_option
  1019. + do
  1020. +   case "\$ac_option" in
  1021. +   -recheck | --recheck | --rechec | --reche | --rech | --rec | --re | --r)
  1022. +     /bin/echo running \${CONFIG_SHELL-/bin/sh} $0 $configure_args --no-create
  1023. +     exec \${CONFIG_SHELL-/bin/sh} $0 $configure_args --no-create ;;
  1024. +   -version | --version | --versio | --versi | --vers | --ver | --ve | --v)
  1025. +     /bin/echo "config.status generated by autoconf version 1.11"
  1026. +     exit 0 ;;
  1027. +   -help | --help | --hel | --he | --h)
  1028. +     /bin/echo "\$ac_cs_usage"; exit 0 ;;
  1029. +   *) /bin/echo "\$ac_cs_usage"; exit 1 ;;
  1030. +   esac
  1031. + done
  1032. + 
  1033. + trap 'rm -f Makefile; exit 1' 1 2 15
  1034. + CC='$CC'
  1035. + CFLAGS='$CFLAGS'
  1036. + LDFLAGS='$LDFLAGS'
  1037. + CPP='$CPP'
  1038. + INSTALL='$INSTALL'
  1039. + INSTALL_PROGRAM='$INSTALL_PROGRAM'
  1040. + INSTALL_DATA='$INSTALL_DATA'
  1041. + LIBS='$LIBS'
  1042. + srcdir='$srcdir'
  1043. + top_srcdir='$top_srcdir'
  1044. + prefix='$prefix'
  1045. + exec_prefix='$exec_prefix'
  1046. + DEFS='$DEFS'
  1047. + ac_prsub='$ac_prsub'
  1048. + ac_vpsub='$ac_vpsub'
  1049. + extrasub='$extrasub'
  1050. + EOF
  1051. + cat >> config.status <<\EOF
  1052. + 
  1053. + ac_given_srcdir=$srcdir
  1054. + 
  1055. + CONFIG_FILES=${CONFIG_FILES-"Makefile"}
  1056. + for ac_file in .. ${CONFIG_FILES}; do if test "x$ac_file" != x..; then
  1057. +   # Remove last slash and all that follows it.  Not all systems have dirname.
  1058. +   ac_dir=`/bin/echo $ac_file|sed 's%/[^/][^/]*$%%'`
  1059. +   if test "$ac_dir" != "$ac_file" && test "$ac_dir" != .; then
  1060. +     # The file is in a subdirectory.
  1061. +     test ! -d "$ac_dir" && mkdir "$ac_dir"
  1062. +     ac_dir_suffix="/$ac_dir"
  1063. +   else
  1064. +     ac_dir_suffix=
  1065. +   fi
  1066. + 
  1067. +   # A "../" for each directory in $ac_dir_suffix.
  1068. +   ac_dots=`/bin/echo $ac_dir_suffix|sed 's%/[^/]*%../%g'`
  1069. +   case "$ac_given_srcdir" in
  1070. +   .)  srcdir=.
  1071. +       if test -z "$ac_dir_suffix"; then top_srcdir=.
  1072. +       else top_srcdir=`/bin/echo $ac_dots|sed 's%/$%%'`; fi ;;
  1073. +   /*) srcdir="$ac_given_srcdir$ac_dir_suffix"; top_srcdir="$ac_given_srcdir" ;;
  1074. +   *) # Relative path.
  1075. +     srcdir="$ac_dots$ac_given_srcdir$ac_dir_suffix"
  1076. +     top_srcdir="$ac_dots$ac_given_srcdir" ;;
  1077. +   esac
  1078. + 
  1079. +   /bin/echo creating "$ac_file"
  1080. +   rm -f "$ac_file"
  1081. +   comment_str="Generated automatically from `/bin/echo $ac_file|sed 's|.*/||'`.in by configure."
  1082. +   case "$ac_file" in
  1083. +     *.c | *.h | *.C | *.cc | *.m )  /bin/echo "/* $comment_str */" > "$ac_file" ;;
  1084. +     * )          /bin/echo "# $comment_str"     > "$ac_file" ;;
  1085. +   esac
  1086. +   sed -e "
  1087. + $ac_prsub
  1088. + $ac_vpsub
  1089. + $extrasub
  1090. + s%@CC@%$CC%g
  1091. + s%@CFLAGS@%$CFLAGS%g
  1092. + s%@LDFLAGS@%$LDFLAGS%g
  1093. + s%@CPP@%$CPP%g
  1094. + s%@INSTALL@%$INSTALL%g
  1095. + s%@INSTALL_PROGRAM@%$INSTALL_PROGRAM%g
  1096. + s%@INSTALL_DATA@%$INSTALL_DATA%g
  1097. + s%@LIBS@%$LIBS%g
  1098. + s%@srcdir@%$srcdir%g
  1099. + s%@top_srcdir@%$top_srcdir%g
  1100. + s%@prefix@%$prefix%g
  1101. + s%@exec_prefix@%$exec_prefix%g
  1102. + s%@DEFS@%$DEFS%
  1103. + " $ac_given_srcdir/${ac_file}.in >> $ac_file
  1104. + fi; done
  1105. + 
  1106. + 
  1107. + exit 0
  1108. + EOF
  1109. + chmod +x config.status
  1110. + # Some shells look in PATH for config.status without the "./".
  1111. + test -n "$no_create" || ${CONFIG_SHELL-/bin/sh} ./config.status
  1112. + 
  1113. diff -rc --new-file binutils-1.8.x-base/configure.in binutils-1.8.x/configure.in
  1114. *** binutils-1.8.x-base/configure.in    Thu Jan  1 00:00:00 1970
  1115. --- binutils-1.8.x/configure.in    Sat Apr 30 17:42:42 1994
  1116. ***************
  1117. *** 0 ****
  1118. --- 1,20 ----
  1119. + dnl Process this file with autoconf to produce a configure script.
  1120. + AC_INIT(ld.c)
  1121. + 
  1122. + # We want these before the checks, so the checks can modify their values.
  1123. + test -z "$CFLAGS" && CFLAGS= auto_cflags=1
  1124. + test -z "$LDFLAGS" && LDFLAGS=
  1125. + 
  1126. + AC_PROG_CC
  1127. + 
  1128. + # If we're using gcc and the user hasn't specified CFLAGS, add -O to CFLAGS.
  1129. + test -n "$GCC" && test -n "$auto_cflags" && CFLAGS="$CFLAGS -O2"
  1130. + 
  1131. + AC_SUBST(CFLAGS)dnl
  1132. + AC_SUBST(LDFLAGS)dnl
  1133. + 
  1134. + AC_PROG_CPP
  1135. + AC_GCC_TRADITIONAL
  1136. + AC_PROG_INSTALL
  1137. + 
  1138. + AC_OUTPUT(Makefile)
  1139. diff -rc --new-file binutils-1.8.x-base/cplus-dem.c binutils-1.8.x/cplus-dem.c
  1140. *** binutils-1.8.x-base/cplus-dem.c    Wed Jun 13 05:42:34 1990
  1141. --- binutils-1.8.x/cplus-dem.c    Wed Sep 22 12:45:32 1993
  1142. ***************
  1143. *** 48,54 ****
  1144.   #include <ctype.h>
  1145.   
  1146.   #if !defined(sequent) && !defined(NeXT)
  1147. ! #include <memory.h>
  1148.   #else
  1149.   #define memcpy(s1, s2, n) strncpy(s1, s2, n) 
  1150.   #define memcmp(s1, s2, n) strncmp(s1, s2, n)
  1151. --- 48,54 ----
  1152.   #include <ctype.h>
  1153.   
  1154.   #if !defined(sequent) && !defined(NeXT)
  1155. ! /* #include <memory.h> */
  1156.   #else
  1157.   #define memcpy(s1, s2, n) strncpy(s1, s2, n) 
  1158.   #define memcmp(s1, s2, n) strncmp(s1, s2, n)
  1159. diff -rc --new-file binutils-1.8.x-base/ld.c binutils-1.8.x/ld.c
  1160. *** binutils-1.8.x-base/ld.c    Wed Nov 27 22:04:14 1991
  1161. --- binutils-1.8.x/ld.c    Thu Mar 23 23:30:14 1995
  1162. ***************
  1163. *** 16,24 ****
  1164.      Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.  */
  1165.   
  1166.   /* Written by Richard Stallman with some help from Eric Albert.
  1167. !    Set, indirect, and warning symbol features added by Randy Smith.  */
  1168.   
  1169.   #include <ar.h>
  1170.   #include <stdio.h>
  1171.   #include <sys/types.h>
  1172.   #include <sys/stat.h>
  1173. --- 16,39 ----
  1174.      Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.  */
  1175.   
  1176.   /* Written by Richard Stallman with some help from Eric Albert.
  1177. !    Set, indirect, and warning symbol features added by Randy Smith.
  1178. !    Support for generation of Amiga load files added by Markus Wild.
  1179. !    Flavor extension by Fred Fish
  1180. !    Modified for AmigaDOS cross-linker by Philippe Brand
  1181. !    Bug fixes by Matthias Fleischer
  1182. !    Additional work by Gunther Nikl */
  1183.   
  1184. + #ifdef amigados
  1185. + #ifndef STANDARD_SEARCH_DIRS
  1186. + #define STANDARD_SEARCH_DIRS "local:lib","local:os-lib","gnu:lib","gnu:os-lib"
  1187. + #endif
  1188. + #endif
  1189. + 
  1190. + #if defined(amigados) && defined(CROSS_LINKER)
  1191. + #include </usr/local/amigados/include/ar.h>
  1192. + #else
  1193.   #include <ar.h>
  1194. + #endif
  1195.   #include <stdio.h>
  1196.   #include <sys/types.h>
  1197.   #include <sys/stat.h>
  1198. ***************
  1199. *** 30,35 ****
  1200. --- 45,52 ----
  1201.   #ifndef sony_news
  1202.   #include <fcntl.h>
  1203.   #endif
  1204. + /* JPB, 7 Jun 1992: MAXNAMLEN required for long name hack. */
  1205. + #include <dirent.h>
  1206.   
  1207.   #if !defined(A_OUT) && !defined(MACH_O)
  1208.   #define A_OUT
  1209. ***************
  1210. *** 39,47 ****
  1211. --- 56,99 ----
  1212.   #ifdef COFF_ENCAPSULATE
  1213.   #include "a.out.encap.h"
  1214.   #else
  1215. + #if defined(amigados) && defined(CROSS_LINKER)
  1216. + # include </usr/local/amigados/include/a.out.h>
  1217. + #else
  1218.   #include <a.out.h>
  1219.   #endif
  1220.   #endif
  1221. + #endif
  1222. + 
  1223. + #ifdef MCH_AMIGA
  1224. + #define HUNK_INSTEAD_OF_A_OUT
  1225. + int number_of_code_hunk,
  1226. +     code_mem_type,
  1227. +     number_of_data_hunk,
  1228. +     data_mem_type,
  1229. +     number_of_bss_hunk,
  1230. +     bss_mem_type,
  1231. +     number_of_debug_hunk,
  1232. +     current_hunk = 0,
  1233. +     offset_of_debug_hunk,
  1234. +     amiga_symbols_only,
  1235. +     long_data_hunk = 1,
  1236. +     databss_together = 0,
  1237. +     numdatadata_relocs = 0,
  1238. +     output_datadata_relocs = 0,
  1239. +     datadata_relocs_offset = 0;
  1240. + #define LONGSIZE(l) ((((l) + 3) & ~3) >> 2)
  1241. + /* this is the private format of the debug-hunk: */
  1242. +    struct debug_hunk {
  1243. +      unsigned long  id;  /* Filesystem-imposed: HUNK_DEBUG (0x3f1) */
  1244. +      unsigned long  len; /* "" : length in longs -> LONGSIZE(real_lenght) */
  1245. +      /* the following part is somehow a truncated exec-struct: */
  1246. +      unsigned long  magic; /* should be ZMAGIC (just for fun:-)), to be recognised
  1247. +                 * by the other tools as this special frame */
  1248. +      unsigned long  syms;  /* size of symbol-table */
  1249. +      unsigned long  strs;  /* size of string table */
  1250. +      /* here follows the actual data */
  1251. +    } dh;
  1252. + #endif
  1253.   
  1254.   #ifdef MACH_O
  1255.   #ifndef A_OUT
  1256. ***************
  1257. *** 104,110 ****
  1258.   /* Name this program was invoked by.  */
  1259.   
  1260.   char *progname;
  1261. ! 
  1262.   /* System dependencies */
  1263.   
  1264.   /* Define this if names etext, edata and end should not start with `_'.  */
  1265. --- 156,162 ----
  1266.   /* Name this program was invoked by.  */
  1267.   
  1268.   char *progname;
  1269. ! 
  1270.   /* System dependencies */
  1271.   
  1272.   /* Define this if names etext, edata and end should not start with `_'.  */
  1273. ***************
  1274. *** 190,195 ****
  1275. --- 242,263 ----
  1276.   #endif /* mc68000.  */
  1277.   #endif /* Sun.  */
  1278.   
  1279. + #ifdef amigados
  1280. + /* same trick as with sun[23] */
  1281. + /* Set the machine type according to the machine type of the .o files.
  1282. +    If they are all sun2 (68010), then the type of the executable is sun2.
  1283. +    If any is sun3 (68020), then the type of the executable is sun3.
  1284. +    This is consistent with the Sun loader and more useful than having
  1285. +    it depend on which machine you are on when you run ld.  */
  1286. + static int amiga_machtype = MID_SUN010;
  1287. + #define INITIALIZE_HEADER outheader.a_machtype = amiga_machtype
  1288. + #define READ_HEADER_HOOK(machtype) \
  1289. +   if (machtype == MID_SUN020)        \
  1290. +     {                     \
  1291. +       amiga_machtype = MID_SUN020;   \
  1292. +     }
  1293. + #endif
  1294. + 
  1295.   #ifdef ALTOS
  1296.   #define INITIALIZE_HEADER N_SET_MACHTYPE (outheader, M_68020)
  1297.   #endif
  1298. ***************
  1299. *** 229,234 ****
  1300. --- 297,306 ----
  1301.   #ifndef SEEK_CUR
  1302.   #define SEEK_CUR 1
  1303.   #endif
  1304. + /* Phil.B: 1-Apr-94: same trick for SEEK_END */
  1305. + #ifndef SEEK_END
  1306. + #define SEEK_END L_XTND
  1307. + #endif
  1308.   
  1309.   /*
  1310.    * Ok.  Following are the relocation information macros.  If your
  1311. ***************
  1312. *** 368,373 ****
  1313. --- 440,446 ----
  1314.   #define RELOC_MEMORY_ADD_P(r)    1
  1315.   #undef RELOC_ADD_EXTRA
  1316.   #define RELOC_PCREL_P(r)        ((r)->r_pcrel)
  1317. + #define RELOC_BASEREL_P(r)        ((r)->r_baserel)
  1318.   #define RELOC_VALUE_RIGHTSHIFT(r)    0
  1319.   #define RELOC_TARGET_SIZE(r)        ((r)->r_length)
  1320.   #define RELOC_TARGET_BITPOS(r)    0
  1321. ***************
  1322. *** 384,390 ****
  1323.   #define LPREFIX 'L'
  1324.   #endif
  1325.   
  1326. ! 
  1327.   /* Special global symbol types understood by GNU LD.  */
  1328.   
  1329.   /* The following type indicates the definition of a symbol as being
  1330. --- 457,463 ----
  1331.   #define LPREFIX 'L'
  1332.   #endif
  1333.   
  1334. ! 
  1335.   /* Special global symbol types understood by GNU LD.  */
  1336.   
  1337.   /* The following type indicates the definition of a symbol as being
  1338. ***************
  1339. *** 531,537 ****
  1340.   #endif
  1341.   
  1342.   #endif /* not __GNU_STAB__ */
  1343. ! 
  1344.   /* Symbol table */
  1345.   
  1346.   /* Global symbol data is recorded in these structures,
  1347. --- 604,610 ----
  1348.   #endif
  1349.   
  1350.   #endif /* not __GNU_STAB__ */
  1351. ! 
  1352.   /* Symbol table */
  1353.   
  1354.   /* Global symbol data is recorded in these structures,
  1355. ***************
  1356. *** 684,690 ****
  1357.   symbol *edata_symbol_alt;
  1358.   symbol *etext_symbol_alt;
  1359.   symbol *end_symbol_alt;
  1360. ! 
  1361.   /* Kinds of files potentially understood by the linker. */
  1362.   
  1363.   enum file_type { IS_UNKNOWN, IS_ARCHIVE, IS_A_OUT, IS_MACH_O };
  1364. --- 757,771 ----
  1365.   symbol *edata_symbol_alt;
  1366.   symbol *etext_symbol_alt;
  1367.   symbol *end_symbol_alt;
  1368. ! 
  1369. ! #ifdef amigados
  1370. ! symbol *sdata_symbol;    /* the symbol __sdata */
  1371. ! symbol *text_size_symbol;
  1372. ! symbol *data_size_symbol;
  1373. ! symbol *bss_size_symbol;
  1374. ! symbol *datadata_reloc_symbol = 0;
  1375. ! #endif
  1376. ! 
  1377.   /* Kinds of files potentially understood by the linker. */
  1378.   
  1379.   enum file_type { IS_UNKNOWN, IS_ARCHIVE, IS_A_OUT, IS_MACH_O };
  1380. ***************
  1381. *** 820,826 ****
  1382.   
  1383.   /* Length of that vector.  */
  1384.   int number_of_files;
  1385. ! 
  1386.   /* When loading the text and data, we can avoid doing a close
  1387.      and another open between members of the same library.
  1388.   
  1389. --- 901,907 ----
  1390.   
  1391.   /* Length of that vector.  */
  1392.   int number_of_files;
  1393. ! 
  1394.   /* When loading the text and data, we can avoid doing a close
  1395.      and another open between members of the same library.
  1396.   
  1397. ***************
  1398. *** 867,875 ****
  1399. --- 948,961 ----
  1400.   #define DEFAULT_OUTPUT_STYLE OUTPUT_DEMAND_PAGED
  1401.   #endif
  1402.   
  1403. + #if 0
  1404.   /* Descriptor for writing that file with `mywrite'.  */
  1405.   
  1406.   int outdesc;
  1407. + #endif
  1408. + 
  1409. + /* use outstream instead of outdesc thru the whole file, it's MUCH faster.. */
  1410. + FILE *outstream = (FILE *) 0;
  1411.   
  1412.   /* The following are computed by `digest_symbols'.  */
  1413.   
  1414. ***************
  1415. *** 909,914 ****
  1416. --- 995,1004 ----
  1417.   /* Pointer for in core storage for the above vectors, before they are
  1418.      written. */
  1419.   unsigned long *set_vectors;
  1420. + #ifdef HUNK_INSTEAD_OF_A_OUT
  1421. + /* which vector entry has to be relocated? */
  1422. + unsigned char *rel_vectors;
  1423. + #endif
  1424.   
  1425.   /* Amount of cleared space to leave at the end of the text segment.  */
  1426.   
  1427. ***************
  1428. *** 929,935 ****
  1429.     int symbol_name_string_index;
  1430.     int library_member_offset;
  1431.   };
  1432. ! 
  1433.   /* Record most of the command options.  */
  1434.   
  1435.   /* Address we assume the text section will be loaded at.
  1436. --- 1019,1025 ----
  1437.     int symbol_name_string_index;
  1438.     int library_member_offset;
  1439.   };
  1440. ! 
  1441.   /* Record most of the command options.  */
  1442.   
  1443.   /* Address we assume the text section will be loaded at.
  1444. ***************
  1445. *** 993,998 ****
  1446. --- 1083,1092 ----
  1447.   /* Length of the vector `search_dirs'.  */
  1448.   int n_search_dirs;
  1449.   
  1450. + /* Vector of flavors to search for. */
  1451. + char **flavors;
  1452. + int n_flavors;
  1453. + 
  1454.   /* Non zero means to create the output executable.
  1455.      Cleared by nonfatal errors.  */
  1456.   int make_executable;
  1457. ***************
  1458. *** 1007,1018 ****
  1459. --- 1101,1118 ----
  1460.   struct glosym **cmdline_references;
  1461.   int cl_refs_allocated;
  1462.   
  1463. + /* JPB, 7 Jun 1992: Global variable needed for long name hack. */
  1464. + static int ar_hdr_size;
  1465. + 
  1466.   #ifndef bcopy
  1467.   void bcopy (), bzero ();
  1468.   #endif
  1469. + #ifndef __STDC__
  1470.   char *malloc (), *realloc ();
  1471.   void free ();
  1472. + #endif
  1473.   
  1474. + char *getenv ();
  1475.   char *xmalloc ();
  1476.   char *xrealloc ();
  1477.   void usage ();
  1478. ***************
  1479. *** 1034,1039 ****
  1480. --- 1134,1154 ----
  1481.   void write_output ();
  1482.   void write_header ();
  1483.   void write_text ();
  1484. + #ifdef HUNK_INSTEAD_OF_A_OUT
  1485. + void write_datadata_relocs ();
  1486. + void write_hunk_header ();
  1487. + void conditionally_rewrite_headers ();
  1488. + void write_bss ();
  1489. + void init_reloc_hunk ();
  1490. + void add_to_reloc_hunk ();
  1491. + void write_reloc_hunk ();
  1492. + void init_symbol_hunks ();
  1493. + void add_to_symbol_hunk ();
  1494. + void write_symbol_hunk ();
  1495. + void look_for_symbols ();
  1496. + void look_for_file_symbols ();
  1497. + void relocate_set_vectors ();
  1498. + #endif
  1499.   void read_file_relocation ();
  1500.   void write_data ();
  1501.   void write_rel ();
  1502. ***************
  1503. *** 1045,1060 ****
  1504.   char *concat ();
  1505.   char *get_file_name ();
  1506.   symbol *getsym (), *getsym_soft ();
  1507. ! 
  1508.   int
  1509.   main (argc, argv)
  1510.        char **argv;
  1511.        int argc;
  1512.   {
  1513.     page_size = getpagesize ();
  1514.     progname = argv[0];
  1515.   
  1516. ! #ifdef RLIMIT_STACK
  1517.     /* Avoid dumping core on large .o files.  */
  1518.     {
  1519.       struct rlimit rl;
  1520. --- 1160,1187 ----
  1521.   char *concat ();
  1522.   char *get_file_name ();
  1523.   symbol *getsym (), *getsym_soft ();
  1524. ! int compare_longs (), compare_strings ();
  1525. ! 
  1526.   int
  1527.   main (argc, argv)
  1528.        char **argv;
  1529.        int argc;
  1530.   {
  1531. + /* Phil.B 09-Jul-94: use 4KB as page size in order to be compatible with Gigamem
  1532. +    although getpagesize() is present in ixemul.library, we want to compile
  1533. +    without it */
  1534. + #ifdef amigados
  1535. +   page_size = 4096;
  1536. + #else
  1537.     page_size = getpagesize ();
  1538. + #endif
  1539.     progname = argv[0];
  1540.   
  1541. ! /* Phil.B 09-Jul-94: amigados doesn't have stack growing so this is not
  1542. !    necessary and more than that disable ld to be compiled using libnix
  1543. !    BTW as for now those functions returns 0 in  ixemul.library.
  1544. !    That's emulation! ;-) */
  1545. ! #if defined(RLIMIT_STACK) && !defined(amigados)
  1546.     /* Avoid dumping core on large .o files.  */
  1547.     {
  1548.       struct rlimit rl;
  1549. ***************
  1550. *** 1090,1095 ****
  1551. --- 1217,1225 ----
  1552.     make_executable = 1;
  1553.     force_executable = 0;
  1554.     set_element_prefixes = 0;
  1555. + #ifdef HUNK_INSTEAD_OF_A_OUT
  1556. +   amiga_symbols_only = 1;
  1557. + #endif
  1558.   
  1559.     /* Initialize the cumulative counts of symbols.  */
  1560.   
  1561. ***************
  1562. *** 1148,1158 ****
  1563.   
  1564.     exit (!make_executable);
  1565.   }
  1566. ! 
  1567.   void add_cmdline_ref ();
  1568.   
  1569.   static struct option longopts[] =
  1570.   {
  1571.     {"d", 0, 0, 'd'},
  1572.     {"dc", 0, 0, 'd'},        /* For Sun compatibility. */
  1573.     {"dp", 0, 0, 'd'},        /* For Sun compatibility. */
  1574. --- 1278,1318 ----
  1575.   
  1576.     exit (!make_executable);
  1577.   }
  1578. ! 
  1579. ! #ifdef amigados
  1580. ! /* support hunk loading to a chip or fast memory */
  1581. ! void set_mem_type(char *argstr, int memtype)
  1582. ! {
  1583. !    static char memstr[]="cdb";
  1584. ! 
  1585. !    if (!argstr)
  1586. !      argstr=memstr;
  1587. ! 
  1588. !    if (strchr(argstr,'c')||strchr(argstr,'t'))
  1589. !      code_mem_type=memtype;
  1590. ! 
  1591. !    if (strchr(argstr,'d'))
  1592. !      data_mem_type=memtype;
  1593. ! 
  1594. !    if (strchr(argstr,'b'))
  1595. !      bss_mem_type=memtype;
  1596. ! }
  1597. ! #endif
  1598. ! 
  1599.   void add_cmdline_ref ();
  1600.   
  1601.   static struct option longopts[] =
  1602.   {
  1603. + #ifdef HUNK_INSTEAD_OF_A_OUT
  1604. +   {"amiga-debug-hunk", 0, 0, 'a'},
  1605. +   {"databss-together", 0, 0, 'b'},
  1606. +   {"datadata-reloc", 0, 0, 'c'},
  1607. +   {"msmall-code", 0, 0, 129},        /* ignore.. */
  1608. +   {"flavor", 1, 0, 'f'},
  1609. +   {"chip",2, 0, 'g'},
  1610. +   {"fast",2, 0, 'h'},
  1611. +   {"shortdata", 0, 0, 'm'},
  1612. + #endif
  1613.     {"d", 0, 0, 'd'},
  1614.     {"dc", 0, 0, 'd'},        /* For Sun compatibility. */
  1615.     {"dp", 0, 0, 'd'},        /* For Sun compatibility. */
  1616. ***************
  1617. *** 1207,1212 ****
  1618. --- 1367,1385 ----
  1619.     /* First compute number_of_files so we know how long to make file_table.
  1620.        Also process most options completely.  */
  1621.   
  1622. + #ifdef amigados
  1623. +   /* Phil.B: 27-Feb-94 default is to strip all symbols if LDSTRIP is set */
  1624. +   if (getenv("LDSTRIP"))
  1625. +     strip_symbols = STRIP_ALL;
  1626. + 
  1627. +   /* G.Nikl: 10-Jun-94 if LDSHORTDATA is found a "short" data hunk will be
  1628. +      created. bss will be allocated via the hunk header. default is to dump
  1629. +      the bss part in the data area as zeros */
  1630. + 
  1631. +   if (getenv("LDSHORTDATA"))
  1632. +     long_data_hunk = 0;
  1633. + #endif /* amigados */
  1634. + 
  1635.     while ((optc = getopt_long_only (argc, argv, SHORTOPTS, longopts, &longind))
  1636.        != EOF)
  1637.       {
  1638. ***************
  1639. *** 1224,1229 ****
  1640. --- 1397,1416 ----
  1641.         number_of_files++;
  1642.         break;
  1643.   
  1644. + #ifdef HUNK_INSTEAD_OF_A_OUT
  1645. +     case 'a':
  1646. +       amiga_symbols_only = 0;
  1647. +       break;
  1648. + 
  1649. +     case 'b':
  1650. +       databss_together = 1;
  1651. +       break;
  1652. + 
  1653. +     case 'c':
  1654. +       output_datadata_relocs = 1;
  1655. +       break;
  1656. + #endif
  1657. + 
  1658.       case 'd':
  1659.         force_common_definition = 1;
  1660.         break;
  1661. ***************
  1662. *** 1236,1245 ****
  1663. --- 1423,1451 ----
  1664.         add_cmdline_ref (entry_symbol);
  1665.         break;
  1666.   
  1667. +     case 'f':
  1668. +       n_flavors++;
  1669. +       flavors = (char **) xrealloc (flavors, n_flavors * sizeof (char *));
  1670. +       flavors[n_flavors - 1] = optarg;
  1671. +       break;
  1672. + 
  1673. + #ifdef HUNK_INSTEAD_OF_A_OUT
  1674. +     case 'g':
  1675. +       set_mem_type(optarg,1<<30);
  1676. +       break;
  1677. + 
  1678. +     case 'h':
  1679. +       set_mem_type(optarg,2<<30);
  1680. +       break;
  1681. + #endif
  1682.       case 'l':
  1683.         number_of_files++;
  1684.         break;
  1685.   
  1686. +     case 'm':
  1687. +       long_data_hunk = 0;
  1688. +       break;
  1689. + 
  1690.       case 'n':
  1691.         if (output_style && output_style != OUTPUT_READONLY_TEXT)
  1692.           fatal ("illegal combination of -n with -N, -r, or -z", (char *) 0);
  1693. ***************
  1694. *** 1363,1368 ****
  1695. --- 1569,1584 ----
  1696.       }
  1697.       }
  1698.   
  1699. +   if (n_flavors > 1)
  1700. +     {
  1701. +       register int i;
  1702. + 
  1703. +       if (trace_files)
  1704. +         for (i=0; i<n_flavors; i++)
  1705. +       fprintf (stderr, "Flavor #%d : %s\n", i, flavors[i]);
  1706. +       qsort (flavors, n_flavors, sizeof (char *), compare_strings);
  1707. +     }
  1708. + 
  1709.     if (!number_of_files)
  1710.       usage ("no input files", 0);
  1711.   
  1712. ***************
  1713. *** 1433,1439 ****
  1714.            n * sizeof (char *));
  1715.       }
  1716.   }
  1717. ! 
  1718.   
  1719.   void
  1720.   add_cmdline_ref (sp)
  1721. --- 1649,1655 ----
  1722.            n * sizeof (char *));
  1723.       }
  1724.   }
  1725. ! 
  1726.   
  1727.   void
  1728.   add_cmdline_ref (sp)
  1729. ***************
  1730. *** 1478,1484 ****
  1731.       }
  1732.     return 0;
  1733.   }
  1734. ! 
  1735.   /* Convenient functions for operating on one or all files being
  1736.      loaded.  */
  1737.   void print_file_name ();
  1738. --- 1694,1700 ----
  1739.       }
  1740.     return 0;
  1741.   }
  1742. ! 
  1743.   /* Convenient functions for operating on one or all files being
  1744.      loaded.  */
  1745.   void print_file_name ();
  1746. ***************
  1747. *** 1602,1609 ****
  1748.   
  1749.         for (i = 0; i < n_search_dirs; i++)
  1750.       {
  1751. !       register char *string
  1752. !         = concat (search_dirs[i], "/", entry->filename);
  1753.         desc = open (string, O_RDONLY, 0);
  1754.         if (desc > 0)
  1755.           {
  1756. --- 1818,1836 ----
  1757.   
  1758.         for (i = 0; i < n_search_dirs; i++)
  1759.       {
  1760. !       register char *string;
  1761. ! 
  1762. !       string = search_dirs[i];
  1763. !       if (n_flavors > 0)
  1764. !         {
  1765. !           int count;
  1766. !           for (count = 0; count < n_flavors; count++)
  1767. !         {
  1768. !           string = concat (string, "/", flavors[count]);
  1769. !         }
  1770. !         }
  1771. !       string = concat (string, "/", entry->filename);
  1772. !       if (trace_files) fprintf (stderr, "Look for %s\n", string);
  1773.         desc = open (string, O_RDONLY, 0);
  1774.         if (desc > 0)
  1775.           {
  1776. ***************
  1777. *** 1613,1618 ****
  1778. --- 1840,1880 ----
  1779.           }
  1780.         free (string);
  1781.       }
  1782. +       /* Phil.B 30-Jul-94 if we couldn't find file using serch_dirs
  1783. +      then we try removing trailing path one by one */
  1784. +       if ((desc <= 0) && (n_flavors > 0))
  1785. +     {
  1786. +           if (trace_files) fprintf (stderr, "Climbing into flavors\n");
  1787. +           for (i = 0; i < n_search_dirs; i++)
  1788. +         {
  1789. +           register int j;
  1790. +           register char *string;
  1791. + 
  1792. +           for (j = n_flavors; j >= 0; j--)
  1793. +                 {
  1794. +                   int count;
  1795. +               string = search_dirs[i];
  1796. +           /* Phil.B 29-Jul-94 Special condition is made so that
  1797. +              if j = 0 we don't copy flavor because we want to test
  1798. +              search path without any flavor added. */
  1799. +               for (count = 1; count <= j ; count++)
  1800. +             {
  1801. +               string = concat (string, "/", flavors[count-1]);
  1802. +             }
  1803. +               string = concat (string, "/", entry->filename);
  1804. +               if (trace_files) fprintf (stderr, "Look for %s\n", string);
  1805. +               desc = open (string, O_RDONLY, 0);
  1806. +               if (desc > 0)
  1807. +                 {
  1808. +                   entry->filename = string;
  1809. +                   entry->search_dirs_flag = 0;
  1810. +                   break;
  1811. +                 }
  1812. +               free (string);
  1813. +                 }
  1814. +           if (desc > 0) break;
  1815. +         }
  1816. +         }
  1817.       }
  1818.     else
  1819.       desc = open (entry->filename, O_RDONLY, 0);
  1820. ***************
  1821. *** 1678,1684 ****
  1822.       }
  1823.     return result;
  1824.   }
  1825. ! 
  1826.   /* Medium-level input routines for rel files.  */
  1827.   
  1828.   /* Determine whether the given ENTRY is an archive, a BSD a.out file,
  1829. --- 1940,1946 ----
  1830.       }
  1831.     return result;
  1832.   }
  1833. ! 
  1834.   /* Medium-level input routines for rel files.  */
  1835.   
  1836.   /* Determine whether the given ENTRY is an archive, a BSD a.out file,
  1837. ***************
  1838. *** 2044,2050 ****
  1839.     if (entry->strs_size != read (desc, entry->strings, entry->strs_size))
  1840.       fatal_with_file ("premature end of file in strings of ", entry);
  1841.   }
  1842. ! 
  1843.   /* Read in the symbols of all input files.  */
  1844.   
  1845.   void read_file_symbols (), read_entry_symbols (), read_entry_strings ();
  1846. --- 2306,2312 ----
  1847.     if (entry->strs_size != read (desc, entry->strings, entry->strs_size))
  1848.       fatal_with_file ("premature end of file in strings of ", entry);
  1849.   }
  1850. ! 
  1851.   /* Read in the symbols of all input files.  */
  1852.   
  1853.   void read_file_symbols (), read_entry_symbols (), read_entry_strings ();
  1854. ***************
  1855. *** 2097,2103 ****
  1856.   
  1857.     file_close ();
  1858.   }
  1859. ! 
  1860.   /* Enter the external symbol defs and refs of ENTRY in the hash table.  */
  1861.   
  1862.   void
  1863. --- 2359,2365 ----
  1864.   
  1865.     file_close ();
  1866.   }
  1867. ! 
  1868.   /* Enter the external symbol defs and refs of ENTRY in the hash table.  */
  1869.   
  1870.   void
  1871. ***************
  1872. *** 2120,2125 ****
  1873. --- 2382,2397 ----
  1874.         if (SET_ELEMENT_P (p->n_type))
  1875.       {
  1876.         set_symbol_count++;
  1877. + 
  1878. + /* Matthias Fleischer 25-Apr-94: fix bug in ld that prevents
  1879. +    symboltables for objects in the data hunk from working. */
  1880. + #ifdef HUNK_INSTEAD_OF_A_OUT
  1881. +         /* Count pointers in the symbol table, too */
  1882. +       if ((p->n_type&~N_EXT)==N_SETD||
  1883. +               (p->n_type&~N_EXT)==N_SETB)
  1884. +         numdatadata_relocs++;
  1885. + #endif
  1886. + 
  1887.         if (output_style != OUTPUT_RELOCATABLE)
  1888.           enter_global_ref (p, p->n_un.n_strx + entry->strings, entry);
  1889.       }
  1890. ***************
  1891. *** 2165,2170 ****
  1892. --- 2437,2448 ----
  1893.   
  1894.     local_sym_count++;
  1895.     non_L_local_sym_count++;
  1896. + #if 0
  1897. +   if (trace_files)
  1898. +     fprintf (stderr, "%d local syms, %d debug syms, %d gbl refs, %d gbl defs\n",
  1899. +          local_sym_count, debugger_sym_count, undefined_global_sym_count,
  1900. +          defined_global_sym_count);
  1901. + #endif
  1902.   }
  1903.   
  1904.   /* Enter one global symbol in the hash table.
  1905. ***************
  1906. *** 2375,2381 ****
  1907.     return 0;
  1908.   }
  1909.   
  1910. ! 
  1911.   /* Searching libraries */
  1912.   
  1913.   struct file_entry *decode_library_subfile ();
  1914. --- 2653,2659 ----
  1915.     return 0;
  1916.   }
  1917.   
  1918. ! 
  1919.   /* Searching libraries */
  1920.   
  1921.   struct file_entry *decode_library_subfile ();
  1922. ***************
  1923. *** 2452,2459 ****
  1924. --- 2730,2762 ----
  1925.          && hdr1.ar_name[namelen] != '/';
  1926.          namelen++);
  1927.   
  1928. + /* JPB, 7 Jun 1992: Support for long file names. Set the global variable
  1929. +                     ar_hdr_size to the real length of the header.
  1930. +                     The code for extracting the long name is pretty much stolen
  1931. +                     from the BSD ar (archive.c, version 5.7).
  1932. +                     This is a *really* ugly hack!
  1933. + */
  1934. + #if 1
  1935. +   ar_hdr_size = sizeof(struct ar_hdr);
  1936. +   if (!bcmp(hdr1.ar_name,AR_EFMT1,sizeof(AR_EFMT1) -1))
  1937. +   {
  1938. +     namelen = atoi(hdr1.ar_name + sizeof(AR_EFMT1) -1);
  1939. +     if (namelen <= 0 || namelen > MAXNAMLEN)
  1940. +       fatal_with_file("malformatted long name of archive member in ",library_entry);
  1941. +     ar_hdr_size += namelen;
  1942. +     name = (char *) xmalloc (namelen+1);
  1943. +     if (read(desc,name,namelen) != namelen)
  1944. +       fatal_with_file("malformatted long name of archive member in ",library_entry);
  1945. +   }
  1946. +   else
  1947. +   {
  1948. +     name = (char *) xmalloc (namelen+1);
  1949. +     strncpy (name, hdr1.ar_name, namelen);
  1950. +   }
  1951. + #else
  1952.     name = (char *) xmalloc (namelen+1);
  1953.     strncpy (name, hdr1.ar_name, namelen);
  1954. + #endif
  1955.     name[namelen] = 0;
  1956.   
  1957.     subentry->filename = name;
  1958. ***************
  1959. *** 2461,2467 ****
  1960. --- 2764,2774 ----
  1961.     subentry->symbols = 0;
  1962.     subentry->strings = 0;
  1963.     subentry->subfiles = 0;
  1964. + #if 1
  1965. +   subentry->starting_offset = subfile_offset + ar_hdr_size;
  1966. + #else
  1967.     subentry->starting_offset = subfile_offset + sizeof hdr1;
  1968. + #endif
  1969.     subentry->superfile = library_entry;
  1970.     subentry->library_flag = 0;
  1971.     subentry->header_read_flag = 0;
  1972. ***************
  1973. *** 2473,2479 ****
  1974.   
  1975.     return subentry;
  1976.   }
  1977. ! 
  1978.   int subfile_wanted_p ();
  1979.   
  1980.   /* Search a library that has a __.SYMDEF member.
  1981. --- 2780,2786 ----
  1982.   
  1983.     return subentry;
  1984.   }
  1985. ! 
  1986.   int subfile_wanted_p ();
  1987.   
  1988.   /* Search a library that has a __.SYMDEF member.
  1989. ***************
  1990. *** 2622,2628 ****
  1991.   
  1992.     free (symdef_data);
  1993.   }
  1994. ! 
  1995.   
  1996.   /* Handle a subentry for a file with no __.SYMDEF. */
  1997.   
  1998. --- 2929,2935 ----
  1999.   
  2000.     free (symdef_data);
  2001.   }
  2002. ! 
  2003.   
  2004.   /* Handle a subentry for a file with no __.SYMDEF. */
  2005.   
  2006. ***************
  2007. *** 2675,2685 ****
  2008.         if (!subentry) return;
  2009.   
  2010.         process_subentry (desc, subentry, entry, &prev);
  2011.         this_subfile_offset += member_length + sizeof (struct ar_hdr);
  2012.         if (this_subfile_offset & 1) this_subfile_offset++;
  2013.       }
  2014.   }
  2015. ! 
  2016.   /* ENTRY is an entry for a library member.
  2017.      Its symbols have been read into core, but not entered.
  2018.      Return nonzero if we ought to load this member.  */
  2019. --- 2982,3000 ----
  2020.         if (!subentry) return;
  2021.   
  2022.         process_subentry (desc, subentry, entry, &prev);
  2023. + #if 1
  2024. + /* JPB, 7 Jun 1992: Can't count on sizeof(ar_hdr) to be the size of the entire
  2025. +                     header: Long names extends the header. This is a *really*
  2026. +                     ugly hack, using a global variable! */
  2027. + 
  2028. +       this_subfile_offset += member_length + ar_hdr_size;
  2029. + #else
  2030.         this_subfile_offset += member_length + sizeof (struct ar_hdr);
  2031. + #endif
  2032.         if (this_subfile_offset & 1) this_subfile_offset++;
  2033.       }
  2034.   }
  2035. ! 
  2036.   /* ENTRY is an entry for a library member.
  2037.      Its symbols have been read into core, but not entered.
  2038.      Return nonzero if we ought to load this member.  */
  2039. ***************
  2040. *** 2777,2783 ****
  2041.   
  2042.     return 0;
  2043.   }
  2044. ! 
  2045.   void consider_file_section_lengths (), relocate_file_addresses ();
  2046.   
  2047.   /* Having entered all the global symbols and found the sizes of sections
  2048. --- 3092,3098 ----
  2049.   
  2050.     return 0;
  2051.   }
  2052. ! 
  2053.   void consider_file_section_lengths (), relocate_file_addresses ();
  2054.   
  2055.   /* Having entered all the global symbols and found the sizes of sections
  2056. ***************
  2057. *** 2800,2806 ****
  2058. --- 3115,3125 ----
  2059.   
  2060.     initialize_text_start ();
  2061.   
  2062. + #ifdef HUNK_INSTEAD_OF_A_OUT
  2063. +   text_size = 0;
  2064. + #else
  2065.     text_size = text_header_size;
  2066. + #endif
  2067.   
  2068.     /* Compute total size of sections */
  2069.   
  2070. ***************
  2071. *** 2809,2825 ****
  2072. --- 3128,3164 ----
  2073.     /* If necessary, pad text section to full page in the file.
  2074.        Include the padding in the text segment size.  */
  2075.   
  2076. + #ifndef HUNK_INSTEAD_OF_A_OUT
  2077.     if (output_style == OUTPUT_READONLY_TEXT || output_style == OUTPUT_DEMAND_PAGED)
  2078.       {
  2079.         text_pad = ((text_size + page_size - 1) & (- page_size)) - text_size;
  2080.         text_size += text_pad;
  2081.       }
  2082. + #endif
  2083. + 
  2084. + #ifdef HUNK_INSTEAD_OF_A_OUT
  2085. +   /* they go into text if they are required */
  2086. +   if (output_datadata_relocs && numdatadata_relocs)
  2087. +     {
  2088. +       if (datadata_reloc_symbol)
  2089. +         datadata_reloc_symbol->value = text_size;
  2090. +       
  2091. +       /* 1 long for the size, then the vector */
  2092. +       text_size += (1 + numdatadata_relocs) * 4;
  2093. +     }
  2094. + #endif
  2095.   
  2096.     /* Now that the text_size is known, initialize the data start address;
  2097.        this depends on text_size as well as the output file format.  */
  2098.   
  2099.     initialize_data_start ();
  2100.   
  2101. + #ifdef HUNK_INSTEAD_OF_A_OUT
  2102. +   data_pad = 0;
  2103. + #endif
  2104. + 
  2105. + 
  2106. + #ifndef HUNK_INSTEAD_OF_A_OUT
  2107.     /* Make sure bss starts out aligned as much as anyone can want.  */
  2108.     {
  2109.       int new_data_size = (data_size + sizeof(double) - 1) & ~(sizeof(double)-1);
  2110. ***************
  2111. *** 2827,2832 ****
  2112. --- 3166,3172 ----
  2113.       data_pad += new_data_size - data_size;
  2114.       data_size = new_data_size;
  2115.     }
  2116. + #endif
  2117.   
  2118.     /* Set up the set element vector */
  2119.   
  2120. ***************
  2121. *** 2836,2846 ****
  2122. --- 3176,3196 ----
  2123.            for each symbol for the length word at the beginning of the
  2124.        vector, plus a word for each symbol for a zero at the end of
  2125.        the vector (for incremental linking).  */
  2126. + #if 0
  2127. +       /* I think this is the other way round !? ### mw */
  2128. + 
  2129.         set_sect_size
  2130.       = (2 * set_symbol_count + set_vector_count) * sizeof (unsigned long);
  2131. + #else
  2132. +       set_sect_size
  2133. +     = (2 * set_vector_count + set_symbol_count) * sizeof (unsigned long);
  2134. + #endif
  2135.         set_sect_start = data_start + data_size;
  2136.         data_size += set_sect_size;
  2137.         set_vectors = (unsigned long *) xmalloc (set_sect_size);
  2138. + #ifdef HUNK_INSTEAD_OF_A_OUT
  2139. +       rel_vectors = (unsigned char *) xmalloc (set_sect_size/sizeof(unsigned long));
  2140. + #endif
  2141.         setv_fill_count = 0;
  2142.       }
  2143.   
  2144. ***************
  2145. *** 2888,2894 ****
  2146. --- 3238,3260 ----
  2147.                 sp->multiply_defined = 1;
  2148.                 multiple_def_count++;
  2149.               }
  2150. + 
  2151. + #ifdef HUNK_INSTEAD_OF_A_OUT
  2152. +           /* don't relocate absolute symbols in sets */
  2153. +           rel_vectors[setv_fill_count] = ( ((type & ~N_EXT) != N_SETA) );
  2154. + 
  2155. +           /* Matthias Fleischer 25-Apr-94: fix bug in ld that prevents
  2156. +              symboltables for objects in the data hunk from working. */
  2157. + 
  2158. +           /* This is some kind of hack, but doing this cleaner would be 
  2159. +              much more complicated */
  2160. +           set_vectors[setv_fill_count++] = p->n_value
  2161. +             +( (type & ~N_EXT) == N_SETD ? text_size : 0 )
  2162. +             +( (type & ~N_EXT) == N_SETB ? data_size : 0 );
  2163. + #else          
  2164.             set_vectors[setv_fill_count++] = p->n_value;
  2165. + #endif
  2166. + 
  2167.           }
  2168.             else if ((type & N_EXT) && type != (N_UNDF | N_EXT))
  2169.           {
  2170. ***************
  2171. *** 2931,2937 ****
  2172. --- 3297,3309 ----
  2173.                     + (align - 1)) & (- align))
  2174.                     - data_size - data_start);
  2175.   
  2176. + #ifdef HUNK_INSTEAD_OF_A_OUT
  2177. +           sp->value = bss_size;
  2178. +           if (databss_together)
  2179. +             sp->value += data_start + data_size;
  2180. + #else
  2181.             sp->value = data_start + data_size + bss_size;
  2182. + #endif
  2183.             sp->defined = N_BSS | N_EXT;
  2184.             bss_size += com;
  2185.             if (write_map)
  2186. ***************
  2187. *** 2951,2956 ****
  2188. --- 3323,3329 ----
  2189.             unsigned long length_word_index
  2190.           = (sp->value - set_sect_start) / sizeof (unsigned long);
  2191.             unsigned long i, tmp;
  2192. +           unsigned char tmp2;
  2193.   
  2194.             set_vectors[length_word_index]
  2195.           = setv_fill_count - 1 - length_word_index;
  2196. ***************
  2197. *** 2964,2969 ****
  2198. --- 3337,3349 ----
  2199.             set_vectors[length_word_index + i]
  2200.               = set_vectors[setv_fill_count - i];
  2201.             set_vectors[setv_fill_count - i] = tmp;
  2202. + #ifdef HUNK_INSTEAD_OF_A_OUT
  2203. +           /* reverse relocation vector too! */
  2204. +           tmp2 = rel_vectors[length_word_index + i];
  2205. +           rel_vectors[length_word_index + i]
  2206. +             = rel_vectors[setv_fill_count - i];
  2207. +           rel_vectors[setv_fill_count - i] = tmp2;
  2208. + #endif
  2209.           }
  2210.   
  2211.             set_vectors[setv_fill_count++] = 0;
  2212. ***************
  2213. *** 2994,2999 ****
  2214. --- 3374,3392 ----
  2215.         etext_symbol_alt->value = etext_value;
  2216.     }
  2217.   
  2218. + #ifdef amigados
  2219. +   {
  2220. +     if (sdata_symbol)
  2221. +       sdata_symbol->value = data_start;
  2222. +     if (text_size_symbol)
  2223. +       text_size_symbol->value = text_size;
  2224. +     if (data_size_symbol)
  2225. +       data_size_symbol->value = data_size;
  2226. +     if (bss_size_symbol)
  2227. +       bss_size_symbol->value  = bss_size;
  2228. +   }
  2229. + #endif
  2230. + 
  2231.     {
  2232.       int edata_value = data_start + data_size;
  2233.       if (edata_symbol)
  2234. ***************
  2235. *** 3013,3021 ****
  2236. --- 3406,3416 ----
  2237.       if (specified_data_size && specified_data_size > data_size)
  2238.         data_pad_additional = specified_data_size - data_size;
  2239.   
  2240. + #ifndef HUNK_INSTEAD_OF_A_OUT
  2241.       if (output_style == OUTPUT_DEMAND_PAGED)
  2242.         data_pad_additional =
  2243.       ((data_pad_additional + data_size + page_size - 1) & (- page_size)) - data_size;
  2244. + #endif
  2245.   
  2246.       bss_size -= data_pad_additional;
  2247.       if (bss_size < 0) bss_size = 0;
  2248. ***************
  2249. *** 3024,3031 ****
  2250.   
  2251.       data_pad += data_pad_additional;
  2252.     }
  2253.   }
  2254. ! 
  2255.   /* Accumulate the section sizes of input file ENTRY
  2256.      into the section sizes of the output file.  */
  2257.   
  2258. --- 3419,3462 ----
  2259.   
  2260.       data_pad += data_pad_additional;
  2261.     }
  2262. + 
  2263. + #ifdef HUNK_INSTEAD_OF_A_OUT
  2264. +   /* if there is some code, assign it next hunk_number */
  2265. +   if (text_size)
  2266. +      number_of_code_hunk = current_hunk++;
  2267. +   else
  2268. +      number_of_code_hunk = -1;
  2269. + 
  2270. +   if (data_size)
  2271. +      number_of_data_hunk = current_hunk++;
  2272. +   else
  2273. +      number_of_data_hunk = -1;
  2274. + 
  2275. +   if (bss_size)
  2276. +      number_of_bss_hunk  = current_hunk++;
  2277. +   else
  2278. +      number_of_bss_hunk  = -1;
  2279. + 
  2280. +   if (databss_together)
  2281. +     {
  2282. +       if (data_size && bss_size)
  2283. +     {
  2284. +       current_hunk --;
  2285. +       number_of_bss_hunk = number_of_data_hunk;
  2286. +     }
  2287. +     }
  2288. + 
  2289. +   if (strip_symbols != STRIP_ALL && !amiga_symbols_only)
  2290. +      number_of_debug_hunk = current_hunk++;
  2291. +   else
  2292. +      number_of_debug_hunk = -1;
  2293. +   if (trace_files)
  2294. +     fprintf (stderr, "text hunk %d, data hunk %d, bss hunk %d, debug hunk %d\n",
  2295. +          number_of_code_hunk, number_of_data_hunk, number_of_bss_hunk,
  2296. +          number_of_debug_hunk);
  2297. + #endif
  2298.   }
  2299. ! 
  2300.   /* Accumulate the section sizes of input file ENTRY
  2301.      into the section sizes of the output file.  */
  2302.   
  2303. ***************
  2304. *** 3046,3051 ****
  2305. --- 3477,3506 ----
  2306.   
  2307.     text_reloc_size += entry->text_reloc_size;
  2308.     data_reloc_size += entry->data_reloc_size;
  2309. + 
  2310. + #ifdef HUNK_INSTEAD_OF_A_OUT
  2311. +   if (! output_datadata_relocs)
  2312. +     return;
  2313. + 
  2314. +   /* have to guess at how many datadata-relocs we might have. This number
  2315. +      is larger than the real thing, because I have to include the references
  2316. +      to UNDF symbols as well. */
  2317. +   {
  2318. +     struct relocation_info *r, *re, *reloc;
  2319. +     int desc = file_open (entry);
  2320. + 
  2321. +     reloc = (struct relocation_info *) alloca (entry->data_reloc_size);
  2322. +     lseek (desc, entry->starting_offset + entry->data_reloc_offset, L_SET);
  2323. +     if (entry->data_reloc_size != read (desc, reloc, entry->data_reloc_size))
  2324. +       fatal_with_file ("premature eof in data relocation of ", entry);
  2325. +     
  2326. +     for (r = reloc, re = reloc + entry->data_reloc_size/sizeof(*re); r < re; r++)
  2327. +       if (RELOC_EXTERN_P (r) || ((RELOC_TYPE (r) & N_TYPE) != N_TEXT))
  2328. +     numdatadata_relocs ++;
  2329. + 
  2330. +     file_close ();
  2331. +   }
  2332. + #endif
  2333.   }
  2334.   
  2335.   /* Determine where the sections of ENTRY go into the output file,
  2336. ***************
  2337. *** 3062,3068 ****
  2338.        for the portion of data_pad which overlaps with bss.  If they had
  2339.        been, we would get the wrong results here.  */
  2340.     entry->data_start_address += data_start;
  2341. !   entry->bss_start_address += data_start + data_size;
  2342.   
  2343.     {
  2344.       register struct nlist *p;
  2345. --- 3517,3528 ----
  2346.        for the portion of data_pad which overlaps with bss.  If they had
  2347.        been, we would get the wrong results here.  */
  2348.     entry->data_start_address += data_start;
  2349. ! 
  2350. ! #ifdef HUNK_INSTEAD_OF_A_OUT
  2351. !   if (databss_together)
  2352. ! #endif
  2353. !     entry->bss_start_address += data_start + data_size;
  2354. ! 
  2355.   
  2356.     {
  2357.       register struct nlist *p;
  2358. ***************
  2359. *** 3080,3087 ****
  2360.         case N_SETT:
  2361.           p->n_value += entry->text_start_address - entry->orig_text_address;
  2362.           break;
  2363. -       case N_DATA:
  2364.         case N_SETV:
  2365.         case N_SETD:
  2366.           /* Data segment symbol.  Subtract the address of the
  2367.              data segment in the input file, and add the address
  2368. --- 3540,3547 ----
  2369.         case N_SETT:
  2370.           p->n_value += entry->text_start_address - entry->orig_text_address;
  2371.           break;
  2372.         case N_SETV:
  2373. +       case N_DATA:
  2374.         case N_SETD:
  2375.           /* Data segment symbol.  Subtract the address of the
  2376.              data segment in the input file, and add the address
  2377. ***************
  2378. *** 3098,3104 ****
  2379.         }
  2380.     }
  2381.   }
  2382. ! 
  2383.   void describe_file_sections (), list_file_locals ();
  2384.   
  2385.   /* Print a complete or partial map of the output file.  */
  2386. --- 3558,3564 ----
  2387.         }
  2388.     }
  2389.   }
  2390. ! 
  2391.   void describe_file_sections (), list_file_locals ();
  2392.   
  2393.   /* Print a complete or partial map of the output file.  */
  2394. ***************
  2395. *** 3174,3180 ****
  2396.     entry->strings = 0;        /* All done with them.  */
  2397.   }
  2398.   
  2399. ! 
  2400.   /* Static vars for do_warnings and subroutines of it */
  2401.   int list_unresolved_refs;    /* List unresolved refs */
  2402.   int list_warning_symbols;    /* List warning syms */
  2403. --- 3634,3640 ----
  2404.     entry->strings = 0;        /* All done with them.  */
  2405.   }
  2406.   
  2407. ! 
  2408.   /* Static vars for do_warnings and subroutines of it */
  2409.   int list_unresolved_refs;    /* List unresolved refs */
  2410.   int list_warning_symbols;    /* List warning syms */
  2411. ***************
  2412. *** 3192,3198 ****
  2413.     struct nlist *sym;
  2414.   };
  2415.   
  2416. - void qsort ();
  2417.   /*
  2418.    * Helper routines for do_file_warnings.
  2419.    */
  2420. --- 3652,3657 ----
  2421. ***************
  2422. *** 3672,3678 ****
  2423.     free (data_scan);
  2424.     entry->strings = 0;        /* Since it will dissapear anyway.  */
  2425.   }
  2426. ! 
  2427.   do_warnings (outfile)
  2428.        FILE *outfile;
  2429.   {
  2430. --- 4131,4137 ----
  2431.     free (data_scan);
  2432.     entry->strings = 0;        /* Since it will dissapear anyway.  */
  2433.   }
  2434. ! 
  2435.   do_warnings (outfile)
  2436.        FILE *outfile;
  2437.   {
  2438. ***************
  2439. *** 3691,3697 ****
  2440.     if (list_unresolved_refs || list_multiple_defs)
  2441.       make_executable = 0;
  2442.   }
  2443. ! 
  2444.   #ifdef A_OUT
  2445.   
  2446.   /* Stuff pertaining to creating a.out files. */
  2447. --- 4150,4156 ----
  2448.     if (list_unresolved_refs || list_multiple_defs)
  2449.       make_executable = 0;
  2450.   }
  2451. ! 
  2452.   #ifdef A_OUT
  2453.   
  2454.   /* Stuff pertaining to creating a.out files. */
  2455. ***************
  2456. *** 3712,3717 ****
  2457. --- 4171,4181 ----
  2458.   {
  2459.     int magic;
  2460.   
  2461. + #ifdef HUNK_INSTEAD_OF_A_OUT
  2462. +   text_start = 0;
  2463. +   return;
  2464. + #endif
  2465. + 
  2466.     switch (output_style)
  2467.       {
  2468.       case OUTPUT_RELOCATABLE:
  2469. ***************
  2470. *** 3770,3775 ****
  2471. --- 4234,4244 ----
  2472.   void
  2473.   initialize_a_out_data_start ()
  2474.   {
  2475. + #ifdef HUNK_INSTEAD_OF_A_OUT
  2476. +   data_start = 0;
  2477. +   return;
  2478. + #endif
  2479. + 
  2480.     outheader.a_text = text_size;
  2481.   #ifdef sequent
  2482.     outheader.a_text += N_ADDRADJ (outheader);
  2483. ***************
  2484. *** 3923,3947 ****
  2485.   void
  2486.   write_a_out_header ()
  2487.   {
  2488. !   lseek (outdesc, 0L, 0);
  2489.   
  2490.   #ifdef COFF_ENCAPSULATE
  2491.     if (need_coff_header)
  2492. !     mywrite (&coffheader, sizeof coffheader, 1, outdesc);
  2493.   #endif
  2494.   
  2495. !   mywrite (&outheader, sizeof (struct exec), 1, outdesc);
  2496.   
  2497.     /* Output whatever padding is required in the executable file
  2498.        between the header and the start of the text.  */
  2499.   
  2500.   #ifndef COFF_ENCAPSULATE
  2501. !   padfile (N_TXTOFF (outheader) - sizeof outheader, outdesc);
  2502.   #endif
  2503.   }
  2504.   
  2505.   #endif
  2506. ! 
  2507.   #ifdef MACH_O
  2508.   
  2509.   /* Stuff pertaining to creating Mach-O files. */
  2510. --- 4392,4416 ----
  2511.   void
  2512.   write_a_out_header ()
  2513.   {
  2514. !   fseek (outstream, 0L, 0);
  2515.   
  2516.   #ifdef COFF_ENCAPSULATE
  2517.     if (need_coff_header)
  2518. !     mywrite (&coffheader, sizeof coffheader, 1, outstream);
  2519.   #endif
  2520.   
  2521. !   mywrite (&outheader, sizeof (struct exec), 1, outstream);
  2522.   
  2523.     /* Output whatever padding is required in the executable file
  2524.        between the header and the start of the text.  */
  2525.   
  2526.   #ifndef COFF_ENCAPSULATE
  2527. !   padfile (N_TXTOFF (outheader) - sizeof outheader, outstream);
  2528.   #endif
  2529.   }
  2530.   
  2531.   #endif
  2532. ! 
  2533.   #ifdef MACH_O
  2534.   
  2535.   /* Stuff pertaining to creating Mach-O files. */
  2536. ***************
  2537. *** 4145,4151 ****
  2538.   #endif
  2539.     thread_state state;
  2540.   
  2541. !   lseek (outdesc, 0L, 0);
  2542.   
  2543.   
  2544.     header.magic = MH_MAGIC;
  2545. --- 4614,4620 ----
  2546.   #endif
  2547.     thread_state state;
  2548.   
  2549. !   fseek (outstream, 0L, 0);
  2550.   
  2551.   
  2552.     header.magic = MH_MAGIC;
  2553. ***************
  2554. *** 4251,4257 ****
  2555.   #ifdef LC_SYMSEG
  2556.         m_object.symseg = symseg;
  2557.   #endif
  2558. !       mywrite((char *) &m_object, 1, sizeof m_object, outdesc);
  2559.         break;
  2560.   
  2561.       default:
  2562. --- 4720,4726 ----
  2563.   #ifdef LC_SYMSEG
  2564.         m_object.symseg = symseg;
  2565.   #endif
  2566. !       mywrite((char *) &m_object, 1, sizeof m_object, outstream);
  2567.         break;
  2568.   
  2569.       default:
  2570. ***************
  2571. *** 4305,4311 ****
  2572.   #ifdef LC_SYMSEG
  2573.         m_exec.symseg = symseg;
  2574.   #endif
  2575. !       mywrite((char *) &m_exec, 1, sizeof m_exec, outdesc);
  2576.         break;
  2577.       }
  2578.   }
  2579. --- 4774,4780 ----
  2580.   #ifdef LC_SYMSEG
  2581.         m_exec.symseg = symseg;
  2582.   #endif
  2583. !       mywrite((char *) &m_exec, 1, sizeof m_exec, outstream);
  2584.         break;
  2585.       }
  2586.   }
  2587. ***************
  2588. *** 4386,4392 ****
  2589.   }
  2590.   
  2591.   #endif
  2592. ! 
  2593.   /* The following functions are simple switches according to the
  2594.      output style.  */
  2595.   
  2596. --- 4855,4861 ----
  2597.   }
  2598.   
  2599.   #endif
  2600. ! 
  2601.   /* The following functions are simple switches according to the
  2602.      output style.  */
  2603.   
  2604. ***************
  2605. *** 4484,4489 ****
  2606. --- 4953,4962 ----
  2607.   void
  2608.   write_header ()
  2609.   {
  2610. + #ifdef HUNK_INSTEAD_OF_A_OUT
  2611. +   conditionally_rewrite_headers ();
  2612. +   return;
  2613. + #else
  2614.   #ifdef A_OUT
  2615.     if (output_file_type == IS_A_OUT)
  2616.       {
  2617. ***************
  2618. *** 4498,4506 ****
  2619.         return;
  2620.       }
  2621.   #endif
  2622.     fatal ("unknown output file type (enum file_type)", (char *) 0);
  2623.   }
  2624. ! 
  2625.   /* Write the output file */
  2626.   
  2627.   void
  2628. --- 4971,4980 ----
  2629.         return;
  2630.       }
  2631.   #endif
  2632. + #endif
  2633.     fatal ("unknown output file type (enum file_type)", (char *) 0);
  2634.   }
  2635. ! 
  2636.   /* Write the output file */
  2637.   
  2638.   void
  2639. ***************
  2640. *** 4519,4540 ****
  2641.        the way Unix ld works; I'm going to consider it a feature.  */
  2642.     (void) unlink (output_filename);
  2643.     
  2644. !   outdesc = open (output_filename, O_WRONLY | O_CREAT | O_TRUNC, 0666);
  2645. !   if (outdesc < 0) perror_name (output_filename);
  2646.   
  2647. !   if (fstat (outdesc, &statbuf) < 0)
  2648.       perror_name (output_filename);
  2649.   
  2650.     filemode = statbuf.st_mode;
  2651.   
  2652.     chmod (output_filename, filemode & ~0111);
  2653.   
  2654.     /* Calculate the offsets of the various pieces of the output file.  */
  2655.     compute_section_offsets ();
  2656.   
  2657.     /* Output the text and data segments, relocating as we go.  */
  2658.     write_text ();
  2659.     write_data ();
  2660.   
  2661.     /* Output the merged relocation info, if requested with `-r'.  */
  2662.     if (output_style == OUTPUT_RELOCATABLE)
  2663. --- 4993,5061 ----
  2664.        the way Unix ld works; I'm going to consider it a feature.  */
  2665.     (void) unlink (output_filename);
  2666.     
  2667. !   outstream = fopen (output_filename, "w");
  2668. !   if (outstream == 0) perror_name (output_filename);
  2669.   
  2670. ! #ifndef MCH_AMIGA
  2671. !   if (fstat (fileno (outstream), &statbuf) < 0)
  2672.       perror_name (output_filename);
  2673.   
  2674.     filemode = statbuf.st_mode;
  2675.   
  2676. +   /* this wouldn't work anyway, "file in use, error"... */
  2677.     chmod (output_filename, filemode & ~0111);
  2678. + #endif
  2679. + 
  2680. +   /* on the Amiga, the following call DOES set the symbol offset, but
  2681. +    * it does it wrong, we'll be able to do it right, as soon as all the
  2682. +    * other data has been written.. */
  2683.   
  2684.     /* Calculate the offsets of the various pieces of the output file.  */
  2685.     compute_section_offsets ();
  2686.   
  2687. + #ifdef HUNK_INSTEAD_OF_A_OUT
  2688. +   /* get ready to collect information where all symbols
  2689. +    * go. Since this has to be done only once, we'll later be able to 
  2690. +    * output the right symbol-hunk after the right (code/data/bss-)hunk. */
  2691. +   init_symbol_hunks ();
  2692. +   look_for_symbols ();
  2693. + #endif
  2694. + 
  2695.     /* Output the text and data segments, relocating as we go.  */
  2696.     write_text ();
  2697.     write_data ();
  2698. + #ifdef HUNK_INSTEAD_OF_A_OUT
  2699. +   if (datadata_relocs_offset)
  2700. +     write_datadata_relocs ();
  2701. + 
  2702. +   write_bss ();
  2703. +   if (number_of_debug_hunk != -1)
  2704. +     {
  2705. +       /* ok, lets output the start of the debug hunk */
  2706. +       fseek (outstream, 0L, SEEK_END);
  2707. +       offset_of_debug_hunk = ftell (outstream);
  2708. +       if (trace_files)
  2709. +     fprintf (stderr, "Write debug hunk at 0x%x\n", offset_of_debug_hunk);
  2710. +       dh.id = 0x3f1;     /* HUNK_DEBUG */
  2711. +       dh.len = 0;        /* we'll fill this in later */
  2712. +       dh.magic = ZMAGIC; /* when wishes came true... */
  2713. +       dh.syms = outheader.a_syms;
  2714. +       mywrite(&dh, sizeof dh, 1, outstream);
  2715. + 
  2716. +       output_syms_offset   = ftell (outstream);
  2717. +       output_strs_offset   = output_syms_offset + dh.syms;
  2718. + 
  2719. +       /* since we later will seek forward and backward to fill in each files
  2720. +        * symbol- and string-table, we have to create the needed space, that
  2721. +        * will be seeked over, since on an empty file, lseek(fd, 10, 0) will 
  2722. +        * position to byte 10 on Unix, but will just generate an error under
  2723. +        * AmigaDOS and stay at position 0. */
  2724. + 
  2725. +       /* this will just write garbage, but thats enough:-)) */
  2726. +       mywrite(&output_strs_offset, dh.syms+4, 1, outstream);
  2727. +       fseek (outstream, output_syms_offset, 0);
  2728. +     }
  2729. + #endif
  2730.   
  2731.     /* Output the merged relocation info, if requested with `-r'.  */
  2732.     if (output_style == OUTPUT_RELOCATABLE)
  2733. ***************
  2734. *** 4547,4568 ****
  2735.        are finalized.  */
  2736.     compute_more_section_offsets ();
  2737.   
  2738.     /* Copy any GDB symbol segments from input files.  */
  2739.     write_symsegs ();
  2740.   
  2741.     /* Now that everything is known about the output file, write its header.  */
  2742.     write_header ();
  2743.   
  2744. !   close (outdesc);
  2745.   
  2746.     mask = umask (0);
  2747.     umask (mask);
  2748.   
  2749.     if (chmod (output_filename, filemode | (0111 & ~mask)) == -1)
  2750.       perror_name (output_filename);
  2751.   }
  2752. ! 
  2753.   void modify_location (), perform_relocation (), copy_text (), copy_data ();
  2754.   
  2755.   /* Relocate the text segment of each input file
  2756.      and write to the output file.  */
  2757. --- 5068,5101 ----
  2758.        are finalized.  */
  2759.     compute_more_section_offsets ();
  2760.   
  2761. + #ifndef HUNK_INSTEAD_OF_A_OUT
  2762. +   /* I don't support GDB-symbol segments, they aren't used anymore by
  2763. +    * the newer versions of gdb, BUT of course, if somebody needs them..
  2764. +    * that's exactly why I introduced the "dh.strs" Parameter, so that
  2765. +    * you could - as in Unix - append these segments at the end of the file */
  2766. + 
  2767.     /* Copy any GDB symbol segments from input files.  */
  2768.     write_symsegs ();
  2769. + #endif
  2770.   
  2771.     /* Now that everything is known about the output file, write its header.  */
  2772.     write_header ();
  2773.   
  2774. !   fclose (outstream);
  2775.   
  2776. + #ifndef HUNK_INSTEAD_OF_A_OUT
  2777.     mask = umask (0);
  2778.     umask (mask);
  2779.   
  2780.     if (chmod (output_filename, filemode | (0111 & ~mask)) == -1)
  2781.       perror_name (output_filename);
  2782. + #endif
  2783.   }
  2784. ! 
  2785.   void modify_location (), perform_relocation (), copy_text (), copy_data ();
  2786. + #ifdef HUNK_INSTEAD_OF_A_OUT
  2787. + void write_hunk_header();
  2788. + #endif
  2789.   
  2790.   /* Relocate the text segment of each input file
  2791.      and write to the output file.  */
  2792. ***************
  2793. *** 4571,4587 ****
  2794.   write_text ()
  2795.   {
  2796.     if (trace_files)
  2797. !     fprintf (stderr, "Copying and relocating text:\n\n");
  2798.   
  2799. !   lseek (outdesc, output_text_offset + text_header_size, 0);
  2800.   
  2801.     each_full_file (copy_text, 0);
  2802.     file_close ();
  2803.   
  2804.     if (trace_files)
  2805.       fprintf (stderr, "\n");
  2806.   
  2807. !   padfile (text_pad, outdesc);
  2808.   }
  2809.   
  2810.   /* Read in all of the relocation information */
  2811. --- 5104,5161 ----
  2812.   write_text ()
  2813.   {
  2814.     if (trace_files)
  2815. !     fprintf (stderr, "Copying and relocating text at 0x%x:\n\n",
  2816. !          ftell (outstream));
  2817.   
  2818. ! #ifdef HUNK_INSTEAD_OF_A_OUT
  2819. !   /* this is a definitive write, we don't need to rewrite this out, since
  2820. !    * the yet undefined sizes of the reloc-hunks don't go into the 
  2821. !    * header-hunk */
  2822. !   write_hunk_header(outstream);
  2823. !   init_reloc_hunk();
  2824. ! 
  2825. !   /* and if there's no code-hunk, we can return here.. no sense in
  2826. !    * complicately doing just nothing... */
  2827. !   if (number_of_code_hunk == -1) return;
  2828. ! 
  2829. !   /* else start the code-hunk */
  2830. !   {
  2831. !      long code_header[2];
  2832. !      code_header[0] = 0x3e9;
  2833. !      code_header[1] = LONGSIZE(text_size);
  2834. !      mywrite(code_header, 1, sizeof code_header, outstream);
  2835. !   }
  2836. ! #else
  2837. !   fseek (outstream, output_text_offset + text_header_size, 0);
  2838. ! #endif
  2839.   
  2840.     each_full_file (copy_text, 0);
  2841. + #ifdef HUNK_INSTEAD_OF_A_OUT
  2842. +   if (output_datadata_relocs && numdatadata_relocs)
  2843. +     {
  2844. +       int i, zero = 0;
  2845. +       /* include the size-field, -> <= . The `real' values come later */
  2846. +       datadata_relocs_offset = ftell (outstream);
  2847. +       for (i = 0; i <= numdatadata_relocs; i ++)
  2848. +         mywrite (&zero, 1, sizeof (long), outstream);
  2849. +     }
  2850. + #endif
  2851. + 
  2852.     file_close ();
  2853.   
  2854.     if (trace_files)
  2855.       fprintf (stderr, "\n");
  2856.   
  2857. !   padfile (text_pad, outstream);
  2858. ! 
  2859. ! #ifdef HUNK_INSTEAD_OF_A_OUT
  2860. !   write_reloc_hunk();
  2861. !   write_symbol_hunk(number_of_code_hunk);
  2862. !   {
  2863. !     long hunk_end = 0x3f2;
  2864. !     mywrite(&hunk_end, 1, sizeof(long), outstream);
  2865. !   }
  2866. ! #endif
  2867.   }
  2868.   
  2869.   /* Read in all of the relocation information */
  2870. ***************
  2871. *** 4686,4700 ****
  2872.       fatal_with_file ("premature eof in text section of ", entry);
  2873.   
  2874.     /* Relocate the text according to the text relocation.  */
  2875. - 
  2876.     perform_relocation (bytes, entry->text_start_address - entry->orig_text_address,
  2877.                 entry->text_size, reloc, entry->text_reloc_size, entry);
  2878.   
  2879.     /* Write the relocated text to the output file.  */
  2880.   
  2881. !   mywrite (bytes, 1, entry->text_size, outdesc);
  2882.   }
  2883. ! 
  2884.   /* Relocate the data segment of each input file
  2885.      and write to the output file.  */
  2886.   
  2887. --- 5260,5273 ----
  2888.       fatal_with_file ("premature eof in text section of ", entry);
  2889.   
  2890.     /* Relocate the text according to the text relocation.  */
  2891.     perform_relocation (bytes, entry->text_start_address - entry->orig_text_address,
  2892.                 entry->text_size, reloc, entry->text_reloc_size, entry);
  2893.   
  2894.     /* Write the relocated text to the output file.  */
  2895.   
  2896. !   mywrite (bytes, 1, entry->text_size, outstream);
  2897.   }
  2898. ! 
  2899.   /* Relocate the data segment of each input file
  2900.      and write to the output file.  */
  2901.   
  2902. ***************
  2903. *** 4702,4710 ****
  2904.   write_data ()
  2905.   {
  2906.     if (trace_files)
  2907. !     fprintf (stderr, "Copying and relocating data:\n\n");
  2908.   
  2909. !   lseek (outdesc, output_data_offset, 0);
  2910.   
  2911.     each_full_file (copy_data, 0);
  2912.     file_close ();
  2913. --- 5275,5304 ----
  2914.   write_data ()
  2915.   {
  2916.     if (trace_files)
  2917. !     fprintf (stderr, "Copying and relocating data at 0x%x:\n\n",
  2918. !          ftell (outstream));
  2919. ! 
  2920. ! #ifndef HUNK_INSTEAD_OF_A_OUT
  2921. !   fseek (outstream, output_data_offset, 0);
  2922. ! #else
  2923. !   /* just have to hope that the file is positioned correctly.. */
  2924. !   init_reloc_hunk();
  2925. !   /* start a data-hunk, if there is data to be output */
  2926. !   if (number_of_data_hunk == -1) return;
  2927.   
  2928. !   {
  2929. !     long data_header[2];
  2930. !     int size;
  2931. !     data_header[0] = 0x3ea;
  2932. !     size = LONGSIZE(data_size);
  2933. !     /* create long data hunk? */
  2934. !     if (long_data_hunk && databss_together)
  2935. !       size=LONGSIZE(data_size+bss_size);
  2936. !     data_header[1] = size;
  2937. !       
  2938. !     mywrite(data_header, 1, sizeof data_header, outstream);
  2939. !   }
  2940. ! #endif
  2941.   
  2942.     each_full_file (copy_data, 0);
  2943.     file_close ();
  2944. ***************
  2945. *** 4713,4725 ****
  2946.        description of length of the set vector section.  */
  2947.   
  2948.     if (set_vector_count)
  2949. !     mywrite (set_vectors, 2 * set_symbol_count + set_vector_count,
  2950. !          sizeof (unsigned long), outdesc);
  2951.   
  2952.     if (trace_files)
  2953.       fprintf (stderr, "\n");
  2954.   
  2955. !   padfile (data_pad, outdesc);
  2956.   }
  2957.   
  2958.   /* Read the data segment contents of ENTRY, relocate them,
  2959. --- 5307,5351 ----
  2960.        description of length of the set vector section.  */
  2961.   
  2962.     if (set_vector_count)
  2963. !     {
  2964. ! #ifdef HUNK_INSTEAD_OF_A_OUT
  2965. !      /* this and mywrite later: inverted set_symbol_count and 
  2966. !       * set_vector_count, guess they were mixed up before   ### mw */
  2967. ! 
  2968. !       relocate_set_vectors (set_vectors, rel_vectors,
  2969. !                 2 * set_vector_count + set_symbol_count);
  2970. ! #endif
  2971. ! #if 0
  2972. !       mywrite (set_vectors, 2 * set_symbol_count + set_vector_count,
  2973. !            sizeof (unsigned long), outstream);
  2974. ! #else
  2975. !       mywrite (set_vectors, 2 * set_vector_count + set_symbol_count,
  2976. !            sizeof (unsigned long), outstream);
  2977. ! #endif
  2978. !     }
  2979.   
  2980.     if (trace_files)
  2981.       fprintf (stderr, "\n");
  2982.   
  2983. !   padfile (data_pad, outstream);
  2984. ! 
  2985. ! #ifdef HUNK_INSTEAD_OF_A_OUT
  2986. ! 
  2987. !   if (long_data_hunk && databss_together && bss_size)
  2988. !     {
  2989. !       /* dump zeros */
  2990. !       int i, zero = 0;
  2991. !       for (i = 0; i < LONGSIZE(bss_size); i++)
  2992. !     mywrite (&zero, 1, sizeof (long), outstream);
  2993. !     }
  2994. ! 
  2995. !   write_reloc_hunk();
  2996. !   write_symbol_hunk(number_of_data_hunk);
  2997. !   {
  2998. !     long hunk_end = 0x3f2;
  2999. !     mywrite(&hunk_end, 1, sizeof(long), outstream);
  3000. !   }
  3001. ! #endif
  3002.   }
  3003.   
  3004.   /* Read the data segment contents of ENTRY, relocate them,
  3005. ***************
  3006. *** 4765,4776 ****
  3007.     if (entry->data_size != read (desc, bytes, entry->data_size))
  3008.       fatal_with_file ("premature eof in data section of ", entry);
  3009.   
  3010. !   perform_relocation (bytes, entry->data_start_address - entry->orig_data_address,
  3011. !               entry->data_size, reloc, entry->data_reloc_size, entry);
  3012.   
  3013. !   mywrite (bytes, 1, entry->data_size, outdesc);
  3014.   }
  3015. ! 
  3016.   /* Relocate ENTRY's text or data section contents.
  3017.      DATA is the address of the contents, in core.
  3018.      DATA_SIZE is the length of the contents.
  3019. --- 5391,5406 ----
  3020.     if (entry->data_size != read (desc, bytes, entry->data_size))
  3021.       fatal_with_file ("premature eof in data section of ", entry);
  3022.   
  3023. !   perform_relocation (bytes, entry->data_start_address 
  3024. ! #ifndef HUNK_INSTEAD_OF_A_OUT
  3025. !                         - entry->orig_data_address
  3026. ! #endif
  3027. !                                     ,
  3028. !                 entry->data_size, reloc, entry->data_reloc_size, entry);
  3029.   
  3030. !   mywrite (bytes, 1, entry->data_size, outstream);
  3031.   }
  3032. ! 
  3033.   /* Relocate ENTRY's text or data section contents.
  3034.      DATA is the address of the contents, in core.
  3035.      DATA_SIZE is the length of the contents.
  3036. ***************
  3037. *** 4796,4806 ****
  3038. --- 5426,5445 ----
  3039.     int data_relocation = entry->data_start_address - entry->orig_data_address;
  3040.     int bss_relocation = entry->bss_start_address - entry->orig_bss_address;
  3041.   
  3042. + #ifdef HUNK_INSTEAD_OF_A_OUT
  3043. +   int this_hunk;
  3044. + #endif
  3045. + 
  3046.     for (; p < end; p++)
  3047.       {
  3048.         register int relocation = 0;
  3049.         register int addr = RELOC_ADDRESS(p);
  3050.         register unsigned int mask = 0;
  3051. + #ifdef HUNK_INSTEAD_OF_A_OUT
  3052. +       int ext_abs;
  3053. +       
  3054. +       ext_abs = 0;
  3055. + #endif
  3056.   
  3057.         if (addr >= data_size)
  3058.       fatal_with_file ("relocation address out of range in ", entry);
  3059. ***************
  3060. *** 4827,4848 ****
  3061.           relocation = 0;
  3062.         else
  3063.           relocation = sp->value;
  3064.       }
  3065.         else switch (RELOC_TYPE(p))
  3066.       {
  3067.       case N_TEXT:
  3068.       case N_TEXT | N_EXT:
  3069. !       relocation = text_relocation;
  3070.         break;
  3071.   
  3072.       case N_DATA:
  3073.       case N_DATA | N_EXT:
  3074. !       relocation = data_relocation;
  3075.         break;
  3076.   
  3077.       case N_BSS:
  3078.       case N_BSS | N_EXT:
  3079. !       relocation = bss_relocation;
  3080.         break;
  3081.   
  3082.       case N_ABS:
  3083. --- 5466,5545 ----
  3084.           relocation = 0;
  3085.         else
  3086.           relocation = sp->value;
  3087. + 
  3088. + #ifdef HUNK_INSTEAD_OF_A_OUT
  3089. +       if ((sp->defined & ~N_EXT) == N_ABS)
  3090. +         /* sort of a kludge.. the only external symbol (not pcrelative)
  3091. +              * we can really resolve.. */
  3092. +         ext_abs = 1;
  3093. +       else if ((sp->defined & ~N_EXT) == N_TEXT ||
  3094. +           (sp->defined & ~N_EXT) == N_SETT)
  3095. +         {
  3096. +           this_hunk = number_of_code_hunk;
  3097. +           if (RELOC_BASEREL_P (p))
  3098. +             {
  3099. +               fprintf (stderr, "symn = $%x, extern = %d, addr = $%lx.\n",
  3100. +                          p->r_symbolnum, p->r_extern, p->r_address);
  3101. +           fatal_with_file ("base relative text relocation in ", entry);
  3102. +         }
  3103. +         }
  3104. +       else if ((sp->defined & ~N_EXT) == N_DATA ||
  3105. +                (sp->defined & ~N_EXT) == N_SETD ||
  3106. +            (sp->defined & ~N_EXT) == N_SETV)
  3107. +         {
  3108. +           this_hunk = number_of_data_hunk;
  3109. +         }
  3110. +       else if ((sp->defined & ~N_EXT) == N_BSS ||
  3111. +            (sp->defined & ~N_EXT) == N_UNDF ||
  3112. +                (sp->defined & ~N_EXT) == N_SETB)
  3113. +         {
  3114. +           this_hunk = number_of_bss_hunk;
  3115. +         }
  3116. +       else    
  3117. +         fatal_with_file ("external symbol with unknown type $%x in ", entry, sp->defined);
  3118. + #endif
  3119.       }
  3120.         else switch (RELOC_TYPE(p))
  3121.       {
  3122.       case N_TEXT:
  3123.       case N_TEXT | N_EXT:
  3124. !       if (RELOC_BASEREL_P (p))
  3125. !         {
  3126. !           fprintf (stderr, "symn = $%x, extern = %d, addr = $%lx.\n",
  3127. !                      p->r_symbolnum, p->r_extern, p->r_address);
  3128. !           fatal_with_file ("base relative text relocation in ", entry);
  3129. !         }
  3130. !       else
  3131. !         relocation = text_relocation;
  3132. ! #ifdef HUNK_INSTEAD_OF_A_OUT
  3133. !       this_hunk = number_of_code_hunk;
  3134. ! #endif
  3135.         break;
  3136.   
  3137.       case N_DATA:
  3138.       case N_DATA | N_EXT:
  3139. ! #ifdef HUNK_INSTEAD_OF_A_OUT
  3140. !       if (RELOC_BASEREL_P (p))
  3141. !         relocation = entry->data_start_address;
  3142. !       else
  3143. ! #endif
  3144. !         relocation = data_relocation;
  3145. ! #ifdef HUNK_INSTEAD_OF_A_OUT
  3146. !       this_hunk = number_of_data_hunk;
  3147. ! #endif
  3148.         break;
  3149.   
  3150.       case N_BSS:
  3151.       case N_BSS | N_EXT:
  3152. ! #ifdef HUNK_INSTEAD_OF_A_OUT
  3153. !       if (RELOC_BASEREL_P (p))
  3154. !         relocation = entry->bss_start_address - entry->data_size;
  3155. !       else
  3156. ! #endif
  3157. !         relocation = bss_relocation;
  3158. ! #ifdef HUNK_INSTEAD_OF_A_OUT
  3159. !       this_hunk = number_of_bss_hunk;
  3160. ! #endif
  3161.         break;
  3162.   
  3163.       case N_ABS:
  3164. ***************
  3165. *** 4854,4864 ****
  3166.         fatal_with_file ("nonexternal relocation code invalid in ", entry);
  3167.       }
  3168.   
  3169.         if (RELOC_PCREL_P(p))
  3170.       relocation -= pc_relocation;
  3171.   
  3172. ! #ifdef RELOC_ADD_EXTRA
  3173. !       relocation += RELOC_ADD_EXTRA(p);
  3174.         if (output_style == OUTPUT_RELOCATABLE)
  3175.       {
  3176.         /* If this RELOC_ADD_EXTRA is 0, it means that the
  3177. --- 5551,5586 ----
  3178.         fatal_with_file ("nonexternal relocation code invalid in ", entry);
  3179.       }
  3180.   
  3181. + #ifdef HUNK_INSTEAD_OF_A_OUT
  3182. +       /* in this case, ONLY relocate those pc-relative 32bit jumps, that
  3183. +        * gas generates, since they are position independent, this gives
  3184. +        * a HUGE.. 'if' inside of '#ifdef' oh well... */
  3185. +       if (RELOC_PCREL_P(p) || RELOC_BASEREL_P(p) || ext_abs) {
  3186. +       
  3187. +       /* VERY BIG KLUDGE AHEAD! Since this amiga hunk format is really
  3188. +        * limited, 8bit and 16bit references are always defined to be
  3189. +        * pc-relative (according to the AmigaDOS RM 2nd ed). BUT if such
  3190. +        * a symbol is resolved by an absolute symbol then it's not considered
  3191. +        * to be pc-relative any more. This is nowhere documented, but you
  3192. +        * couldn't get
  3193. +        *   jsr _LVOOpen(a6)
  3194. +        * to work if you wouldn't do it this way. */
  3195. +        if (ext_abs) RELOC_PCREL_P(p) = 0;
  3196. +       
  3197. + #endif
  3198.         if (RELOC_PCREL_P(p))
  3199.       relocation -= pc_relocation;
  3200.   
  3201. !       /* if base relative, subtract 64k/2, so we get a larger range */
  3202. !       if (RELOC_BASEREL_P(p))
  3203. !     {
  3204. !       if (! databss_together)
  3205. !         fatal_with_file ("Reloc is base relative. Specify -databss-together in ", entry);
  3206. !       relocation -= 0x7ffe;
  3207. !     }
  3208. ! 
  3209. ! #ifdef RELOC_ADD_EXTRA
  3210. !       relocation += RELOC_ADD_EXTRA(p);
  3211.         if (output_style == OUTPUT_RELOCATABLE)
  3212.       {
  3213.         /* If this RELOC_ADD_EXTRA is 0, it means that the
  3214. ***************
  3215. *** 4895,4901 ****
  3216.         /* Shift everything up to where it's going to be used */
  3217.         relocation <<= RELOC_TARGET_BITPOS(p);
  3218.         mask <<= RELOC_TARGET_BITPOS(p);
  3219. - 
  3220.         switch (RELOC_TARGET_SIZE(p))
  3221.       {
  3222.       case 0:
  3223. --- 5617,5622 ----
  3224. ***************
  3225. *** 4903,4920 ****
  3226. --- 5624,5662 ----
  3227.           relocation -= mask & *(char *) (data + addr);
  3228.         else if (RELOC_MEMORY_ADD_P(p))
  3229.           relocation += mask & *(char *) (data + addr);
  3230. +       if (relocation < -128 || relocation > 127)
  3231. +         fatal_with_file ("Byte reloc overflow in ", entry);
  3232. + 
  3233.         *(char *) (data + addr) &= ~mask;
  3234.         *(char *) (data + addr) |= relocation;
  3235.         break;
  3236.   
  3237.       case 1:
  3238. +       {
  3239. +       int r=relocation;
  3240. + 
  3241.         if (RELOC_MEMORY_SUB_P(p))
  3242.           relocation -= mask & *(short *) (data + addr);
  3243.         else if (RELOC_MEMORY_ADD_P(p))
  3244.           relocation += mask & *(short *) (data + addr);
  3245. + 
  3246. +       if (relocation < -32768 || relocation > 32767)
  3247. +         {
  3248. +           fprintf (stderr, "relocation = $%lx, bsr = %d, pcr = %d, r= $%lx\n",
  3249. +                      relocation, RELOC_BASEREL_P(p), RELOC_PCREL_P (p), r);
  3250. +           fprintf (stderr, "textr = $%x, datar = $%x, bssr = $%x\n",
  3251. +                      text_relocation, data_relocation, bss_relocation);
  3252. +           fprintf (stderr, "symn = $%x, extern = %d, addr = $%lx.\n",
  3253. +                      p->r_symbolnum, p->r_extern, p->r_address);
  3254. +           fprintf (stderr, "data_size = %d, bss_size = %d.\n",
  3255. +                data_size, bss_size);
  3256. +           fatal_with_file ("Word reloc overflow in ", entry);
  3257. +         }
  3258. + 
  3259.         *(short *) (data + addr) &= ~mask;
  3260.         *(short *) (data + addr) |= relocation;
  3261.         break;
  3262. +       }
  3263.   
  3264.       case 2:
  3265.   #ifdef CROSS_LINKER
  3266. ***************
  3267. *** 4937,4942 ****
  3268. --- 5679,5685 ----
  3269.           relocation -= mask & *(long *) (data + addr);
  3270.         else if (RELOC_MEMORY_ADD_P(p))
  3271.           relocation += mask & *(long *) (data + addr);
  3272. + 
  3273.         *(long *) (data + addr) &= ~mask;
  3274.         *(long *) (data + addr) |= relocation;
  3275.   #endif /* not CROSS_LINKER */
  3276. ***************
  3277. *** 4945,4953 ****
  3278.       default:
  3279.         fatal_with_file ("Unimplemented relocation field length in ", entry);
  3280.       }
  3281.       }
  3282.   }
  3283. ! 
  3284.   /* For OUTPUT_RELOCATABLE only: write out the relocation,
  3285.      relocating the addresses-to-be-relocated.  */
  3286.   
  3287. --- 5688,5727 ----
  3288.       default:
  3289.         fatal_with_file ("Unimplemented relocation field length in ", entry);
  3290.       }
  3291. + 
  3292. + #ifdef HUNK_INSTEAD_OF_A_OUT
  3293. +     /* now finish this huge 'if' .. */
  3294. +     }
  3295. +     else
  3296. +       {
  3297. +         /* this only deals with 32bit relocs, the Amiga-loader
  3298. +          * doesn't support 1 or 2 byte relocs, they are only defined
  3299. +          * inside program-units (commonly known as object-files:-)) */
  3300. + 
  3301. +         if (RELOC_TARGET_SIZE(p) != 2)
  3302. +           fatal_with_file ("unsupported reloc-size in ", entry);
  3303. + 
  3304. + /* Phil.B: 06-Apr-94 same kludge as above for host with stricter alignment
  3305. +    than the taget. */
  3306. + #ifdef CROSS_LINKER
  3307. +       {
  3308. +         /* Thing to relocate.  */
  3309. +         long thing;
  3310. +         bcopy (data + addr, &thing, sizeof (thing));
  3311. +         thing += relocation;
  3312. +         bcopy (&thing, data + addr, sizeof (thing));
  3313. +       }
  3314. + #else
  3315. +         *(long *) (data + addr) += relocation;
  3316. + #endif /* CROSS_LINKER */
  3317. + 
  3318. +         addr += pc_relocation;
  3319. +             add_to_reloc_hunk(this_hunk, addr);
  3320. +       }
  3321. + #endif
  3322.       }
  3323.   }
  3324. ! 
  3325.   /* For OUTPUT_RELOCATABLE only: write out the relocation,
  3326.      relocating the addresses-to-be-relocated.  */
  3327.   
  3328. ***************
  3329. *** 4995,5007 ****
  3330.   
  3331.     /* Write out the relocations of all files, remembered from copy_text.  */
  3332.   
  3333. !   lseek (outdesc, output_trel_offset, 0);
  3334.     each_full_file (coptxtrel, 0);
  3335.   
  3336.     if (trace_files)
  3337.       fprintf (stderr, "\nWriting data relocation:\n\n");
  3338.   
  3339. !   lseek (outdesc, output_drel_offset, 0);
  3340.     each_full_file (copdatrel, 0);
  3341.   
  3342.     if (trace_files)
  3343. --- 5769,5781 ----
  3344.   
  3345.     /* Write out the relocations of all files, remembered from copy_text.  */
  3346.   
  3347. !   fseek (outstream, output_trel_offset, 0);
  3348.     each_full_file (coptxtrel, 0);
  3349.   
  3350.     if (trace_files)
  3351.       fprintf (stderr, "\nWriting data relocation:\n\n");
  3352.   
  3353. !   fseek (outstream, output_drel_offset, 0);
  3354.     each_full_file (copdatrel, 0);
  3355.   
  3356.     if (trace_files)
  3357. ***************
  3358. *** 5076,5082 ****
  3359.                   entry->text_reloc_size / sizeof (struct relocation_info));
  3360.   #endif
  3361.   
  3362. !   mywrite (entry->textrel, 1, entry->text_reloc_size, outdesc);
  3363.   }
  3364.   
  3365.   void
  3366. --- 5850,5856 ----
  3367.                   entry->text_reloc_size / sizeof (struct relocation_info));
  3368.   #endif
  3369.   
  3370. !   mywrite (entry->textrel, 1, entry->text_reloc_size, outstream);
  3371.   }
  3372.   
  3373.   void
  3374. ***************
  3375. *** 5155,5163 ****
  3376.                   entry->data_reloc_size / sizeof (struct relocation_info));
  3377.   #endif
  3378.   
  3379. !   mywrite (entry->datarel, 1, entry->data_reloc_size, outdesc);
  3380.   }
  3381. ! 
  3382.   void write_file_syms ();
  3383.   void write_string_table ();
  3384.   
  3385. --- 5929,5937 ----
  3386.                   entry->data_reloc_size / sizeof (struct relocation_info));
  3387.   #endif
  3388.   
  3389. !   mywrite (entry->datarel, 1, entry->data_reloc_size, outstream);
  3390.   }
  3391. ! 
  3392.   void write_file_syms ();
  3393.   void write_string_table ();
  3394.   
  3395. ***************
  3396. *** 5192,5199 ****
  3397.     return index;
  3398.   }
  3399.   
  3400. - FILE *outstream = (FILE *) 0;
  3401. - 
  3402.   /* Write the contents of `strtab_vector' into the string table.
  3403.      This is done once for each file's local&debugger symbols
  3404.      and once for the global symbols.  */
  3405. --- 5966,5971 ----
  3406. ***************
  3407. *** 5203,5212 ****
  3408.   {
  3409.     register int i;
  3410.   
  3411. !   lseek (outdesc, output_strs_offset + output_strs_size, 0);
  3412.   
  3413.     if (!outstream)
  3414.       outstream = fdopen (outdesc, "w");
  3415.   
  3416.     for (i = 0; i < strtab_index; i++)
  3417.       {
  3418. --- 5975,5986 ----
  3419.   {
  3420.     register int i;
  3421.   
  3422. !   fseek (outstream, output_strs_offset + output_strs_size, 0);
  3423.   
  3424. + #if 0
  3425.     if (!outstream)
  3426.       outstream = fdopen (outdesc, "w");
  3427. + #endif
  3428.   
  3429.     for (i = 0; i < strtab_index; i++)
  3430.       {
  3431. ***************
  3432. *** 5220,5226 ****
  3433.     if (ferror (outstream))
  3434.       perror_name (output_filename);
  3435.   }
  3436. ! 
  3437.   /* Write the symbol table and string table of the output file.  */
  3438.   
  3439.   void
  3440. --- 5994,6000 ----
  3441.     if (ferror (outstream))
  3442.       perror_name (output_filename);
  3443.   }
  3444. ! 
  3445.   /* Write the symbol table and string table of the output file.  */
  3446.   
  3447.   void
  3448. ***************
  3449. *** 5248,5253 ****
  3450. --- 6022,6033 ----
  3451.     /* Pointer for storing into BUF.  */
  3452.     register struct nlist *bufp = buf;
  3453.   
  3454. + #ifdef HUNK_INSTEAD_OF_A_OUT
  3455. +   /* this enables us to output "regular" amiga symbols without
  3456. +    * the BSD-like debug-hunk */
  3457. +   if (number_of_debug_hunk == -1) return;
  3458. + #endif
  3459. + 
  3460.     /* Size of string table includes the bytes that store the size.  */
  3461.     strtab_size = sizeof strtab_size;
  3462.   
  3463. ***************
  3464. *** 5370,5377 ****
  3465.   
  3466.     /* Output the buffer full of `struct nlist's.  */
  3467.   
  3468. !   lseek (outdesc, output_syms_offset + output_syms_size, 0);
  3469. !   mywrite (buf, sizeof (struct nlist), bufp - buf, outdesc);
  3470.     output_syms_size += sizeof (struct nlist) * (bufp - buf);
  3471.   
  3472.     if (syms_written != nsyms)
  3473. --- 6150,6157 ----
  3474.   
  3475.     /* Output the buffer full of `struct nlist's.  */
  3476.   
  3477. !   fseek (outstream, output_syms_offset + output_syms_size, 0);
  3478. !   mywrite (buf, sizeof (struct nlist), bufp - buf, outstream);
  3479.     output_syms_size += sizeof (struct nlist) * (bufp - buf);
  3480.   
  3481.     if (syms_written != nsyms)
  3482. ***************
  3483. *** 5380,5393 ****
  3484.     /* Now the total string table size is known, so write it into the
  3485.        first word of the string table.  */
  3486.   
  3487. !   lseek (outdesc, output_strs_offset, 0);
  3488. !   mywrite (&strtab_size, sizeof (int), 1, outdesc);
  3489.   
  3490.     /* Write the strings for the global symbols.  */
  3491.   
  3492.     write_string_table ();
  3493.   }
  3494. ! 
  3495.   /* Write the local and debugger symbols of file ENTRY.
  3496.      Increment *SYMS_WRITTEN_ADDR for each symbol that is written.  */
  3497.   
  3498. --- 6160,6173 ----
  3499.     /* Now the total string table size is known, so write it into the
  3500.        first word of the string table.  */
  3501.   
  3502. !   fseek (outstream, output_strs_offset, 0);
  3503. !   mywrite (&strtab_size, sizeof (int), 1, outstream);
  3504.   
  3505.     /* Write the strings for the global symbols.  */
  3506.   
  3507.     write_string_table ();
  3508.   }
  3509. ! 
  3510.   /* Write the local and debugger symbols of file ENTRY.
  3511.      Increment *SYMS_WRITTEN_ADDR for each symbol that is written.  */
  3512.   
  3513. ***************
  3514. *** 5489,5496 ****
  3515.   
  3516.     /* All the symbols are now in BUF; write them.  */
  3517.   
  3518. !   lseek (outdesc, output_syms_offset + output_syms_size, 0);
  3519. !   mywrite (buf, sizeof (struct nlist), bufp - buf, outdesc);
  3520.     output_syms_size += sizeof (struct nlist) * (bufp - buf);
  3521.   
  3522.     /* Write the string-table data for the symbols just written,
  3523. --- 6269,6276 ----
  3524.   
  3525.     /* All the symbols are now in BUF; write them.  */
  3526.   
  3527. !   fseek (outstream, output_syms_offset + output_syms_size, 0);
  3528. !   mywrite (buf, sizeof (struct nlist), bufp - buf, outstream);
  3529.     output_syms_size += sizeof (struct nlist) * (bufp - buf);
  3530.   
  3531.     /* Write the string-table data for the symbols just written,
  3532. ***************
  3533. *** 5499,5505 ****
  3534.     write_string_table ();
  3535.     entry->strings = 0;        /* Since it will dissapear anyway.  */
  3536.   }
  3537. ! 
  3538.   /* Copy any GDB symbol segments from the input files to the output file.
  3539.      The contents of the symbol segment is copied without change
  3540.      except that we store some information into the beginning of it.  */
  3541. --- 6279,6285 ----
  3542.     write_string_table ();
  3543.     entry->strings = 0;        /* Since it will dissapear anyway.  */
  3544.   }
  3545. ! 
  3546.   /* Copy any GDB symbol segments from the input files to the output file.
  3547.      The contents of the symbol segment is copied without change
  3548.      except that we store some information into the beginning of it.  */
  3549. ***************
  3550. *** 5509,5515 ****
  3551.   void
  3552.   write_symsegs ()
  3553.   {
  3554. !   lseek (outdesc, output_symseg_offset, 0);
  3555.     each_file (write_file_symseg, 0);
  3556.   }
  3557.   
  3558. --- 6289,6295 ----
  3559.   void
  3560.   write_symsegs ()
  3561.   {
  3562. !   fseek (outstream, output_symseg_offset, 0);
  3563.     each_file (write_file_symseg, 0);
  3564.   }
  3565.   
  3566. ***************
  3567. *** 5544,5550 ****
  3568.   
  3569.     /* Write the modified root into the output file.  */
  3570.   
  3571. !   mywrite (&root, sizeof root, 1, outdesc);
  3572.   
  3573.     /* Copy the rest of the symbol segment unchanged.  */
  3574.   
  3575. --- 6324,6330 ----
  3576.   
  3577.     /* Write the modified root into the output file.  */
  3578.   
  3579. !   mywrite (&root, sizeof root, 1, outstream);
  3580.   
  3581.     /* Copy the rest of the symbol segment unchanged.  */
  3582.   
  3583. ***************
  3584. *** 5557,5568 ****
  3585.         if (len != min (sizeof buffer, total))
  3586.       fatal_with_file ("premature end of file in symbol segment of ", entry);
  3587.         total -= len;
  3588. !       mywrite (buffer, len, 1, outdesc);
  3589.       }
  3590.   
  3591.     file_close ();
  3592.   }
  3593. ! 
  3594.   /* Define a special symbol (etext, edata, or end).  NAME is the
  3595.      name of the symbol, with a leading underscore (whether or not this
  3596.      system uses such underscores).  TYPE is its type (e.g. N_DATA | N_EXT).
  3597. --- 6337,6348 ----
  3598.         if (len != min (sizeof buffer, total))
  3599.       fatal_with_file ("premature end of file in symbol segment of ", entry);
  3600.         total -= len;
  3601. !       mywrite (buffer, len, 1, outstream);
  3602.       }
  3603.   
  3604.     file_close ();
  3605.   }
  3606. ! 
  3607.   /* Define a special symbol (etext, edata, or end).  NAME is the
  3608.      name of the symbol, with a leading underscore (whether or not this
  3609.      system uses such underscores).  TYPE is its type (e.g. N_DATA | N_EXT).
  3610. ***************
  3611. *** 5616,5621 ****
  3612. --- 6396,6427 ----
  3613.     symbol_define ("__etext", N_TEXT | N_EXT, &etext_symbol_alt);
  3614.     symbol_define ("__end", N_BSS | N_EXT, &end_symbol_alt);
  3615.   
  3616. + #ifdef amigados
  3617. +   if (output_datadata_relocs)
  3618. +     symbol_define ("___datadata_relocs", N_TEXT | N_EXT, &datadata_reloc_symbol);
  3619. + 
  3620. +   symbol_define ("__sdata", N_DATA | N_EXT, &sdata_symbol);
  3621. +   symbol_define ("___text_size", N_ABS | N_EXT, &text_size_symbol);
  3622. +   symbol_define ("___data_size", N_ABS | N_EXT, &data_size_symbol);
  3623. +   symbol_define ("___bss_size", N_ABS | N_EXT, &bss_size_symbol);
  3624. +   {
  3625. +     symbol *a_symbol;
  3626. +     symbol_define ("___machtype", N_ABS | N_EXT, &a_symbol);
  3627. +     if (a_symbol)
  3628. +       a_symbol->value = amiga_machtype;
  3629. +       
  3630. +     symbol_define ("___databss_together", N_ABS | N_EXT, &a_symbol);
  3631. +     if (a_symbol)
  3632. +       a_symbol->value = databss_together;
  3633. +       
  3634. +     if (databss_together)
  3635. +       {
  3636. +         symbol_define ("___a4_init", N_DATA | N_EXT, &a_symbol);
  3637. +         if (a_symbol)
  3638. +           a_symbol->value = data_start + 0x7ffe;
  3639. +       }
  3640. +   }
  3641. + #endif
  3642.   #ifdef sun
  3643.     {
  3644.       symbol *dynamic_symbol;
  3645. ***************
  3646. *** 5658,5664 ****
  3647.   
  3648.     return k;
  3649.   }
  3650. ! 
  3651.   /* Get the symbol table entry for the global symbol named KEY.
  3652.      Create one if there is none.  */
  3653.   
  3654. --- 6464,6470 ----
  3655.   
  3656.     return k;
  3657.   }
  3658. ! 
  3659.   /* Get the symbol table entry for the global symbol named KEY.
  3660.      Create one if there is none.  */
  3661.   
  3662. ***************
  3663. *** 5725,5731 ****
  3664.   
  3665.     return 0;
  3666.   }
  3667. ! 
  3668.   /* Report a usage error.
  3669.      Like fatal except prints a usage summary.  */
  3670.   
  3671. --- 6531,6537 ----
  3672.   
  3673.     return 0;
  3674.   }
  3675. ! 
  3676.   /* Report a usage error.
  3677.      Like fatal except prints a usage summary.  */
  3678.   
  3679. ***************
  3680. *** 5739,5750 ****
  3681. --- 6545,6567 ----
  3682.         fprintf (stderr, string, arg);
  3683.         fprintf (stderr, "\n");
  3684.       }
  3685. + #ifdef HUNK_INSTEAD_OF_A_OUT
  3686. +   fprintf (stderr, "\
  3687. + Usage: %s [-d] [-dc] [-dp] [-e symbol] [-l lib] [-n] [-noinhibit-exec]\n\
  3688. +        [-nostdlib] [-o file] [-r] [-s] [-t] [-u symbol] [-x] [-y symbol]\n\
  3689. +        [-z] [-A file] [-Bstatic] [-D size] [-L libdir] [-M] [-N]\n\
  3690. +        [-S] [-T[{text,data}] addr] [-V prefix] [-X] \n\
  3691. +        [{-a,-amiga-debug-hunk}] [{-f,-flavor} flavor] [file...]\n\
  3692. +        [-chip {c,d,b}] [-fast {c,d,b}] [-m,-shortdata]\n",
  3693. +        progname);
  3694. + #else
  3695.     fprintf (stderr, "\
  3696.   Usage: %s [-d] [-dc] [-dp] [-e symbol] [-l lib] [-n] [-noinhibit-exec]\n\
  3697.          [-nostdlib] [-o file] [-r] [-s] [-t] [-u symbol] [-x] [-y symbol]\n\
  3698.          [-z] [-A file] [-Bstatic] [-D size] [-L libdir] [-M] [-N]\n\
  3699.          [-S] [-T[{text,data}] addr] [-V prefix] [-X] [file...]\n",
  3700.          progname);
  3701. + #endif
  3702.     exit (1);
  3703.   }
  3704.   
  3705. ***************
  3706. *** 5765,5776 ****
  3707.      followed by the filename of ENTRY.  */
  3708.   
  3709.   void
  3710. ! fatal_with_file (string, entry)
  3711.        char *string;
  3712.        struct file_entry *entry;
  3713.   {
  3714.     fprintf (stderr, "%s: ", progname);
  3715. !   fprintf (stderr, string);
  3716.     print_file_name (entry, stderr);
  3717.     fprintf (stderr, "\n");
  3718.     exit (1);
  3719. --- 6582,6593 ----
  3720.      followed by the filename of ENTRY.  */
  3721.   
  3722.   void
  3723. ! fatal_with_file (string, entry, arg)
  3724.        char *string;
  3725.        struct file_entry *entry;
  3726.   {
  3727.     fprintf (stderr, "%s: ", progname);
  3728. !   fprintf (stderr, string, arg);
  3729.     print_file_name (entry, stderr);
  3730.     fprintf (stderr, "\n");
  3731.     exit (1);
  3732. ***************
  3733. *** 5784,5794 ****
  3734.        char *name;
  3735.   {
  3736.     extern int errno, sys_nerr;
  3737. -   extern char *sys_errlist[];
  3738.     char *s;
  3739.   
  3740.     if (errno < sys_nerr)
  3741. !     s = concat ("", sys_errlist[errno], " for %s");
  3742.     else
  3743.       s = "cannot open %s";
  3744.     fatal (s, name);
  3745. --- 6601,6610 ----
  3746.        char *name;
  3747.   {
  3748.     extern int errno, sys_nerr;
  3749.     char *s;
  3750.   
  3751.     if (errno < sys_nerr)
  3752. !     s = concat ("", strerror (errno), " for %s");
  3753.     else
  3754.       s = "cannot open %s";
  3755.     fatal (s, name);
  3756. ***************
  3757. *** 5802,5812 ****
  3758.        struct file_entry *entry;
  3759.   {
  3760.     extern int errno, sys_nerr;
  3761. -   extern char *sys_errlist[];
  3762.     char *s;
  3763.   
  3764.     if (errno < sys_nerr)
  3765. !     s = concat ("", sys_errlist[errno], " for ");
  3766.     else
  3767.       s = "cannot open ";
  3768.     fatal_with_file (s, entry);
  3769. --- 6618,6627 ----
  3770.        struct file_entry *entry;
  3771.   {
  3772.     extern int errno, sys_nerr;
  3773.     char *s;
  3774.   
  3775.     if (errno < sys_nerr)
  3776. !     s = concat ("", strerror (errno), " for ");
  3777.     else
  3778.       s = "cannot open ";
  3779.     fatal_with_file (s, entry);
  3780. ***************
  3781. *** 5824,5840 ****
  3782.     fprintf (stderr, "\n");
  3783.   }
  3784.   
  3785. ! 
  3786.   /* Output COUNT*ELTSIZE bytes of data at BUF
  3787.      to the descriptor DESC.  */
  3788.   
  3789.   void
  3790. ! mywrite (buf, count, eltsize, desc)
  3791.        char *buf;
  3792.        int count;
  3793.        int eltsize;
  3794. !      int desc;
  3795.   {
  3796.     register int val;
  3797.     register int bytes = count * eltsize;
  3798.   
  3799. --- 6639,6656 ----
  3800.     fprintf (stderr, "\n");
  3801.   }
  3802.   
  3803. ! 
  3804.   /* Output COUNT*ELTSIZE bytes of data at BUF
  3805.      to the descriptor DESC.  */
  3806.   
  3807.   void
  3808. ! mywrite (buf, count, eltsize, stream)
  3809.        char *buf;
  3810.        int count;
  3811.        int eltsize;
  3812. !      FILE *stream;
  3813.   {
  3814. + #if 0
  3815.     register int val;
  3816.     register int bytes = count * eltsize;
  3817.   
  3818. ***************
  3819. *** 5846,5860 ****
  3820.         buf += val;
  3821.         bytes -= val;
  3822.       }
  3823.   }
  3824.   
  3825. ! /* Output PADDING zero-bytes to descriptor OUTDESC.
  3826.      PADDING may be negative; in that case, do nothing.  */
  3827.   
  3828.   void
  3829. ! padfile (padding, outdesc)
  3830.        int padding;
  3831. !      int outdesc;
  3832.   {
  3833.     register char *buf;
  3834.     if (padding <= 0)
  3835. --- 6662,6679 ----
  3836.         buf += val;
  3837.         bytes -= val;
  3838.       }
  3839. + #else
  3840. +   fwrite (buf, eltsize, count, stream);
  3841. + #endif
  3842.   }
  3843.   
  3844. ! /* Output PADDING zero-bytes to descriptor OUTSTREAM.
  3845.      PADDING may be negative; in that case, do nothing.  */
  3846.   
  3847.   void
  3848. ! padfile (padding, outstream)
  3849.        int padding;
  3850. !      FILE *outstream;
  3851.   {
  3852.     register char *buf;
  3853.     if (padding <= 0)
  3854. ***************
  3855. *** 5862,5868 ****
  3856.   
  3857.     buf = (char *) alloca (padding);
  3858.     bzero (buf, padding);
  3859. !   mywrite (buf, padding, 1, outdesc);
  3860.   }
  3861.   
  3862.   /* Return a newly-allocated string
  3863. --- 6681,6687 ----
  3864.   
  3865.     buf = (char *) alloca (padding);
  3866.     bzero (buf, padding);
  3867. !   mywrite (buf, padding, 1, outstream);
  3868.   }
  3869.   
  3870.   /* Return a newly-allocated string
  3871. ***************
  3872. *** 5903,5910 ****
  3873.   xmalloc (size)
  3874.        int size;
  3875.   {
  3876.     register char *result = malloc (size);
  3877. !   if (!result)
  3878.       fatal ("virtual memory exhausted", 0);
  3879.     return result;
  3880.   }
  3881. --- 6722,6730 ----
  3882.   xmalloc (size)
  3883.        int size;
  3884.   {
  3885. +   extern char *malloc();
  3886.     register char *result = malloc (size);
  3887. !   if (!result && size)
  3888.       fatal ("virtual memory exhausted", 0);
  3889.     return result;
  3890.   }
  3891. ***************
  3892. *** 5916,5927 ****
  3893.        char *ptr;
  3894.        int size;
  3895.   {
  3896. !   register char *result = realloc (ptr, size);
  3897.     if (!result)
  3898.       fatal ("virtual memory exhausted", 0);
  3899.     return result;
  3900.   }
  3901. ! 
  3902.   #ifdef USG
  3903.   
  3904.   void
  3905. --- 6736,6748 ----
  3906.        char *ptr;
  3907.        int size;
  3908.   {
  3909. !   extern char *malloc(), *realloc();
  3910. !   register char *result = ptr ? realloc (ptr, size) : malloc (size);
  3911.     if (!result)
  3912.       fatal ("virtual memory exhausted", 0);
  3913.     return result;
  3914.   }
  3915. ! 
  3916.   #ifdef USG
  3917.   
  3918.   void
  3919. ***************
  3920. *** 5952,5954 ****
  3921. --- 6773,7453 ----
  3922.     return 8192;
  3923.   }
  3924.   #endif
  3925. + 
  3926. + #ifdef HUNK_INSTEAD_OF_A_OUT
  3927. + /* the whole rest of the file is used for managment of hunks and subhunks.. */
  3928. + 
  3929. + /* this is the amiga-equivalent of struct exec */
  3930. + struct simple_hunk_header {
  3931. +   long    id,    /* this will be 0x3f3 */
  3932. +     zero,
  3933. +     table_size,
  3934. +     first_hunk,
  3935. +     last_hunk,
  3936. +     sizes[4];   /* there can be at most a code,data,bss & debug hunk */
  3937. + };
  3938. + 
  3939. + /* this writes out a hunk header, depending on the information collected
  3940. +  * so far, it will only create hunks, that really exist, so if your data-
  3941. +  * size is zero, you won't get a data-hunk at all. */
  3942. + 
  3943. + void
  3944. + write_hunk_header(outfd)
  3945. +     int outfd;
  3946. + {
  3947. +   struct simple_hunk_header sh;
  3948. +   int this_hunk, header_size;
  3949. + 
  3950. +   sh.id = 0x3f3;    /* HUNK_HEADER */
  3951. +   sh.zero = 0;
  3952. +   sh.table_size = current_hunk;
  3953. +   sh.first_hunk = 0;
  3954. +   sh.last_hunk  = current_hunk - 1;
  3955. + 
  3956. +   this_hunk = 0;
  3957. +   if (number_of_code_hunk != -1)
  3958. +      sh.sizes[this_hunk++] = code_mem_type|LONGSIZE(text_size);
  3959. + 
  3960. +   if (number_of_data_hunk != -1)
  3961. +   {
  3962. +      int size = LONGSIZE(data_size);
  3963. +      if (databss_together)
  3964. +      {
  3965. +        if (long_data_hunk || !output_datadata_relocs)
  3966. +          size=LONGSIZE(data_size+bss_size);
  3967. +        if (data_mem_type == 0)
  3968. +          data_mem_type=bss_mem_type;
  3969. +      }
  3970. +      sh.sizes[this_hunk++] = data_mem_type|size;
  3971. +   }
  3972. + 
  3973. +   if (!databss_together && number_of_bss_hunk  != -1)
  3974. +      sh.sizes[this_hunk++] = bss_mem_type|LONGSIZE(bss_size);
  3975. + 
  3976. +   if (number_of_debug_hunk != -1)
  3977. +      sh.sizes[this_hunk++] = 0;  /* to be filled in later */
  3978. + 
  3979. +   header_size = sizeof(sh) - (4-this_hunk)*sizeof(long);
  3980. +   mywrite(&sh, 1, header_size, outfd);
  3981. + }
  3982. + 
  3983. + /* if we really write out a debug hunk, this fills in the remaining
  3984. +  * spots, that are known only at the end of load-file output */
  3985. + 
  3986. + void
  3987. + conditionally_rewrite_headers ()
  3988. + {
  3989. +   long size_of_debug_hunk,
  3990. +        end_hunk = 0x3f2,
  3991. +        eof;
  3992. + 
  3993. +   /* if we don't want a debug hunk, just return */
  3994. +   if (number_of_debug_hunk == -1)  return;
  3995. + 
  3996. +   /* while we're at it, since we started the debug-hunk, lets finish it
  3997. +    * now. */
  3998. +   fseek (outstream, 0L, 2);
  3999. +   eof = ftell (outstream);
  4000. +   dh.strs = eof - offset_of_debug_hunk - sizeof(dh) - dh.syms;
  4001. +   /* just to be sure, we HAVE to pad to a long-boundery */
  4002. +   if (eof & 3)
  4003. +     {
  4004. +       long zero = 0;
  4005. + 
  4006. +       mywrite(&zero, 4 - (eof & 3), 1, outstream);
  4007. +       eof = (eof + 3) & ~3;
  4008. +     }
  4009. + 
  4010. +   mywrite(&end_hunk, sizeof(long), 1, outstream);
  4011. + 
  4012. +   /* ok, so calculate the size of the debug hunk. This is the 
  4013. +    * size of the debug_header plus the symbol and string tables,
  4014. +    * but it doesn't include the 2 longs, that identify the hunk and
  4015. +    * its length, whence the "- 2*sizeof(long)" */
  4016. +   size_of_debug_hunk = eof - offset_of_debug_hunk - 2*sizeof(long);
  4017. +   /* we actually need the size in longs.. */
  4018. +   size_of_debug_hunk = LONGSIZE(size_of_debug_hunk);
  4019. + 
  4020. +   /* now first patch the debug-hunk itself, afterwards the load-file header */
  4021. +   fseek (outstream, offset_of_debug_hunk, 0);
  4022. +   dh.len = size_of_debug_hunk;
  4023. +   mywrite(&dh, sizeof dh, 1, outstream);
  4024. + 
  4025. +   /* now the main header, this involves calculating, at which offset we
  4026. +    * find the index for the debug hunk */   
  4027. +   fseek (outstream, (5 + number_of_debug_hunk)*sizeof(long), 0);
  4028. +   mywrite(&size_of_debug_hunk, sizeof(long), 1, outstream);
  4029. +   fseek (outstream, 0L, 2);
  4030. +   /* that's it! */
  4031. + }
  4032. + 
  4033. + /* this is the only information that we can store in a regular amiga
  4034. +  * symbol, just its value, nothing further, that's why I added the 
  4035. +  * debug-hunk-feature */
  4036. + 
  4037. + typedef struct {
  4038. +   char *sym_name;
  4039. +   long  sym_offset;
  4040. + } simple_symbol;
  4041. + 
  4042. + /* we'll only define symbols after at most 3 hunks, ie. the code, data
  4043. +  * and bss hunk, but not after the debug hunk, whence the index 3 */
  4044. + 
  4045. + simple_symbol *hunk_sym_tab[3];
  4046. + int hunk_sym_tab_size[3], hunk_sym_tab_index[3];
  4047. + 
  4048. + void
  4049. + init_symbol_hunks()
  4050. + {
  4051. +   int i;
  4052. + 
  4053. + #if 0
  4054. +   if (trace_files) fprintf(stderr, "init_symbol_hunks()\n");
  4055. + #endif
  4056. + 
  4057. +   for (i = 0; i < 3; i++)
  4058. +     {
  4059. +        hunk_sym_tab[i] = 
  4060. +          (simple_symbol *) xmalloc((hunk_sym_tab_size[i] = 10) * 
  4061. +        sizeof(simple_symbol));
  4062. +        hunk_sym_tab_index[i] = 0;
  4063. +     }
  4064. + }
  4065. + 
  4066. + /* this should go into libc, well, it wasn't there, so... */
  4067. + 
  4068. + char *
  4069. + strsave(str)
  4070. +     char *str;
  4071. + {
  4072. +   char *cp;
  4073. +   int len = strlen(str);
  4074. +   if (len)
  4075. +     {
  4076. +       cp = xmalloc(len+1);
  4077. +       strcpy(cp, str);
  4078. +     }
  4079. +   else
  4080. +     cp = NULL;
  4081. +   return cp;
  4082. + }
  4083. + 
  4084. + void
  4085. + add_to_symbol_hunk(hunk_num, name, offset)
  4086. +     int hunk_num;
  4087. +     char *name;
  4088. +     long offset;
  4089. + {
  4090. +    if (hunk_num == -1) return;
  4091. +    if (hunk_num >= 3) fatal ("invalid hunk_number: %d\n", hunk_num);
  4092. + 
  4093. +    /* no checks for duplicate symbols. Since it is legitimate to have
  4094. +     * symbols with the same name, we can't strip them.. just make 
  4095. +     * sure not to call this function multiple times with the same
  4096. +     * symbol, since it won't be detected, and you'll get several
  4097. +     * labels for the same offset...
  4098. +     */
  4099. +     
  4100. + #if 0
  4101. +    if (trace_files) fprintf(stderr, "add_to_symbol_hunk(%d, %s, %d)\n",
  4102. +                 hunk_num, name, offset);
  4103. + #endif
  4104. + 
  4105. +    hunk_sym_tab[hunk_num][hunk_sym_tab_index[hunk_num]].sym_offset = offset;
  4106. +    hunk_sym_tab[hunk_num][hunk_sym_tab_index[hunk_num]++].sym_name = 
  4107. +      strsave(name);
  4108. + 
  4109. +    if (hunk_sym_tab_index[hunk_num] == hunk_sym_tab_size[hunk_num])
  4110. +     hunk_sym_tab[hunk_num] = (simple_symbol *)
  4111. +       xrealloc(hunk_sym_tab[hunk_num],
  4112. +             (hunk_sym_tab_size[hunk_num] <<= 1) * 
  4113. +               sizeof(simple_symbol));
  4114. + }
  4115. + 
  4116. + int
  4117. + compare_simple_symbols(l1, l2)
  4118. +     simple_symbol *l1, *l2;
  4119. + {
  4120. +   return l1->sym_offset - l2->sym_offset;
  4121. + }
  4122. + 
  4123. + /* this writes the symbol subhunk #hunk_num, you call this just after
  4124. +  * you created your {code,data,bss}-hunk */
  4125. + 
  4126. + void
  4127. + write_symbol_hunk(hunk_num)
  4128. +     int hunk_num;
  4129. + {
  4130. +   int i, j;
  4131. +   simple_symbol *tab;
  4132. +   long size, index;
  4133. + 
  4134. +   if (hunk_num == -1) return;
  4135. +   if (hunk_num >= 3) fatal ("invalid hunk_number: %d\n", hunk_num);
  4136. +   
  4137. +   tab   = hunk_sym_tab[hunk_num];
  4138. +   size  = hunk_sym_tab_size[hunk_num];
  4139. +   index = hunk_sym_tab_index[hunk_num];
  4140. +    
  4141. +   /* kind of abused as general debug-flag:-) */
  4142. + #if 0
  4143. +   if (trace_files) fprintf(stderr, 
  4144. +                 "wsh: hnum=%d,size=%d,index=%d\n",
  4145. +                hunk_num,size,index);
  4146. + #endif
  4147. +    
  4148. +   if (index > 0)
  4149. +     {
  4150. +       qsort(tab, index, sizeof(simple_symbol), compare_simple_symbols);
  4151. + 
  4152. +       j = 0x3f0; /* HUNK_SYMBOL */
  4153. +       mywrite(&j, 1, sizeof(long), outstream);
  4154. +    
  4155. +       for (i = 0; i < index; i++)
  4156. +         {
  4157. +        register simple_symbol *ss = tab+i;
  4158. +        int len = strlen (ss->sym_name);
  4159. + 
  4160. +        j = LONGSIZE (len);
  4161. +        mywrite(&j, 1, sizeof(long), outstream);
  4162. + 
  4163. +        mywrite(ss->sym_name, 1, len, outstream);
  4164. +        if (len < 4*j)
  4165. +          padfile (4*j - len, outstream);
  4166. + 
  4167. +        mywrite(&(ss->sym_offset), 1, sizeof(long), outstream);
  4168. +     }
  4169. + 
  4170. +       j = 0;
  4171. +       mywrite(&j, 1, sizeof(long), outstream);
  4172. +     }
  4173. + }
  4174. + 
  4175. + /* now follow the quite similar routines for dealing with
  4176. +  * reloc-subhunks, the difference to the symbol-subhunks is, that reloc
  4177. +  * subhunks can be output only after the {code,data}-Hunks, AND there
  4178. +  * can be more than one after each of them */
  4179. + 
  4180. + long *hunk_rel_tab[3];        /* Dynamically allocated tables of relocs */
  4181. + long hunk_rel_tab_size[3];    /* Size (in longs) of allocation of each table */
  4182. + long hunk_rel_tab_index[3];    /* Index of next free table entry */
  4183. + 
  4184. + void
  4185. + init_reloc_hunk()
  4186. + {
  4187. +   int i;
  4188. + 
  4189. + #if 0
  4190. +   if (trace_files) fprintf(stderr, "init_reloc_hunk()\n");
  4191. + #endif
  4192. + 
  4193. +   for (i = 0; i < 3; i++)
  4194. +     {
  4195. +        hunk_rel_tab[i] = 
  4196. +          (long *) xmalloc((hunk_rel_tab_size[i] = 10) * sizeof(long));
  4197. +        hunk_rel_tab_index[i] = 0;
  4198. +     }
  4199. + }
  4200. + 
  4201. + void
  4202. + add_to_reloc_hunk(hunk_num, offset)
  4203. +     int hunk_num;
  4204. +     long offset;
  4205. + {
  4206. +    /* no checks for duplicate symbols, they will show up when we sort
  4207. +     * the table, and we will strip them off before writing out the table */
  4208. + 
  4209. + #if 0
  4210. +    if (trace_files) fprintf(stderr, "add_to_reloc_hunk(%d, %d)\n", hunk_num, offset);
  4211. + #endif
  4212. + 
  4213. +    hunk_rel_tab[hunk_num][hunk_rel_tab_index[hunk_num]++] = offset;
  4214. + 
  4215. +    if (hunk_rel_tab_index[hunk_num] == hunk_rel_tab_size[hunk_num])
  4216. +     hunk_rel_tab[hunk_num] = (long *)
  4217. +       xrealloc(hunk_rel_tab[hunk_num],
  4218. +                    (hunk_rel_tab_size[hunk_num] <<= 1) * sizeof(long));
  4219. + }
  4220. + 
  4221. + int
  4222. + compare_longs(l1, l2)
  4223. +     long *l1, *l2;
  4224. + {
  4225. +   return *l1 - *l2;
  4226. + }
  4227. + 
  4228. + int
  4229. + compare_strings (s1p, s2p)
  4230. +     char **s1p;
  4231. +     char **s2p;
  4232. + {
  4233. +   return (strcmp (*s1p, *s2p));
  4234. + }
  4235. + 
  4236. + void
  4237. + write_reloc_hunk()
  4238. + {
  4239. +    int i, j;
  4240. +    long *tab, size, index, nwritten, nleft, nwrite;
  4241. +    /* only write a hunk-header & -end, if we really output some relocs */
  4242. +    int did_start_hunk = 0;
  4243. + 
  4244. +    for (i = 0; i < 3; i++)
  4245. +      {
  4246. +     tab   = hunk_rel_tab[i];
  4247. +     size  = hunk_rel_tab_size[i];
  4248. +     index = hunk_rel_tab_index[i];
  4249. + 
  4250. +     /* kind of abused as general debug-flag:-) */
  4251. + #if 0
  4252. +         if (trace_files) fprintf(stderr, 
  4253. +                  "wrh: i=%d,size=%d,index=%d\n",
  4254. +                  i,size,index);
  4255. + #endif
  4256. +         if (index > 0)
  4257. +       {
  4258. +         qsort(tab, index, sizeof(long), compare_longs);
  4259. + 
  4260. +         /* kick out duplicate symbols.. I don't know, what
  4261. +          * the loader would do, if it had to relocate the same
  4262. +          * address twice.. BTW: can this happen or can't it???? */
  4263. +         for (j = 0; j < index-1; )
  4264. +           {
  4265. +         if (tab[j] == tab[j+1])
  4266. +           bcopy(tab+j+1, tab+j, ((index--)-j-1)*sizeof(long));
  4267. +         else
  4268. +           j++;
  4269. +           }
  4270. +         hunk_rel_tab_index[i] = index;
  4271. + 
  4272. +         if (!did_start_hunk++)
  4273. +           {
  4274. +         j = 0x3ec; /* HUNK_RELOC32 */
  4275. +         mywrite(&j, 1, sizeof(long), outstream);
  4276. +           }
  4277. + 
  4278. +         /* Starting apparently with AmigaDOS 2.0, the number of
  4279. +            offsets per hunk number must not exceed 65536.  So
  4280. +            split large tables into smaller ones. */
  4281. +         nwritten = 0;
  4282. +         nleft = index;
  4283. +         do
  4284. +           {
  4285. +         nwrite = min (nleft, 65536);
  4286. + #if 0
  4287. +         if (trace_files)
  4288. +           fprintf (stderr, "wrh: nwritten %d, nleft %d, nwrite %d\n",
  4289. +                nwritten, nleft, nwrite);
  4290. + #endif
  4291. +         mywrite(&nwrite, 1, sizeof(long), outstream);
  4292. +         mywrite(&i, 1, sizeof(long), outstream);
  4293. +         mywrite(tab + nwritten, 1, nwrite*sizeof(long), outstream);
  4294. +         nwritten += nwrite;
  4295. +         nleft -= nwrite;
  4296. +           } while (nleft > 0);
  4297. +       }
  4298. +      }
  4299. +    if (did_start_hunk)
  4300. +      {
  4301. +     j = 0;
  4302. +        mywrite(&j, 1, sizeof(long), outstream);
  4303. +      }
  4304. + }
  4305. + 
  4306. + 
  4307. + void
  4308. + write_datadata_relocs ()
  4309. + {
  4310. +   int numdd, i, prev;
  4311. + 
  4312. +   prev = ftell (outstream);
  4313. +   fseek (outstream, datadata_relocs_offset, L_SET);
  4314. +   
  4315. +   numdd = hunk_rel_tab_index[number_of_data_hunk];
  4316. +   if (numdd > numdatadata_relocs)
  4317. +     fatal ("found more data-data relocs than estimated!\n", 0);
  4318. +   
  4319. +   mywrite (&numdd, 1, sizeof (long), outstream);
  4320. +   if (numdd)
  4321. +     mywrite (hunk_rel_tab[number_of_data_hunk], numdd, sizeof (long), outstream);
  4322. + 
  4323. +   fseek (outstream, prev, L_SET);
  4324. + }
  4325. + 
  4326. + 
  4327. + /* create the bss hunk if needed */
  4328. + 
  4329. + void
  4330. + write_bss()
  4331. + {
  4332. +   long bss_hunk[2];
  4333. +   if (!databss_together && bss_size)
  4334. +    {
  4335. +      if (trace_files)
  4336. +        fprintf (stderr, "Write BSS hunk at 0x%x\n", ftell (outstream));
  4337. +      bss_hunk[0] = 0x3eb;
  4338. +      bss_hunk[1] = LONGSIZE(bss_size);
  4339. +      mywrite(bss_hunk, 1, sizeof bss_hunk, outstream);
  4340. +      write_symbol_hunk(number_of_bss_hunk);
  4341. +      bss_hunk[0] = 0x3f2; /* HUNK_END */
  4342. +      mywrite(bss_hunk, 1, sizeof(long), outstream);
  4343. +    }
  4344. + }
  4345. + 
  4346. + /* this scans one object file for its symbols, and deposits them in 
  4347. +  * the symbol-hunk tables for later output */
  4348. + 
  4349. + void
  4350. + look_for_file_syms (entry)
  4351. +      struct file_entry *entry;
  4352. + {
  4353. +   register struct nlist *p = entry->symbols;
  4354. +   register struct nlist *end = p + entry->syms_size / sizeof (struct nlist);
  4355. + 
  4356. + #if 0
  4357. +   /* don't do this, it only confuses most amiga disassemblers.. */
  4358. + 
  4359. +   /* Generate a local symbol for the start of this file's text.  */
  4360. + 
  4361. +   if (discard_locals != DISCARD_ALL)
  4362. +     add_to_symbol_hunk(number_of_code_hunk, entry->local_sym_name, 
  4363. +        entry->text_start_address);
  4364. + #endif
  4365. + 
  4366. +   /* Read the file's string table.  */
  4367. + 
  4368. +   entry->strings = (char *) alloca (entry->strs_size);
  4369. +   read_entry_strings (file_open (entry), entry);
  4370. + 
  4371. +   for (; p < end; p++)
  4372. +     {
  4373. +       register unsigned char type = p->n_type;
  4374. +       register int write = 0;
  4375. +       int this_hunk;
  4376. +       char *cp;
  4377. + 
  4378. +       /* WRITE gets 1 for a non-global symbol that should be written.  */
  4379. + 
  4380. +       if (SET_ELEMENT_P (type))    /* This occurs even if global.  These */
  4381. +                 /* types of symbols are never written */
  4382. +                 /* globally, though they are stored */
  4383. +                 /* globally.  */
  4384. +         write = output_style == OUTPUT_RELOCATABLE;
  4385. +       else if (!(type & (N_STAB | N_EXT)))
  4386. +           /* ordinary local symbol */
  4387. +       write = ((discard_locals != DISCARD_ALL)
  4388. +            && !(discard_locals == DISCARD_L &&
  4389. +                (p->n_un.n_strx + entry->strings)[0] == LPREFIX)
  4390. +            && type != N_WARNING);
  4391. + 
  4392. +       else if (!(type & N_EXT))
  4393. +     /* debugger symbol */
  4394. +         write = (strip_symbols == STRIP_NONE);
  4395. + 
  4396. +       /* skip STAB symbols if present */
  4397. +       write = write && !(type & N_STAB);
  4398. + 
  4399. +       /* those weird types are NOT output in the normal symbols:-)) */
  4400. +       write = write && (type != N_ABS && type != (N_ABS|N_EXT));
  4401. + 
  4402. +       /* don't know where those symbols come from, they're well suited to
  4403. +        * crash enforcer, and they're not `real' symbols anyway.. */
  4404. +       if (p->n_un.n_strx > entry->strs_size) continue;
  4405. + 
  4406. +       /* symbols that end with a dot are only useful for gdb, 
  4407. +        * not for a normal amiga debugger (currently gcc_compiled. and
  4408. +        * gcc_compiled2.) so skip them in this section */
  4409. + 
  4410. +       /* check to see, whether this string ends with a dot */
  4411. +       if (write && p->n_un.n_strx)
  4412. +         {
  4413. +           cp = rindex (p->n_un.n_strx + entry->strings, '.');
  4414. + 
  4415. +       write = write && !(cp && !cp[1]);
  4416. +       
  4417. + #if 0
  4418. +       printf ("%s >%s<\n", write ? "adding" : "skipping", p->n_un.n_strx + entry->strings);
  4419. + #endif
  4420. +     }
  4421. + 
  4422. +       if (write)
  4423. +     {
  4424. +       if (p->n_un.n_strx)
  4425. +         {
  4426. +           switch (type & ~N_EXT)
  4427. +             {
  4428. +           case N_TEXT:
  4429. +             this_hunk = number_of_code_hunk;
  4430. +             break;
  4431. +           case N_SETV:
  4432. +           case N_DATA:
  4433. +             this_hunk = number_of_data_hunk;
  4434. +             break;
  4435. +           case N_UNDF:
  4436. +           case N_BSS:
  4437. +             this_hunk = number_of_bss_hunk;
  4438. +             break;
  4439. +           default:
  4440. +             error ("unknown type %d while trying to build lsymhunk", type);
  4441. +             goto skip1;
  4442. +             }
  4443. + 
  4444. +           add_to_symbol_hunk(this_hunk, p->n_un.n_strx + entry->strings,
  4445. +                  p->n_value);
  4446. + skip1:    ;
  4447. +             }
  4448. +     }
  4449. +     }
  4450. + }
  4451. + 
  4452. + /* scan all input files for symbols and store them in the symbolhunk tables */
  4453. + 
  4454. + void
  4455. + look_for_symbols()
  4456. + {
  4457. +   int this_hunk;
  4458. +   int i;
  4459. +   symbol *sp;
  4460. + 
  4461. +   if (strip_symbols == STRIP_ALL)
  4462. +     return;
  4463. + 
  4464. +   /* Write the local symbols defined by the various files.  */
  4465. + 
  4466. +   each_file (look_for_file_syms, 0);
  4467. +   file_close ();
  4468. + 
  4469. +   /* Scan the symbol hash table, bucket by bucket.  */
  4470. + 
  4471. +   for (i = 0; i < TABSIZE; i++)
  4472. +     for (sp = symtab[i]; sp; sp = sp->link)
  4473. +       {
  4474. +     struct nlist nl;
  4475. + 
  4476. +     /* Compute a `struct nlist' for the symbol.  */
  4477. + 
  4478. +     nl.n_value = 0;
  4479. + 
  4480. +     if (sp->defined || sp->referenced)
  4481. +       {
  4482. +         /* common condition needs to be before undefined condition */
  4483. +         /* because unallocated commons are set undefined in */
  4484. +         /* digest_symbols */
  4485. +         if (sp->defined > 1) /* defined with known type */
  4486. +           {
  4487. +         /* If the target of an indirect symbol has been
  4488. +            defined and we are outputting an executable,
  4489. +            resolve the indirection; it's no longer needed */
  4490. +         if (output_style != OUTPUT_RELOCATABLE
  4491. +             && ((sp->defined & ~N_EXT) == N_INDR)
  4492. +             && (((symbol *) sp->value)->defined > 1))
  4493. +           {
  4494. +             symbol *newsp = (symbol *) sp->value;
  4495. +             nl.n_type = newsp->defined;
  4496. +             nl.n_value = newsp->value;
  4497. +           }
  4498. +         else
  4499. +           {
  4500. +             nl.n_type = sp->defined;
  4501. +             if (sp->defined != (N_INDR | N_EXT))
  4502. +               nl.n_value = sp->value;
  4503. +             else
  4504. +               nl.n_value = 0;
  4505. +           }
  4506. +           }
  4507. +         else if (sp->max_common_size) /* defined as common but not allocated. */
  4508. +           {
  4509. +         /* happens only with -r and not -d */
  4510. +         /* write out a common definition */
  4511. +         nl.n_type = N_UNDF | N_EXT;
  4512. +         nl.n_value = sp->max_common_size;
  4513. +           }
  4514. +         else if (!sp->defined)          /* undefined -- legit only if -r */
  4515. +           {
  4516. +         nl.n_type = N_UNDF | N_EXT;
  4517. +         nl.n_value = 0;
  4518. +           }
  4519. +         else
  4520. +           fatal ("internal error: %s defined in mysterious way", sp->name);
  4521. + 
  4522. +         switch (nl.n_type & ~N_EXT)
  4523. +           {
  4524. +         case N_TEXT:
  4525. +           this_hunk = number_of_code_hunk;
  4526. +           break;
  4527. +         case N_SETV:
  4528. +         case N_DATA:
  4529. +           this_hunk = number_of_data_hunk;
  4530. +           break;
  4531. +         case N_UNDF:
  4532. +         case N_BSS:
  4533. +           this_hunk = number_of_bss_hunk;
  4534. +           break;
  4535. +         case N_ABS:
  4536. +           break;
  4537. +         default:
  4538. +           error ("unknown type %d while trying to build symhunk", nl.n_type);
  4539. +           goto skip2;
  4540. +           }
  4541. + 
  4542. +         /* sigh, there is no equivalent in the symbol section of a load
  4543. +          * file on the amiga, have to forget about those symbols */
  4544. +         if ((nl.n_type & ~N_EXT) == N_ABS)
  4545. +           continue;
  4546. + 
  4547. +         add_to_symbol_hunk(this_hunk, sp->name, nl.n_value);
  4548. + skip2:    ;
  4549. +       }
  4550. +       }
  4551. + }
  4552. + 
  4553. + void
  4554. + relocate_set_vectors (vectors, relvectors, num_entries)
  4555. +     unsigned long *vectors;
  4556. +     unsigned char *relvectors;
  4557. +     int num_entries;
  4558. + {
  4559. +   unsigned long i;
  4560. +   unsigned long offset = set_sect_start;
  4561. +   int hunk_num;
  4562. + 
  4563. +   while (num_entries-- > 0)
  4564. +     {
  4565. +       /* the number of entries for this symbol */
  4566. +       i = *vectors++; offset += 4; relvectors++;
  4567. +       while (num_entries --, i--)
  4568. +     {
  4569. +       /* relocation ok? */
  4570. +       if (*relvectors)
  4571. +         {
  4572. +           hunk_num = number_of_code_hunk;
  4573. +           if (*vectors >= text_size)
  4574. +             {
  4575. +           if (*vectors >= text_size + data_size)
  4576. +             {
  4577. +               hunk_num = number_of_bss_hunk;
  4578. +               if (databss_together)
  4579. +                 *vectors -= text_size;
  4580. +               else
  4581. +                 *vectors -= text_size + data_size;
  4582. +             }
  4583. +           else
  4584. +             {
  4585. +               hunk_num = number_of_data_hunk;
  4586. +               *vectors -= text_size;
  4587. +             }
  4588. +             }
  4589. +           add_to_reloc_hunk (hunk_num, offset);
  4590. +         }
  4591. +       ++vectors;
  4592. +       offset += 4;
  4593. +       ++relvectors;
  4594. +     }
  4595. +       /* check.. HAS to be zero */
  4596. +       if (*vectors)
  4597. +     fatal ("set-vector corrupt, num_entries = %d", num_entries);
  4598. +       vectors++; offset += 4; relvectors++; --num_entries;
  4599. +     }
  4600. + }
  4601. + #endif
  4602. + 
  4603. diff -rc --new-file binutils-1.8.x-base/objdump.c binutils-1.8.x/objdump.c
  4604. *** binutils-1.8.x-base/objdump.c    Sat Dec 30 00:16:07 1989
  4605. --- binutils-1.8.x/objdump.c    Wed Sep 22 12:45:32 1993
  4606. ***************
  4607. *** 24,31 ****
  4608.   #include <stdio.h>
  4609.   #include "getopt.h"
  4610.   
  4611.   #ifndef COFF_ENCAPSULATE
  4612. ! #include <a.out.h>
  4613.   /* Tell a.out.gnu.h not to try to redefine some things.  */
  4614.   #define __STRUCT_EXEC_OVERRIDE__
  4615.   #define N_NLIST_DECLARED
  4616. --- 24,35 ----
  4617.   #include <stdio.h>
  4618.   #include "getopt.h"
  4619.   
  4620. + #ifdef MCH_AMIGA
  4621. + #define getpagesize() 256
  4622. + #endif
  4623. + 
  4624.   #ifndef COFF_ENCAPSULATE
  4625. ! #include <sun/a.out.h>
  4626.   /* Tell a.out.gnu.h not to try to redefine some things.  */
  4627.   #define __STRUCT_EXEC_OVERRIDE__
  4628.   #define N_NLIST_DECLARED
  4629. diff -rc --new-file binutils-1.8.x-base/ranlib.c binutils-1.8.x/ranlib.c
  4630. *** binutils-1.8.x-base/ranlib.c    Thu Mar  1 00:18:42 1990
  4631. --- binutils-1.8.x/ranlib.c    Sat Feb  5 12:31:20 1994
  4632. ***************
  4633. *** 54,60 ****
  4634.      as the location of the GNU AR program.  */
  4635.   
  4636.   char *prog = AR_PROG;
  4637. ! char *prog_pref = "/usr/local/gnubin/ar";
  4638.   
  4639.   int
  4640.   main (argc, argv)
  4641. --- 54,60 ----
  4642.      as the location of the GNU AR program.  */
  4643.   
  4644.   char *prog = AR_PROG;
  4645. ! char *prog_pref = "/gnu/bin/ar";
  4646.   
  4647.   int
  4648.   main (argc, argv)
  4649. diff -rc --new-file binutils-1.8.x-base/strip.c binutils-1.8.x/strip.c
  4650. *** binutils-1.8.x-base/strip.c    Mon Jun 11 21:40:01 1990
  4651. --- binutils-1.8.x/strip.c    Wed Sep 22 12:45:42 1993
  4652. ***************
  4653. *** 71,77 ****
  4654.   
  4655.   /* If BSD, we can use `ftruncate'.  */
  4656.   
  4657. ! #ifndef USG
  4658.   #define HAVE_FTRUNCATE
  4659.   #endif
  4660.   
  4661. --- 71,77 ----
  4662.   
  4663.   /* If BSD, we can use `ftruncate'.  */
  4664.   
  4665. ! #if !defined(USG) && !defined(MCH_AMIGA)
  4666.   #define HAVE_FTRUNCATE
  4667.   #endif
  4668.   
  4669. ***************
  4670. *** 287,294 ****
  4671. --- 287,296 ----
  4672.       signal (SIGTERM, SIG_DFL);
  4673.   
  4674.     /* Handle any signal that came in while they were deferred.  */
  4675. + #ifndef MCH_AMIGA
  4676.     if (delayed_signal)
  4677.       kill (getpid (), delayed_signal);
  4678. + #endif
  4679.   }
  4680.   
  4681.   /** Convenient functions for operating on one or all files being processed.  */
  4682. ***************
  4683. *** 928,933 ****
  4684. --- 930,936 ----
  4685.   }
  4686.   
  4687.   #ifdef USG
  4688. + #ifndef MCH_AMIGA
  4689.   
  4690.   rename (from, to)
  4691.        char *from, *to;
  4692. ***************
  4693. *** 940,945 ****
  4694. --- 943,949 ----
  4695.       return 0;
  4696.   }
  4697.   
  4698. + #endif
  4699.   #endif
  4700.   
  4701.   usage ()
  4702.