// Copyright 2012-2013-2014 The Rust Project Developers. See the COPYRIGHT
// file at the top-level directory of this distribution and at
// http://rust-lang.org/COPYRIGHT.
//
// Licensed under the Apache License, Version 2.0 <LICENSE-APACHE or
// http://www.apache.org/licenses/LICENSE-2.0> or the MIT license
// <LICENSE-MIT or http://opensource.org/licenses/MIT>, at your
// option. This file may not be copied, modified, or distributed
// except according to those terms.

// ignore-pretty
// compile-flags:--test

// NB: These tests kill child processes. Valgrind sees these children as leaking
// memory, which makes for some *confusing* logs. That's why these are here
// instead of in std.

#![reexport_test_harness_main = "test_main"]
#![feature(old_io, libc, std_misc)]

extern crate libc;

use std::old_io::{Process, Command, timer};
use std::time::Duration;
use std::str;
use std::sync::mpsc::channel;
use std::thread;

macro_rules! succeed { ($e:expr) => (
    match $e { Ok(..) => {}, Err(e) => panic!("panic: {}", e) }
) }

fn test_destroy_once() {
    let mut p = sleeper();
    match p.signal_exit() {
        Ok(()) => {}
        Err(e) => panic!("error: {}", e),
    }
}

#[cfg(unix)]
pub fn sleeper() -> Process {
    Command::new("sleep").arg("1000").spawn().unwrap()
}
#[cfg(windows)]
pub fn sleeper() -> Process {
    // There's a `timeout` command on windows, but it doesn't like having
    // its output piped, so instead just ping ourselves a few times with
    // gaps in between so we're sure this process is alive for awhile
    Command::new("ping").arg("127.0.0.1").arg("-n").arg("1000").spawn().unwrap()
}

fn test_destroy_twice() {
    let mut p = sleeper();
    succeed!(p.signal_exit()); // this shouldn't crash...
    let _ = p.signal_exit(); // ...and nor should this (and nor should the destructor)
}

pub fn test_destroy_actually_kills(force: bool) {
    use std::old_io::process::{Command, ProcessOutput, ExitStatus, ExitSignal};
    use std::old_io::timer;
    use libc;
    use std::str;

    #[cfg(all(unix,not(target_os="android")))]
    static BLOCK_COMMAND: &'static str = "cat";

    #[cfg(all(unix,target_os="android"))]
    static BLOCK_COMMAND: &'static str = "/system/bin/cat";

    #[cfg(windows)]
    static BLOCK_COMMAND: &'static str = "cmd";

    // this process will stay alive indefinitely trying to read from stdin
    let mut p = Command::new(BLOCK_COMMAND).spawn().unwrap();

    assert!(p.signal(0).is_ok());

    if force {
        p.signal_kill().unwrap();
    } else {
        p.signal_exit().unwrap();
    }

    // Don't let this test time out, this should be quick
    let (tx, rx1) = channel();
    let mut t = timer::Timer::new().unwrap();
    let rx2 = t.oneshot(Duration::milliseconds(1000));
    thread::spawn(move|| {
        select! {
            _ = rx2.recv() => unsafe { libc::exit(1) },
            _ = rx1.recv() => {}
        }
    });
    match p.wait().unwrap() {
        ExitStatus(..) => panic!("expected a signal"),
        ExitSignal(..) => tx.send(()).unwrap(),
    }
}

fn test_unforced_destroy_actually_kills() {
    test_destroy_actually_kills(false);
}

fn test_forced_destroy_actually_kills() {
    test_destroy_actually_kills(true);
}
