3 files changed, 109 insertions, 0 deletions
diff --git a/modules/entropy/beos_stats/es_beos.cpp b/modules/entropy/beos_stats/es_beos.cpp
new file mode 100644
index 000000000..80d5605d0
--- /dev/null
+++ b/modules/entropy/beos_stats/es_beos.cpp
@@ -0,0 +1,65 @@
+/*************************************************
+* BeOS EntropySource Source File                 *
+* (C) 1999-2007 Jack Lloyd                       *
+*************************************************/
+
+#include <botan/es_beos.h>
+#include <kernel/OS.h>
+#include <kernel/image.h>
+#include <interface/InterfaceDefs.h>
+
+namespace Botan {
+
+/*************************************************
+* BeOS Fast Poll                                 *
+*************************************************/
+void BeOS_EntropySource::do_fast_poll()
+   {
+   system_info info_sys;
+   get_system_info(&info_sys);
+   add_bytes(&info_sys, sizeof(system_info));
+
+   key_info info_key;
+   get_key_info(&info_key);
+   add_bytes(&info_key, sizeof(key_info));
+
+   add_bytes(idle_time());
+   }
+
+/*************************************************
+* BeOS Slow Poll                                 *
+*************************************************/
+void BeOS_EntropySource::do_slow_poll()
+   {
+   team_info info_team;
+   int32 cookie_team = 0;
+
+   while(get_next_team_info(&cookie_team, &info_team) == B_OK)
+      {
+      add_bytes(&info_team, sizeof(team_info));
+
+      team_id id = info_team.team;
+      int32 cookie = 0;
+
+      thread_info info_thr;
+      while(get_next_thread_info(id, &cookie, &info_thr) == B_OK)
+         add_bytes(&info_thr, sizeof(thread_info));
+
+      cookie = 0;
+      image_info info_img;
+      while(get_next_image_info(id, &cookie, &info_img) == B_OK)
+         add_bytes(&info_img, sizeof(image_info));
+
+      cookie = 0;
+      sem_info info_sem;
+      while(get_next_sem_info(id, &cookie, &info_sem) == B_OK)
+         add_bytes(&info_sem, sizeof(sem_info));
+
+      cookie = 0;
+      area_info info_area;
+      while(get_next_area_info(id, &cookie, &info_area) == B_OK)
+         add_bytes(&info_area, sizeof(area_info));
+      }
+   }
+
+}
diff --git a/modules/entropy/beos_stats/es_beos.h b/modules/entropy/beos_stats/es_beos.h
new file mode 100644
index 000000000..11808d2b8
--- /dev/null
+++ b/modules/entropy/beos_stats/es_beos.h
@@ -0,0 +1,25 @@
+/*************************************************
+* BeOS EntropySource Header File                 *
+* (C) 1999-2007 Jack Lloyd                       *
+*************************************************/
+
+#ifndef BOTAN_EXT_ENTROPY_SRC_BEOS_H__
+#define BOTAN_EXT_ENTROPY_SRC_BEOS_H__
+
+#include <botan/buf_es.h>
+
+namespace Botan {
+
+/*************************************************
+* BeOS Entropy Source                            *
+*************************************************/
+class BeOS_EntropySource : public Buffered_EntropySource
+   {
+   private:
+      void do_fast_poll();
+      void do_slow_poll();
+   };
+
+}
+
+#endif
diff --git a/modules/entropy/beos_stats/modinfo.txt b/modules/entropy/beos_stats/modinfo.txt
new file mode 100644
index 000000000..a7e62cfb3
--- /dev/null
+++ b/modules/entropy/beos_stats/modinfo.txt
@@ -0,0 +1,19 @@
+realname "BeOS Entropy Source"
+
+define ENTROPY_SRC_BEOS
+modset beos
+
+load_on auto
+
+<add>
+es_beos.h
+es_beos.cpp
+</add>
+
+<os>
+beos
+</os>
+
+<libs>
+beos -> root,be
+</libs>