From ea22643b2217921df74ea14df47d7c83987d5761 Mon Sep 17 00:00:00 2001
From: Boris Kolpackov <boris@codesynthesis.com>
Date: Fri, 9 Dec 2016 17:29:27 +0200
Subject: Initial parallel scheduler implementation, use to run testscrips

---
 unit-tests/scheduler/buildfile  | 14 ++++++
 unit-tests/scheduler/driver.cxx | 94 +++++++++++++++++++++++++++++++++++++++++
 2 files changed, 108 insertions(+)
 create mode 100644 unit-tests/scheduler/buildfile
 create mode 100644 unit-tests/scheduler/driver.cxx

(limited to 'unit-tests/scheduler')

diff --git a/unit-tests/scheduler/buildfile b/unit-tests/scheduler/buildfile
new file mode 100644
index 0000000..cfcd3cb
--- /dev/null
+++ b/unit-tests/scheduler/buildfile
@@ -0,0 +1,14 @@
+# file      : unit-tests/scheduler/buildfile
+# copyright : Copyright (c) 2014-2016 Code Synthesis Ltd
+# license   : MIT; see accompanying LICENSE file
+
+#@@ Temporary until we get utility library support.
+#
+if ($cxx.target.class != "windows")
+  cxx.libs += -lpthread
+import libs = libbutl%lib{butl}
+src = scheduler diagnostics utility variable name b-options types-parsers
+
+exe{driver}: cxx{driver} ../../build2/cxx{$src} $libs
+
+include ../../build2/
diff --git a/unit-tests/scheduler/driver.cxx b/unit-tests/scheduler/driver.cxx
new file mode 100644
index 0000000..65ba5e5
--- /dev/null
+++ b/unit-tests/scheduler/driver.cxx
@@ -0,0 +1,94 @@
+// file      : unit-tests/scheduler/driver.cxx -*- C++ -*-
+// copyright : Copyright (c) 2014-2016 Code Synthesis Ltd
+// license   : MIT; see accompanying LICENSE file
+
+#include <chrono>
+#include <thread>
+
+#include <cassert>
+#include <iostream>
+
+#include <build2/types>
+#include <build2/utility>
+
+#include <build2/scheduler>
+
+using namespace std;
+
+namespace build2
+{
+  int
+  main ()
+  {
+    //scheduler s (1);
+    scheduler s (scheduler::hardware_concurrency ());
+
+    auto inner = [] (size_t x, size_t y, size_t& out)
+    {
+      out = x + y;
+      this_thread::sleep_for (chrono::microseconds (out * 10));
+    };
+
+    auto outer = [&s, &inner] (size_t n, size_t& out)
+    {
+      vector<size_t> result (2 * n, 0);
+      scheduler::atomic_count task_count (0);
+
+      for (size_t i (0); i != 2 * n; ++i)
+      {
+        s.async (task_count,
+                 inner,
+                 i,
+                 i,
+                 std::ref (result[i]));
+      }
+
+      s.wait (task_count);
+      assert (task_count == 0);
+
+      for (size_t i (0); i != n; ++i)
+        out += result[i];
+
+      this_thread::sleep_for (chrono::microseconds (out * 10));
+    };
+
+    const size_t tasks (50);
+
+    vector<size_t> result (tasks, 0);
+    scheduler::atomic_count task_count (0);
+
+    for (size_t i (0); i != tasks; ++i)
+    {
+      s.async (task_count,
+               outer,
+               i,
+               std::ref (result[i]));
+    }
+
+    s.wait (task_count);
+    assert (task_count == 0);
+
+    scheduler::stat st (s.shutdown ());
+
+    /*
+    cerr << "thread_max_active      " << st.thread_max_active     << endl
+         << "thread_max_total       " << st.thread_max_total      << endl
+         << "thread_helpers         " << st.thread_helpers        << endl
+         << "thread_max_waiting     " << st.thread_max_waiting    << endl
+         << endl
+         << "task_queue_depth       " << st.task_queue_depth      << endl
+         << "task_queue_full        " << st.task_queue_full       << endl
+         << endl
+         << "wait_queue_slots       " << st.wait_queue_slots      << endl
+         << "wait_queue_collisions  " << st.wait_queue_collisions << endl;
+    */
+
+    return 0;
+  }
+}
+
+int
+main ()
+{
+  return build2::main ();
+}
-- 
cgit v1.1