From 85825401dc523061be3cb0df3a281a2be31e3402 Mon Sep 17 00:00:00 2001 From: Ian Lance Taylor Date: Wed, 30 Dec 1992 20:34:14 +0000 Subject: [PATCH] Wed Dec 30 10:18:57 1992 Ian Lance Taylor (ian@cygnus.com) * app.c, config/tc-*.c: Don't include read.h, since it is already included by as.h. * These are based on patches from Minh Tran-le . * configure.in (i[34]86-ibm-aix*): Accept i486 for host. Use obj_format coffbfd and gas_target i386coff for target. (i[34]86-*-isc*): New host (uses sysv). * config/i386aix.mt: Removed (no longer used). * config/mh-i386aix (RANLIB): Use true rather than /bin/true. (MINUS_G): Removed. (LDFLAGS): Added, defined as -shlib. * config/te-i386aix.h (REVERSE_SORT_RELOCS): Undefine. * config/te-sco386.h (LOCAL_LABEL): Don't define. (DOT_LABEL_PREFIX): Define. * expr.c (operand): If DOT_LABEL_PREFIX, use .L0\001 as a label name rather than L0\001. * read.c (s_lcomm): Make a frag in SEG_BSS rather than using local_bss_counter. * symbols.c, symbols.h (local_bss_counter): Removed. * write.c (write_object_file): bss no longer uses local_bss_counter. Pass correct data and bss size to VMS_write_object_file. * config/obj-vms.c (VMS_write_object_file): Accept bss size as argument, rather than using local_bss_counter. * config/tc-m88k.c (s_bss): Don't use local_bss_counter. * config/tc-sparc.c (s_reserve): Don't use local_bss_counter. * config/obj-coffbfd.c (had_lineno, had_reloc): Removed. (size_section): Restored sanity check. (do_relocs_for): Base section address on s_paddr rather than computing it. Adjust a29k R_IHIHALF special case to account for section paddr (used to require paddr to be zero). If there are no reclos, set s_relptr to 0. Set relocation size in object_headers. (fill_section): Always set s_vaddr here, removing ZERO_BASED_SEGMENTS case. Force s_scnptr for bss to 0. Don't set NOLOAD for i386 .bss, because it confuses the SVR3 native linker. Set STYP_INFO for .comment. (coff_header_append): Use object headers and H_{SET,GET}_* macros. Make aouthdr writing depend on OBJ_COFF_OMIT_OPTIONAL_HEADER. (crawl_symbols): Handle 8 character section name correctly. Use H_{SET,GET}_* macros. (do_linenos_for): Set lineno size in object_headers. (write_object_file): Use H_{SET,GET}_* macros. Don't bother to set s_vaddr here. If string_byte_count remains 4, set it back to 0, and only write strings out if there are some. Call fill_section before do_relocs_for and do_linenos_for. (obj_coff_section): Handle optional quoted second argument giving section characteristics. (obj_coff_bss): Added to handle .bss. (obj_coff_ident): Added to handle .ident (puts string in .comment section). (obj_coff_lcomm): Put common symbols in .bss, not .data. (fixup_mdeps): Change to segment. Call frag_wane after md_convert_frag. (fixup_segment): Explicitly check S_IS_COMMON before making 386 adjustment (already happened only for common symbols, but this is clearer). * config/obj-coffbfd.h (OBJ_COFF_OMIT_OPTIONAL_HEADER): Define. * config/tc-i386.c (s_bss): Don't use if I386COFF. (md_pseudo_table): Ignore .optim and .noopt. (tc_coff_sizemachdep): New function. * config/tc-i386.h (REVERSE_SORT_RELOCS): Undef, for SVR3 compatibility. (LOCAL_LABEL): Removed definition. (DOT_LABEL_PREFIX): Defined. --- gas/ChangeLog | 68 +++++++++++++++++++++++++++++++++++++++++ gas/config/.Sanitize | 72 ++++++++++++++++++++++++++++++++++++++++++-- gas/configure.in | 26 +++++++++++----- gas/expr.c | 14 ++++++--- gas/read.c | 35 ++++++++++++--------- gas/symbols.c | 23 ++------------ gas/write.c | 17 ++++++----- 7 files changed, 199 insertions(+), 56 deletions(-) diff --git a/gas/ChangeLog b/gas/ChangeLog index b182c94de60..764b1102e0a 100644 --- a/gas/ChangeLog +++ b/gas/ChangeLog @@ -1,3 +1,71 @@ +Wed Dec 30 10:18:57 1992 Ian Lance Taylor (ian@cygnus.com) + + * app.c, config/tc-*.c: Don't include read.h, since it is already + included by as.h. + + * These are based on patches from Minh Tran-le + . + * configure.in (i[34]86-ibm-aix*): Accept i486 for host. Use + obj_format coffbfd and gas_target i386coff for target. + (i[34]86-*-isc*): New host (uses sysv). + * config/i386aix.mt: Removed (no longer used). + * config/mh-i386aix (RANLIB): Use true rather than /bin/true. + (MINUS_G): Removed. + (LDFLAGS): Added, defined as -shlib. + * config/te-i386aix.h (REVERSE_SORT_RELOCS): Undefine. + * config/te-sco386.h (LOCAL_LABEL): Don't define. + (DOT_LABEL_PREFIX): Define. + * expr.c (operand): If DOT_LABEL_PREFIX, use .L0\001 as a label + name rather than L0\001. + * read.c (s_lcomm): Make a frag in SEG_BSS rather than using + local_bss_counter. + * symbols.c, symbols.h (local_bss_counter): Removed. + * write.c (write_object_file): bss no longer uses + local_bss_counter. Pass correct data and bss size to + VMS_write_object_file. + * config/obj-vms.c (VMS_write_object_file): Accept bss size as + argument, rather than using local_bss_counter. + * config/tc-m88k.c (s_bss): Don't use local_bss_counter. + * config/tc-sparc.c (s_reserve): Don't use local_bss_counter. + * config/obj-coffbfd.c (had_lineno, had_reloc): Removed. + (size_section): Restored sanity check. + (do_relocs_for): Base section address on s_paddr rather than + computing it. Adjust a29k R_IHIHALF special case to account for + section paddr (used to require paddr to be zero). If there are no + reclos, set s_relptr to 0. Set relocation size in object_headers. + (fill_section): Always set s_vaddr here, removing + ZERO_BASED_SEGMENTS case. Force s_scnptr for bss to 0. Don't set + NOLOAD for i386 .bss, because it confuses the SVR3 native linker. + Set STYP_INFO for .comment. + (coff_header_append): Use object headers and H_{SET,GET}_* macros. + Make aouthdr writing depend on OBJ_COFF_OMIT_OPTIONAL_HEADER. + (crawl_symbols): Handle 8 character section name correctly. Use + H_{SET,GET}_* macros. + (do_linenos_for): Set lineno size in object_headers. + (write_object_file): Use H_{SET,GET}_* macros. Don't bother to + set s_vaddr here. If string_byte_count remains 4, set it back to + 0, and only write strings out if there are some. Call + fill_section before do_relocs_for and do_linenos_for. + (obj_coff_section): Handle optional quoted second argument giving + section characteristics. + (obj_coff_bss): Added to handle .bss. + (obj_coff_ident): Added to handle .ident (puts string in .comment + section). + (obj_coff_lcomm): Put common symbols in .bss, not .data. + (fixup_mdeps): Change to segment. Call frag_wane after + md_convert_frag. + (fixup_segment): Explicitly check S_IS_COMMON before making 386 + adjustment (already happened only for common symbols, but this is + clearer). + * config/obj-coffbfd.h (OBJ_COFF_OMIT_OPTIONAL_HEADER): Define. + * config/tc-i386.c (s_bss): Don't use if I386COFF. + (md_pseudo_table): Ignore .optim and .noopt. + (tc_coff_sizemachdep): New function. + * config/tc-i386.h (REVERSE_SORT_RELOCS): Undef, for SVR3 + compatibility. + (LOCAL_LABEL): Removed definition. + (DOT_LABEL_PREFIX): Defined. + Mon Dec 28 10:32:05 1992 Ken Raeburn (raeburn@cygnus.com) * app.c (app_push): Use memcpy, not bcopy. diff --git a/gas/config/.Sanitize b/gas/config/.Sanitize index 15509e4c7c0..7f226bd1514 100644 --- a/gas/config/.Sanitize +++ b/gas/config/.Sanitize @@ -52,7 +52,6 @@ ho-sunos.h ho-sysv.h ho-vax.h ho-vms.h -i386aix.mt i386coff.mt m68k.mt m68kcoff.mt @@ -140,7 +139,76 @@ echo Done in `pwd`. # # # $Log$ -# Revision 1.30 1992/12/08 09:42:06 raeburn +# Revision 1.31 1992/12/30 20:34:14 ian +# Wed Dec 30 10:18:57 1992 Ian Lance Taylor (ian@cygnus.com) +# +# * app.c, config/tc-*.c: Don't include read.h, since it is already +# included by as.h. +# +# * These are based on patches from Minh Tran-le +# . +# * configure.in (i[34]86-ibm-aix*): Accept i486 for host. Use +# obj_format coffbfd and gas_target i386coff for target. +# (i[34]86-*-isc*): New host (uses sysv). +# * config/i386aix.mt: Removed (no longer used). +# * config/mh-i386aix (RANLIB): Use true rather than /bin/true. +# (MINUS_G): Removed. +# (LDFLAGS): Added, defined as -shlib. +# * config/te-i386aix.h (REVERSE_SORT_RELOCS): Undefine. +# * config/te-sco386.h (LOCAL_LABEL): Don't define. +# (DOT_LABEL_PREFIX): Define. +# * expr.c (operand): If DOT_LABEL_PREFIX, use .L0\001 as a label +# name rather than L0\001. +# * read.c (s_lcomm): Make a frag in SEG_BSS rather than using +# local_bss_counter. +# * symbols.c, symbols.h (local_bss_counter): Removed. +# * write.c (write_object_file): bss no longer uses +# local_bss_counter. Pass correct data and bss size to +# VMS_write_object_file. +# * config/obj-vms.c (VMS_write_object_file): Accept bss size as +# argument, rather than using local_bss_counter. +# * config/tc-m88k.c (s_bss): Don't use local_bss_counter. +# * config/tc-sparc.c (s_reserve): Don't use local_bss_counter. +# * config/obj-coffbfd.c (had_lineno, had_reloc): Removed. +# (size_section): Restored sanity check. +# (do_relocs_for): Base section address on s_paddr rather than +# computing it. Adjust a29k R_IHIHALF special case to account for +# section paddr (used to require paddr to be zero). If there are no +# reclos, set s_relptr to 0. Set relocation size in object_headers. +# (fill_section): Always set s_vaddr here, removing +# ZERO_BASED_SEGMENTS case. Force s_scnptr for bss to 0. Don't set +# NOLOAD for i386 .bss, because it confuses the SVR3 native linker. +# Set STYP_INFO for .comment. +# (coff_header_append): Use object headers and H_{SET,GET}_* macros. +# Make aouthdr writing depend on OBJ_COFF_OMIT_OPTIONAL_HEADER. +# (crawl_symbols): Handle 8 character section name correctly. Use +# H_{SET,GET}_* macros. +# (do_linenos_for): Set lineno size in object_headers. +# (write_object_file): Use H_{SET,GET}_* macros. Don't bother to +# set s_vaddr here. If string_byte_count remains 4, set it back to +# 0, and only write strings out if there are some. Call +# fill_section before do_relocs_for and do_linenos_for. +# (obj_coff_section): Handle optional quoted second argument giving +# section characteristics. +# (obj_coff_bss): Added to handle .bss. +# (obj_coff_ident): Added to handle .ident (puts string in .comment +# section). +# (obj_coff_lcomm): Put common symbols in .bss, not .data. +# (fixup_mdeps): Change to segment. Call frag_wane after +# md_convert_frag. +# (fixup_segment): Explicitly check S_IS_COMMON before making 386 +# adjustment (already happened only for common symbols, but this is +# clearer). +# * config/obj-coffbfd.h (OBJ_COFF_OMIT_OPTIONAL_HEADER): Define. +# * config/tc-i386.c (s_bss): Don't use if I386COFF. +# (md_pseudo_table): Ignore .optim and .noopt. +# (tc_coff_sizemachdep): New function. +# * config/tc-i386.h (REVERSE_SORT_RELOCS): Undef, for SVR3 +# compatibility. +# (LOCAL_LABEL): Removed definition. +# (DOT_LABEL_PREFIX): Defined. +# +# Revision 1.30 1992/12/08 09:42:06 raeburn # missed tc-tahoe files # # Revision 1.29 1992/12/08 09:30:28 raeburn diff --git a/gas/configure.in b/gas/configure.in index d222ee07252..01c720eedcb 100644 --- a/gas/configure.in +++ b/gas/configure.in @@ -37,15 +37,22 @@ configdirs=doc gas_host=generic case "${host}" in - a29k-*-* | rs6000-*-* | vax-*-*) - gas_host=${host_cpu} + a29k-*-* | rs6000-*-* | vax-*-*) + case "${host_os}" in + vms*) gas_host=vms ;; + bsd*) gas_host=bsd ;; + *) gas_host=${host_cpu} ;; + esac ;; mips-dec-ultrix) gas_host=decstation ;; - i386-ibm-aix) + i[34]86-ibm-aix*) gas_host=i386aix ;; + i[34]86-*-isc*) + gas_host=sysv + ;; m68k-sun-sunos*) gas_host=sun3 ;; @@ -98,14 +105,15 @@ case ${target} in gas_target=ebmon29k ;; i[34]86-ibm-aix*) - obj_format=coff - gas_target=i386aix + obj_format=coffbfd + need_bfd="./../bfd/libbfd.a" + gas_target=i386coff emulation=i386aix ;; i[34]86-*-bsd*) obj_format=aout ;; - i[34]86-*-coff | i[34]86-*-sysv* | i[34]86-*-sco*) + i[34]86-*-coff | i[34]86-*-sysv* | i[34]86-*-sco* | i[34]86-*-isc*) obj_format=coffbfd need_bfd="./../bfd/libbfd.a" gas_target=i386coff @@ -136,7 +144,7 @@ case ${target} in sparclite-fujitsu-none) obj_format=aout ;; - *-*-aout | *-*-scout) + *-*-aout | *-*-scout | *-*-linux) obj_format=aout ;; *-*-bout* | *-*-nindy*) @@ -174,12 +182,16 @@ case ${target} in *-*-coff) obj_format=coff ;; + *-*-vms) + obj_format=vms + ;; esac # assign floating point type case ${target_cpu} in ns32k) atof=ns32k ;; vax) atof=vax ;; + tahoe) atof=tahoe ;; *) atof=ieee ;; esac diff --git a/gas/expr.c b/gas/expr.c index fa67fa3b930..dabc1058b7b 100644 --- a/gas/expr.c +++ b/gas/expr.c @@ -567,13 +567,17 @@ operand (expressionP) case '.': if (!is_part_of_name (*input_line_pointer)) { + char *fake; extern struct obstack frags; - /* - JF: '.' is pseudo symbol with value of current location in current - segment. . . - */ - symbolP = symbol_new ("L0\001", + /* JF: '.' is pseudo symbol with value of current location + in current segment. */ +#ifdef DOT_LABEL_PREFIX + fake = ".L0\001"; +#else + fake = "L0\001"; +#endif + symbolP = symbol_new (fake, now_seg, (valueT) (obstack_next_free (&frags) - frag_now->fr_literal), frag_now); diff --git a/gas/read.c b/gas/read.c index 09a11de6a55..c47077381a8 100644 --- a/gas/read.c +++ b/gas/read.c @@ -587,7 +587,7 @@ read_a_source_file (name) that goes with this #APP There is one. The specs guarentee it. . . */ tmp_len = buffer_limit - s; - tmp_buf = xmalloc (tmp_len); + tmp_buf = xmalloc (tmp_len + 1); bcopy (s, tmp_buf, tmp_len); do { @@ -1147,19 +1147,28 @@ s_lcomm (needs_align) S_GET_OTHER (symbolP) == 0 && S_GET_DESC (symbolP) == 0 && #endif /* OBJ_AOUT or OBJ_BOUT */ - (((S_GET_SEGMENT (symbolP) == SEG_BSS) && (S_GET_VALUE (symbolP) == local_bss_counter)) + (S_GET_SEGMENT (symbolP) == SEG_BSS || (!S_IS_DEFINED (symbolP) && S_GET_VALUE (symbolP) == 0))) { - if (needs_align) - { - /* Align */ - align = ~((~0) << align); /* Convert to a mask */ - local_bss_counter = - (local_bss_counter + align) & (~align); - } + char *p; + segT current_seg = now_seg; + subsegT current_subseg = now_subseg; + + subseg_new (SEG_BSS, 1); + + if (align) + frag_align (align, 0); + /* detach from old frag */ + if (S_GET_SEGMENT (symbolP) == SEG_BSS) + symbolP->sy_frag->fr_symbol = NULL; + + symbolP->sy_frag = frag_now; + p = frag_var (rs_org, 1, 1, (relax_substateT)0, symbolP, + temp, (char *)0); + *p = 0; - S_SET_VALUE (symbolP, local_bss_counter); S_SET_SEGMENT (symbolP, SEG_BSS); + #ifdef OBJ_COFF /* The symbol may already have been created with a preceding * ".globl" directive -- be careful not to step on storage @@ -1170,13 +1179,11 @@ s_lcomm (needs_align) S_SET_STORAGE_CLASS (symbolP, C_STAT); } #endif /* OBJ_COFF */ - symbolP->sy_frag = &bss_address_frag; - local_bss_counter += temp; + subseg_new (current_seg, current_subseg); } else { - as_bad ("Ignoring attempt to re-define symbol from %d. to %d.", - S_GET_VALUE (symbolP), local_bss_counter); + as_bad ("Ignoring attempt to re-define symbol %s.", name); } demand_empty_rest_of_line (); diff --git a/gas/symbols.c b/gas/symbols.c index a140046e682..7196874ca34 100644 --- a/gas/symbols.c +++ b/gas/symbols.c @@ -37,7 +37,6 @@ struct hash_control * sy_hash; /* symbol-name => struct symbol pointer */ /* Below are commented in "symbols.h". */ -unsigned int local_bss_counter; symbolS *symbol_rootP; symbolS *symbol_lastP; symbolS abs_symbol; @@ -48,11 +47,7 @@ symbolS *dot_bss_symbol; struct obstack notes; -#if __STDC__ == 1 -static void fb_label_init (void); -#else /* not __STDC__ */ -static void fb_label_init (); -#endif /* not __STDC__ */ +static void fb_label_init PARAMS ((void)); void symbol_begin () @@ -62,7 +57,6 @@ symbol_begin () sy_hash = hash_new (); memset ((char *) (&abs_symbol), '\0', sizeof (abs_symbol)); S_SET_SEGMENT (&abs_symbol, SEG_ABSOLUTE); /* Can't initialise a union. Sigh. */ - local_bss_counter = 0; #ifdef LOCAL_LABELS_FB fb_label_init (); #endif /* LOCAL_LABELS_FB */ @@ -280,10 +274,8 @@ colon (sym_name) /* just seen "x:" - rattle symbols & frags */ } else { - /* - * It is a .comm/.lcomm being converted - * to initialized data. - */ + /* It is a .comm/.lcomm being converted to initialized + data. */ symbolP->sy_frag = frag_now; #ifdef VMS symbolP->sy_other = const_flag; @@ -794,7 +786,6 @@ static void fb_label_init () { memset ((void *) fb_low_counter, '\0', sizeof (fb_low_counter)); - return; } /* fb_label_init() */ /* add one to the instance number of this fb label */ @@ -977,12 +968,4 @@ decode_local_label_name (s) return (symbol_decode); } /* decode_local_label_name() */ - -/* - * Local Variables: - * comment-column: 0 - * fill-column: 131 - * End: - */ - /* end of symbols.c */ diff --git a/gas/write.c b/gas/write.c index 86ca81dd4f3..77097c72e87 100644 --- a/gas/write.c +++ b/gas/write.c @@ -152,7 +152,6 @@ write_object_file () register fragS *fragP; /* Track along all frags. */ register struct frchain *next_frchainP; register fragS **prev_fragPP; - unsigned int data_siz; long object_file_size; @@ -286,7 +285,6 @@ write_object_file () else { H_SET_DATA_SIZE (&headers, 0); - data_siz = 0; } #ifdef OBJ_BOUT @@ -308,7 +306,7 @@ write_object_file () /* Slide all the frags */ if (bss_frag_root) { - relax_addressT slide = bss_address_frag.fr_address + local_bss_counter; + relax_addressT slide = bss_address_frag.fr_address; for (fragP = bss_frag_root; fragP; fragP = fragP->fr_next) { @@ -317,11 +315,12 @@ write_object_file () } #endif + if (bss_last_frag) - { - local_bss_counter += bss_last_frag->fr_address - bss_frag_root->fr_address; - } - H_SET_BSS_SIZE (&headers, local_bss_counter); + H_SET_BSS_SIZE (&headers, + bss_last_frag->fr_address - bss_frag_root->fr_address); + else + H_SET_BSS_SIZE (&headers, 0); /* * @@ -660,7 +659,9 @@ write_object_file () /* * Now do the VMS-dependent part of writing the object file */ - VMS_write_object_file (H_GET_TEXT_SIZE (&headers), data_siz, + VMS_write_object_file (H_GET_TEXT_SIZE (&headers), + H_GET_DATA_SIZE (&headers), + H_GET_BSS_SIZE (&headers), text_frag_root, data_frag_root); #endif /* VMS */ } /* write_object_file() */ -- 2.30.2