[MIPS] Initial checkin for MIPS changes for GOLD.

gold/output.cc

 // output.cc -- manage the output file for gold
 
 // Copyright 2006, 2007, 2008, 2009, 2010, 2011 Free Software Foundation, Inc.
 // Written by Ian Lance Taylor <iant@google.com>.
 
 // This file is part of gold.
 
 // This program is free software; you can redistribute it and/or modify
 // it under the terms of the GNU General Public License as published by
 // the Free Software Foundation; either version 3 of the License, or
@@ skipping 590 matching lines @@
   else
     {
       // We couldn't find the entry symbol.  See if we can parse it as
       // a number.  This supports, e.g., -e 0x1000.
       char* endptr;
       v = strtoull(entry, &endptr, 0);
       if (*endptr != '\0')
         {
           if (should_issue_warning)
             gold_warning("cannot find entry symbol '%s'", entry);
-          v = 0;
+
+          // Can't find the entry symbol, and it's not a number.  Use

[robertm, 2012/04/27 19:46:15]

This wont help with pnacl, wouldn't it be cleaner to make sure that you have
proper naming of the entry points - otherwise you are just hiding bugs

[Aleksandar Simeonov, 2012/05/08 15:21:42]

MIPS port of Gold is made to work the same way as it LD does. So it first search
for -e entry command line option, then __start symbol, then address of first
byte of .text section and if none found, the address 0.

+          // the first address in the text section.
+          v = this->target_->text_section_address();
         }
     }
 
   return v;
 }
 
 // Compute the current data size.
 
 off_t
 Output_file_header::do_size() const
@@ skipping 523 matching lines @@
 // to the front.  Among relative relocs, we sort by output address.
 // Among non-relative relocs, we sort by symbol index, then by output
 // address.
 
 template<bool dynamic, int size, bool big_endian>
 int
 Output_reloc<elfcpp::SHT_REL, dynamic, size, big_endian>::
   compare(const Output_reloc<elfcpp::SHT_REL, dynamic, size, big_endian>& r2)
     const
 {
+  // R_MIPS_NONE relocation have to be first.

[robertm, 2012/04/27 19:46:15]

why ?  add comment

[Aleksandar Simeonov, 2012/05/08 15:21:42]

On IRIX n64 rtld would ignore all dynamic relocations before an R_MIPS_NONE
entry.

http://sourceware.org/ml/binutils/2006-10/msg00186.html

+  if(this->type_ == 0)
+    return -1;
+  else if(r2.type_ == 0)
+    return 1;
+
   if (this->is_relative_)
     {
       if (!r2.is_relative_)
         return -1;
       // Otherwise sort by reloc address below.
     }
   else if (r2.is_relative_)
     return 1;
   else
     {
@@ skipping 551 matching lines @@
         const Sized_symbol<size>* s =
           static_cast<const Sized_symbol<size>*>(this->u_.sym);
         val = s->value();
       }
       break;
 
     case DYNAMIC_STRING:
       val = pool->get_offset(this->u_.str);
       break;
 
+    case DYNAMIC_TARGET:
+      val = parameters->target().dynamic_tag_value(this->tag_);
+      break;
+
     default:
       val = this->u_.od->address() + this->offset_;
       break;
     }
 
   elfcpp::Dyn_write<size, big_endian> dw(pov);
   dw.put_d_tag(this->tag_);
   dw.put_d_val(val);
 }
 
@@ skipping 3676 matching lines @@
 template
 class Output_data_got<64, false>;
 #endif
 
 #ifdef HAVE_TARGET_64_BIG
 template
 class Output_data_got<64, true>;
 #endif
 
 } // End namespace gold.