Re: [9fans] Is POSIX:clock_gettime(2) in APE somewhere/anywhere?

[ori@eigenstate.org]

Quoth tlaronde@polynum.com:
> But is clock_gettime(2) available in APE in any instance of Plan9 or is
> there a routine achieving the same purpose?

Here's a quick sketch of something that we could add; note
that the implemented monotonicity is really crude.

diff 03d870e0283299404b0eb46689d13f8538e83a2f uncommitted
--- a//sys/include/ape/time.h
+++ b//sys/include/ape/time.h
@@ -53,15 +53,20 @@
 #ifdef _POSIX_SOURCE
 extern void tzset(void);
 
+#define        CLOCK_REALTIME  1
+#define        CLOCK_MONOTONIC 2
+
+typedef int    clockid_t;
+
 struct timespec {
        time_t tv_sec;
        long tv_nsec;
 };
 extern int nanosleep(const struct timespec *req, struct timespec *rem);
-#endif
 
-#ifdef __cplusplus
-}
+extern int     clock_getres(clockid_t, struct timespec*);
+extern int     clock_gettime(clockid_t, struct timespec*);
+extern int     clock_settime(clockid_t, struct timespec*);
 #endif
 
 #ifdef _POSIX_SOURCE
@@ -69,6 +74,10 @@
 extern long timezone;
 extern long altzone;
 extern int daylight;
+#endif
+
+#ifdef __cplusplus
+}
 #endif
 
 #endif /* __TIME_H */
--- /tmp/diff100001791256
+++ b/sys/src/ape/lib/bsd/clock.c
@@ -1,0 +1,60 @@
+#include <sys/types.h>
+#include <time.h>
+#include <errno.h>
+#include <lock.h>
+
+/* ap/plan9/9nsec.c */
+extern long long _NSEC(void);
+
+#define Ns2sec (1000*1000*1000)
+
+int
+clock_getres(clockid_t id, struct timespec *ts)
+{
+       if(id != CLOCK_REALTIME && id != CLOCK_MONOTONIC){
+               errno = EINVAL;
+               return -1;
+       }
+       ts->tv_sec = 0;
+       ts->tv_nsec = 1;
+       return 0;
+}
+
+int
+clock_settime(clockid_t, struct timespec *)
+{
+       errno = EPERM;
+       return -1;
+}
+
+int
+clock_gettime(clockid_t clk, struct timespec *ts)
+{
+       static Lock maxlk;
+       static long long max;
+       long long t;
+
+       t = _NSEC();
+       switch(clk){
+       case CLOCK_REALTIME:
+               /* nothing */
+               break;
+       case CLOCK_MONOTONIC:
+               /* Bug: we should support a real monotonic clock */
+               lock(&maxlk);
+               if(t < max)
+                       t = max;
+               else
+                       max = t;
+               unlock(&maxlk);
+               break;
+       default:
+               errno = EINVAL;
+               return -1;
+       }
+
+       ts->tv_sec = t/Ns2sec;
+       ts->tv_nsec = t%Ns2sec;
+
+       return 0;
+}



------------------------------------------
9fans: 9fans
Permalink: https://9fans.topicbox.com/groups/9fans/T1992d89fd8b382c7-Mf08f6aaf225fc08a5763ecb2
Delivery options: https://9fans.topicbox.com/groups/9fans/subscription