summaryrefslogtreecommitdiff
path: root/Src/compat.c
diff options
context:
space:
mode:
Diffstat (limited to 'Src/compat.c')
-rw-r--r--Src/compat.c112
1 files changed, 64 insertions, 48 deletions
diff --git a/Src/compat.c b/Src/compat.c
index 817bb4aaf..918d98e69 100644
--- a/Src/compat.c
+++ b/Src/compat.c
@@ -136,7 +136,19 @@ zgettime_monotonic_if_available(struct timespec *ts)
#if defined(HAVE_CLOCK_GETTIME) && defined(CLOCK_MONOTONIC)
struct timespec dts;
+
+/*
+ * On at least some versions of macOS it appears that CLOCK_MONOTONIC is not
+ * actually monotonic -- there are reports that it can go backwards.
+ * CLOCK_MONOTONIC_RAW does not have this problem. On top of that, it is faster
+ * to read and it has nanosecond precision. We could use it on other systems
+ * too, but on Linux at least it seems that CLOCK_MONOTONIC is preferred
+ */
+#if defined(__APPLE__) && defined(CLOCK_MONOTONIC_RAW)
+ if (clock_gettime(CLOCK_MONOTONIC_RAW, &dts) < 0) {
+#else
if (clock_gettime(CLOCK_MONOTONIC, &dts) < 0) {
+#endif
zwarn("unable to retrieve CLOCK_MONOTONIC time: %e", errno);
ret--;
} else {
@@ -342,36 +354,69 @@ zopenmax(void)
mod_export char *
zgetdir(struct dirsav *d)
{
- char nbuf[PATH_MAX+3];
char *buf;
+#if defined(HAVE_GETCWD) || defined(__CYGWIN__)
+ char *cwdbuf;
+#endif
+#if defined(USE_GETCWD) || defined(__CYGWIN__)
+#ifdef GETCWD_CALLS_MALLOC
+ if ((cwdbuf = getcwd(NULL, 0))) {
+ buf = dupstring(cwdbuf);
+ free(cwdbuf);
+ } else
+ buf = NULL;
+#else
+ cwdbuf = zalloc(PATH_MAX+1);
+ if ((buf = getcwd(cwdbuf, PATH_MAX)))
+ buf = dupstring(buf);
+ zfree(cwdbuf, PATH_MAX+1);
+#endif /* GETCWD_CALLS_MALLOC */
+ if (d && buf)
+ return d->dirname = ztrdup(buf);
+ else
+ return buf;
+#else /* !USE_GETCWD && !__CYGWIN__ */
int bufsiz, pos;
- struct stat sbuf;
- ino_t pino;
- dev_t pdev;
-#if !defined(__CYGWIN__) && !defined(USE_GETCWD)
+ char nbuf[PATH_MAX+3];
struct dirent *de;
DIR *dir;
- dev_t dev;
- ino_t ino;
+ struct stat sbuf;
+ ino_t pino, ino;
+ dev_t pdev, dev;
int len;
-#endif
+ strcpy(nbuf, "../");
+ if (stat(".", &sbuf) == 0) {
+ /* Record the initial inode and device */
+ pino = sbuf.st_ino;
+ pdev = sbuf.st_dev;
+ if (d)
+ d->ino = pino, d->dev = pdev;
+ }
+#ifdef HAVE_GETCWD
+ else {
+#ifdef GETCWD_CALLS_MALLOC
+ if ((cwdbuf = getcwd(NULL, 0))) {
+ buf = dupstring(cwdbuf);
+ free(cwdbuf);
+ } else
+ buf = NULL;
+#else
+ cwdbuf = zalloc(PATH_MAX+1);
+ if ((buf = getcwd(cwdbuf, PATH_MAX)))
+ buf = dupstring(buf);
+ zfree(cwdbuf, PATH_MAX+1);
+#endif /* GETCWD_CALLS_MALLOC */
+ return buf; /* NULL when stat() and getcwd() both failed */
+ }
+#endif
+ /* stat() succeeded */
buf = zhalloc(bufsiz = PATH_MAX+1);
pos = bufsiz - 1;
buf[pos] = '\0';
- strcpy(nbuf, "../");
- if (stat(".", &sbuf) < 0) {
- return NULL;
- }
- /* Record the initial inode and device */
- pino = sbuf.st_ino;
- pdev = sbuf.st_dev;
- if (d)
- d->ino = pino, d->dev = pdev;
-#if !defined(__CYGWIN__) && !defined(USE_GETCWD)
#ifdef HAVE_FCHDIR
- else
+ if (!d)
#endif
holdintr();
@@ -487,18 +532,6 @@ zgetdir(struct dirsav *d)
zchdir(buf + pos + 1);
noholdintr();
-#else /* __CYGWIN__, USE_GETCWD cases */
-
- if (!getcwd(buf, bufsiz)) {
- if (d) {
- return NULL;
- }
- } else {
- if (d) {
- return d->dirname = ztrdup(buf);
- }
- return buf;
- }
#endif
/*
@@ -526,23 +559,6 @@ mod_export char *
zgetcwd(void)
{
char *ret = zgetdir(NULL);
-#ifdef HAVE_GETCWD
- if (!ret) {
-#ifdef GETCWD_CALLS_MALLOC
- char *cwd = getcwd(NULL, 0);
- if (cwd) {
- ret = dupstring(cwd);
- free(cwd);
- }
-#else
- char *cwdbuf = zalloc(PATH_MAX+1);
- ret = getcwd(cwdbuf, PATH_MAX);
- if (ret)
- ret = dupstring(ret);
- zfree(cwdbuf, PATH_MAX+1);
-#endif /* GETCWD_CALLS_MALLOC */
- }
-#endif /* HAVE_GETCWD */
if (!ret)
ret = unmeta(pwd);
if (!ret || *ret == '\0')