ACE/apps/soreduce/SO_Group.cpp

   1 // -*- C++ -*-
   2 // File: SO_Group.cpp
   3
   4 #include "ace/OS_NS_string.h"
   5 #include "ace/OS_NS_unistd.h"
   6 #include "ace/Log_Msg.h"
   7 #include "ace/Process.h"
   8 #include "ace/Pipe.h"
   9
  10 #include "Library.h"
  11 #include "SO_Group.h"
  12
  13 SO_Group::SO_Group ()
  14   : undef_wrapper_ ("nothing"),
  15     undefs_(undef_wrapper_.imports()),
  16     libs_ (0),
  17     max_libs_ (128),
  18     num_libs_(0)
  19 {
  20   libs_ = new Library*[max_libs_];
  21 }
  22
  23 SO_Group::~SO_Group ()
  24 {
  25   for (int i = 0; i < num_libs_; delete libs_[i++])
  26     {
  27       // No action.
  28     }
  29
  30   delete [] libs_;
  31 }
  32
  33 void
  34 SO_Group::add_executable (const char * path)
  35 {
  36   ACE_Process proc;
  37   ACE_Process_Options opts;
  38
  39   ACE_HANDLE pipe[2];
  40   ACE_Pipe io(pipe);
  41
  42   opts.set_handles (ACE_STDIN,pipe[1]);
  43
  44   int result = opts.command_line ("ldd %s",path);
  45   // Prevent compiler warning about "unused variable" if ACE_ASSERT is
  46   // an empty macro.
  47   ACE_UNUSED_ARG (result);
  48   ACE_ASSERT (result == 0);
  49
  50   proc.spawn (opts);
  51   if (ACE_OS::close(pipe[1]) == -1)
  52     ACE_DEBUG ((LM_DEBUG, "%p\n", "close"));
  53   opts.release_handles();
  54
  55   const int max_line_length = 1000;
  56   char line[max_line_length];
  57
  58   while (true)
  59   {
  60     ACE_OS::memset (line,0,max_line_length);
  61     int len = 0;
  62     int nread = 0;
  63     int bogus = 0;
  64
  65     // Skip initial whitespace.
  66     while ((nread = ACE_OS::read (pipe[0], line,1)) == 1
  67            && (*line == ' ' || *line == '\t'))
  68       {
  69         // No action.
  70       }
  71
  72     if (nread != 1)
  73       {
  74         break;
  75       }
  76
  77     // read the library name
  78     len = 1;
  79
  80     while ((nread = ACE_OS::read (pipe[0], line + len, 1)) == 1
  81            && (line[len] != ' '))
  82       {
  83         if (! bogus && ++len == max_line_length)
  84           {
  85             bogus = 1;
  86             break;
  87           }
  88       }
  89
  90     if (nread != 1 || bogus)
  91       {
  92         break;
  93       }
  94
  95     line[len] = 0;
  96     char * dot = ACE_OS::strchr (line,'.');
  97
  98     if (dot != 0)
  99       {
 100         *dot = 0;
 101       }
 102
 103     char * libname = line + 3; // skip over "lib"
 104
 105     // check to see if this is a new library
 106     int found = 0;
 107
 108     for (int i = 0; !found && i < num_libs_; ++i)
 109       {
 110         found = (libs_[i]->name() == libname);
 111       }
 112
 113     if (!found)
 114     {
 115       Library *nlib = new Library(libname);
 116       ACE_OS::memset (line,0,max_line_length);
 117
 118       // Skip over '=> '.
 119       if (ACE_OS::read (pipe[0], line, 3) != 3)
 120         {
 121           break;
 122         }
 123
 124       // get library path
 125       len = 0;
 126
 127       while ((nread = ACE_OS::read(pipe[0],line + len,1)) == 1 &&
 128              (line[len] != ' '))
 129         {
 130           if (! bogus && ++len == max_line_length)
 131             {
 132               bogus = 1;
 133               break;
 134             }
 135         }
 136
 137       if (nread != 1 || bogus)
 138         {
 139           break;
 140         }
 141
 142       line[len] = 0;
 143       nlib->set_path (line);
 144       libs_[num_libs_++] = nlib;
 145       ACE_ASSERT (num_libs_ < max_libs_); // grow max libs?
 146     }
 147
 148     // Skip the rest of the line.
 149     while ((nread = ACE_OS::read (pipe[0], line, 1)) == 1
 150            && *line != '\n')
 151       {
 152         // No action.
 153       }
 154
 155     if (nread != 1)
 156       {
 157         break;
 158       }
 159   }
 160   proc.wait ();
 161   ACE_OS::close (pipe[0]);
 162
 163   undef_wrapper_.add_source(path,1);
 164   // now do the ldd, iterate over the results to add new libs, etc.
 165 }
 166
 167 void
 168 SO_Group::analize ()
 169 {
 170   for (int passcount = 0; undefs_.modified (); ++passcount)
 171     {
 172       ACE_DEBUG ((LM_DEBUG,
 173                   "pass %d, undef count = %d\n",
 174                   passcount,
 175                   undefs_.size ()));
 176
 177       for (int i = 0; i < num_libs_; libs_[i++]->resolve (undefs_))
 178         {
 179           // No action.
 180         }
 181     }
 182 }
 183
 184 void
 185 SO_Group::write_results ()
 186 {
 187   for (int i = 0; i < num_libs_; libs_[i++]->write_export_list (1))
 188     {
 189       // No action.
 190     }
 191 }
 192
 193 void
 194 SO_Group::load_modules ()
 195 {
 196   for (int i = 0; i < num_libs_; libs_[i++]->load_modules ())
 197     {
 198       // No action.
 199     }
 200 }
 201
 202 void
 203 SO_Group::list_libs ()
 204 {
 205   ACE_DEBUG ((LM_DEBUG, "Libs subject to analysis:\n"));
 206
 207   for (int i = 0; i < num_libs_; ++i)
 208   {
 209     if (libs_[i]->has_modules ())
 210       {
 211         ACE_DEBUG ((LM_DEBUG, "  %s\n", libs_[i]->name ().c_str ()));
 212       }
 213   }
 214 }
 215
 216
 217
 218
 219