* Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
*/
+#include <config.h>
#include <libtest/common.h>
using namespace libtest;
#include <cstdlib>
#include <cstring>
+#include <cerrno>
#include <fcntl.h>
+#include <fstream>
#include <memory>
+#include <poll.h>
#include <spawn.h>
#include <sstream>
#include <string>
namespace {
- std::string print_argv(char * * & built_argv, const size_t& argc, const pid_t& pid)
+ std::string print_argv(char * * & built_argv, const size_t& argc)
{
std::stringstream arg_buffer;
return arg_buffer.str();
}
+ std::string print_argv(char** argv)
+ {
+ std::stringstream arg_buffer;
+
+ for (char** ptr= argv; *ptr; ptr++)
+ {
+ arg_buffer << *ptr << " ";
+ }
+
+ return arg_buffer.str();
+ }
+
static Application::error_t int_to_error_t(int arg)
{
switch (arg)
Application::Application(const std::string& arg, const bool _use_libtool_arg) :
_use_libtool(_use_libtool_arg),
+ _use_valgrind(false),
+ _use_gdb(false),
_argc(0),
_exectuble(arg),
built_argv(NULL),
}
}
+ // Find just the name of the application with no path
+ {
+ size_t found= arg.find_last_of("/\\");
+ if (found)
+ {
+ _exectuble_name= arg.substr(found +1);
+ }
+ else
+ {
+ _exectuble_name= arg;
+ }
+ }
+
if (_use_libtool and getenv("PWD"))
{
_exectuble_with_path+= getenv("PWD");
create_argv(args);
int spawn_ret;
- if (_use_libtool)
+ if (_use_gdb)
{
- spawn_ret= posix_spawn(&_pid, built_argv[0], &file_actions, NULL, built_argv, NULL);
+ std::string gdb_run_file= create_tmpfile(_exectuble_name);
+ std::fstream file_stream;
+ file_stream.open(gdb_run_file.c_str(), std::fstream::out | std::fstream::trunc);
+
+ _gdb_filename= create_tmpfile(_exectuble_name);
+ file_stream
+ << "set logging redirect on" << std::endl
+ << "set logging file " << _gdb_filename << std::endl
+ << "set logging overwrite on" << std::endl
+ << "set logging on" << std::endl
+ << "set environment LIBTEST_IN_GDB=1" << std::endl
+ << "run " << arguments() << std::endl
+ << "thread apply all bt" << std::endl
+ << "quit" << std::endl;
+
+ fatal_assert(file_stream.good());
+ file_stream.close();
+
+ if (_use_libtool)
+ {
+ // libtool --mode=execute gdb -f -x binary
+ char *argv[]= {
+ const_cast<char *>(libtool()),
+ const_cast<char *>("--mode=execute"),
+ const_cast<char *>("gdb"),
+ const_cast<char *>("-batch"),
+ const_cast<char *>("-f"),
+ const_cast<char *>("-x"),
+ const_cast<char *>(gdb_run_file.c_str()),
+ const_cast<char *>(_exectuble_with_path.c_str()),
+ 0};
+
+ spawn_ret= posix_spawnp(&_pid, libtool(), &file_actions, NULL, argv, NULL);
+ }
+ else
+ {
+ // gdb binary
+ char *argv[]= {
+ const_cast<char *>("gdb"),
+ const_cast<char *>("-batch"),
+ const_cast<char *>("-f"),
+ const_cast<char *>("-x"),
+ const_cast<char *>(gdb_run_file.c_str()),
+ const_cast<char *>(_exectuble_with_path.c_str()),
+ 0};
+ spawn_ret= posix_spawnp(&_pid, "gdb", &file_actions, NULL, argv, NULL);
+ }
}
else
{
- spawn_ret= posix_spawnp(&_pid, built_argv[0], &file_actions, NULL, built_argv, NULL);
+ 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);
if (spawn_ret)
{
- Error << print();
return Application::INVALID;
}
return Application::SUCCESS;
}
-Application::error_t Application::wait()
+bool Application::check() const
{
- if (_pid == -1)
+ Error << "Testing " << _exectuble;
+ if (kill(_pid, 0) == 0)
{
- Error << "wait() got an invalid pid_t";
- return Application::INVALID;
+ return true;
}
+ return false;
+}
+
+void Application::murder()
+{
+ slurp();
+ kill(_pid, SIGTERM);
+}
+
+// false means that no data was returned
+bool Application::slurp()
+{
+ struct pollfd fds[2];
+ fds[0].fd= stdout_fd.fd()[0];
+ fds[0].events= POLLIN;
+ fds[0].revents= 0;
+ fds[1].fd= stderr_fd.fd()[0];
+ fds[1].events= POLLIN;
+ fds[1].revents= 0;
+
+ int active_fd;
+ if ((active_fd= poll(fds, 2, 400)) == -1)
+ {
+ int error;
+ switch ((error= errno))
+ {
+#ifdef TARGET_OS_LINUX
+ case ERESTART:
+#endif
+ case EINTR:
+ break;
+
+ case EFAULT:
+ case ENOMEM:
+ fatal_message(strerror(error));
+ break;
+
+ case EINVAL:
+ fatal_message("RLIMIT_NOFILE exceeded, or if OSX the timeout value was invalid");
+ break;
+
+ default:
+ fatal_message(strerror(error));
+ break;
+ }
+ }
+
+ if (active_fd == 0)
+ {
+ return false;
+ }
+
+ if (fds[0].revents & POLLIN)
{
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)
+ while ((read_length= ::read(stdout_fd.fd()[0], buffer, sizeof(buffer))))
{
if (read_length == -1)
{
default:
Error << strerror(errno);
- bail= true;
+ break;
}
+
+ break;
}
_stdout_buffer.reserve(read_length +1);
for (size_t x= 0; x < read_length; x++)
}
}
+ if (fds[1].revents & POLLIN)
{
+ stderr_fd.nonblock();
+
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)
+ while ((read_length= ::read(stderr_fd.fd()[0], buffer, sizeof(buffer))))
{
if (read_length == -1)
{
default:
Error << strerror(errno);
- bail= true;
+ break;
}
+
+ break;
}
_stderr_buffer.reserve(read_length +1);
for (size_t x= 0; x < read_length; x++)
}
}
+ return true;
+}
+
+Application::error_t Application::wait()
+{
+ fatal_assert(_pid != -1);
+
+ slurp();
+
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);
+ switch (errno)
+ {
+ case ECHILD:
+ exit_code= Application::SUCCESS;
+ break;
+
+ default:
+ Error << "Error occured while waitpid(" << strerror(errno) << ") on pid " << int(_pid);
+ }
}
else
{
}
}
+#if 0
if (exit_code == Application::INVALID)
{
- Error << print_argv(built_argv, _argc, _pid);
+ Error << print_argv(built_argv, _argc);
}
+#endif
return exit_code;
}
+void Application::add_long_option(const std::string& name, const std::string& option_value)
+{
+ std::string arg(name);
+ arg+= option_value;
+ _options.push_back(std::make_pair(arg, std::string()));
+}
+
void Application::add_option(const std::string& arg)
{
_options.push_back(std::make_pair(arg, std::string()));
_open[1]= false;
}
+void Application::Pipe::nonblock()
+{
+ int ret;
+ if ((ret= fcntl(_fd[0], F_GETFL, 0)) == -1)
+ {
+ Error << "fcntl(F_GETFL) " << strerror(errno);
+ throw strerror(errno);
+ }
+
+ if ((ret= fcntl(_fd[0], F_SETFL, ret | O_NONBLOCK)) == -1)
+ {
+ Error << "fcntl(F_SETFL) " << strerror(errno);
+ throw strerror(errno);
+ }
+}
+
void Application::Pipe::reset()
{
close(READ);
close(WRITE);
- int ret;
- if ((ret= pipe(_fd)) < 0)
+ if (pipe(_fd) == -1)
{
- throw strerror(ret);
+ throw strerror(errno);
}
_open[0]= true;
_open[1]= true;
+ if (0)
{
- 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);
- }
+ nonblock();
}
}
if (_open[type])
{
int ret;
- if ((ret= ::close(_fd[type])) < 0)
+ if (::close(_fd[type]) == -1)
{
- Error << "close(" << strerror(ret) << ")";
+ Error << "close(" << strerror(errno) << ")";
}
_open[type]= false;
+ _fd[type]= -1;
}
}
_argc+= 2; // +2 for libtool --mode=execute
}
+ /*
+ valgrind --error-exitcode=1 --leak-check=yes --show-reachable=yes --track-fds=yes --malloc-fill=A5 --free-fill=DE
+ */
+ if (_use_valgrind)
+ {
+ _argc+= 7;
+ }
+ else if (_use_gdb) // gdb
+ {
+ _argc+= 1;
+ }
+
for (Options::const_iterator iter= _options.begin(); iter != _options.end(); iter++)
{
_argc++;
built_argv[x++]= strdup(libtool());
built_argv[x++]= strdup("--mode=execute");
}
+
+ if (_use_valgrind)
+ {
+ /*
+ valgrind --error-exitcode=1 --leak-check=yes --show-reachable=yes --track-fds=yes --malloc-fill=A5 --free-fill=DE
+ */
+ built_argv[x++]= strdup("valgrind");
+ built_argv[x++]= strdup("--error-exitcode=1");
+ built_argv[x++]= strdup("--leak-check=yes");
+ built_argv[x++]= strdup("--show-reachable=yes");
+ built_argv[x++]= strdup("--track-fds=yes");
+ built_argv[x++]= strdup("--malloc-fill=A5");
+ built_argv[x++]= strdup("--free-fill=DE");
+ }
+ else if (_use_gdb)
+ {
+ built_argv[x++]= strdup("gdb");
+ }
+
built_argv[x++]= strdup(_exectuble_with_path.c_str());
for (Options::const_iterator iter= _options.begin(); iter != _options.end(); iter++)
std::string Application::print()
{
- return print_argv(built_argv, _argc, _pid);
+ return print_argv(built_argv, _argc);
}
-void Application::delete_argv()
+std::string Application::arguments()
{
- if (built_argv == NULL)
+ std::stringstream arg_buffer;
+
+ for (size_t x= 1 + _use_libtool ? 2 : 0;
+ x < _argc and built_argv[x];
+ x++)
{
- return;
+ arg_buffer << built_argv[x] << " ";
}
- for (size_t x= 0; x < _argc; x++)
+ return arg_buffer.str();
+}
+
+void Application::delete_argv()
+{
+ if (built_argv)
{
- if (built_argv[x])
+ for (size_t x= 0; x < _argc; x++)
{
- ::free(built_argv[x]);
+ if (built_argv[x])
+ {
+ ::free(built_argv[x]);
+ }
}
+ delete[] built_argv;
+ built_argv= NULL;
+ _argc= 0;
}
- delete[] built_argv;
- built_argv= NULL;
- _argc= 0;
}