date and time created 92/06/02 13:38:45 by bostic

SCCS-vsn: lib/libc/quad/TESTS/divrem.c 5.1

diff --git a/usr/src/lib/libc/quad/TESTS/divrem.c b/usr/src/lib/libc/quad/TESTS/divrem.c
new file mode 100644 (file)
index 0000000..f1afa22
--- /dev/null
+++ b/usr/src/lib/libc/quad/TESTS/divrem.c
@@ -0,0 +1,52 @@
+/*-
+ * Copyright (c) 1992 The Regents of the University of California.
+ * All rights reserved.
+ *
+ * This software was developed by the Computer Systems Engineering group
+ * at Lawrence Berkeley Laboratory under DARPA contract BG 91-66 and
+ * contributed to Berkeley.
+ *
+ * %sccs.include.redist.c%
+ */
+
+#ifndef lint
+char copyright[] =
+"@(#) Copyright (c) 1992 The Regents of the University of California.\n\
+ All rights reserved.\n";
+#endif /* not lint */
+
+#ifndef lint
+static char sccsid[] = "@(#)divrem.c   5.1 (Berkeley) %G%";
+#endif /* not lint */
+
+#include <stdio.h>
+
+main()
+{
+       union { long long q; unsigned long v[2]; } a, b, q, r;
+       char buf[300];
+       extern long long __qdivrem(unsigned long long, unsigned long long,
+           unsigned long long *);
+
+       for (;;) {
+               printf("> ");
+               if (fgets(buf, sizeof buf, stdin) == NULL)
+                       break;
+               if (sscanf(buf, "%lu:%lu %lu:%lu",
+                           &a.v[0], &a.v[1], &b.v[0], &b.v[1]) != 4 &&
+                   sscanf(buf, "0x%lx:%lx 0x%lx:%lx",
+                           &a.v[0], &a.v[1], &b.v[0], &b.v[1]) != 4) {
+                       printf("eh?\n");
+                       continue;
+               }
+               q.q = __qdivrem(a.q, b.q, &r.q);
+               printf("%lx:%lx /%% %lx:%lx => q=%lx:%lx r=%lx:%lx\n",
+                   a.v[0], a.v[1], b.v[0], b.v[1],
+                   q.v[0], q.v[1], r.v[0], r.v[1]);
+               printf("  = %lX%08lX / %lX%08lX => %lX%08lX\n\
+  = %lX%08lX %% %lX%08lX => %lX%08lX\n",
+                   a.v[0], a.v[1], b.v[0], b.v[1], q.v[0], q.v[1],
+                   a.v[0], a.v[1], b.v[0], b.v[1], r.v[0], r.v[1]);
+       }
+       exit(0);
+}