1 /* System description file for Windows NT.
3 Copyright (C) 1993-1995, 2001-2013 Free Software Foundation, Inc.
5 This file is part of GNU Emacs.
7 GNU Emacs is free software: you can redistribute it and/or modify
8 it under the terms of the GNU General Public License as published by
9 the Free Software Foundation, either version 3 of the License, or
10 (at your option) any later version.
12 GNU Emacs is distributed in the hope that it will be useful,
13 but WITHOUT ANY WARRANTY; without even the implied warranty of
14 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
15 GNU General Public License for more details.
17 You should have received a copy of the GNU General Public License
18 along with GNU Emacs. If not, see <http://www.gnu.org/licenses/>. */
20 /* Define symbols to identify the version of Unix this is.
21 Define all the symbols that apply correctly. */
27 #include <mingw_time.h>
31 /* Number of chars of output in the buffer of a stdio stream. */
32 #ifdef __GNU_LIBRARY__
33 #define PENDING_OUTPUT_COUNT(FILE) ((FILE)->__bufp - (FILE)->__buffer)
35 #define PENDING_OUTPUT_COUNT(FILE) ((FILE)->_ptr - (FILE)->_base)
38 /* If you are compiling with a non-C calling convention but need to
39 declare vararg routines differently, put it here. */
40 #define _VARARGS_ __cdecl
42 /* If you are providing a function to something that will call the
43 function back (like a signal handler and signal, or main) its calling
44 convention must be whatever standard the libraries expect. */
45 #define _CALLBACK_ __cdecl
47 /* Define HAVE_TIMEVAL if the system supports the BSD style clock values.
48 Look in <sys/time.h> for a timeval structure. */
49 #define HAVE_TIMEVAL 1
51 /* But our select implementation doesn't allow us to make non-blocking
52 connects. So until that is fixed, this is necessary: */
53 #define BROKEN_NON_BLOCKING_CONNECT 1
55 /* And the select implementation does 1-byte read-ahead waiting
56 for received packets, so datagrams are broken too. */
57 #define BROKEN_DATAGRAM_SOCKETS 1
59 #define MAIL_USE_SYSTEM_LOCK 1
61 /* Define to 1 if GCC-style __attribute__ ((__aligned__ (expr))) works. */
63 #define HAVE_ATTRIBUTE_ALIGNED 1
66 /* Define to 1 if strtold conforms to C99. */
68 #define HAVE_C99_STRTOLD 1
71 #if (__GNUC__ > 2 || (__GNUC__ == 2 && __GNUC_MINOR__ >= 8))
72 # ifndef HAVE___BUILTIN_UNWIND_INIT
73 # define HAVE___BUILTIN_UNWIND_INIT 1
77 /* This isn't perfect, as some systems might have the page file in
78 another place. Also, I suspect that the time stamp of that file
79 might also change when Windows enlarges the file due to
80 insufficient VM. Still, this seems to be the most reliable way;
81 the alternative (of using GetSystemTimes) won't work on laptops
82 that hibernate, because the system clock is stopped then. Other
83 possibility would be to run "net statistics workstation" and parse
84 the output, but that's gross. So this should do; if the file is
85 not there, the boot time will be returned as zero, and filelock.c
86 already handles that. */
87 #define BOOT_TIME_FILE "C:/pagefile.sys"
89 /* ============================================================ */
91 /* Here, add any special hacks needed to make Emacs work on this
92 system. For example, you might define certain system call names
93 that don't exist on your system, or that do different things on
94 your system and must be used only through an encapsulation (which
95 you should place, by convention, in sysdep.c). */
102 #define inline __inline
106 /* config.h may have defined already. */
108 # define restrict __restrict__
111 /* FIXME: should we define to __restrict, which MSVC supports? */
115 /* `mode_t' is not defined for MSVC. Define. */
117 typedef unsigned short mode_t
;
120 /* A va_copy replacement for MSVC. */
123 # ifndef va_copy /* Need to be checked (?) */
124 # define va_copy(d,s) ((d) = (s))
126 # else /* not _WIN64 */
127 # define va_copy(d,s) ((d) = (s))
128 # endif /* not _WIN64 */
129 #endif /* _MSC_VER */
132 /* Some of the files of Emacs which are intended for use with other
133 programs assume that if you have a config.h file, you must declare
134 the type of getenv. */
135 extern char *getenv ();
138 /* Prevent accidental use of features unavailable in older Windows
139 versions we still support. MinGW64 defines this to a higher value
140 in its system headers, and is not really compatible with values
141 lower than 0x0500, so leave it alone. */
143 # define _WIN32_WINNT 0x0400
146 /* Make a leaner executable. */
147 #define WIN32_LEAN_AND_MEAN 1
149 #include <sys/types.h>
152 #define MAXPATHLEN _MAX_PATH
156 # ifndef HAVE_WINDOW_SYSTEM
157 # define HAVE_WINDOW_SYSTEM 1
161 /* Get some redefinitions in place. */
166 /* MinGW64 specific stuff. */
167 /* Make sure 'struct timespec' and 'struct timezone' are defined. */
168 #include <sys/types.h>
170 /* This prototype avoids MinGW64 compiler warnings due to the fact
171 that time.h is included before localtime is redirected to
172 sys_localtime below. */
173 extern struct tm
* sys_localtime (const time_t *);
174 /* MinGW64 uses a 2-argument _setjmp, and setjmp is a macro defined to
175 supply the 2nd arg correctly, so don't use _setjmp directly in that
181 #include <sys/timeb.h>
182 #include <sys/stat.h>
185 /* MSVC gets link-time errors without these redirections. */
186 #define fstat(a, b) sys_fstat(a, b)
187 #define stat(a, b) sys_stat(a, b)
188 #define utime sys_utime
191 /* Calls that are emulated or shadowed. */
193 #define chdir sys_chdir
195 #define chmod sys_chmod
197 #define close sys_close
199 #define creat sys_creat
200 #define ctime sys_ctime
204 #define dup2 sys_dup2
205 #define fopen sys_fopen
206 #define link sys_link
207 #define localtime sys_localtime
208 #define mkdir sys_mkdir
210 #define open sys_open
212 #define read sys_read
213 #define rename sys_rename
214 #define rmdir sys_rmdir
215 #define select sys_select
216 #define pselect sys_select
217 #define sleep sys_sleep
218 #define strerror sys_strerror
220 #define unlink sys_unlink
221 /* This prototype is needed because some files include config.h
222 _after_ the standard headers, so sys_unlink gets no prototype from
224 extern int sys_unlink (const char *);
226 #define write sys_write
228 /* Subprocess calls that are emulated. */
229 #define spawnve sys_spawnve
230 #define kill sys_kill
231 #define signal sys_signal
233 /* Internal signals. */
234 #define emacs_raise(sig) emacs_abort()
236 /* termcap.c calls that are emulated. */
237 #define tputs sys_tputs
238 #define tgetstr sys_tgetstr
240 /* cm.c calls that are emulated. */
241 #define chcheckmagic sys_chcheckmagic
242 #define cmcostinit sys_cmcostinit
243 #define cmgoto sys_cmgoto
244 #define cmputc sys_cmputc
245 #define Wcm_clear sys_Wcm_clear
249 /* Map to MSVC names. */
250 #define execlp _execlp
251 #define execvp _execvp
252 #define fdatasync _commit
253 #define fdopen _fdopen
254 #define fsync _commit
255 #define ftruncate _chsize
256 #define getpid _getpid
259 #define snprintf _snprintf
260 #define strtoll _strtoi64
261 #define copysign _copysign
263 #define isatty _isatty
264 #define _longjmp longjmp
267 #define pclose _pclose
269 #define strdup _strdup
270 #define strupr _strupr
271 #define strnicmp _strnicmp
272 #define stricmp _stricmp
275 /* We cannot include system header process.h, since there's src/process.h. */
278 /* Include time.h before redirecting tzname, since MSVC's time.h
279 defines _tzname to call a function, but also declares tzname a
280 2-element array. Having the redirection before including the
281 header thus has the effect of declaring a function that returns an
282 array, and triggers an error message. */
284 #define tzname _tzname
286 /* 'struct timespec' is used by time-related functions in lib/ and
287 elsewhere, but we don't use lib/time.h where the structure is
289 /* MinGW64 defines 'struct timespec' and _TIMESPEC_DEFINED in sys/types.h. */
290 #ifndef _TIMESPEC_DEFINED
293 time_t tv_sec
; /* seconds */
294 long int tv_nsec
; /* nanoseconds */
298 /* Required for functions in lib/time_r.c, since we don't use lib/time.h. */
299 extern struct tm
*gmtime_r (time_t const * restrict
, struct tm
* restrict
);
300 extern struct tm
*localtime_r (time_t const * restrict
, struct tm
* restrict
);
303 /* This is hacky, but is necessary to avoid warnings about macro
304 redefinitions using the MSVC compilers, since, when __STDC__ is
305 undefined or zero, those compilers declare functions like fileno,
306 lseek, and chdir, for which we defined macros above. */
309 #define MUST_UNDEF__STDC__
314 #ifdef MUST_UNDEF__STDC__
316 #undef MUST_UNDEF__STDC__
318 #else /* !_MSC_VER */
322 #endif /* !_MSC_VER */
324 #define fileno _fileno
327 /* Defines that we need that aren't in the standard signal.h. */
328 #define SIGHUP 1 /* Hang up */
329 #define SIGQUIT 3 /* Quit process */
330 #define SIGTRAP 5 /* Trace trap */
331 #define SIGKILL 9 /* Die, die die */
332 #define SIGPIPE 13 /* Write on pipe with no readers */
333 #define SIGALRM 14 /* Alarm */
334 #define SIGCHLD 18 /* Death of child */
335 #define SIGPROF 19 /* Profiling */
342 #define ENOTSUP ENOSYS
345 /* In case lib/errno.h is not used. */
347 #define EOPNOTSUPP 130
351 typedef int sigset_t
;
355 #ifdef _W64 /* MinGW64 */
357 typedef _sigset_t sigset_t
;
361 typedef void (_CALLBACK_
*signal_handler
) (int);
362 extern signal_handler
sys_signal (int, signal_handler
);
366 void (_CALLBACK_
*sa_handler
)(int);
371 #define SIG_SETMASK 2
372 #define SIG_UNBLOCK 3
374 extern int sigemptyset (sigset_t
*);
375 extern int sigaddset (sigset_t
*, int);
376 extern int sigfillset (sigset_t
*);
377 extern int sigprocmask (int, const sigset_t
*, sigset_t
*);
378 extern int pthread_sigmask (int, const sigset_t
*, sigset_t
*);
379 extern int sigismember (const sigset_t
*, int);
380 extern int setpgrp (int, int);
381 extern int sigaction (int, const struct sigaction
*, struct sigaction
*);
382 extern int alarm (int);
384 extern int sys_kill (int, int);
387 /* For integration with MSDOS support. */
388 #define getdisk() (_getdrive () - 1)
390 #define getdefdir(_drv, _buf) ((_buf[0] = (_drv + 'A' - 1), _buf[1] = ':', _buf[2] = '/', _buf[3] = 0), 1)
392 #define getdefdir(_drv, _buf) _getdcwd (_drv, _buf, MAXPATHLEN)
395 #ifndef EMACS_CONFIGURATION
396 extern char *get_emacs_configuration (void);
397 extern char *get_emacs_configuration_options (void);
398 #define EMACS_CONFIGURATION get_emacs_configuration ()
399 #define EMACS_CONFIG_OPTIONS get_emacs_configuration_options ()
402 /* Define this so that winsock.h definitions don't get included with
403 windows.h. For this to have proper effect, config.h must always be
404 included before windows.h. */
405 #define _WINSOCKAPI_ 1
408 /* Defines size_t and alloca (). */
410 #define malloc e_malloc
412 #define realloc e_realloc
413 #define calloc e_calloc
416 #define alloca _alloca
422 #include <sys/stat.h>
424 /* Define for those source files that do not include enough NT system files. */
429 #define NULL ((void *)0)
433 /* For proper declaration of environ. */
435 #define sys_nerr _sys_nerr
438 /* This must be after including stdlib.h, which defines putenv on MinGW. */
442 #define putenv sys_putenv
443 extern int sys_putenv (char *);
445 extern int getloadavg (double *, int);
446 extern int getpagesize (void);
448 extern void * memrchr (void const *, int, size_t);
450 extern int mkostemp (char *, int);
453 #if defined (__MINGW32__)
455 /* Define to 1 if the system has the type `long long int'. */
456 # ifndef HAVE_LONG_LONG_INT
457 # define HAVE_LONG_LONG_INT 1
460 /* Define to 1 if the system has the type `unsigned long long int'. */
461 # ifndef HAVE_UNSIGNED_LONG_LONG_INT
462 # define HAVE_UNSIGNED_LONG_LONG_INT 1
469 typedef __int64 EMACS_INT
;
470 typedef unsigned __int64 EMACS_UINT
;
471 # define EMACS_INT_MAX LLONG_MAX
472 # define PRIuMAX "llu"
474 /* Fix a bug in MSVC headers : stdint.h */
476 # elif defined(_WIN32)
477 /* Temporarily disable wider-than-pointer integers until they're tested more.
478 Build with CFLAGS='-DWIDE_EMACS_INT' to try them out. */
480 # ifdef WIDE_EMACS_INT
482 /* Use pre-C99-style 64-bit integers. */
483 typedef __int64 EMACS_INT
;
484 typedef unsigned __int64 EMACS_UINT
;
485 # define EMACS_INT_MAX LLONG_MAX
486 # define PRIuMAX "llu"
489 typedef int EMACS_INT
;
490 typedef unsigned int EMACS_UINT
;
491 # define EMACS_INT_MAX LONG_MAX
492 # define PRIuMAX "lu"
498 /* We need a little extra space, see ../../lisp/loadup.el. */
499 #define SYSTEM_PURESIZE_EXTRA 50000
501 #define DATA_START get_data_start ()
503 /* For unexec to work on Alpha systems, we need to put Emacs'
504 initialized data into a separate section from the CRT initialized
505 data (because the Alpha linker freely reorders data variables, even
506 across libraries, so our data and the CRT data get intermingled).
508 Starting with MSVC 5.0, we must also place the uninitialized data
509 into its own section. VC5 intermingles uninitialized data from the CRT
510 between Emacs' static uninitialized data and its public uninitialized
511 data. A separate .bss section for Emacs groups both static and
512 public uninitialized together.
514 Note that unexw32.c relies on this fact, and must be modified
515 accordingly if this section name is changed, or if this pragma is
516 removed. Also, obviously, all files that define initialized data
517 must include config.h to pick up this pragma. */
519 /* Names must be < 8 bytes. */
521 #pragma data_seg("EMDATA")
522 #pragma bss_seg("EMBSS")
525 /* #define FULL_DEBUG */
526 /* #define EMACSDEBUG */
529 extern void _DebPrint (const char *fmt
, ...);
530 #define DebPrint(stuff) _DebPrint stuff
532 #define DebPrint(stuff)
536 #if _MSC_VER >= 800 && !defined(__cplusplus)
537 /* Unnamed type definition in parentheses.
538 A structure, union, or enumerated type with no name is defined in a
539 parenthetical expression. The type definition is meaningless. */
540 #pragma warning(disable:4116)
541 /* 'argument' : conversion from 'type1' to 'type2', possible loss of
542 data A floating point type was converted to an integer type. A
543 possible loss of data may have occurred. */
544 #pragma warning(disable:4244)
545 /* Negative integral constant converted to unsigned type.
546 An expression converts a negative integer constant to an unsigned type.
547 The result of the expression is probably meaningless. */
548 #pragma warning(disable:4308)
553 /* ============================================================ */