src/test/bench/shootout-pfib.rs

   1 // Copyright 2012 The Rust Project Developers. See the COPYRIGHT
   2 // file at the top-level directory of this distribution and at
   3 // http://rust-lang.org/COPYRIGHT.
   4 //
   5 // Licensed under the Apache License, Version 2.0 <LICENSE-APACHE or
   6 // http://www.apache.org/licenses/LICENSE-2.0> or the MIT license
   7 // <LICENSE-MIT or http://opensource.org/licenses/MIT>, at your
   8 // option. This file may not be copied, modified, or distributed
   9 // except according to those terms.
  10
  11
  12 /*
  13   A parallel version of fibonacci numbers.
  14
  15   This version is meant mostly as a way of stressing and benchmarking
  16   the task system. It supports a lot of old command-line arguments to
  17   control how it runs.
  18
  19 */
  20
  21 extern crate getopts;
  22 extern crate time;
  23
  24 use std::os;
  25 use std::result::{Ok, Err};
  26 use std::task;
  27 use std::uint;
  28 use std::vec_ng::Vec;
  29
  30 fn fib(n: int) -> int {
  31     fn pfib(tx: &Sender<int>, n: int) {
  32         if n == 0 {
  33             tx.send(0);
  34         } else if n <= 2 {
  35             tx.send(1);
  36         } else {
  37             let (tx1, rx) = channel();
  38             let tx2 = tx1.clone();
  39             task::spawn(proc() pfib(&tx2, n - 1));
  40             let tx2 = tx1.clone();
  41             task::spawn(proc() pfib(&tx2, n - 2));
  42             tx.send(rx.recv() + rx.recv());
  43         }
  44     }
  45
  46     let (tx, rx) = channel();
  47     spawn(proc() pfib(&tx, n) );
  48     rx.recv()
  49 }
  50
  51 struct Config {
  52     stress: bool
  53 }
  54
  55 fn parse_opts(argv: Vec<~str> ) -> Config {
  56     let opts = vec!(getopts::optflag("", "stress", ""));
  57
  58     let opt_args = argv.slice(1, argv.len());
  59
  60     match getopts::getopts(opt_args, opts.as_slice()) {
  61       Ok(ref m) => {
  62           return Config {stress: m.opt_present("stress")}
  63       }
  64       Err(_) => { fail!(); }
  65     }
  66 }
  67
  68 fn stress_task(id: int) {
  69     let mut i = 0;
  70     loop {
  71         let n = 15;
  72         assert_eq!(fib(n), fib(n));
  73         i += 1;
  74         println!("{}: Completed {} iterations", id, i);
  75     }
  76 }
  77
  78 fn stress(num_tasks: int) {
  79     let mut results = Vec::new();
  80     for i in range(0, num_tasks) {
  81         let mut builder = task::task();
  82         results.push(builder.future_result());
  83         builder.spawn(proc() {
  84             stress_task(i);
  85         });
  86     }
  87     for r in results.iter() {
  88         r.recv();
  89     }
  90 }
  91
  92 fn main() {
  93     let args = os::args();
  94     let args = if os::getenv("RUST_BENCH").is_some() {
  95         vec!(~"", ~"20")
  96     } else if args.len() <= 1u {
  97         vec!(~"", ~"8")
  98     } else {
  99         args.move_iter().collect()
 100     };
 101
 102     let opts = parse_opts(args.clone());
 103
 104     if opts.stress {
 105         stress(2);
 106     } else {
 107         let max = uint::parse_bytes(args.get(1).as_bytes(), 10u).unwrap() as
 108             int;
 109
 110         let num_trials = 10;
 111
 112         for n in range(1, max + 1) {
 113             for _ in range(0, num_trials) {
 114                 let start = time::precise_time_ns();
 115                 let fibn = fib(n);
 116                 let stop = time::precise_time_ns();
 117
 118                 let elapsed = stop - start;
 119
 120                 println!("{}\t{}\t{}", n, fibn, elapsed.to_str());
 121             }
 122         }
 123     }
 124 }