Merge branch 'vendor/GCC47'
[dragonfly.git] / contrib / binutils-2.22 / gold / plugin.cc
1 // plugin.cc -- plugin manager for gold      -*- C++ -*-
2
3 // Copyright 2008, 2009, 2010, 2011 Free Software Foundation, Inc.
4 // Written by Cary Coutant <ccoutant@google.com>.
5
6 // This file is part of gold.
7
8 // This program is free software; you can redistribute it and/or modify
9 // it under the terms of the GNU General Public License as published by
10 // the Free Software Foundation; either version 3 of the License, or
11 // (at your option) any later version.
12
13 // This program is distributed in the hope that it will be useful,
14 // but WITHOUT ANY WARRANTY; without even the implied warranty of
15 // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
16 // GNU General Public License for more details.
17
18 // You should have received a copy of the GNU General Public License
19 // along with this program; if not, write to the Free Software
20 // Foundation, Inc., 51 Franklin Street - Fifth Floor, Boston,
21 // MA 02110-1301, USA.
22
23 #include "gold.h"
24
25 #include <cstdio>
26 #include <cstdarg>
27 #include <cstring>
28 #include <string>
29 #include <vector>
30
31 #ifdef ENABLE_PLUGINS
32 #include <dlfcn.h>
33 #endif
34
35 #include "parameters.h"
36 #include "errors.h"
37 #include "fileread.h"
38 #include "layout.h"
39 #include "options.h"
40 #include "plugin.h"
41 #include "target.h"
42 #include "readsyms.h"
43 #include "symtab.h"
44 #include "elfcpp.h"
45
46 namespace gold
47 {
48
49 #ifdef ENABLE_PLUGINS
50
51 // The linker's exported interfaces.
52
53 extern "C"
54 {
55
56 static enum ld_plugin_status
57 register_claim_file(ld_plugin_claim_file_handler handler);
58
59 static enum ld_plugin_status
60 register_all_symbols_read(ld_plugin_all_symbols_read_handler handler);
61
62 static enum ld_plugin_status
63 register_cleanup(ld_plugin_cleanup_handler handler);
64
65 static enum ld_plugin_status
66 add_symbols(void *handle, int nsyms, const struct ld_plugin_symbol *syms);
67
68 static enum ld_plugin_status
69 get_input_file(const void *handle, struct ld_plugin_input_file *file);
70
71 static enum ld_plugin_status
72 get_view(const void *handle, const void **viewp);
73
74 static enum ld_plugin_status
75 release_input_file(const void *handle);
76
77 static enum ld_plugin_status
78 get_symbols(const void *handle, int nsyms, struct ld_plugin_symbol *syms);
79
80 static enum ld_plugin_status
81 get_symbols_v2(const void *handle, int nsyms, struct ld_plugin_symbol *syms);
82
83 static enum ld_plugin_status
84 add_input_file(const char *pathname);
85
86 static enum ld_plugin_status
87 add_input_library(const char *pathname);
88
89 static enum ld_plugin_status
90 set_extra_library_path(const char *path);
91
92 static enum ld_plugin_status
93 message(int level, const char *format, ...);
94
95 static enum ld_plugin_status
96 get_input_section_count(const void* handle, unsigned int* count);
97
98 static enum ld_plugin_status
99 get_input_section_type(const struct ld_plugin_section section,
100                        unsigned int* type);
101
102 static enum ld_plugin_status
103 get_input_section_name(const struct ld_plugin_section section,
104                        char** section_name_ptr);
105
106 static enum ld_plugin_status
107 get_input_section_contents(const struct ld_plugin_section section,
108                            const unsigned char** section_contents,
109                            size_t* len);
110
111 static enum ld_plugin_status
112 update_section_order(const struct ld_plugin_section *section_list,
113                      unsigned int num_sections);
114
115 static enum ld_plugin_status
116 allow_section_ordering();
117
118 };
119
120 #endif // ENABLE_PLUGINS
121
122 static Pluginobj* make_sized_plugin_object(Input_file* input_file,
123                                            off_t offset, off_t filesize);
124
125 // Plugin methods.
126
127 // Load one plugin library.
128
129 void
130 Plugin::load()
131 {
132 #ifdef ENABLE_PLUGINS
133   // Load the plugin library.
134   // FIXME: Look for the library in standard locations.
135   this->handle_ = dlopen(this->filename_.c_str(), RTLD_NOW);
136   if (this->handle_ == NULL)
137     {
138       gold_error(_("%s: could not load plugin library: %s"),
139                  this->filename_.c_str(), dlerror());
140       return;
141     }
142
143   // Find the plugin's onload entry point.
144   void* ptr = dlsym(this->handle_, "onload");
145   if (ptr == NULL)
146     {
147       gold_error(_("%s: could not find onload entry point"),
148                  this->filename_.c_str());
149       return;
150     }
151   ld_plugin_onload onload;
152   gold_assert(sizeof(onload) == sizeof(ptr));
153   memcpy(&onload, &ptr, sizeof(ptr));
154
155   // Get the linker's version number.
156   const char* ver = get_version_string();
157   int major = 0;
158   int minor = 0;
159   sscanf(ver, "%d.%d", &major, &minor);
160
161   // Allocate and populate a transfer vector.
162   const int tv_fixed_size = 24;
163
164   int tv_size = this->args_.size() + tv_fixed_size;
165   ld_plugin_tv* tv = new ld_plugin_tv[tv_size];
166
167   // Put LDPT_MESSAGE at the front of the list so the plugin can use it
168   // while processing subsequent entries.
169   int i = 0;
170   tv[i].tv_tag = LDPT_MESSAGE;
171   tv[i].tv_u.tv_message = message;
172
173   ++i;
174   tv[i].tv_tag = LDPT_API_VERSION;
175   tv[i].tv_u.tv_val = LD_PLUGIN_API_VERSION;
176
177   ++i;
178   tv[i].tv_tag = LDPT_GOLD_VERSION;
179   tv[i].tv_u.tv_val = major * 100 + minor;
180
181   ++i;
182   tv[i].tv_tag = LDPT_LINKER_OUTPUT;
183   if (parameters->options().relocatable())
184     tv[i].tv_u.tv_val = LDPO_REL;
185   else if (parameters->options().shared())
186     tv[i].tv_u.tv_val = LDPO_DYN;
187   else
188     tv[i].tv_u.tv_val = LDPO_EXEC;
189
190   ++i;
191   tv[i].tv_tag = LDPT_OUTPUT_NAME;
192   tv[i].tv_u.tv_string = parameters->options().output();
193
194   for (unsigned int j = 0; j < this->args_.size(); ++j)
195     {
196       ++i;
197       tv[i].tv_tag = LDPT_OPTION;
198       tv[i].tv_u.tv_string = this->args_[j].c_str();
199     }
200
201   ++i;
202   tv[i].tv_tag = LDPT_REGISTER_CLAIM_FILE_HOOK;
203   tv[i].tv_u.tv_register_claim_file = register_claim_file;
204
205   ++i;
206   tv[i].tv_tag = LDPT_REGISTER_ALL_SYMBOLS_READ_HOOK;
207   tv[i].tv_u.tv_register_all_symbols_read = register_all_symbols_read;
208
209   ++i;
210   tv[i].tv_tag = LDPT_REGISTER_CLEANUP_HOOK;
211   tv[i].tv_u.tv_register_cleanup = register_cleanup;
212
213   ++i;
214   tv[i].tv_tag = LDPT_ADD_SYMBOLS;
215   tv[i].tv_u.tv_add_symbols = add_symbols;
216
217   ++i;
218   tv[i].tv_tag = LDPT_GET_INPUT_FILE;
219   tv[i].tv_u.tv_get_input_file = get_input_file;
220
221   ++i;
222   tv[i].tv_tag = LDPT_GET_VIEW;
223   tv[i].tv_u.tv_get_view = get_view;
224
225   ++i;
226   tv[i].tv_tag = LDPT_RELEASE_INPUT_FILE;
227   tv[i].tv_u.tv_release_input_file = release_input_file;
228
229   ++i;
230   tv[i].tv_tag = LDPT_GET_SYMBOLS;
231   tv[i].tv_u.tv_get_symbols = get_symbols;
232
233   ++i;
234   tv[i].tv_tag = LDPT_GET_SYMBOLS_V2;
235   tv[i].tv_u.tv_get_symbols = get_symbols_v2;
236
237   ++i;
238   tv[i].tv_tag = LDPT_ADD_INPUT_FILE;
239   tv[i].tv_u.tv_add_input_file = add_input_file;
240
241   ++i;
242   tv[i].tv_tag = LDPT_ADD_INPUT_LIBRARY;
243   tv[i].tv_u.tv_add_input_library = add_input_library;
244
245   ++i;
246   tv[i].tv_tag = LDPT_SET_EXTRA_LIBRARY_PATH;
247   tv[i].tv_u.tv_set_extra_library_path = set_extra_library_path;
248
249   ++i;
250   tv[i].tv_tag = LDPT_GET_INPUT_SECTION_COUNT;
251   tv[i].tv_u.tv_get_input_section_count = get_input_section_count;
252
253   ++i;
254   tv[i].tv_tag = LDPT_GET_INPUT_SECTION_TYPE;
255   tv[i].tv_u.tv_get_input_section_type = get_input_section_type;
256
257   ++i;
258   tv[i].tv_tag = LDPT_GET_INPUT_SECTION_NAME;
259   tv[i].tv_u.tv_get_input_section_name = get_input_section_name;
260
261   ++i;
262   tv[i].tv_tag = LDPT_GET_INPUT_SECTION_CONTENTS;
263   tv[i].tv_u.tv_get_input_section_contents = get_input_section_contents;
264
265   ++i;
266   tv[i].tv_tag = LDPT_UPDATE_SECTION_ORDER;
267   tv[i].tv_u.tv_update_section_order = update_section_order;
268
269   ++i;
270   tv[i].tv_tag = LDPT_ALLOW_SECTION_ORDERING;
271   tv[i].tv_u.tv_allow_section_ordering = allow_section_ordering;
272
273   ++i;
274   tv[i].tv_tag = LDPT_NULL;
275   tv[i].tv_u.tv_val = 0;
276
277   gold_assert(i == tv_size - 1);
278
279   // Call the onload entry point.
280   (*onload)(tv);
281
282   delete[] tv;
283 #endif // ENABLE_PLUGINS
284 }
285
286 // Call the plugin claim-file handler.
287
288 inline bool
289 Plugin::claim_file(struct ld_plugin_input_file* plugin_input_file)
290 {
291   int claimed = 0;
292
293   if (this->claim_file_handler_ != NULL)
294     {
295       (*this->claim_file_handler_)(plugin_input_file, &claimed);
296       if (claimed)
297         return true;
298     }
299   return false;
300 }
301
302 // Call the all-symbols-read handler.
303
304 inline void
305 Plugin::all_symbols_read()
306 {
307   if (this->all_symbols_read_handler_ != NULL)
308     (*this->all_symbols_read_handler_)();
309 }
310
311 // Call the cleanup handler.
312
313 inline void
314 Plugin::cleanup()
315 {
316   if (this->cleanup_handler_ != NULL && !this->cleanup_done_)
317     {
318       // Set this flag before calling to prevent a recursive plunge
319       // in the event that a plugin's cleanup handler issues a
320       // fatal error.
321       this->cleanup_done_ = true;
322       (*this->cleanup_handler_)();
323     }
324 }
325
326 // This task is used to rescan archives as needed.
327
328 class Plugin_rescan : public Task
329 {
330  public:
331   Plugin_rescan(Task_token* this_blocker, Task_token* next_blocker)
332     : this_blocker_(this_blocker), next_blocker_(next_blocker)
333   { }
334
335   ~Plugin_rescan()
336   {
337     delete this->this_blocker_;
338   }
339
340   Task_token*
341   is_runnable()
342   {
343     if (this->this_blocker_->is_blocked())
344       return this->this_blocker_;
345     return NULL;
346   }
347
348   void
349   locks(Task_locker* tl)
350   { tl->add(this, this->next_blocker_); }
351
352   void
353   run(Workqueue*)
354   { parameters->options().plugins()->rescan(this); }
355
356   std::string
357   get_name() const
358   { return "Plugin_rescan"; }
359
360  private:
361   Task_token* this_blocker_;
362   Task_token* next_blocker_;
363 };
364
365 // Plugin_manager methods.
366
367 Plugin_manager::~Plugin_manager()
368 {
369   for (Plugin_list::iterator p = this->plugins_.begin();
370        p != this->plugins_.end();
371        ++p)
372     delete *p;
373   this->plugins_.clear();
374   for (Object_list::iterator obj = this->objects_.begin();
375        obj != this->objects_.end();
376        ++obj)
377     delete *obj;
378   this->objects_.clear();
379 }
380
381 // Load all plugin libraries.
382
383 void
384 Plugin_manager::load_plugins(Layout* layout)
385 {
386   this->layout_ = layout;
387   for (this->current_ = this->plugins_.begin();
388        this->current_ != this->plugins_.end();
389        ++this->current_)
390     (*this->current_)->load();
391 }
392
393 // Call the plugin claim-file handlers in turn to see if any claim the file.
394
395 Pluginobj*
396 Plugin_manager::claim_file(Input_file* input_file, off_t offset,
397                            off_t filesize, Object* elf_object)
398 {
399   if (this->in_replacement_phase_)
400     return NULL;
401
402   unsigned int handle = this->objects_.size();
403   this->input_file_ = input_file;
404   this->plugin_input_file_.name = input_file->filename().c_str();
405   this->plugin_input_file_.fd = input_file->file().descriptor();
406   this->plugin_input_file_.offset = offset;
407   this->plugin_input_file_.filesize = filesize;
408   this->plugin_input_file_.handle = reinterpret_cast<void*>(handle);
409   if (elf_object != NULL)
410     this->objects_.push_back(elf_object);
411   this->in_claim_file_handler_ = true;
412
413   for (this->current_ = this->plugins_.begin();
414        this->current_ != this->plugins_.end();
415        ++this->current_)
416     {
417       if ((*this->current_)->claim_file(&this->plugin_input_file_))
418         {
419           this->any_claimed_ = true;
420           this->in_claim_file_handler_ = false;
421
422           if (this->objects_.size() > handle
423               && this->objects_[handle]->pluginobj() != NULL)
424             return this->objects_[handle]->pluginobj();
425
426           // If the plugin claimed the file but did not call the
427           // add_symbols callback, we need to create the Pluginobj now.
428           Pluginobj* obj = this->make_plugin_object(handle);
429           return obj;
430         }
431     }
432
433   this->in_claim_file_handler_ = false;
434   return NULL;
435 }
436
437 // Save an archive.  This is used so that a plugin can add a file
438 // which refers to a symbol which was not previously referenced.  In
439 // that case we want to pretend that the symbol was referenced before,
440 // and pull in the archive object.
441
442 void
443 Plugin_manager::save_archive(Archive* archive)
444 {
445   if (this->in_replacement_phase_ || !this->any_claimed_)
446     delete archive;
447   else
448     this->rescannable_.push_back(Rescannable(archive));
449 }
450
451 // Save an Input_group.  This is like save_archive.
452
453 void
454 Plugin_manager::save_input_group(Input_group* input_group)
455 {
456   if (this->in_replacement_phase_ || !this->any_claimed_)
457     delete input_group;
458   else
459     this->rescannable_.push_back(Rescannable(input_group));
460 }
461
462 // Call the all-symbols-read handlers.
463
464 void
465 Plugin_manager::all_symbols_read(Workqueue* workqueue, Task* task,
466                                  Input_objects* input_objects,
467                                  Symbol_table* symtab,
468                                  Dirsearch* dirpath, Mapfile* mapfile,
469                                  Task_token** last_blocker)
470 {
471   this->in_replacement_phase_ = true;
472   this->workqueue_ = workqueue;
473   this->task_ = task;
474   this->input_objects_ = input_objects;
475   this->symtab_ = symtab;
476   this->dirpath_ = dirpath;
477   this->mapfile_ = mapfile;
478   this->this_blocker_ = NULL;
479
480   for (this->current_ = this->plugins_.begin();
481        this->current_ != this->plugins_.end();
482        ++this->current_)
483     (*this->current_)->all_symbols_read();
484
485   if (this->any_added_)
486     {
487       Task_token* next_blocker = new Task_token(true);
488       next_blocker->add_blocker();
489       workqueue->queue(new Plugin_rescan(this->this_blocker_, next_blocker));
490       this->this_blocker_ = next_blocker;
491     }
492
493   *last_blocker = this->this_blocker_;
494 }
495
496 // This is called when we see a new undefined symbol.  If we are in
497 // the replacement phase, this means that we may need to rescan some
498 // archives we have previously seen.
499
500 void
501 Plugin_manager::new_undefined_symbol(Symbol* sym)
502 {
503   if (this->in_replacement_phase_)
504     this->undefined_symbols_.push_back(sym);
505 }
506
507 // Rescan archives as needed.  This handles the case where a new
508 // object file added by a plugin has an undefined reference to some
509 // symbol defined in an archive.
510
511 void
512 Plugin_manager::rescan(Task* task)
513 {
514   size_t rescan_pos = 0;
515   size_t rescan_size = this->rescannable_.size();
516   while (!this->undefined_symbols_.empty())
517     {
518       if (rescan_pos >= rescan_size)
519         {
520           this->undefined_symbols_.clear();
521           return;
522         }
523
524       Undefined_symbol_list undefs;
525       undefs.reserve(this->undefined_symbols_.size());
526       this->undefined_symbols_.swap(undefs);
527
528       size_t min_rescan_pos = rescan_size;
529
530       for (Undefined_symbol_list::const_iterator p = undefs.begin();
531            p != undefs.end();
532            ++p)
533         {
534           if (!(*p)->is_undefined())
535             continue;
536
537           this->undefined_symbols_.push_back(*p);
538
539           // Find the first rescan archive which defines this symbol,
540           // starting at the current rescan position.  The rescan position
541           // exists so that given -la -lb -lc we don't look for undefined
542           // symbols in -lb back in -la, but instead get the definition
543           // from -lc.  Don't bother to look past the current minimum
544           // rescan position.
545           for (size_t i = rescan_pos; i < min_rescan_pos; ++i)
546             {
547               if (this->rescannable_defines(i, *p))
548                 {
549                   min_rescan_pos = i;
550                   break;
551                 }
552             }
553         }
554
555       if (min_rescan_pos >= rescan_size)
556         {
557           // We didn't find any rescannable archives which define any
558           // undefined symbols.
559           return;
560         }
561
562       const Rescannable& r(this->rescannable_[min_rescan_pos]);
563       if (r.is_archive)
564         {
565           Task_lock_obj<Archive> tl(task, r.u.archive);
566           r.u.archive->add_symbols(this->symtab_, this->layout_,
567                                    this->input_objects_, this->mapfile_);
568         }
569       else
570         {
571           size_t next_saw_undefined = this->symtab_->saw_undefined();
572           size_t saw_undefined;
573           do
574             {
575               saw_undefined = next_saw_undefined;
576
577               for (Input_group::const_iterator p = r.u.input_group->begin();
578                    p != r.u.input_group->end();
579                    ++p)
580                 {
581                   Task_lock_obj<Archive> tl(task, *p);
582
583                   (*p)->add_symbols(this->symtab_, this->layout_,
584                                     this->input_objects_, this->mapfile_);
585                 }
586
587               next_saw_undefined = this->symtab_->saw_undefined();
588             }
589           while (saw_undefined != next_saw_undefined);
590         }
591
592       for (size_t i = rescan_pos; i < min_rescan_pos + 1; ++i)
593         {
594           if (this->rescannable_[i].is_archive)
595             delete this->rescannable_[i].u.archive;
596           else
597             delete this->rescannable_[i].u.input_group;
598         }
599
600       rescan_pos = min_rescan_pos + 1;
601     }
602 }
603
604 // Return whether the rescannable at index I defines SYM.
605
606 bool
607 Plugin_manager::rescannable_defines(size_t i, Symbol* sym)
608 {
609   const Rescannable& r(this->rescannable_[i]);
610   if (r.is_archive)
611     return r.u.archive->defines_symbol(sym);
612   else
613     {
614       for (Input_group::const_iterator p = r.u.input_group->begin();
615            p != r.u.input_group->end();
616            ++p)
617         {
618           if ((*p)->defines_symbol(sym))
619             return true;
620         }
621       return false;
622     }
623 }
624
625 // Layout deferred objects.
626
627 void
628 Plugin_manager::layout_deferred_objects()
629 {
630   Deferred_layout_list::iterator obj;
631
632   for (obj = this->deferred_layout_objects_.begin();
633        obj != this->deferred_layout_objects_.end();
634        ++obj)
635     {
636       // Lock the object so we can read from it.  This is only called
637       // single-threaded from queue_middle_tasks, so it is OK to lock.
638       // Unfortunately we have no way to pass in a Task token.
639       const Task* dummy_task = reinterpret_cast<const Task*>(-1);
640       Task_lock_obj<Object> tl(dummy_task, *obj);
641       (*obj)->layout_deferred_sections(this->layout_);
642     }
643 }
644
645 // Call the cleanup handlers.
646
647 void
648 Plugin_manager::cleanup()
649 {
650   for (this->current_ = this->plugins_.begin();
651        this->current_ != this->plugins_.end();
652        ++this->current_)
653     (*this->current_)->cleanup();
654 }
655
656 // Make a new Pluginobj object.  This is called when the plugin calls
657 // the add_symbols API.
658
659 Pluginobj*
660 Plugin_manager::make_plugin_object(unsigned int handle)
661 {
662   // Make sure we aren't asked to make an object for the same handle twice.
663   if (this->objects_.size() != handle
664       && this->objects_[handle]->pluginobj() != NULL)
665     return NULL;
666
667   Pluginobj* obj = make_sized_plugin_object(this->input_file_,
668                                             this->plugin_input_file_.offset,
669                                             this->plugin_input_file_.filesize);
670
671
672   // If the elf object for this file was pushed into the objects_ vector, delete
673   // it to make room for the Pluginobj as this file is claimed.
674   if (this->objects_.size() != handle)
675     this->objects_.pop_back();
676
677   this->objects_.push_back(obj);
678   return obj;
679 }
680
681 // Get the input file information with an open (possibly re-opened)
682 // file descriptor.
683
684 ld_plugin_status
685 Plugin_manager::get_input_file(unsigned int handle,
686                                struct ld_plugin_input_file* file)
687 {
688   Pluginobj* obj = this->object(handle)->pluginobj();
689   if (obj == NULL)
690     return LDPS_BAD_HANDLE;
691
692   obj->lock(this->task_);
693   file->name = obj->filename().c_str();
694   file->fd = obj->descriptor();
695   file->offset = obj->offset();
696   file->filesize = obj->filesize();
697   file->handle = reinterpret_cast<void*>(handle);
698   return LDPS_OK;
699 }
700
701 // Release the input file.
702
703 ld_plugin_status
704 Plugin_manager::release_input_file(unsigned int handle)
705 {
706   if (this->object(handle) == NULL)
707     return LDPS_BAD_HANDLE;
708
709   Pluginobj* obj = this->object(handle)->pluginobj();
710
711   if (obj == NULL)
712     return LDPS_BAD_HANDLE;
713
714   obj->unlock(this->task_);
715   return LDPS_OK;
716 }
717
718 // Get the elf object corresponding to the handle. Return NULL if we
719 // found a Pluginobj instead.
720
721 Object*
722 Plugin_manager::get_elf_object(const void* handle)
723 {
724   Object* obj = this->object(
725       static_cast<unsigned int>(reinterpret_cast<intptr_t>(handle)));
726
727   // The object should not be a Pluginobj.
728   if (obj == NULL
729       || obj->pluginobj() != NULL)
730     return NULL;
731
732   return obj;
733 }
734
735 ld_plugin_status
736 Plugin_manager::get_view(unsigned int handle, const void **viewp)
737 {
738   off_t offset;
739   size_t filesize;
740   Input_file *input_file;
741   if (this->in_claim_file_handler_)
742     {
743       // We are being called from the claim_file hook.
744       const struct ld_plugin_input_file &f = this->plugin_input_file_;
745       offset = f.offset;
746       filesize = f.filesize;
747       input_file = this->input_file_;
748     }
749   else
750     {
751       // An already claimed file.
752       if (this->object(handle) == NULL)
753         return LDPS_BAD_HANDLE;
754       Pluginobj* obj = this->object(handle)->pluginobj();
755       if (obj == NULL)
756         return LDPS_BAD_HANDLE;
757       offset = obj->offset();
758       filesize = obj->filesize();
759       input_file = obj->input_file();
760     }
761   *viewp = (void*) input_file->file().get_view(offset, 0, filesize, false,
762                                                false);
763   return LDPS_OK;
764 }
765
766 // Add a new library path.
767
768 ld_plugin_status
769 Plugin_manager::set_extra_library_path(const char* path)
770 {
771   this->extra_search_path_ = std::string(path);
772   return LDPS_OK;
773 }
774
775 // Add a new input file.
776
777 ld_plugin_status
778 Plugin_manager::add_input_file(const char* pathname, bool is_lib)
779 {
780   Input_file_argument file(pathname,
781                            (is_lib
782                             ? Input_file_argument::INPUT_FILE_TYPE_LIBRARY
783                             : Input_file_argument::INPUT_FILE_TYPE_FILE),
784                            (is_lib
785                             ? this->extra_search_path_.c_str()
786                             : ""),
787                            false,
788                            this->options_);
789   Input_argument* input_argument = new Input_argument(file);
790   Task_token* next_blocker = new Task_token(true);
791   next_blocker->add_blocker();
792   if (parameters->incremental())
793     gold_error(_("input files added by plug-ins in --incremental mode not "
794                  "supported yet"));
795   this->workqueue_->queue_soon(new Read_symbols(this->input_objects_,
796                                                 this->symtab_,
797                                                 this->layout_,
798                                                 this->dirpath_,
799                                                 0,
800                                                 this->mapfile_,
801                                                 input_argument,
802                                                 NULL,
803                                                 NULL,
804                                                 this->this_blocker_,
805                                                 next_blocker));
806   this->this_blocker_ = next_blocker;
807   this->any_added_ = true;
808   return LDPS_OK;
809 }
810
811 // Class Pluginobj.
812
813 Pluginobj::Pluginobj(const std::string& name, Input_file* input_file,
814                      off_t offset, off_t filesize)
815   : Object(name, input_file, false, offset),
816     nsyms_(0), syms_(NULL), symbols_(), filesize_(filesize), comdat_map_()
817 {
818 }
819
820 // Return TRUE if a defined symbol is referenced from outside the
821 // universe of claimed objects.
822
823 static inline bool
824 is_referenced_from_outside(Symbol* lsym)
825 {
826   if (lsym->in_real_elf())
827     return true;
828   if (parameters->options().relocatable())
829     return true;
830   if (parameters->options().is_undefined(lsym->name()))
831     return true;
832   return false;
833 }
834
835 // Return TRUE if a defined symbol might be reachable from outside the
836 // load module.
837
838 static inline bool
839 is_visible_from_outside(Symbol* lsym)
840 {
841   if (parameters->options().export_dynamic() || parameters->options().shared())
842     return lsym->is_externally_visible();
843   return false;
844 }
845
846 // Get symbol resolution info.
847
848 ld_plugin_status
849 Pluginobj::get_symbol_resolution_info(int nsyms,
850                                       ld_plugin_symbol* syms,
851                                       int version) const
852 {
853   // For version 1 of this interface, we cannot use
854   // LDPR_PREVAILING_DEF_IRONLY_EXP, so we return LDPR_PREVAILING_DEF
855   // instead.
856   const ld_plugin_symbol_resolution ldpr_prevailing_def_ironly_exp
857       = (version > 1
858          ? LDPR_PREVAILING_DEF_IRONLY_EXP
859          : LDPR_PREVAILING_DEF);
860
861   if (nsyms > this->nsyms_)
862     return LDPS_NO_SYMS;
863
864   if (static_cast<size_t>(nsyms) > this->symbols_.size())
865     {
866       // We never decided to include this object. We mark all symbols as
867       // preempted.
868       gold_assert(this->symbols_.size() == 0);
869       for (int i = 0; i < nsyms; i++)
870         syms[i].resolution = LDPR_PREEMPTED_REG;
871       return LDPS_OK;
872     }
873
874   for (int i = 0; i < nsyms; i++)
875     {
876       ld_plugin_symbol* isym = &syms[i];
877       Symbol* lsym = this->symbols_[i];
878       ld_plugin_symbol_resolution res = LDPR_UNKNOWN;
879
880       if (lsym->is_undefined())
881         // The symbol remains undefined.
882         res = LDPR_UNDEF;
883       else if (isym->def == LDPK_UNDEF
884                || isym->def == LDPK_WEAKUNDEF
885                || isym->def == LDPK_COMMON)
886         {
887           // The original symbol was undefined or common.
888           if (lsym->source() != Symbol::FROM_OBJECT)
889             res = LDPR_RESOLVED_EXEC;
890           else if (lsym->object()->pluginobj() == this)
891             {
892               if (is_referenced_from_outside(lsym))
893                 res = LDPR_PREVAILING_DEF;
894               else if (is_visible_from_outside(lsym))
895                 res = ldpr_prevailing_def_ironly_exp;
896               else
897                 res = LDPR_PREVAILING_DEF_IRONLY;
898             }
899           else if (lsym->object()->pluginobj() != NULL)
900             res = LDPR_RESOLVED_IR;
901           else if (lsym->object()->is_dynamic())
902             res = LDPR_RESOLVED_DYN;
903           else
904             res = LDPR_RESOLVED_EXEC;
905         }
906       else
907         {
908           // The original symbol was a definition.
909           if (lsym->source() != Symbol::FROM_OBJECT)
910             res = LDPR_PREEMPTED_REG;
911           else if (lsym->object() == static_cast<const Object*>(this))
912             {
913               if (is_referenced_from_outside(lsym))
914                 res = LDPR_PREVAILING_DEF;
915               else if (is_visible_from_outside(lsym))
916                 res = ldpr_prevailing_def_ironly_exp;
917               else
918                 res = LDPR_PREVAILING_DEF_IRONLY;
919             }
920           else
921             res = (lsym->object()->pluginobj() != NULL
922                    ? LDPR_PREEMPTED_IR
923                    : LDPR_PREEMPTED_REG);
924         }
925       isym->resolution = res;
926     }
927   return LDPS_OK;
928 }
929
930 // Return TRUE if the comdat group with key COMDAT_KEY from this object
931 // should be kept.
932
933 bool
934 Pluginobj::include_comdat_group(std::string comdat_key, Layout* layout)
935 {
936   std::pair<Comdat_map::iterator, bool> ins =
937     this->comdat_map_.insert(std::make_pair(comdat_key, false));
938
939   // If this is the first time we've seen this comdat key, ask the
940   // layout object whether it should be included.
941   if (ins.second)
942     ins.first->second = layout->find_or_add_kept_section(comdat_key,
943                                                          NULL, 0, true,
944                                                          true, NULL);
945
946   return ins.first->second;
947 }
948
949 // Class Sized_pluginobj.
950
951 template<int size, bool big_endian>
952 Sized_pluginobj<size, big_endian>::Sized_pluginobj(
953     const std::string& name,
954     Input_file* input_file,
955     off_t offset,
956     off_t filesize)
957   : Pluginobj(name, input_file, offset, filesize)
958 {
959 }
960
961 // Read the symbols.  Not used for plugin objects.
962
963 template<int size, bool big_endian>
964 void
965 Sized_pluginobj<size, big_endian>::do_read_symbols(Read_symbols_data*)
966 {
967   gold_unreachable();
968 }
969
970 // Lay out the input sections.  Not used for plugin objects.
971
972 template<int size, bool big_endian>
973 void
974 Sized_pluginobj<size, big_endian>::do_layout(Symbol_table*, Layout*,
975                                              Read_symbols_data*)
976 {
977   gold_unreachable();
978 }
979
980 // Add the symbols to the symbol table.
981
982 template<int size, bool big_endian>
983 void
984 Sized_pluginobj<size, big_endian>::do_add_symbols(Symbol_table* symtab,
985                                                   Read_symbols_data*,
986                                                   Layout* layout)
987 {
988   const int sym_size = elfcpp::Elf_sizes<size>::sym_size;
989   unsigned char symbuf[sym_size];
990   elfcpp::Sym<size, big_endian> sym(symbuf);
991   elfcpp::Sym_write<size, big_endian> osym(symbuf);
992
993   typedef typename elfcpp::Elf_types<size>::Elf_WXword Elf_size_type;
994
995   this->symbols_.resize(this->nsyms_);
996
997   for (int i = 0; i < this->nsyms_; ++i)
998     {
999       const struct ld_plugin_symbol* isym = &this->syms_[i];
1000       const char* name = isym->name;
1001       const char* ver = isym->version;
1002       elfcpp::Elf_Half shndx;
1003       elfcpp::STB bind;
1004       elfcpp::STV vis;
1005
1006       if (name != NULL && name[0] == '\0')
1007         name = NULL;
1008       if (ver != NULL && ver[0] == '\0')
1009         ver = NULL;
1010
1011       switch (isym->def)
1012         {
1013         case LDPK_WEAKDEF:
1014         case LDPK_WEAKUNDEF:
1015           bind = elfcpp::STB_WEAK;
1016           break;
1017         case LDPK_DEF:
1018         case LDPK_UNDEF:
1019         case LDPK_COMMON:
1020         default:
1021           bind = elfcpp::STB_GLOBAL;
1022           break;
1023         }
1024
1025       switch (isym->def)
1026         {
1027         case LDPK_DEF:
1028         case LDPK_WEAKDEF:
1029           shndx = elfcpp::SHN_ABS;
1030           break;
1031         case LDPK_COMMON:
1032           shndx = elfcpp::SHN_COMMON;
1033           break;
1034         case LDPK_UNDEF:
1035         case LDPK_WEAKUNDEF:
1036         default:
1037           shndx = elfcpp::SHN_UNDEF;
1038           break;
1039         }
1040
1041       switch (isym->visibility)
1042         {
1043         case LDPV_PROTECTED:
1044           vis = elfcpp::STV_PROTECTED;
1045           break;
1046         case LDPV_INTERNAL:
1047           vis = elfcpp::STV_INTERNAL;
1048           break;
1049         case LDPV_HIDDEN:
1050           vis = elfcpp::STV_HIDDEN;
1051           break;
1052         case LDPV_DEFAULT:
1053         default:
1054           vis = elfcpp::STV_DEFAULT;
1055           break;
1056         }
1057
1058       if (isym->comdat_key != NULL
1059           && isym->comdat_key[0] != '\0'
1060           && !this->include_comdat_group(isym->comdat_key, layout))
1061         shndx = elfcpp::SHN_UNDEF;
1062
1063       osym.put_st_name(0);
1064       osym.put_st_value(0);
1065       osym.put_st_size(static_cast<Elf_size_type>(isym->size));
1066       osym.put_st_info(bind, elfcpp::STT_NOTYPE);
1067       osym.put_st_other(vis, 0);
1068       osym.put_st_shndx(shndx);
1069
1070       this->symbols_[i] =
1071         symtab->add_from_pluginobj<size, big_endian>(this, name, ver, &sym);
1072     }
1073 }
1074
1075 template<int size, bool big_endian>
1076 Archive::Should_include
1077 Sized_pluginobj<size, big_endian>::do_should_include_member(
1078     Symbol_table* symtab,
1079     Layout* layout,
1080     Read_symbols_data*,
1081     std::string* why)
1082 {
1083   char* tmpbuf = NULL;
1084   size_t tmpbuflen = 0;
1085
1086   for (int i = 0; i < this->nsyms_; ++i)
1087     {
1088       const struct ld_plugin_symbol& sym = this->syms_[i];
1089       const char* name = sym.name;
1090       Symbol* symbol;
1091       Archive::Should_include t = Archive::should_include_member(symtab,
1092                                                                  layout,
1093                                                                  name,
1094                                                                  &symbol, why,
1095                                                                  &tmpbuf,
1096                                                                  &tmpbuflen);
1097       if (t == Archive::SHOULD_INCLUDE_YES)
1098         {
1099           if (tmpbuf != NULL)
1100             free(tmpbuf);
1101           return t;
1102         }
1103     }
1104   if (tmpbuf != NULL)
1105     free(tmpbuf);
1106   return Archive::SHOULD_INCLUDE_UNKNOWN;
1107 }
1108
1109 // Iterate over global symbols, calling a visitor class V for each.
1110
1111 template<int size, bool big_endian>
1112 void
1113 Sized_pluginobj<size, big_endian>::do_for_all_global_symbols(
1114     Read_symbols_data*,
1115     Library_base::Symbol_visitor_base* v)
1116 {
1117   for (int i = 0; i < this->nsyms_; ++i)
1118     {
1119       const struct ld_plugin_symbol& sym = this->syms_[i];
1120       if (sym.def != LDPK_UNDEF)
1121         v->visit(sym.name);
1122     }
1123 }
1124
1125 // Iterate over local symbols, calling a visitor class V for each GOT offset
1126 // associated with a local symbol.
1127 template<int size, bool big_endian>
1128 void
1129 Sized_pluginobj<size, big_endian>::do_for_all_local_got_entries(
1130     Got_offset_list::Visitor*) const
1131 {
1132   gold_unreachable();
1133 }
1134
1135 // Get the size of a section.  Not used for plugin objects.
1136
1137 template<int size, bool big_endian>
1138 uint64_t
1139 Sized_pluginobj<size, big_endian>::do_section_size(unsigned int)
1140 {
1141   gold_unreachable();
1142   return 0;
1143 }
1144
1145 // Get the name of a section.  Not used for plugin objects.
1146
1147 template<int size, bool big_endian>
1148 std::string
1149 Sized_pluginobj<size, big_endian>::do_section_name(unsigned int)
1150 {
1151   gold_unreachable();
1152   return std::string();
1153 }
1154
1155 // Return a view of the contents of a section.  Not used for plugin objects.
1156
1157 template<int size, bool big_endian>
1158 Object::Location
1159 Sized_pluginobj<size, big_endian>::do_section_contents(unsigned int)
1160 {
1161   Location loc(0, 0);
1162
1163   gold_unreachable();
1164   return loc;
1165 }
1166
1167 // Return section flags.  Not used for plugin objects.
1168
1169 template<int size, bool big_endian>
1170 uint64_t
1171 Sized_pluginobj<size, big_endian>::do_section_flags(unsigned int)
1172 {
1173   gold_unreachable();
1174   return 0;
1175 }
1176
1177 // Return section entsize.  Not used for plugin objects.
1178
1179 template<int size, bool big_endian>
1180 uint64_t
1181 Sized_pluginobj<size, big_endian>::do_section_entsize(unsigned int)
1182 {
1183   gold_unreachable();
1184   return 0;
1185 }
1186
1187 // Return section address.  Not used for plugin objects.
1188
1189 template<int size, bool big_endian>
1190 uint64_t
1191 Sized_pluginobj<size, big_endian>::do_section_address(unsigned int)
1192 {
1193   gold_unreachable();
1194   return 0;
1195 }
1196
1197 // Return section type.  Not used for plugin objects.
1198
1199 template<int size, bool big_endian>
1200 unsigned int
1201 Sized_pluginobj<size, big_endian>::do_section_type(unsigned int)
1202 {
1203   gold_unreachable();
1204   return 0;
1205 }
1206
1207 // Return the section link field.  Not used for plugin objects.
1208
1209 template<int size, bool big_endian>
1210 unsigned int
1211 Sized_pluginobj<size, big_endian>::do_section_link(unsigned int)
1212 {
1213   gold_unreachable();
1214   return 0;
1215 }
1216
1217 // Return the section link field.  Not used for plugin objects.
1218
1219 template<int size, bool big_endian>
1220 unsigned int
1221 Sized_pluginobj<size, big_endian>::do_section_info(unsigned int)
1222 {
1223   gold_unreachable();
1224   return 0;
1225 }
1226
1227 // Return the section alignment.  Not used for plugin objects.
1228
1229 template<int size, bool big_endian>
1230 uint64_t
1231 Sized_pluginobj<size, big_endian>::do_section_addralign(unsigned int)
1232 {
1233   gold_unreachable();
1234   return 0;
1235 }
1236
1237 // Return the Xindex structure to use.  Not used for plugin objects.
1238
1239 template<int size, bool big_endian>
1240 Xindex*
1241 Sized_pluginobj<size, big_endian>::do_initialize_xindex()
1242 {
1243   gold_unreachable();
1244   return NULL;
1245 }
1246
1247 // Get symbol counts.  Not used for plugin objects.
1248
1249 template<int size, bool big_endian>
1250 void
1251 Sized_pluginobj<size, big_endian>::do_get_global_symbol_counts(const Symbol_table*,
1252                                                    size_t*, size_t*) const
1253 {
1254   gold_unreachable();
1255 }
1256
1257 // Get symbols.  Not used for plugin objects.
1258
1259 template<int size, bool big_endian>
1260 const Object::Symbols*
1261 Sized_pluginobj<size, big_endian>::do_get_global_symbols() const
1262 {
1263   gold_unreachable();
1264 }
1265
1266 // Class Plugin_finish.  This task runs after all replacement files have
1267 // been added.  For now, it's a placeholder for a possible plugin API
1268 // to allow the plugin to release most of its resources.  The cleanup
1269 // handlers must be called later, because they can remove the temporary
1270 // object files that are needed until the end of the link.
1271
1272 class Plugin_finish : public Task
1273 {
1274  public:
1275   Plugin_finish(Task_token* this_blocker, Task_token* next_blocker)
1276     : this_blocker_(this_blocker), next_blocker_(next_blocker)
1277   { }
1278
1279   ~Plugin_finish()
1280   {
1281     if (this->this_blocker_ != NULL)
1282       delete this->this_blocker_;
1283   }
1284
1285   Task_token*
1286   is_runnable()
1287   {
1288     if (this->this_blocker_ != NULL && this->this_blocker_->is_blocked())
1289       return this->this_blocker_;
1290     return NULL;
1291   }
1292
1293   void
1294   locks(Task_locker* tl)
1295   { tl->add(this, this->next_blocker_); }
1296
1297   void
1298   run(Workqueue*)
1299   {
1300     // We could call early cleanup handlers here.
1301   }
1302
1303   std::string
1304   get_name() const
1305   { return "Plugin_finish"; }
1306
1307  private:
1308   Task_token* this_blocker_;
1309   Task_token* next_blocker_;
1310 };
1311
1312 // Class Plugin_hook.
1313
1314 Plugin_hook::~Plugin_hook()
1315 {
1316 }
1317
1318 // Return whether a Plugin_hook task is runnable.
1319
1320 Task_token*
1321 Plugin_hook::is_runnable()
1322 {
1323   if (this->this_blocker_ != NULL && this->this_blocker_->is_blocked())
1324     return this->this_blocker_;
1325   return NULL;
1326 }
1327
1328 // Return a Task_locker for a Plugin_hook task.  We don't need any
1329 // locks here.
1330
1331 void
1332 Plugin_hook::locks(Task_locker*)
1333 {
1334 }
1335
1336 // Run the "all symbols read" plugin hook.
1337
1338 void
1339 Plugin_hook::run(Workqueue* workqueue)
1340 {
1341   gold_assert(this->options_.has_plugins());
1342   Symbol* start_sym = this->symtab_->lookup(parameters->entry());
1343   if (start_sym != NULL)
1344     start_sym->set_in_real_elf();
1345
1346   this->options_.plugins()->all_symbols_read(workqueue,
1347                                              this,
1348                                              this->input_objects_,
1349                                              this->symtab_,
1350                                              this->dirpath_,
1351                                              this->mapfile_,
1352                                              &this->this_blocker_);
1353   workqueue->queue_soon(new Plugin_finish(this->this_blocker_,
1354                                           this->next_blocker_));
1355 }
1356
1357 // The C interface routines called by the plugins.
1358
1359 #ifdef ENABLE_PLUGINS
1360
1361 // Register a claim-file handler.
1362
1363 static enum ld_plugin_status
1364 register_claim_file(ld_plugin_claim_file_handler handler)
1365 {
1366   gold_assert(parameters->options().has_plugins());
1367   parameters->options().plugins()->set_claim_file_handler(handler);
1368   return LDPS_OK;
1369 }
1370
1371 // Register an all-symbols-read handler.
1372
1373 static enum ld_plugin_status
1374 register_all_symbols_read(ld_plugin_all_symbols_read_handler handler)
1375 {
1376   gold_assert(parameters->options().has_plugins());
1377   parameters->options().plugins()->set_all_symbols_read_handler(handler);
1378   return LDPS_OK;
1379 }
1380
1381 // Register a cleanup handler.
1382
1383 static enum ld_plugin_status
1384 register_cleanup(ld_plugin_cleanup_handler handler)
1385 {
1386   gold_assert(parameters->options().has_plugins());
1387   parameters->options().plugins()->set_cleanup_handler(handler);
1388   return LDPS_OK;
1389 }
1390
1391 // Add symbols from a plugin-claimed input file.
1392
1393 static enum ld_plugin_status
1394 add_symbols(void* handle, int nsyms, const ld_plugin_symbol* syms)
1395 {
1396   gold_assert(parameters->options().has_plugins());
1397   Pluginobj* obj = parameters->options().plugins()->make_plugin_object(
1398       static_cast<unsigned int>(reinterpret_cast<intptr_t>(handle)));
1399   if (obj == NULL)
1400     return LDPS_ERR;
1401   obj->store_incoming_symbols(nsyms, syms);
1402   return LDPS_OK;
1403 }
1404
1405 // Get the input file information with an open (possibly re-opened)
1406 // file descriptor.
1407
1408 static enum ld_plugin_status
1409 get_input_file(const void* handle, struct ld_plugin_input_file* file)
1410 {
1411   gold_assert(parameters->options().has_plugins());
1412   unsigned int obj_index =
1413       static_cast<unsigned int>(reinterpret_cast<intptr_t>(handle));
1414   return parameters->options().plugins()->get_input_file(obj_index, file);
1415 }
1416
1417 // Release the input file.
1418
1419 static enum ld_plugin_status
1420 release_input_file(const void* handle)
1421 {
1422   gold_assert(parameters->options().has_plugins());
1423   unsigned int obj_index =
1424       static_cast<unsigned int>(reinterpret_cast<intptr_t>(handle));
1425   return parameters->options().plugins()->release_input_file(obj_index);
1426 }
1427
1428 static enum ld_plugin_status
1429 get_view(const void *handle, const void **viewp)
1430 {
1431   gold_assert(parameters->options().has_plugins());
1432   unsigned int obj_index =
1433       static_cast<unsigned int>(reinterpret_cast<intptr_t>(handle));
1434   return parameters->options().plugins()->get_view(obj_index, viewp);
1435 }
1436
1437 // Get the symbol resolution info for a plugin-claimed input file.
1438
1439 static enum ld_plugin_status
1440 get_symbols(const void* handle, int nsyms, ld_plugin_symbol* syms)
1441 {
1442   gold_assert(parameters->options().has_plugins());
1443   Object* obj = parameters->options().plugins()->object(
1444     static_cast<unsigned int>(reinterpret_cast<intptr_t>(handle)));
1445   if (obj == NULL)
1446     return LDPS_ERR;
1447   Pluginobj* plugin_obj = obj->pluginobj();
1448   if (plugin_obj == NULL)
1449     return LDPS_ERR;
1450   return plugin_obj->get_symbol_resolution_info(nsyms, syms, 1);
1451 }
1452
1453 // Version 2 of the above.  The only difference is that this version
1454 // is allowed to return the resolution code LDPR_PREVAILING_DEF_IRONLY_EXP.
1455
1456 static enum ld_plugin_status
1457 get_symbols_v2(const void* handle, int nsyms, ld_plugin_symbol* syms)
1458 {
1459   gold_assert(parameters->options().has_plugins());
1460   Object* obj = parameters->options().plugins()->object(
1461     static_cast<unsigned int>(reinterpret_cast<intptr_t>(handle)));
1462   if (obj == NULL)
1463     return LDPS_ERR;
1464   Pluginobj* plugin_obj = obj->pluginobj();
1465   if (plugin_obj == NULL)
1466     return LDPS_ERR;
1467   return plugin_obj->get_symbol_resolution_info(nsyms, syms, 2);
1468 }
1469
1470 // Add a new (real) input file generated by a plugin.
1471
1472 static enum ld_plugin_status
1473 add_input_file(const char* pathname)
1474 {
1475   gold_assert(parameters->options().has_plugins());
1476   return parameters->options().plugins()->add_input_file(pathname, false);
1477 }
1478
1479 // Add a new (real) library required by a plugin.
1480
1481 static enum ld_plugin_status
1482 add_input_library(const char* pathname)
1483 {
1484   gold_assert(parameters->options().has_plugins());
1485   return parameters->options().plugins()->add_input_file(pathname, true);
1486 }
1487
1488 // Set the extra library path to be used by libraries added via
1489 // add_input_library
1490
1491 static enum ld_plugin_status
1492 set_extra_library_path(const char* path)
1493 {
1494   gold_assert(parameters->options().has_plugins());
1495   return parameters->options().plugins()->set_extra_library_path(path);
1496 }
1497
1498 // Issue a diagnostic message from a plugin.
1499
1500 static enum ld_plugin_status
1501 message(int level, const char* format, ...)
1502 {
1503   va_list args;
1504   va_start(args, format);
1505
1506   switch (level)
1507     {
1508     case LDPL_INFO:
1509       parameters->errors()->info(format, args);
1510       break;
1511     case LDPL_WARNING:
1512       parameters->errors()->warning(format, args);
1513       break;
1514     case LDPL_ERROR:
1515     default:
1516       parameters->errors()->error(format, args);
1517       break;
1518     case LDPL_FATAL:
1519       parameters->errors()->fatal(format, args);
1520       break;
1521     }
1522
1523   va_end(args);
1524   return LDPS_OK;
1525 }
1526
1527 // Get the section count of the object corresponding to the handle.  This
1528 // plugin interface can only be called in the claim_file handler of the plugin.
1529
1530 static enum ld_plugin_status
1531 get_input_section_count(const void* handle, unsigned int* count)
1532 {
1533   gold_assert(parameters->options().has_plugins());
1534
1535   if (!parameters->options().plugins()->in_claim_file_handler())
1536     return LDPS_ERR;
1537
1538   Object* obj = parameters->options().plugins()->get_elf_object(handle);
1539
1540   if (obj == NULL)
1541     return LDPS_ERR;
1542
1543   *count = obj->shnum();
1544   return LDPS_OK;
1545 }
1546
1547 // Get the type of the specified section in the object corresponding
1548 // to the handle.  This plugin interface can only be called in the
1549 // claim_file handler of the plugin.
1550
1551 static enum ld_plugin_status
1552 get_input_section_type(const struct ld_plugin_section section,
1553                        unsigned int* type)
1554 {
1555   gold_assert(parameters->options().has_plugins());
1556
1557   if (!parameters->options().plugins()->in_claim_file_handler())
1558     return LDPS_ERR;
1559
1560   Object* obj
1561     = parameters->options().plugins()->get_elf_object(section.handle); 
1562
1563   if (obj == NULL)
1564     return LDPS_BAD_HANDLE;
1565
1566   *type = obj->section_type(section.shndx);
1567   return LDPS_OK;
1568 }
1569
1570 // Get the name of the specified section in the object corresponding
1571 // to the handle.  This plugin interface can only be called in the
1572 // claim_file handler of the plugin.
1573
1574 static enum ld_plugin_status
1575 get_input_section_name(const struct ld_plugin_section section,
1576                        char** section_name_ptr)
1577 {
1578   gold_assert(parameters->options().has_plugins());
1579
1580   if (!parameters->options().plugins()->in_claim_file_handler())
1581     return LDPS_ERR;
1582
1583   Object* obj
1584     = parameters->options().plugins()->get_elf_object(section.handle); 
1585
1586   if (obj == NULL)
1587     return LDPS_BAD_HANDLE;
1588
1589   // Check if the object is locked before getting the section name.
1590   gold_assert(obj->is_locked());
1591
1592   const std::string section_name = obj->section_name(section.shndx);
1593   *section_name_ptr = static_cast<char*>(malloc(section_name.length() + 1));
1594   memcpy(*section_name_ptr, section_name.c_str(), section_name.length() + 1);
1595   return LDPS_OK;
1596 }
1597
1598 // Get the contents of the specified section in the object corresponding
1599 // to the handle.  This plugin interface can only be called in the
1600 // claim_file handler of the plugin.
1601
1602 static enum ld_plugin_status
1603 get_input_section_contents(const struct ld_plugin_section section,
1604                            const unsigned char** section_contents_ptr,
1605                            size_t* len)
1606 {
1607   gold_assert(parameters->options().has_plugins());
1608
1609   if (!parameters->options().plugins()->in_claim_file_handler())
1610     return LDPS_ERR;
1611
1612   Object* obj
1613     = parameters->options().plugins()->get_elf_object(section.handle); 
1614
1615   if (obj == NULL)
1616     return LDPS_BAD_HANDLE;
1617
1618   // Check if the object is locked before getting the section contents.
1619   gold_assert(obj->is_locked());
1620
1621   section_size_type plen;
1622   *section_contents_ptr
1623       = obj->section_contents(section.shndx, &plen, false);
1624   *len = plen;
1625   return LDPS_OK;
1626 }
1627
1628 // Specify the ordering of sections in the final layout. The sections are
1629 // specified as (handle,shndx) pairs in the two arrays in the order in
1630 // which they should appear in the final layout.
1631
1632 static enum ld_plugin_status
1633 update_section_order(const struct ld_plugin_section *section_list,
1634                      unsigned int num_sections)
1635 {
1636   gold_assert(parameters->options().has_plugins());
1637
1638   if (num_sections == 0)
1639     return LDPS_OK;
1640
1641   if (section_list == NULL)
1642     return LDPS_ERR;
1643
1644   std::map<Section_id, unsigned int> order_map;
1645
1646   for (unsigned int i = 0; i < num_sections; ++i)
1647     {
1648       Object* obj = parameters->options().plugins()->get_elf_object(
1649           section_list[i].handle);
1650       if (obj == NULL)
1651         return LDPS_BAD_HANDLE;
1652       unsigned int shndx = section_list[i].shndx;
1653       Section_id secn_id(obj, shndx);
1654       order_map[secn_id] = i + 1;
1655     }
1656
1657   Layout* layout = parameters->options().plugins()->layout();
1658   gold_assert (layout != NULL);
1659
1660   for (Layout::Section_list::const_iterator p = layout->section_list().begin();
1661        p != layout->section_list().end();
1662        ++p)
1663     (*p)->update_section_layout(order_map);
1664
1665   return LDPS_OK;
1666 }
1667
1668 // Let the linker know that the sections could be reordered.
1669
1670 static enum ld_plugin_status
1671 allow_section_ordering()
1672 {
1673   gold_assert(parameters->options().has_plugins());
1674   Layout* layout = parameters->options().plugins()->layout();
1675   layout->set_section_ordering_specified();
1676   return LDPS_OK;
1677 }
1678
1679 #endif // ENABLE_PLUGINS
1680
1681 // Allocate a Pluginobj object of the appropriate size and endianness.
1682
1683 static Pluginobj*
1684 make_sized_plugin_object(Input_file* input_file, off_t offset, off_t filesize)
1685 {
1686   Pluginobj* obj = NULL;
1687
1688   parameters_force_valid_target();
1689   const Target& target(parameters->target());
1690
1691   if (target.get_size() == 32)
1692     {
1693       if (target.is_big_endian())
1694 #ifdef HAVE_TARGET_32_BIG
1695         obj = new Sized_pluginobj<32, true>(input_file->filename(),
1696                                             input_file, offset, filesize);
1697 #else
1698         gold_error(_("%s: not configured to support "
1699                      "32-bit big-endian object"),
1700                    input_file->filename().c_str());
1701 #endif
1702       else
1703 #ifdef HAVE_TARGET_32_LITTLE
1704         obj = new Sized_pluginobj<32, false>(input_file->filename(),
1705                                              input_file, offset, filesize);
1706 #else
1707         gold_error(_("%s: not configured to support "
1708                      "32-bit little-endian object"),
1709                    input_file->filename().c_str());
1710 #endif
1711     }
1712   else if (target.get_size() == 64)
1713     {
1714       if (target.is_big_endian())
1715 #ifdef HAVE_TARGET_64_BIG
1716         obj = new Sized_pluginobj<64, true>(input_file->filename(),
1717                                             input_file, offset, filesize);
1718 #else
1719         gold_error(_("%s: not configured to support "
1720                      "64-bit big-endian object"),
1721                    input_file->filename().c_str());
1722 #endif
1723       else
1724 #ifdef HAVE_TARGET_64_LITTLE
1725         obj = new Sized_pluginobj<64, false>(input_file->filename(),
1726                                              input_file, offset, filesize);
1727 #else
1728         gold_error(_("%s: not configured to support "
1729                      "64-bit little-endian object"),
1730                    input_file->filename().c_str());
1731 #endif
1732     }
1733
1734   gold_assert(obj != NULL);
1735   return obj;
1736 }
1737
1738 } // End namespace gold.