initial commit with rc for skalibs-2.0.0.0

1 files changed, 31 insertions, 0 deletions

diff --git a/src/sysdeps/trydevurandom.c b/src/sysdeps/trydevurandom.c
new file mode 100644
index 0000000..3d0f912
--- /dev/null
+++ b/src/sysdeps/trydevurandom.c
@@ -0,0 +1,31 @@
+/* ISC license. */
+
+#include <unistd.h>
+#include <sys/types.h>
+#include <fcntl.h>
+
+static int byte_diff (char *s, unsigned int n, char *t)
+{
+  for (;;)
+  {
+    if (!n) return 0 ;
+    if (*s != *t) break ;
+    ++s ; ++t ; --n ;
+  }
+  return ((int)(unsigned int)(unsigned char) *s)
+       - ((int)(unsigned int)(unsigned char) *t);
+}
+
+int main ()
+{
+  char a[64] ;
+  char b[64] ;
+  int fd ;
+  fd = open("/dev/urandom", O_RDONLY) ;
+  if ((fd == -1) || (read(fd, a, 64) < 64) ) return 111 ;
+  close(fd) ;
+  fd = open("/dev/urandom", O_RDONLY) ;
+  if ((fd == -1) || (read(fd, b, 64) < 64) ) return 111 ;
+  close(fd) ;
+  return (!byte_diff(a, 64, b)) ;  
+}