gas/
[deliverable/binutils-gdb.git] / gold / fileread.cc
index 1a142022569a624bdfd8e7148404374e96a1d104..d87f7731d50f10a406dd6b088629e3bffcaa8f7b 100644 (file)
@@ -1,11 +1,32 @@
 // fileread.cc -- read files for gold
 
+// Copyright 2006, 2007 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
+// (at your option) any later version.
+
+// This program is distributed in the hope that it will be useful,
+// but WITHOUT ANY WARRANTY; without even the implied warranty of
+// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+// GNU General Public License for more details.
+
+// You should have received a copy of the GNU General Public License
+// along with this program; if not, write to the Free Software
+// Foundation, Inc., 51 Franklin Street - Fifth Floor, Boston,
+// MA 02110-1301, USA.
+
 #include "gold.h"
 
 #include <cstring>
 #include <cerrno>
 #include <fcntl.h>
 #include <unistd.h>
+#include <sys/mman.h>
 
 #include "options.h"
 #include "dirsearch.h"
@@ -19,7 +40,14 @@ namespace gold
 File_read::View::~View()
 {
   gold_assert(!this->is_locked());
-  delete[] this->data_;
+  if (!this->mapped_)
+    delete[] this->data_;
+  else
+    {
+      if (::munmap(const_cast<unsigned char*>(this->data_), this->size_) != 0)
+        fprintf(stderr, _("%s: munmap failed: %s\n"),
+                program_name, strerror(errno));
+    }
 }
 
 void
@@ -69,8 +97,23 @@ File_read::open(const std::string& name)
              && this->descriptor_ < 0
              && this->name_.empty());
   this->name_ = name;
+
   this->descriptor_ = ::open(this->name_.c_str(), O_RDONLY);
+
+  if (this->descriptor_ >= 0)
+    {
+      struct stat s;
+      if (::fstat(this->descriptor_, &s) < 0)
+       {
+         fprintf(stderr, _("%s: %s: fstat failed: %s"), program_name,
+                 this->name_.c_str(), strerror(errno));
+         gold_exit(false);
+       }
+      this->size_ = s.st_size;
+    }
+
   ++this->lock_count_;
+
   return this->descriptor_ >= 0;
 }
 
@@ -78,14 +121,14 @@ File_read::open(const std::string& name)
 
 bool
 File_read::open(const std::string& name, const unsigned char* contents,
-               off_t contents_size)
+               off_t size)
 {
   gold_assert(this->lock_count_ == 0
              && this->descriptor_ < 0
              && this->name_.empty());
   this->name_ = name;
   this->contents_ = contents;
-  this->contents_size_ = contents_size;
+  this->size_ = size;
   ++this->lock_count_;
   return true;
 }
@@ -101,6 +144,8 @@ File_read::unlock()
 {
   gold_assert(this->lock_count_ > 0);
   --this->lock_count_;
+  if (this->lock_count_ == 0)
+    this->clear_views(false);
 }
 
 bool
@@ -124,66 +169,51 @@ File_read::find_view(off_t start, off_t size)
   return p->second;
 }
 
-// Read data from the file.  Return the number of bytes read.  If
-// PBYTES is not NULL, store the number of bytes in *PBYTES, otherwise
-// require that we read exactly the number of bytes requested.
+// Read SIZE bytes from the file starting at offset START.  Read into
+// the buffer at P.
 
-off_t
-File_read::do_read(off_t start, off_t size, void* p, off_t* pbytes)
+void
+File_read::do_read(off_t start, off_t size, void* p)
 {
   gold_assert(this->lock_count_ > 0);
 
   off_t bytes;
-  if (this->contents_ == NULL)
+  if (this->contents_ != NULL)
     {
-      int o = this->descriptor_;
-
-      if (lseek(o, start, SEEK_SET) < 0)
+      bytes = this->size_ - start;
+      if (bytes >= size)
        {
-         fprintf(stderr, _("%s: %s: lseek to %lld failed: %s"),
-                 program_name, this->filename().c_str(),
-                 static_cast<long long>(start),
-                 strerror(errno));
-         gold_exit(false);
+         memcpy(p, this->contents_ + start, size);
+         return;
        }
+    }
+  else
+    {
+      bytes = ::pread(this->descriptor_, p, size, start);
+      if (bytes == size)
+       return;
 
-      bytes = ::read(o, p, size);
       if (bytes < 0)
        {
-         fprintf(stderr, _("%s: %s: read failed: %s\n"),
+         fprintf(stderr, _("%s: %s: pread failed: %s\n"),
                  program_name, this->filename().c_str(), strerror(errno));
          gold_exit(false);
        }
     }
-  else
-    {
-      bytes = this->contents_size_ - start;
-      if (bytes < 0)
-       bytes = 0;
-      else if (bytes > size)
-       bytes = size;
-      memcpy(p, this->contents_ + start, bytes);
-    }
 
-  if (pbytes != NULL)
-    *pbytes = bytes;
-  else if (bytes != size)
-    {
-      fprintf(stderr,
-             _("%s: %s: file too short: read only %lld of %lld "
-               "bytes at %lld\n"),
-             program_name, this->filename().c_str(),
-             static_cast<long long>(bytes),
-             static_cast<long long>(size),
-             static_cast<long long>(start));
-      gold_exit(false);
-    }
-
-  return bytes;
+  fprintf(stderr,
+         _("%s: %s: file too short: read only %lld of %lld bytes at %lld\n"),
+         program_name, this->filename().c_str(),
+         static_cast<long long>(bytes),
+         static_cast<long long>(size),
+         static_cast<long long>(start));
+  gold_exit(false);
 }
 
+// Read data from the file.
+
 void
-File_read::read(off_t start, off_t size, void* p, off_t* pbytes)
+File_read::read(off_t start, off_t size, void* p)
 {
   gold_assert(this->lock_count_ > 0);
 
@@ -191,18 +221,16 @@ File_read::read(off_t start, off_t size, void* p, off_t* pbytes)
   if (pv != NULL)
     {
       memcpy(p, pv->data() + (start - pv->start()), size);
-      if (pbytes != NULL)
-       *pbytes = size;
       return;
     }
 
-  this->do_read(start, size, p, pbytes);
+  this->do_read(start, size, p);
 }
 
 // Find an existing view or make a new one.
 
 File_read::View*
-File_read::find_or_make_view(off_t start, off_t size, off_t* pbytes)
+File_read::find_or_make_view(off_t start, off_t size, bool cache)
 {
   gold_assert(this->lock_count_ > 0);
 
@@ -218,8 +246,8 @@ File_read::find_or_make_view(off_t start, off_t size, off_t* pbytes)
       File_read::View* v = ins.first->second;
       if (v->size() - (start - v->start()) >= size)
        {
-         if (pbytes != NULL)
-           *pbytes = size;
+         if (cache)
+           v->set_cache();
          return v;
        }
 
@@ -227,38 +255,45 @@ File_read::find_or_make_view(off_t start, off_t size, off_t* pbytes)
       this->saved_views_.push_back(v);
     }
 
-  // We need to read data from the file.
+  // We need to read data from the file.  We read full pages for
+  // greater efficiency on small files.
 
   off_t psize = File_read::pages(size + (start - poff));
-  unsigned char* p = new unsigned char[psize];
 
-  off_t got_bytes;
-  off_t bytes = this->do_read(poff, psize, p, &got_bytes);
-
-  File_read::View* v = new File_read::View(poff, bytes, p);
+  if (poff + psize >= this->size_)
+    {
+      psize = this->size_ - poff;
+      gold_assert(psize >= size);
+    }
 
-  ins.first->second = v;
+  File_read::View* v;
 
-  if (bytes - (start - poff) >= size)
+  if (this->contents_ != NULL)
     {
-      if (pbytes != NULL)
-       *pbytes = size;
-      return v;
+      unsigned char* p = new unsigned char[psize];
+      this->do_read(poff, psize, p);
+      v = new File_read::View(poff, psize, p, cache, false);
     }
-
-  if (pbytes != NULL)
+  else
     {
-      *pbytes = bytes - (start - poff);
-      return v;
+      void* p = ::mmap(NULL, psize, PROT_READ, MAP_SHARED,
+                       this->descriptor_, poff);
+      if (p == MAP_FAILED)
+        {
+          fprintf(stderr, _("%s: %s: mmap offset %lld size %lld failed: %s\n"),
+                  program_name, this->filename().c_str(),
+                  static_cast<long long>(poff),
+                  static_cast<long long>(psize),
+                  strerror(errno));
+          gold_exit(false);
+        }
+
+      const unsigned char* pbytes = static_cast<const unsigned char*>(p);
+      v = new File_read::View(poff, psize, pbytes, cache, true);
     }
 
-  fprintf(stderr,
-         _("%s: %s: file too short: read only %lld of %lld bytes at %lld\n"),
-         program_name, this->filename().c_str(),
-         static_cast<long long>(bytes - (start - poff)),
-         static_cast<long long>(size),
-         static_cast<long long>(start));
-  gold_exit(false);
+  ins.first->second = v;
+  return v;
 }
 
 // This implementation of get_view just reads into a memory buffer,
@@ -266,18 +301,18 @@ File_read::find_or_make_view(off_t start, off_t size, off_t* pbytes)
 // mmap.
 
 const unsigned char*
-File_read::get_view(off_t start, off_t size, off_t* pbytes)
+File_read::get_view(off_t start, off_t size, bool cache)
 {
   gold_assert(this->lock_count_ > 0);
-  File_read::View* pv = this->find_or_make_view(start, size, pbytes);
+  File_read::View* pv = this->find_or_make_view(start, size, cache);
   return pv->data() + (start - pv->start());
 }
 
 File_view*
-File_read::get_lasting_view(off_t start, off_t size, off_t* pbytes)
+File_read::get_lasting_view(off_t start, off_t size, bool cache)
 {
   gold_assert(this->lock_count_ > 0);
-  File_read::View* pv = this->find_or_make_view(start, size, pbytes);
+  File_read::View* pv = this->find_or_make_view(start, size, cache);
   pv->lock();
   return new File_view(*this, pv, pv->data() + (start - pv->start()));
 }
@@ -291,7 +326,8 @@ File_read::clear_views(bool destroying)
        p != this->views_.end();
        ++p)
     {
-      if (!p->second->is_locked())
+      if (!p->second->is_locked()
+         && (destroying || !p->second->should_cache()))
        delete p->second;
       else
        {
@@ -304,7 +340,8 @@ File_read::clear_views(bool destroying)
   Saved_views::iterator p = this->saved_views_.begin();
   while (p != this->saved_views_.end())
     {
-      if (!(*p)->is_locked())
+      if (!(*p)->is_locked()
+         && (destroying || !(*p)->should_cache()))
        {
          delete *p;
          p = this->saved_views_.erase(p);
This page took 0.027338 seconds and 4 git commands to generate.