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