Fix for the light server.
[m6w6/libmemcached] / libtest / cmdline.cc
index 2b67a47dfc5695b8590cf9e2286d2aa66713c8c0..6ef407849cad8da6e523691dc3e71676f9999341 100644 (file)
 /*  vim:expandtab:shiftwidth=2:tabstop=2:smarttab:
  * 
- *  uTest
+ *  libtest
  *
  *  Copyright (C) 2011 Data Differential, http://datadifferential.com/
  *
- *  Redistribution and use in source and binary forms, with or without
- *  modification, are permitted provided that the following conditions are
- *  met:
+ *  This library is free software; you can redistribute it and/or
+ *  modify it under the terms of the GNU Lesser General Public
+ *  License as published by the Free Software Foundation; either
+ *  version 3 of the License, or (at your option) any later version.
  *
- *      * Redistributions of source code must retain the above copyright
- *  notice, this list of conditions and the following disclaimer.
- *
- *      * Redistributions in binary form must reproduce the above
- *  copyright notice, this list of conditions and the following disclaimer
- *  in the documentation and/or other materials provided with the
- *  distribution.
- *
- *      * The names of its contributors may not be used to endorse or
- *  promote products derived from this software without specific prior
- *  written permission.
- *
- *  THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
- *  "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
- *  LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR
- *  A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT
- *  OWNER OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
- *  SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT
- *  LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
- *  DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
- *  THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
- *  (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE
- *  OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
+ *  This library 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
+ *  Lesser General Public License for more details.
  *
+ *  You should have received a copy of the GNU Lesser General Public
+ *  License along with this library; if not, write to the Free Software
+ *  Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
  */
 
 #include <libtest/common.h>
 
-#include <libtest/cmdline.h>
+using namespace libtest;
 
 #include <cstdlib>
-#include <string>
+#include <cstring>
+#include <fcntl.h>
+#include <memory>
+#include <spawn.h>
 #include <sstream>
+#include <string>
+#include <sys/stat.h>
+#include <sys/types.h>
+
+extern "C" {
+  static int exited_successfully(int status)
+  {
+    if (status == 0)
+    {
+      return EXIT_SUCCESS;
+    }
+
+    if (WIFEXITED(status) == true)
+    {
+      return WEXITSTATUS(status);
+    }
+    else if (WIFSIGNALED(status) == true)
+    {
+      return WTERMSIG(status);
+    }
+
+    return EXIT_FAILURE;
+  }
+}
+
+namespace {
+
+  std::string print_argv(char * * & built_argv, const size_t& argc, const pid_t& pid)
+  {
+    std::stringstream arg_buffer;
+
+    for (size_t x= 0; x < argc; x++)
+    {
+      arg_buffer << built_argv[x] << " ";
+    }
+
+    return arg_buffer.str();
+  }
+
+}
+
+namespace libtest {
+
+Application::Application(const std::string& arg, const bool _use_libtool_arg) :
+  _use_libtool(_use_libtool_arg),
+  _argc(0),
+  _exectuble(arg),
+  built_argv(NULL),
+  _pid(-1)
+  { 
+    if (_use_libtool)
+    {
+      if (libtool() == NULL)
+      {
+        throw "libtool requested, but know libtool was found";
+      }
+    }
+
+    if (_use_libtool and getenv("PWD"))
+    {
+      _exectuble_with_path+= getenv("PWD");
+      _exectuble_with_path+= "/";
+    }
+    _exectuble_with_path+= _exectuble;
+  }
+
+Application::~Application()
+{
+  delete_argv();
+}
+
+Application::error_t Application::run(const char *args[])
+{
+  stdin_fd.reset();
+  stdout_fd.reset();
+  stderr_fd.reset();
+  _stdout_buffer.clear();
+  _stderr_buffer.clear();
+
+  posix_spawn_file_actions_t file_actions;
+  posix_spawn_file_actions_init(&file_actions);
+
+  stdin_fd.dup_for_spawn(Application::Pipe::READ, file_actions, STDIN_FILENO);
+  stdout_fd.dup_for_spawn(Application::Pipe::WRITE, file_actions, STDOUT_FILENO);
+  stderr_fd.dup_for_spawn(Application::Pipe::WRITE, file_actions, STDERR_FILENO);
+  
+  create_argv(args);
+
+  int spawn_ret;
+  if (_use_libtool)
+  {
+    spawn_ret= posix_spawn(&_pid, built_argv[0], &file_actions, NULL, built_argv, NULL);
+  }
+  else
+  {
+    spawn_ret= posix_spawnp(&_pid, built_argv[0], &file_actions, NULL, built_argv, NULL);
+  }
+
+  posix_spawn_file_actions_destroy(&file_actions);
+
+  stdin_fd.close(Application::Pipe::READ);
+  stdout_fd.close(Application::Pipe::WRITE);
+  stderr_fd.close(Application::Pipe::WRITE);
+
+  if (spawn_ret)
+  {
+    Error << print();
+    return Application::INVALID;
+  }
+
+  return Application::SUCCESS;
+}
+
+Application::error_t Application::wait()
+{
+  if (_pid == -1)
+  {
+    Error << "wait() got an invalid pid_t";
+    return Application::INVALID;
+  }
+
+  {
+    ssize_t read_length;
+    char buffer[1024]= { 0 };
+    bool bail= false;
+    while (((read_length= ::read(stdout_fd.fd()[0], buffer, sizeof(buffer))) != 0) or bail)
+    {
+      if (read_length == -1)
+      {
+        switch(errno)
+        {
+        case EAGAIN:
+          continue;
+
+        default:
+          Error << strerror(errno);
+          bail= true;
+        }
+      }
+      _stdout_buffer.reserve(read_length +1);
+      for (size_t x= 0; x < read_length; x++)
+      {
+        _stdout_buffer.push_back(buffer[x]);
+      }
+      // @todo Suck up all output code here
+    }
+  }
+
+  {
+    ssize_t read_length;
+    char buffer[1024]= { 0 };
+    bool bail= false;
+    while (((read_length= ::read(stderr_fd.fd()[0], buffer, sizeof(buffer))) != 0) or bail)
+    {
+      if (read_length == -1)
+      {
+        switch(errno)
+        {
+        case EAGAIN:
+          continue;
+
+        default:
+          Error << strerror(errno);
+          bail= true;
+        }
+      }
+      _stderr_buffer.reserve(read_length +1);
+      for (size_t x= 0; x < read_length; x++)
+      {
+        _stderr_buffer.push_back(buffer[x]);
+      }
+      // @todo Suck up all errput code here
+    }
+  }
+
+  error_t exit_code= FAILURE;
+  {
+    int status= 0;
+    pid_t waited_pid;
+    if ((waited_pid= waitpid(_pid, &status, 0)) == -1)
+    {
+      Error << "Error occured while waitpid(" << strerror(errno) << ") on pid " << int(_pid);
+    }
+    else
+    {
+      if (waited_pid != _pid)
+      {
+        throw libtest::fatal(LIBYATL_DEFAULT_PARAM, "Pid mismatch, %d != %d", int(waited_pid), int(_pid));
+      }
+      exit_code= error_t(exited_successfully(status));
+    }
+  }
+
+  if (exit_code == Application::INVALID)
+  {
+#if 0
+    Error << print_argv(built_argv, _argc, _pid);
+#endif
+  }
+
+  return exit_code;
+}
+
+void Application::add_option(const std::string& arg)
+{
+  _options.push_back(std::make_pair(arg, std::string()));
+}
+
+void Application::add_option(const std::string& name, const std::string& value)
+{
+  _options.push_back(std::make_pair(name, value));
+}
 
-bool exec_cmdline(const std::string& executable, const char *args[])
+Application::Pipe::Pipe()
 {
-  std::stringstream arg_buffer;
+  _fd[0]= -1;
+  _fd[1]= -1;
+  _open[0]= false;
+  _open[1]= false;
+}
 
-  arg_buffer << "./libtool --mode=execute ";
+void Application::Pipe::reset()
+{
+  close(READ);
+  close(WRITE);
 
-  arg_buffer << executable;
-  for (const char **ptr= args; *ptr; ++ptr)
+  int ret;
+  if ((ret= pipe(_fd)) < 0)
   {
-    arg_buffer << " " << *ptr;
+    throw strerror(ret);
   }
+  _open[0]= true;
+  _open[1]= true;
 
-  arg_buffer << " > /dev/null 2>&1";
-  if (system(arg_buffer.str().c_str()) == -1)
   {
-    return false;
+    ret= fcntl(_fd[0], F_GETFL, 0);
+    if (ret == -1)
+    {
+      Error << "fcntl(F_GETFL) " << strerror(ret);
+      throw strerror(ret);
+    }
+
+    ret= fcntl(_fd[0], F_SETFL, ret | O_NONBLOCK);
+    if (ret == -1)
+    {
+      Error << "fcntl(F_SETFL) " << strerror(ret);
+      throw strerror(ret);
+    }
   }
+}
+
+Application::Pipe::~Pipe()
+{
+  close(READ);
+  close(WRITE);
+}
+
+void Application::Pipe::dup_for_spawn(const close_t& arg, posix_spawn_file_actions_t& file_actions, const int newfildes)
+{
+  int type= int(arg);
+
+  int ret;
+  if ((ret= posix_spawn_file_actions_adddup2(&file_actions, _fd[type], newfildes )) < 0)
+  {
+    Error << "posix_spawn_file_actions_adddup2(" << strerror(ret) << ")";
+    throw strerror(ret);
+  }
+
+  if ((ret= posix_spawn_file_actions_addclose(&file_actions, _fd[type])) < 0)
+  {
+    Error << "posix_spawn_file_actions_adddup2(" << strerror(ret) << ")";
+    throw strerror(ret);
+  }
+}
 
-  return true;
+void Application::Pipe::close(const close_t& arg)
+{
+  int type= int(arg);
+
+  if (_open[type])
+  {
+    int ret;
+    if ((ret= ::close(_fd[type])) < 0)
+    {
+      Error << "close(" << strerror(ret) << ")";
+    }
+    _open[type]= false;
+  }
 }
+
+void Application::create_argv(const char *args[])
+{
+  _argc= 2 +_use_libtool ? 2 : 0; // +1 for the command, +2 for libtool/mode=execute, +1 for the NULL
+
+  if (_use_libtool)
+  {
+    _argc+= 2; // +2 for libtool --mode=execute
+  }
+
+  for (Options::const_iterator iter= _options.begin(); iter != _options.end(); iter++)
+  {
+    _argc++;
+    if ((*iter).second.empty() == false)
+    {
+      _argc++;
+    }
+  }
+
+  if (args)
+  {
+    for (const char **ptr= args; *ptr; ++ptr)
+    {
+      _argc++;
+    }
+  }
+
+  delete_argv();
+  built_argv= new char * [_argc];
+
+  size_t x= 0;
+  if (_use_libtool)
+  {
+    assert(libtool());
+    built_argv[x++]= strdup(libtool());
+    built_argv[x++]= strdup("--mode=execute");
+  }
+  built_argv[x++]= strdup(_exectuble_with_path.c_str());
+
+  for (Options::const_iterator iter= _options.begin(); iter != _options.end(); iter++)
+  {
+    built_argv[x++]= strdup((*iter).first.c_str());
+    if ((*iter).second.empty() == false)
+    {
+      built_argv[x++]= strdup((*iter).second.c_str());
+    }
+  }
+
+  if (args)
+  {
+    for (const char **ptr= args; *ptr; ++ptr)
+    {
+      built_argv[x++]= strdup(*ptr);
+    }
+  }
+  built_argv[_argc -1]= NULL;
+}
+
+std::string Application::print()
+{
+  return print_argv(built_argv, _argc, _pid);
+}
+
+void Application::delete_argv()
+{
+  if (built_argv == NULL)
+  {
+    return;
+  }
+
+  for (size_t x= 0; x < _argc; x++)
+  {
+    if (built_argv[x])
+    {
+      ::free(built_argv[x]);
+    }
+  }
+  delete[] built_argv;
+  built_argv= NULL;
+  _argc= 0;
+}
+
+
+int exec_cmdline(const std::string& command, const char *args[], bool use_libtool)
+{
+  Application app(command, use_libtool);
+
+  Application::error_t ret= app.run(args);
+
+  if (ret != Application::SUCCESS)
+  {
+    return int(ret);
+  }
+  ret= app.wait();
+
+  return int(ret);
+}
+
+const char *gearmand_binary() 
+{
+  return GEARMAND_BINARY;
+}
+
+} // namespace exec_cmdline