Subversion Repositories QNX 8.QNX8 IFS tool

 

 

extern "C" {

 

 

 

 

 

 

static inline char *sane_strerror (int errnum) { thread_local static char errorstr[256]; strerror_s (errorstr, sizeof (errorstr), errnum); return (errorstr); } // non-complaining strerror() implementation for MSVC. Note that strerror() is unsafe IF AND ONLY IF the locale is changed during program execution AND a string pointer returned by strerror is saved and reused by the program. Guess the odds it will happen here...

static inline char *sane_getenv (const char *varname) { extern char **environ; size_t i, len = strlen (varname); for (i = 0; environ[i] != NULL; i++) if ((strncmp (environ[i], varname, len) == 0) && ((environ[i])[len] == '=')) return (&(environ[i])[len + 1]); return (NULL); } // non-complaining getenv() implementation for MSVC. Note that getenv_s() access _environ too as per Microsoft docs, so this is perfectly legit. Nuff said.

static struct tm *sane_localtime (const time_t *clock) { thread_local static struct tm localtime_tm; if (localtime_s (&localtime_tm, clock) != 0) return (NULL); return (&localtime_tm); } // non-complaining localtime() implementation for MSVC. Uses TLS.

static inline char *sane_asctime (const struct tm *tm_time) { thread_local static char asctimestr[64]; if (asctime_s (asctimestr, sizeof (asctimestr), tm_time) != 0) return (NULL); return (asctimestr); } // non-complaining asctime() implementation for MSVC. Uses TLS.

static inline int vasprintf (char **out_string, const char *fmt, va_list va_args) { int retval; va_list ap; va_copy (ap, va_args); retval = _vsnprintf_s (NULL, 0, 0, fmt, ap); va_end (ap); if (retval == -1) return (-1); *out_string = malloc ((size_t) retval + 1); if (*out_string == NULL) return (-1); va_copy (ap, va_args); retval = _vsnprintf_s (*out_string, (size_t) retval + 1, (size_t) retval + 1, fmt, va_args); va_end (ap); return (retval); } // vasprintf() implementation for Windows

static inline int asprintf (char **out_string, const char *fmt, ...) { int r; va_list ap; va_start (ap, fmt); r = vasprintf (out_string, fmt, ap); va_end (ap); return (r); } // asprintf() implementation for Windows

struct dirent { unsigned char d_namlen; char *d_name; }; // bring struct dirent/opendir() support to Windows

typedef struct DIR { intptr_t handle; struct __finddata64_t info; struct dirent result; char *pathname; char *search_pattern; } DIR;

static inline DIR *opendir (const char *name) // UNIX-like opendir() implementation for Windows

   DIR *dir; size_t base_length, all_length; const char *suffix;

   dir = (DIR *) malloc (sizeof (DIR)); if (dir == NULL) { /*errno already set*/ return (NULL); }

   dir->pathname = _fullpath (NULL, name, 0); // system will mallocate, caller frees

   if (dir->pathname == NULL) { free (dir); *_errno () = 12 /*ENOMEM*/; return (NULL); }

   base_length = strlen (name);

   suffix = ((name[base_length - 1] == '\\') || (name[base_length - 1] == '/') ? "*" : "/*"); // search pattern must end with suitable wildcard

   all_length = base_length + strlen (suffix) + 1;

   dir->search_pattern = (char *) malloc (all_length); if (dir->search_pattern == NULL) { free (dir->pathname); free (dir); *_errno () = 12 /*ENOMEM*/; return (NULL); }

   strcpy_s (dir->search_pattern, all_length, name); strcat_s (dir->search_pattern, all_length, suffix);

   dir->handle = _findfirst64 (dir->search_pattern, &dir->info); if (dir->handle == -1) { free (dir->search_pattern); free (dir->pathname); free (dir); return (NULL); }

   dir->result.d_namlen = 0; dir->result.d_name = NULL; // first-time initialization

   return (dir);

static inline int closedir (DIR *dir) // UNIX-like closedir() implementation for Windows

   int result = -1;

   if (dir == NULL) { *_errno () = 9 /*EBADF*/; return (-1); }

   if (dir->handle != -1) result = _findclose (dir->handle);

   if (dir->search_pattern != NULL) free (dir->search_pattern);

   if (dir->pathname != NULL) free (dir->pathname);

   free (dir);

   if (result == -1) *_errno () = 9 /*EBADF*/; // map all errors to EBADF

   return (result);

static inline struct dirent *readdir (DIR *dir) // UNIX-like readdir() implementation for Windows

   struct dirent *result = NULL;

   if ((dir == NULL) || (dir->handle == -1)) { *_errno () = 9 /*EBADF*/; return (NULL); }

   if ((dir->result.d_name == NULL) || (_findnext64 (dir->handle, &dir->info) != -1)) {

      result = &dir->result;

      result->d_name = dir->info.name;

      result->d_namlen = (unsigned char) strlen (dir->info.name);

   }

   return (result);

static inline void rewinddir (DIR *dir) // UNIX-like rewinddir() implementation for Windows

   if ((dir == NULL) || (dir->handle == -1)) { *_errno () = 9 /*EBADF*/; return; }

   _findclose (dir->handle);

   dir->handle = (long) _findfirst64 (dir->search_pattern, &dir->info);

   dir->result.d_namlen = 0; dir->result.d_name = NULL; // first-time initialization