/* Copyright Joyent, Inc. and other Node contributors. All rights reserved.

 *

 * Permission is hereby granted, free of charge, to any person obtaining a copy

 * of this software and associated documentation files (the "Software"), to

 * deal in the Software without restriction, including without limitation the

 * rights to use, copy, modify, merge, publish, distribute, sublicense, and/or

 * sell copies of the Software, and to permit persons to whom the Software is

 * furnished to do so, subject to the following conditions:

 *

 * The above copyright notice and this permission notice shall be included in

 * all copies or substantial portions of the Software.

 *

 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR

 * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,

 * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE

 * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER

 * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING

 * FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS

 * IN THE SOFTWARE.

 */

#include "uv.h"

#include "task.h"

#include <errno.h>

#include <fcntl.h>

#include <stdio.h>

#include <stdlib.h>

#include <string.h>

#ifdef _WIN32

# if defined(__MINGW32__)

#  include <basetyps.h>

# endif

# include <shellapi.h>

# include <wchar.h>

#else

# include <unistd.h>

# include <sys/wait.h>

#endif

static int close_cb_called;

static int exit_cb_called;

static uv_process_t process;

static uv_timer_t timer;

static uv_process_options_t options;

static char exepath[1024];

static size_t exepath_size = 1024;

static char* args[5];

static int no_term_signal;

static int timer_counter;

static uv_tcp_t tcp_server;

#define OUTPUT_SIZE 1024

static char output[OUTPUT_SIZE];

static int output_used;

static void close_cb(uv_handle_t* handle) {

  printf("close_cb\n");

  close_cb_called++;

}

static void exit_cb(uv_process_t* process,

                    int64_t exit_status,

                    int term_signal) {

  printf("exit_cb\n");

  exit_cb_called++;

  ASSERT(exit_status == 1);

  ASSERT(term_signal == 0);

  uv_close((uv_handle_t*)process, close_cb);

}

static void fail_cb(uv_process_t* process,

                    int64_t exit_status,

                    int term_signal) {

  ASSERT(0 && "fail_cb called");

}

static void kill_cb(uv_process_t* process,

                    int64_t exit_status,

                    int term_signal) {

  int err;

  printf("exit_cb\n");

  exit_cb_called++;

#ifdef _WIN32

  ASSERT(exit_status == 1);

#else

  ASSERT(exit_status == 0);

#endif

#if defined(__APPLE__) || defined(__MVS__)

  /*

   * At least starting with Darwin Kernel Version 16.4.0, sending a SIGTERM to a

   * process that is still starting up kills it with SIGKILL instead of SIGTERM.

   * See: https://github.com/libuv/libuv/issues/1226

   */

  ASSERT(no_term_signal || term_signal == SIGTERM || term_signal == SIGKILL);

#else

  ASSERT(no_term_signal || term_signal == SIGTERM);

#endif

  uv_close((uv_handle_t*)process, close_cb);

  /*

   * Sending signum == 0 should check if the

   * child process is still alive, not kill it.

   * This process should be dead.

   */

  err = uv_kill(process->pid, 0);

  ASSERT(err == UV_ESRCH);

}

static void detach_failure_cb(uv_process_t* process,

                              int64_t exit_status,

                              int term_signal) {

  printf("detach_cb\n");

  exit_cb_called++;

}

static void on_alloc(uv_handle_t* handle,

                     size_t suggested_size,

                     uv_buf_t* buf) {

  buf->base = output + output_used;

  buf->len = OUTPUT_SIZE - output_used;

}

static void on_read(uv_stream_t* tcp, ssize_t nread, const uv_buf_t* buf) {

  if (nread > 0) {

    output_used += nread;

  } else if (nread < 0) {

    ASSERT(nread == UV_EOF);

    uv_close((uv_handle_t*)tcp, close_cb);

  }

}

static void on_read_once(uv_stream_t* tcp, ssize_t nread, const uv_buf_t* buf) {

  uv_read_stop(tcp);

  on_read(tcp, nread, buf);

}

static void write_cb(uv_write_t* req, int status) {

  ASSERT(status == 0);

  uv_close((uv_handle_t*)req->handle, close_cb);

}

static void init_process_options(char* test, uv_exit_cb exit_cb) {

  /* Note spawn_helper1 defined in test/run-tests.c */

  int r = uv_exepath(exepath, &exepath_size);

  ASSERT(r == 0);

  exepath[exepath_size] = '\0';

  args[0] = exepath;

  args[1] = test;

  args[2] = NULL;

  args[3] = NULL;

  args[4] = NULL;

  options.file = exepath;

  options.args = args;

  options.exit_cb = exit_cb;

  options.flags = 0;

}

static void timer_cb(uv_timer_t* handle) {

  uv_process_kill(&process, /* SIGTERM */ 15);

  uv_close((uv_handle_t*)handle, close_cb);

}

static void timer_counter_cb(uv_timer_t* handle) {

  ++timer_counter;

}

TEST_IMPL(spawn_fails) {

  int r;

  init_process_options("", fail_cb);

  options.file = options.args[0] = "program-that-had-better-not-exist";

  r = uv_spawn(uv_default_loop(), &process, &options);

  ASSERT(r == UV_ENOENT || r == UV_EACCES);

  ASSERT(0 == uv_is_active((uv_handle_t*) &process));

  uv_close((uv_handle_t*) &process, NULL);

  ASSERT(0 == uv_run(uv_default_loop(), UV_RUN_DEFAULT));

  MAKE_VALGRIND_HAPPY();

  return 0;

}

#ifndef _WIN32

TEST_IMPL(spawn_fails_check_for_waitpid_cleanup) {

  int r;

  int status;

  int err;

  init_process_options("", fail_cb);

  options.file = options.args[0] = "program-that-had-better-not-exist";

  r = uv_spawn(uv_default_loop(), &process, &options);

  ASSERT(r == UV_ENOENT || r == UV_EACCES);

  ASSERT(0 == uv_is_active((uv_handle_t*) &process));

  ASSERT(0 == uv_run(uv_default_loop(), UV_RUN_DEFAULT));

  /* verify the child is successfully cleaned up within libuv */

  do

    err = waitpid(process.pid, &status, 0);

  while (err == -1 && errno == EINTR);

  ASSERT(err == -1);

  ASSERT(errno == ECHILD);

  uv_close((uv_handle_t*) &process, NULL);

  ASSERT(0 == uv_run(uv_default_loop(), UV_RUN_DEFAULT));

  MAKE_VALGRIND_HAPPY();

  return 0;

}

#endif

TEST_IMPL(spawn_exit_code) {

  int r;

  init_process_options("spawn_helper1", exit_cb);

  r = uv_spawn(uv_default_loop(), &process, &options);

  ASSERT(r == 0);

  r = uv_run(uv_default_loop(), UV_RUN_DEFAULT);

  ASSERT(r == 0);

  ASSERT(exit_cb_called == 1);

  ASSERT(close_cb_called == 1);

  MAKE_VALGRIND_HAPPY();

  return 0;

}

TEST_IMPL(spawn_stdout) {

  int r;

  uv_pipe_t out;

  uv_stdio_container_t stdio[2];

  init_process_options("spawn_helper2", exit_cb);

  uv_pipe_init(uv_default_loop(), &out, 0);

  options.stdio = stdio;

  options.stdio[0].flags = UV_IGNORE;

  options.stdio[1].flags = UV_CREATE_PIPE | UV_WRITABLE_PIPE;

  options.stdio[1].data.stream = (uv_stream_t*)&out;

  options.stdio_count = 2;

  r = uv_spawn(uv_default_loop(), &process, &options);

  ASSERT(r == 0);

  r = uv_read_start((uv_stream_t*) &out, on_alloc, on_read);

  ASSERT(r == 0);

  r = uv_run(uv_default_loop(), UV_RUN_DEFAULT);

  ASSERT(r == 0);

  ASSERT(exit_cb_called == 1);

  ASSERT(close_cb_called == 2); /* Once for process once for the pipe. */

  printf("output is: %s", output);

  ASSERT(strcmp("hello world\n", output) == 0);

  MAKE_VALGRIND_HAPPY();

  return 0;

}

TEST_IMPL(spawn_stdout_to_file) {

  int r;

  uv_file file;

  uv_fs_t fs_req;

  uv_stdio_container_t stdio[2];

  uv_buf_t buf;

  /* Setup. */

  unlink("stdout_file");

  init_process_options("spawn_helper2", exit_cb);

  r = uv_fs_open(NULL, &fs_req, "stdout_file", O_CREAT | O_RDWR,

      S_IRUSR | S_IWUSR, NULL);

  ASSERT(r != -1);

  uv_fs_req_cleanup(&fs_req);

  file = r;

  options.stdio = stdio;

  options.stdio[0].flags = UV_IGNORE;

  options.stdio[1].flags = UV_INHERIT_FD;

  options.stdio[1].data.fd = file;

  options.stdio_count = 2;

  r = uv_spawn(uv_default_loop(), &process, &options);

  ASSERT(r == 0);

  r = uv_run(uv_default_loop(), UV_RUN_DEFAULT);

  ASSERT(r == 0);

  ASSERT(exit_cb_called == 1);

  ASSERT(close_cb_called == 1);

  buf = uv_buf_init(output, sizeof(output));

  r = uv_fs_read(NULL, &fs_req, file, &buf, 1, 0, NULL);

  ASSERT(r == 12);

  uv_fs_req_cleanup(&fs_req);

  r = uv_fs_close(NULL, &fs_req, file, NULL);

  ASSERT(r == 0);

  uv_fs_req_cleanup(&fs_req);

  printf("output is: %s", output);

  ASSERT(strcmp("hello world\n", output) == 0);

  /* Cleanup. */

  unlink("stdout_file");

  MAKE_VALGRIND_HAPPY();

  return 0;

}

TEST_IMPL(spawn_stdout_and_stderr_to_file) {

  int r;

  uv_file file;

  uv_fs_t fs_req;

  uv_stdio_container_t stdio[3];

  uv_buf_t buf;

  /* Setup. */

  unlink("stdout_file");

  init_process_options("spawn_helper6", exit_cb);

  r = uv_fs_open(NULL, &fs_req, "stdout_file", O_CREAT | O_RDWR,

      S_IRUSR | S_IWUSR, NULL);

  ASSERT(r != -1);

  uv_fs_req_cleanup(&fs_req);

  file = r;

  options.stdio = stdio;

  options.stdio[0].flags = UV_IGNORE;

  options.stdio[1].flags = UV_INHERIT_FD;

  options.stdio[1].data.fd = file;

  options.stdio[2].flags = UV_INHERIT_FD;

  options.stdio[2].data.fd = file;

  options.stdio_count = 3;

  r = uv_spawn(uv_default_loop(), &process, &options);

  ASSERT(r == 0);

  r = uv_run(uv_default_loop(), UV_RUN_DEFAULT);

  ASSERT(r == 0);

  ASSERT(exit_cb_called == 1);

  ASSERT(close_cb_called == 1);

  buf = uv_buf_init(output, sizeof(output));

  r = uv_fs_read(NULL, &fs_req, file, &buf, 1, 0, NULL);

  ASSERT(r == 27);

  uv_fs_req_cleanup(&fs_req);

  r = uv_fs_close(NULL, &fs_req, file, NULL);

  ASSERT(r == 0);

  uv_fs_req_cleanup(&fs_req);

  printf("output is: %s", output);

  ASSERT(strcmp("hello world\nhello errworld\n", output) == 0);

  /* Cleanup. */

  unlink("stdout_file");

  MAKE_VALGRIND_HAPPY();

  return 0;

}

TEST_IMPL(spawn_stdout_and_stderr_to_file2) {

#ifndef _WIN32

  int r;

  uv_file file;

  uv_fs_t fs_req;

  uv_stdio_container_t stdio[3];

  uv_buf_t buf;

  /* Setup. */

  unlink("stdout_file");

  init_process_options("spawn_helper6", exit_cb);

  /* Replace stderr with our file */

  r = uv_fs_open(NULL,

                 &fs_req,

                 "stdout_file",

                 O_CREAT | O_RDWR,

                 S_IRUSR | S_IWUSR,

                 NULL);

  ASSERT(r != -1);

  uv_fs_req_cleanup(&fs_req);

  file = dup2(r, STDERR_FILENO);

  ASSERT(file != -1);

  options.stdio = stdio;

  options.stdio[0].flags = UV_IGNORE;

  options.stdio[1].flags = UV_INHERIT_FD;

  options.stdio[1].data.fd = file;

  options.stdio[2].flags = UV_INHERIT_FD;

  options.stdio[2].data.fd = file;

  options.stdio_count = 3;

  r = uv_spawn(uv_default_loop(), &process, &options);

  ASSERT(r == 0);

  r = uv_run(uv_default_loop(), UV_RUN_DEFAULT);

  ASSERT(r == 0);

  ASSERT(exit_cb_called == 1);

  ASSERT(close_cb_called == 1);

  buf = uv_buf_init(output, sizeof(output));

  r = uv_fs_read(NULL, &fs_req, file, &buf, 1, 0, NULL);

  ASSERT(r == 27);

  uv_fs_req_cleanup(&fs_req);

  r = uv_fs_close(NULL, &fs_req, file, NULL);

  ASSERT(r == 0);

  uv_fs_req_cleanup(&fs_req);

  printf("output is: %s", output);

  ASSERT(strcmp("hello world\nhello errworld\n", output) == 0);

  /* Cleanup. */

  unlink("stdout_file");

  MAKE_VALGRIND_HAPPY();

  return 0;

#else

  RETURN_SKIP("Unix only test");

#endif

}

TEST_IMPL(spawn_stdout_and_stderr_to_file_swap) {

#ifndef _WIN32

  int r;

  uv_file stdout_file;

  uv_file stderr_file;

  uv_fs_t fs_req;

  uv_stdio_container_t stdio[3];

  uv_buf_t buf;

  /* Setup. */

  unlink("stdout_file");

  unlink("stderr_file");

  init_process_options("spawn_helper6", exit_cb);

  /* open 'stdout_file' and replace STDOUT_FILENO with it */

  r = uv_fs_open(NULL,

                 &fs_req,

                 "stdout_file",

                 O_CREAT | O_RDWR,

                 S_IRUSR | S_IWUSR,

                 NULL);

  ASSERT(r != -1);

  uv_fs_req_cleanup(&fs_req);

  stdout_file = dup2(r, STDOUT_FILENO);

  ASSERT(stdout_file != -1);

  /* open 'stderr_file' and replace STDERR_FILENO with it */

  r = uv_fs_open(NULL, &fs_req, "stderr_file", O_CREAT | O_RDWR,

      S_IRUSR | S_IWUSR, NULL);

  ASSERT(r != -1);

  uv_fs_req_cleanup(&fs_req);

  stderr_file = dup2(r, STDERR_FILENO);

  ASSERT(stderr_file != -1);

  /* now we're going to swap them: the child process' stdout will be our

   * stderr_file and vice versa */

  options.stdio = stdio;

  options.stdio[0].flags = UV_IGNORE;

  options.stdio[1].flags = UV_INHERIT_FD;

  options.stdio[1].data.fd = stderr_file;

  options.stdio[2].flags = UV_INHERIT_FD;

  options.stdio[2].data.fd = stdout_file;

  options.stdio_count = 3;

  r = uv_spawn(uv_default_loop(), &process, &options);

  ASSERT(r == 0);

  r = uv_run(uv_default_loop(), UV_RUN_DEFAULT);

  ASSERT(r == 0);

  ASSERT(exit_cb_called == 1);

  ASSERT(close_cb_called == 1);

  buf = uv_buf_init(output, sizeof(output));

  /* check the content of stdout_file */

  r = uv_fs_read(NULL, &fs_req, stdout_file, &buf, 1, 0, NULL);

  ASSERT(r >= 15);

  uv_fs_req_cleanup(&fs_req);

  r = uv_fs_close(NULL, &fs_req, stdout_file, NULL);

  ASSERT(r == 0);

  uv_fs_req_cleanup(&fs_req);

  printf("output is: %s", output);

  ASSERT(strncmp("hello errworld\n", output, 15) == 0);

  /* check the content of stderr_file */

  r = uv_fs_read(NULL, &fs_req, stderr_file, &buf, 1, 0, NULL);

  ASSERT(r >= 12);

  uv_fs_req_cleanup(&fs_req);

  r = uv_fs_close(NULL, &fs_req, stderr_file, NULL);

  ASSERT(r == 0);

  uv_fs_req_cleanup(&fs_req);

  printf("output is: %s", output);

  ASSERT(strncmp("hello world\n", output, 12) == 0);

  /* Cleanup. */

  unlink("stdout_file");

  unlink("stderr_file");

  MAKE_VALGRIND_HAPPY();

  return 0;

#else

  RETURN_SKIP("Unix only test");

#endif

}

TEST_IMPL(spawn_stdin) {

  int r;

  uv_pipe_t out;

  uv_pipe_t in;

  uv_write_t write_req;

  uv_buf_t buf;

  uv_stdio_container_t stdio[2];

  char buffer[] = "hello-from-spawn_stdin";

  init_process_options("spawn_helper3", exit_cb);

  uv_pipe_init(uv_default_loop(), &out, 0);

  uv_pipe_init(uv_default_loop(), &in, 0);

  options.stdio = stdio;

  options.stdio[0].flags = UV_CREATE_PIPE | UV_READABLE_PIPE;

  options.stdio[0].data.stream = (uv_stream_t*)∈

  options.stdio[1].flags = UV_CREATE_PIPE | UV_WRITABLE_PIPE;

  options.stdio[1].data.stream = (uv_stream_t*)&out;

  options.stdio_count = 2;

  r = uv_spawn(uv_default_loop(), &process, &options);

  ASSERT(r == 0);

  buf.base = buffer;

  buf.len = sizeof(buffer);

  r = uv_write(&write_req, (uv_stream_t*)&in, &buf, 1, write_cb);

  ASSERT(r == 0);

  r = uv_read_start((uv_stream_t*) &out, on_alloc, on_read);

  ASSERT(r == 0);

  r = uv_run(uv_default_loop(), UV_RUN_DEFAULT);

  ASSERT(r == 0);

  ASSERT(exit_cb_called == 1);

  ASSERT(close_cb_called == 3); /* Once for process twice for the pipe. */

  ASSERT(strcmp(buffer, output) == 0);

  MAKE_VALGRIND_HAPPY();

  return 0;

}

TEST_IMPL(spawn_stdio_greater_than_3) {

  int r;

  uv_pipe_t pipe;

  uv_stdio_container_t stdio[4];

  init_process_options("spawn_helper5", exit_cb);

  uv_pipe_init(uv_default_loop(), &pipe, 0);

  options.stdio = stdio;

  options.stdio[0].flags = UV_IGNORE;

  options.stdio[1].flags = UV_IGNORE;

  options.stdio[2].flags = UV_IGNORE;

  options.stdio[3].flags = UV_CREATE_PIPE | UV_WRITABLE_PIPE;

  options.stdio[3].data.stream = (uv_stream_t*)&pip;;

  options.stdio_count = 4;

  r = uv_spawn(uv_default_loop(), &process, &options);

  ASSERT(r == 0);

  r = uv_read_start((uv_stream_t*) &pipe, on_alloc, on_read);

  ASSERT(r == 0);

  r = uv_run(uv_default_loop(), UV_RUN_DEFAULT);

  ASSERT(r == 0);

  ASSERT(exit_cb_called == 1);

  ASSERT(close_cb_called == 2); /* Once for process once for the pipe. */

  printf("output from stdio[3] is: %s", output);

  ASSERT(strcmp("fourth stdio!\n", output) == 0);

  MAKE_VALGRIND_HAPPY();

  return 0;

}

int spawn_tcp_server_helper(void) {

  uv_tcp_t tcp;

  uv_os_sock_t handle;

  int r;

  r = uv_tcp_init(uv_default_loop(), &tcp;;

  ASSERT(r == 0);

#ifdef _WIN32

  handle = _get_osfhandle(3);

#else

  handle = 3;

#endif

  r = uv_tcp_open(&tcp, handle);

  ASSERT(r == 0);

  /* Make sure that we can listen on a socket that was

   * passed down from the parent process

   */

  r = uv_listen((uv_stream_t*)&tcp, SOMAXCONN, NULL);

  ASSERT(r == 0);

  return 1;

}

TEST_IMPL(spawn_tcp_server) {

  uv_stdio_container_t stdio[4];

  struct sockaddr_in addr;

  int fd;

  int r;

#ifdef _WIN32

  uv_os_fd_t handle;

#endif

  init_process_options("spawn_tcp_server_helper", exit_cb);

  ASSERT(0 == uv_ip4_addr("127.0.0.1", TEST_PORT, &addr));

  fd = -1;

  r = uv_tcp_init_ex(uv_default_loop(), &tcp_server, AF_INET);

  ASSERT(r == 0);

  r = uv_tcp_bind(&tcp_server, (const struct sockaddr*) &addr, 0);

  ASSERT(r == 0);

#ifdef _WIN32

  r = uv_fileno((uv_handle_t*)&tcp_server, &handle);

  fd = _open_osfhandle((intptr_t) handle, 0);

#else

  r = uv_fileno((uv_handle_t*)&tcp_server, &fd;;

 #endif

  ASSERT(r == 0);

  ASSERT(fd > 0);

  options.stdio = stdio;

  options.stdio[0].flags = UV_INHERIT_FD;

  options.stdio[0].data.fd = 0;

  options.stdio[1].flags = UV_INHERIT_FD;

  options.stdio[1].data.fd = 1;

  options.stdio[2].flags = UV_INHERIT_FD;

  options.stdio[2].data.fd = 2;

  options.stdio[3].flags = UV_INHERIT_FD;

  options.stdio[3].data.fd = fd;

  options.stdio_count = 4;

  r = uv_spawn(uv_default_loop(), &process, &options);

  ASSERT(r == 0);

  r = uv_run(uv_default_loop(), UV_RUN_DEFAULT);

  ASSERT(r == 0);

  ASSERT(exit_cb_called == 1);

  ASSERT(close_cb_called == 1);

  MAKE_VALGRIND_HAPPY();

  return 0;

}

TEST_IMPL(spawn_ignored_stdio) {

  int r;

  init_process_options("spawn_helper6", exit_cb);

  options.stdio = NULL;

  options.stdio_count = 0;

  r = uv_spawn(uv_default_loop(), &process, &options);

  ASSERT(r == 0);

  r = uv_run(uv_default_loop(), UV_RUN_DEFAULT);

  ASSERT(r == 0);

  ASSERT(exit_cb_called == 1);

  ASSERT(close_cb_called == 1);

  MAKE_VALGRIND_HAPPY();

  return 0;

}

TEST_IMPL(spawn_and_kill) {

  int r;

  init_process_options("spawn_helper4", kill_cb);

  r = uv_spawn(uv_default_loop(), &process, &options);

  ASSERT(r == 0);

  r = uv_timer_init(uv_default_loop(), &timer;;

  ASSERT(r == 0);

  r = uv_timer_start(&timer, timer_cb, 500, 0);

  ASSERT(r == 0);

  r = uv_run(uv_default_loop(), UV_RUN_DEFAULT);

  ASSERT(r == 0);

  ASSERT(exit_cb_called == 1);

  ASSERT(close_cb_called == 2); /* Once for process and once for timer. */

  MAKE_VALGRIND_HAPPY();

  return 0;

}

TEST_IMPL(spawn_preserve_env) {

  int r;

  uv_pipe_t out;

  uv_stdio_container_t stdio[2];

  init_process_options("spawn_helper7", exit_cb);

  uv_pipe_init(uv_default_loop(), &out, 0);

  options.stdio = stdio;

  options.stdio[0].flags = UV_IGNORE;

  options.stdio[1].flags = UV_CREATE_PIPE | UV_WRITABLE_PIPE;

  options.stdio[1].data.stream = (uv_stream_t*) &out;

  options.stdio_count = 2;

  r = putenv("ENV_TEST=testval");

  ASSERT(r == 0);

  /* Explicitly set options.env to NULL to test for env clobbering. */

  options.env = NULL;

  r = uv_spawn(uv_default_loop(), &process, &options);

  ASSERT(r == 0);

  r = uv_read_start((uv_stream_t*) &out, on_alloc, on_read);

  ASSERT(r == 0);

  r = uv_run(uv_default_loop(), UV_RUN_DEFAULT);

  ASSERT(r == 0);

  ASSERT(exit_cb_called == 1);

  ASSERT(close_cb_called == 2);

  printf("output is: %s", output);

  ASSERT(strcmp("testval", output) == 0);

  MAKE_VALGRIND_HAPPY();

  return 0;

}

TEST_IMPL(spawn_detached) {

  int r;

  init_process_options("spawn_helper4", detach_failure_cb);

  options.flags |= UV_PROCESS_DETACHED;

  r = uv_spawn(uv_default_loop(), &process, &options);

  ASSERT(r == 0);

  uv_unref((uv_handle_t*)&process);

  r = uv_run(uv_default_loop(), UV_RUN_DEFAULT);

  ASSERT(r == 0);

  ASSERT(exit_cb_called == 0);

  ASSERT(process.pid == uv_process_get_pid(&process));

  r = uv_kill(process.pid, 0);

  ASSERT(r == 0);

  r = uv_kill(process.pid, 15);

  ASSERT(r == 0);

  MAKE_VALGRIND_HAPPY();

  return 0;

}

TEST_IMPL(spawn_and_kill_with_std) {

  int r;

  uv_pipe_t in, out, err;

  uv_write_t write;

  char message[] = "Nancy's joining me because the message this evening is "

                   "not my message but ours.";

  uv_buf_t buf;

  uv_stdio_container_t stdio[3];

  init_process_options("spawn_helper4", kill_cb);

  r = uv_pipe_init(uv_default_loop(), &in, 0);

  ASSERT(r == 0);

  r = uv_pipe_init(uv_default_loop(), &out, 0);

  ASSERT(r == 0);

  r = uv_pipe_init(uv_default_loop(), &err, 0);

  ASSERT(r == 0);

  options.stdio = stdio;

  options.stdio[0].flags = UV_CREATE_PIPE | UV_READABLE_PIPE;

  options.stdio[0].data.stream = (uv_stream_t*)∈

  options.stdio[1].flags = UV_CREATE_PIPE | UV_WRITABLE_PIPE;

  options.stdio[1].data.stream = (uv_stream_t*)&out;

  options.stdio[2].flags = UV_CREATE_PIPE | UV_WRITABLE_PIPE;

  options.stdio[2].data.stream = (uv_stream_t*)&err;

  options.stdio_count = 3;

  r = uv_spawn(uv_default_loop(), &process, &options);

  ASSERT(r == 0);

  buf = uv_buf_init(message, sizeof message);

  r = uv_write(&write, (uv_stream_t*) &in, &buf, 1, write_cb);

  ASSERT(r == 0);

  r = uv_read_start((uv_stream_t*) &out, on_alloc, on_read);

  ASSERT(r == 0);

  r = uv_read_start((uv_stream_t*) &err, on_alloc, on_read);

  ASSERT(r == 0);

  r = uv_timer_init(uv_default_loop(), &timer;;

  ASSERT(r == 0);

  r = uv_timer_start(&timer, timer_cb, 500, 0);

  ASSERT(r == 0);

  r = uv_run(uv_default_loop(), UV_RUN_DEFAULT);

  ASSERT(r == 0);

  ASSERT(exit_cb_called == 1);

  ASSERT(close_cb_called == 5); /* process x 1, timer x 1, stdio x 3. */

  MAKE_VALGRIND_HAPPY();

  return 0;

}

TEST_IMPL(spawn_and_ping) {

  uv_write_t write_req;