cosmetics: rename some tests in teshsuite/simix

[simgrid.git] / teshsuite / simix / stack-overflow / stack-overflow.cpp

diff --git a/teshsuite/simix/stack-overflow/stack-overflow.cpp b/teshsuite/simix/stack-overflow/stack-overflow.cpp
new file mode 100644 (file)
index 0000000..551b5a0
--- /dev/null
+++ b/teshsuite/simix/stack-overflow/stack-overflow.cpp
@@ -0,0 +1,53 @@
+/* stack_overflow -- simple program generating a stack overflow          */
+
+/* Copyright (c) 2014. The SimGrid Team.
+ * All rights reserved.                                                     */
+
+/* This program is free software; you can redistribute it and/or modify it
+ * under the terms of the license (GNU LGPL) which comes with this package. */
+
+#include "simgrid/simix.h"
+#include "xbt/log.h"
+
+XBT_LOG_NEW_DEFAULT_CATEGORY(test, "my log messages");
+
+static unsigned collatz(unsigned c0, unsigned n)
+{
+  unsigned x;
+  if (n == 0) {
+    x = c0;
+  } else {
+    x = collatz(c0, n - 1);
+    if (x % 2 == 0)
+      x = x / 2;
+    else
+      x = 3 * x + 1;
+  }
+  return x;
+}
+
+static int master(int argc, char* argv[])
+{
+  XBT_INFO("Launching our nice bugged recursive function...");
+  unsigned i = 1;
+  while (i <= 0x80000000U) {
+    i *= 2;
+    unsigned res = collatz(i, i);
+    XBT_VERB("collatz(%u, %u) returned %u", i, i, res);
+  }
+  return 0;
+}
+
+int main(int argc, char* argv[])
+{
+  SIMIX_global_init(&argc, argv);
+
+  xbt_assert(argc == 2, "Usage: %s platform.xml\n", argv[0]);
+
+  SIMIX_function_register("master", master);
+  SIMIX_create_environment(argv[1]);
+  simcall_process_create("master", master, NULL, sg_host_by_name("Tremblay"), 0, NULL, NULL);
+  SIMIX_run();
+
+  return 0;
+}