blob: 2cbb578e16251ab853f55abee3270245811c30cc (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
|
#ifndef JIMIOCOMPAT_H
#define JIMIOCOMPAT_H
/*
* Cross-platform compatibility functions and types for I/O.
* Currently used by jim-aio.c and jim-exec.c
*/
#include <stdio.h>
#include <errno.h>
#include "jimautoconf.h"
#include <jim.h>
#include <jim-win32compat.h>
/**
* Set an error result based on errno and the given message.
*/
void Jim_SetResultErrno(Jim_Interp *interp, const char *msg);
/**
* Opens the file for writing (and appending if append is true).
* Returns the file descriptor, or -1 on failure.
*/
int Jim_OpenForWrite(const char *filename, int append);
/**
* Opens the file for reading.
* Returns the file descriptor, or -1 on failure.
*/
int Jim_OpenForRead(const char *filename);
#if defined(__MINGW32__)
#ifndef STRICT
#define STRICT
#endif
#define WIN32_LEAN_AND_MEAN
#include <windows.h>
#include <fcntl.h>
#include <io.h>
#include <process.h>
typedef HANDLE pidtype;
#define JIM_BAD_PID INVALID_HANDLE_VALUE
/* Note that this isn't a separate value on Windows since we don't have os.fork */
#define JIM_NO_PID INVALID_HANDLE_VALUE
/* These seem to accord with the conventions used by msys/mingw32 */
#define WIFEXITED(STATUS) (((STATUS) & 0xff00) == 0)
#define WEXITSTATUS(STATUS) ((STATUS) & 0x00ff)
#define WIFSIGNALED(STATUS) (((STATUS) & 0xff00) != 0)
#define WTERMSIG(STATUS) (((STATUS) >> 8) & 0xff)
#define WNOHANG 1
/**
* Unix-compatible errno
*/
int Jim_Errno(void);
pidtype waitpid(pidtype pid, int *status, int nohang);
#define HAVE_PIPE
#define pipe(P) _pipe((P), 0, O_NOINHERIT)
#elif defined(HAVE_UNISTD_H)
#include <unistd.h>
#include <fcntl.h>
#include <sys/wait.h>
#include <sys/stat.h>
typedef int pidtype;
#define Jim_Errno() errno
#define JIM_BAD_PID -1
#define JIM_NO_PID 0
#ifndef HAVE_EXECVPE
#define execvpe(ARG0, ARGV, ENV) execvp(ARG0, ARGV)
#endif
#endif
#endif
|
