// A raw test of vector appending performance.

use std;
import dvec::{dvec, extensions};
import io::writer_util;

fn collect_raw(num: uint) -> ~[uint] {
    let mut result = ~[];
    for uint::range(0u, num) |i| {
        vec::push(result, i);
    }
    ret result;
}

fn collect_dvec(num: uint) -> ~[mut uint] {
    let result = dvec();
    for uint::range(0u, num) |i| {
        result.push(i);
    }
    ret dvec::unwrap(result);
}

fn main(args: ~[~str]) {
    let args = if os::getenv(~"RUST_BENCH").is_some() {
        ~[~"", ~"50000000"]
    } else if args.len() <= 1u {
        ~[~"", ~"100000"]
    } else {
        args
    };
    let max = uint::from_str(args[1]).get();
    let start = std::time::precise_time_s();
    let raw_v = collect_raw(max);
    let mid = std::time::precise_time_s();
    let dvec_v = collect_dvec(max);
    let end = std::time::precise_time_s();

    // check each vector
    assert raw_v.len() == max;
    for raw_v.eachi |i, v| { assert i == v; }
    assert dvec_v.len() == max;
    for dvec_v.eachi |i, v| { assert i == v; }

    let raw = mid - start;
    let dvec = end - mid;
    
    let maxf = max as float;
    let rawf = raw as float;
    let dvecf = dvec as float;
    
    io::stdout().write_str(fmt!{"Raw     : %? seconds\n", raw});
    io::stdout().write_str(fmt!{"        : %f op/sec\n", maxf/rawf});
    io::stdout().write_str(fmt!{"\n"});
    io::stdout().write_str(fmt!{"Dvec    : %? seconds\n", dvec});
    io::stdout().write_str(fmt!{"        : %f op/sec\n", maxf/dvecf});
    io::stdout().write_str(fmt!{"\n"});
    
    if dvec < raw {
        io::stdout().write_str(fmt!{"Dvec is %f%% faster than raw\n",
                                    (rawf - dvecf) / rawf * 100.0});
    } else {
        io::stdout().write_str(fmt!{"Raw is %f%% faster than dvec\n",
                                    (dvecf - rawf) / dvecf * 100.0});
    }
}