* parse.c (target_map_name_to_register): Include pseudo-regs.

[deliverable/binutils-gdb.git] / ld / ldfile.c

diff --git a/ld/ldfile.c b/ld/ldfile.c
index 187770e892b73f8aad80d86db6fe5ccbd81634f5..edf168165513fff3cb69f057a184a6de7bf752a2 100644 (file)
--- a/ld/ldfile.c
+++ b/ld/ldfile.c
@@ -1,4 +1,6 @@
-/* Copyright (C) 1991, 92, 93, 94, 95, 98, 99, 2000 Free Software Foundation, Inc.
+/* Linker file opening and searching.
+   Copyright (C) 1991, 92, 93, 94, 95, 98, 99, 2000
+   Free Software Foundation, Inc.
 
 This file is part of GLD, the Gnu Linker.
 
@@ -17,12 +19,7 @@ along with GLD; see the file COPYING.  If not, write to the Free
 Software Foundation, 59 Temple Place - Suite 330, Boston, MA
 02111-1307, USA.  */
 
-/*
- ldfile.c
-
- look after all the file stuff
-
- */
+/* ldfile.c:  look after all the file stuff.  */
 
 #include "bfd.h"
 #include "sysdep.h"
@@ -57,7 +54,7 @@ char *slash = "/";
 #endif
 #endif
 #else /* MPW */
-/* The MPW path char is a colon. */
+/* The MPW path char is a colon.  */
 char *slash = ":";
 #endif /* MPW */
 
@@ -129,15 +126,18 @@ ldfile_try_open_bfd (attempt, entry)
       else
        check = entry->the_bfd;
 
-      if (! bfd_check_format (check, bfd_object))
-       return true;
-      if (bfd_arch_get_compatible (check, output_bfd) == NULL)
+      if (check != NULL)
        {
-         einfo (_("%P: skipping incompatible %s when searching for %s"),
-                attempt, entry->local_sym_name);
-         bfd_close (entry->the_bfd);
-         entry->the_bfd = NULL;
-         return false;
+         if (! bfd_check_format (check, bfd_object))
+           return true;
+         if (bfd_arch_get_compatible (check, output_bfd) == NULL)
+           {
+             einfo (_("%P: skipping incompatible %s when searching for %s\n"),
+                    attempt, entry->local_sym_name);
+             bfd_close (entry->the_bfd);
+             entry->the_bfd = NULL;
+             return false;
+           }
        }
     }
 
@@ -227,7 +227,7 @@ ldfile_open_file (entry)
        einfo (_("%F%P: cannot open %s for %s: %E\n"),
               entry->filename, entry->local_sym_name);
       else
-       einfo(_("%F%P: cannot open %s: %E\n"), entry->local_sym_name);
+       einfo (_("%F%P: cannot open %s: %E\n"), entry->local_sym_name);
     }
   else
     {
@@ -247,6 +247,7 @@ ldfile_open_file (entry)
          if (ldemul_find_potential_libraries (arch->name, entry))
            return;
        }
+      
       einfo (_("%F%P: cannot find %s\n"), entry->local_sym_name);
     }
 }
@@ -262,6 +263,7 @@ try_open (name, exten)
   char buff[1000];
 
   result = fopen (name, "r");
+  
   if (trace_file_tries)
     {
       if (result == NULL)
@@ -277,6 +279,7 @@ try_open (name, exten)
     {
       sprintf (buff, "%s%s", name, exten);
       result = fopen (buff, "r");
+      
       if (trace_file_tries)
        {
          if (result == NULL)
@@ -302,17 +305,22 @@ ldfile_find_command_file (name, extend)
   char buffer[1000];
 
   /* First try raw name */
-  result = try_open(name,"");
-  if (result == (FILE *)NULL) {
-    /* Try now prefixes */
-    for (search = search_head;
-        search != (search_dirs_type *)NULL;
-        search = search->next) {
-      sprintf(buffer,"%s%s%s", search->name, slash, name);
-      result = try_open(buffer, extend);
-      if (result)break;
+  result = try_open (name, "");
+  if (result == (FILE *)NULL)
+    {
+      /* Try now prefixes */
+      for (search = search_head;
+          search != (search_dirs_type *)NULL;
+          search = search->next)
+       {
+         sprintf (buffer,"%s%s%s", search->name, slash, name);
+         
+         result = try_open (buffer, extend);
+         if (result)
+           break;
+       }
     }
-  }
+  
   return result;
 }
 
@@ -321,31 +329,29 @@ ldfile_open_command_file (name)
      const char *name;
 {
   FILE *ldlex_input_stack;
-  ldlex_input_stack = ldfile_find_command_file(name, "");
+  ldlex_input_stack = ldfile_find_command_file (name, "");
 
-  if (ldlex_input_stack == (FILE *)NULL) {
-    bfd_set_error (bfd_error_system_call);
-    einfo(_("%P%F: cannot open linker script file %s: %E\n"),name);
-  }
-  lex_push_file(ldlex_input_stack, name);
+  if (ldlex_input_stack == (FILE *)NULL)
+    {
+      bfd_set_error (bfd_error_system_call);
+      einfo (_("%P%F: cannot open linker script file %s: %E\n"), name);
+    }
+  
+  lex_push_file (ldlex_input_stack, name);
   
   ldfile_input_filename = name;
   lineno = 1;
   had_script = true;
 }
 
-
-
-
-
 #ifdef GNU960
-static
-char *
-gnu960_map_archname( name )
-char *name;
+static char *
+gnu960_map_archname (name)
+     char *name;
 {
   struct tabentry { char *cmd_switch; char *arch; };
-  static struct tabentry arch_tab[] = {
+  static struct tabentry arch_tab[] =
+  {
        "",   "",
        "KA", "ka",
        "KB", "kb",
@@ -359,41 +365,41 @@ char *name;
   struct tabentry *tp;
   
 
-  for ( tp = arch_tab; tp->cmd_switch != NULL; tp++ ){
-    if ( !strcmp(name,tp->cmd_switch) ){
-      break;
+  for (tp = arch_tab; tp->cmd_switch != NULL; tp++)
+    {
+      if (! strcmp (name,tp->cmd_switch))
+       break;
     }
-  }
 
-  if ( tp->cmd_switch == NULL ){
-    einfo(_("%P%F: unknown architecture: %s\n"),name);
-  }
+  if (tp->cmd_switch == NULL)
+    einfo (_("%P%F: unknown architecture: %s\n"),name);
+  
   return tp->arch;
 }
 
-
-
 void
-ldfile_add_arch(name)
-char *name;
+ldfile_add_arch (name)
+     char *name;
 {
   search_arch_type *new =
-    (search_arch_type *)xmalloc((bfd_size_type)(sizeof(search_arch_type)));
+    (search_arch_type *)xmalloc ((bfd_size_type)(sizeof (search_arch_type)));
 
 
-  if (*name != '\0') {
-    if (ldfile_output_machine_name[0] != '\0') {
-      einfo(_("%P%F: target architecture respecified\n"));
-      return;
+  if (*name != '\0')
+    {
+      if (ldfile_output_machine_name[0] != '\0')
+       {
+         einfo (_("%P%F: target architecture respecified\n"));
+         return;
+       }
+      
+      ldfile_output_machine_name = name;
     }
-    ldfile_output_machine_name = name;
-  }
 
   new->next = (search_arch_type*)NULL;
-  new->name = gnu960_map_archname( name );
+  new->name = gnu960_map_archname (name);
   *search_arch_tail_ptr = new;
   search_arch_tail_ptr = &new->next;
-
 }
 
 #else  /* not GNU960 */
@@ -403,7 +409,7 @@ void
 ldfile_add_arch (in_name)
      CONST char * in_name;
 {
-  char *name = buystring(in_name);
+  char *name = buystring (in_name);
   search_arch_type *new =
     (search_arch_type *) xmalloc (sizeof (search_arch_type));
 
@@ -428,14 +434,16 @@ void
 ldfile_set_output_arch (string)
      CONST char *string;
 {
-  const bfd_arch_info_type *arch = bfd_scan_arch(string);
-
-  if (arch) {
-    ldfile_output_architecture = arch->arch;
-    ldfile_output_machine = arch->mach;
-    ldfile_output_machine_name = arch->printable_name;
-  }
-  else {
-    einfo(_("%P%F: cannot represent machine `%s'\n"), string);
-  }
+  const bfd_arch_info_type *arch = bfd_scan_arch (string);
+
+  if (arch)
+    {
+      ldfile_output_architecture = arch->arch;
+      ldfile_output_machine = arch->mach;
+      ldfile_output_machine_name = arch->printable_name;
+    }
+  else
+    {
+      einfo (_("%P%F: cannot represent machine `%s'\n"), string);
+    }
 }