nt/inc/ms-w32.h

   1 /* System description file for Windows NT.
   2
   3 Copyright (C) 1993-1995, 2001-2016 Free Software Foundation, Inc.
   4
   5 This file is part of GNU Emacs.
   6
   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 (at
  10 your option) any later version.
  11
  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.
  16
  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/>.  */
  19
  20 /* Define symbols to identify the version of Unix this is.
  21    Define all the symbols that apply correctly.  */
  22
  23 #ifndef WINDOWSNT
  24 #define WINDOWSNT
  25 #endif
  26
  27 #include <mingw_time.h>
  28
  29 /* MinGW-w64 gcc does not automotically define a macro for
  30    differentiating it fom MinGW gcc. We need to test the presence of
  31    __MINGW64_VERSION_MAJOR in _mingw.h: */
  32 #ifdef __MINGW32__
  33 # include <_mingw.h>
  34 # ifdef __MINGW64_VERSION_MAJOR
  35 #  define MINGW_W64
  36 # endif
  37 #endif
  38
  39 /* #undef const */
  40
  41 /* Number of chars of output in the buffer of a stdio stream. */
  42 #ifdef __GNU_LIBRARY__
  43 #define PENDING_OUTPUT_COUNT(FILE) ((FILE)->__bufp - (FILE)->__buffer)
  44 #else
  45 #define PENDING_OUTPUT_COUNT(FILE) ((FILE)->_ptr - (FILE)->_base)
  46 #endif
  47
  48 /* If you are compiling with a non-C calling convention but need to
  49    declare vararg routines differently, put it here.  */
  50 #define _VARARGS_ __cdecl
  51
  52 /* If you are providing a function to something that will call the
  53    function back (like a signal handler and signal, or main) its calling
  54    convention must be whatever standard the libraries expect.  */
  55 #define _CALLBACK_ __cdecl
  56
  57 /* Define HAVE_TIMEVAL if the system supports the BSD style clock values.
  58    Look in <sys/time.h> for a timeval structure.  */
  59 #define HAVE_TIMEVAL 1
  60
  61 /* And the select implementation does 1-byte read-ahead waiting
  62    for received packets, so datagrams are broken too.  */
  63 #define BROKEN_DATAGRAM_SOCKETS 1
  64
  65 #define MAIL_USE_SYSTEM_LOCK 1
  66
  67 /* Define to 1 if GCC-style __attribute__ ((__aligned__ (expr))) works. */
  68 #ifdef __GNUC__
  69 #define HAVE_ATTRIBUTE_ALIGNED 1
  70 #endif
  71
  72 /* Define to 1 if strtold conforms to C99. */
  73 #ifdef __GNUC__
  74 #define HAVE_C99_STRTOLD 1
  75 #endif
  76
  77 #if (__GNUC__ > 2 || (__GNUC__ == 2 && __GNUC_MINOR__ >= 8))
  78 # ifndef HAVE___BUILTIN_UNWIND_INIT
  79 #  define HAVE___BUILTIN_UNWIND_INIT 1
  80 # endif
  81 #endif
  82
  83 /* This isn't perfect, as some systems might have the page file in
  84    another place.  Also, I suspect that the time stamp of that file
  85    might also change when Windows enlarges the file due to
  86    insufficient VM.  Still, this seems to be the most reliable way;
  87    the alternative (of using GetSystemTimes) won't work on laptops
  88    that hibernate, because the system clock is stopped then.  Other
  89    possibility would be to run "net statistics workstation" and parse
  90    the output, but that's gross.  So this should do; if the file is
  91    not there, the boot time will be returned as zero, and filelock.c
  92    already handles that.  */
  93 #define BOOT_TIME_FILE "C:/pagefile.sys"
  94
  95 /* ============================================================ */
  96
  97 /* Here, add any special hacks needed to make Emacs work on this
  98    system.  For example, you might define certain system call names
  99    that don't exist on your system, or that do different things on
 100    your system and must be used only through an encapsulation (which
 101    you should place, by convention, in sysdep.c).  */
 102
 103 #ifdef __GNUC__
 104 #ifndef __cplusplus
 105 #undef inline
 106 #endif
 107 #else  /* MSVC */
 108 #define inline __inline
 109 #endif
 110
 111 #ifdef __GNUC__
 112 /* config.h may have defined already.  */
 113 # ifndef restrict
 114 #  define restrict __restrict__
 115 # endif
 116 #else
 117   /* FIXME: should we define to __restrict, which MSVC supports? */
 118 # define restrict
 119 #endif
 120
 121 /* `mode_t' is not defined for MSVC. Define. */
 122 #ifdef _MSC_VER
 123 typedef unsigned short mode_t;
 124 #endif
 125
 126 /* A va_copy replacement for MSVC.  */
 127 #ifdef _MSC_VER
 128 # ifdef _WIN64
 129 #  ifndef va_copy               /* Need to be checked (?) */
 130 #   define va_copy(d,s) ((d) = (s))
 131 #  endif
 132 # else  /* not _WIN64 */
 133 #  define va_copy(d,s) ((d) = (s))
 134 # endif  /* not _WIN64 */
 135 #endif   /* _MSC_VER */
 136
 137 #ifndef WINDOWSNT
 138 /* Some of the files of Emacs which are intended for use with other
 139    programs assume that if you have a config.h file, you must declare
 140    the type of getenv.  */
 141 extern char *getenv ();
 142 #endif
 143
 144 /* Prevent accidental use of features unavailable in older Windows
 145    versions we still support.  MinGW64 defines this to a higher value
 146    in its system headers, and is not really compatible with values
 147    lower than 0x0500, so leave it alone.  */
 148 #ifndef MINGW_W64
 149 # define _WIN32_WINNT 0x0400
 150 #endif
 151
 152 /* Make a leaner executable.  */
 153 #define WIN32_LEAN_AND_MEAN 1
 154
 155 #include <sys/types.h>
 156
 157 #ifndef MAXPATHLEN
 158 #define MAXPATHLEN      _MAX_PATH
 159 #endif
 160
 161 /* This is used to hold UTF-8 encoded file names.  */
 162 #define MAX_UTF8_PATH   (MAXPATHLEN * 4)
 163
 164 #ifdef HAVE_NTGUI
 165 # ifndef HAVE_WINDOW_SYSTEM
 166 #  define HAVE_WINDOW_SYSTEM 1
 167 #  define POLL_FOR_INPUT 1
 168 # endif
 169 #endif
 170
 171 /* Get some redefinitions in place.  */
 172
 173 #ifdef emacs
 174
 175 #ifdef MINGW_W64
 176 /* MinGW64 specific stuff.  */
 177 /* Make sure 'struct timespec' and 'struct timezone' are defined.  */
 178 #include <sys/types.h>
 179 #include <time.h>
 180 /* This prototype avoids MinGW64 compiler warnings due to the fact
 181    that time.h is included before localtime is redirected to
 182    sys_localtime below.  */
 183 extern struct tm * sys_localtime (const time_t *);
 184 /* MinGW64 uses a 2-argument _setjmp, and setjmp is a macro defined to
 185    supply the 2nd arg correctly, so don't use _setjmp directly in that
 186    case.  */
 187 #undef HAVE__SETJMP
 188
 189 /* Unlike MS and mingw.org, MinGW64 doesn't define gai_strerror as an
 190    inline function in a system header file, and instead seems to
 191    require to link against ws2_32.a.  But we don't want to link with
 192    -lws2_32, as that would make Emacs dependent on the respective DLL.
 193    So MinGW64 is amply punished here by the following:  */
 194 #undef HAVE_GAI_STRERROR
 195 #endif
 196
 197 /* The following is needed for recovery from C stack overflows.  */
 198 #include <setjmp.h>
 199 typedef jmp_buf sigjmp_buf;
 200 #ifdef MINGW_W64
 201 /* Evidently, MinGW64's longjmp crashes when invoked from an exception
 202    handler, see https://sourceforge.net/p/mingw-w64/mailman/message/32421953/.
 203    This seems to be an unsolved problem in the MinGW64 runtime.  So we
 204    use the GCC intrinsics instead.  FIXME.  */
 205 #define sigsetjmp(j,m) __builtin_setjmp(j)
 206 #else
 207 #define sigsetjmp(j,m) setjmp(j)
 208 #endif
 209 extern void w32_reset_stack_overflow_guard (void);
 210
 211 #ifdef _MSC_VER
 212 #include <sys/timeb.h>
 213 #include <sys/stat.h>
 214 #include <signal.h>
 215
 216 /* MSVC gets link-time errors without these redirections.  */
 217 #define fstat(a, b) sys_fstat(a, b)
 218 #define stat(a, b)  sys_stat(a, b)
 219 #define utime       sys_utime
 220 #endif
 221
 222 /* Calls that are emulated or shadowed.  */
 223 #undef chdir
 224 #define chdir   sys_chdir
 225 #undef chmod
 226 #define chmod   sys_chmod
 227 #undef close
 228 #define close   sys_close
 229 #undef creat
 230 #define creat   sys_creat
 231 #define ctime   sys_ctime
 232 #undef dup
 233 #define dup     sys_dup
 234 #undef dup2
 235 #define dup2    sys_dup2
 236 #define fopen   sys_fopen
 237 #define link    sys_link
 238 #define localtime sys_localtime
 239 #define mkdir   sys_mkdir
 240 #undef open
 241 #define open    sys_open
 242 #undef read
 243 #define read    sys_read
 244 #define rename  sys_rename
 245 #define rmdir   sys_rmdir
 246 #define select  sys_select
 247 #define pselect sys_select
 248 #define sleep   sys_sleep
 249 #define strerror sys_strerror
 250 #undef unlink
 251 #define unlink  sys_unlink
 252 #undef opendir
 253 #define opendir sys_opendir
 254 #undef closedir
 255 #define closedir sys_closedir
 256 #undef readdir
 257 #define readdir sys_readdir
 258 #undef seekdir
 259 #define seekdir sys_seekdir
 260 /* This prototype is needed because some files include config.h
 261    _after_ the standard headers, so sys_unlink gets no prototype from
 262    stdio.h or io.h.  */
 263 extern int sys_unlink (const char *);
 264 #undef write
 265 #define write   sys_write
 266 #undef umask
 267 #define umask   sys_umask
 268 extern int sys_umask (int);
 269
 270 /* Subprocess calls that are emulated.  */
 271 #define spawnve sys_spawnve
 272 #define kill    sys_kill
 273 #define signal  sys_signal
 274
 275 /* Internal signals.  */
 276 #define emacs_raise(sig) emacs_abort()
 277
 278 /* termcap.c calls that are emulated.  */
 279 #define tputs   sys_tputs
 280 #define tgetstr sys_tgetstr
 281
 282 /* cm.c calls that are emulated.  */
 283 #define chcheckmagic sys_chcheckmagic
 284 #define cmcostinit   sys_cmcostinit
 285 #define cmgoto       sys_cmgoto
 286 #define cmputc       sys_cmputc
 287 #define Wcm_clear    sys_Wcm_clear
 288
 289 #endif /* emacs */
 290
 291 /* Map to MSVC names.  */
 292 #define execlp    _execlp
 293 #define execvp    _execvp
 294 #include <stdint.h>             /* for intptr_t */
 295 extern intptr_t _execvp (const char *, char **);
 296 #ifdef MINGW_W64
 297 /* GCC 6 has a builtin execve with the prototype shown below.  MinGW64
 298    changed the prototype in its process.h to match that, although the
 299    library function still calls _execve, which still returns intptr_t.
 300    However, using the prototype with intptr_t causes GCC to emit
 301    warnings.  Fortunately, execve is not used in the MinGW build, but
 302    the code that references it is still compiled.  */
 303 extern int execve (const char *, char * const *, char * const *);
 304 #else
 305 extern intptr_t execve (const char *, char * const *, char * const *);
 306 #endif
 307 #define fdatasync _commit
 308 #define fdopen    _fdopen
 309 #define fsync     _commit
 310 #define ftruncate _chsize
 311 #define getpid    _getpid
 312 #ifdef _MSC_VER
 313 typedef int pid_t;
 314 #define snprintf  _snprintf
 315 #define strtoll   _strtoi64
 316 #define copysign  _copysign
 317 #endif
 318 #define isatty    _isatty
 319 #define _longjmp  longjmp
 320 /* MinGW64 defines lseek to invoke lseek64.  */
 321 #ifndef lseek
 322 #define lseek     _lseek
 323 #endif
 324 #define popen     _popen
 325 #define pclose    _pclose
 326 #define strdup    _strdup
 327 #define strupr    _strupr
 328 #define strnicmp  _strnicmp
 329 #define stricmp   _stricmp
 330 #define tzset     _tzset
 331
 332 /* We cannot include system header process.h, since there's src/process.h.  */
 333 int _getpid (void);
 334
 335 /* Include time.h before redirecting tzname, since MSVC's time.h
 336    defines _tzname to call a function, but also declares tzname a
 337    2-element array.  Having the redirection before including the
 338    header thus has the effect of declaring a function that returns an
 339    array, and triggers an error message.  */
 340 #include <time.h>
 341 #define tzname    _tzname
 342
 343 /* Required for functions in lib/time_r.c, since we don't use lib/time.h.  */
 344 extern struct tm *gmtime_r (time_t const * restrict, struct tm * restrict);
 345 extern struct tm *localtime_r (time_t const * restrict, struct tm * restrict);
 346
 347 #ifdef _MSC_VER
 348 /* This is hacky, but is necessary to avoid warnings about macro
 349    redefinitions using the MSVC compilers, since, when __STDC__ is
 350    undefined or zero, those compilers declare functions like fileno,
 351    lseek, and chdir, for which we defined macros above.  */
 352 #ifndef __STDC__
 353 #define __STDC__ 1
 354 #define MUST_UNDEF__STDC__
 355 #endif
 356 #include <direct.h>
 357 #include <io.h>
 358 #include <stdio.h>
 359 #ifdef MUST_UNDEF__STDC__
 360 #undef __STDC__
 361 #undef MUST_UNDEF__STDC__
 362 #endif
 363 #else  /* !_MSC_VER */
 364 #include <direct.h>
 365 #include <io.h>
 366 #include <stdio.h>
 367 #endif  /* !_MSC_VER */
 368 #ifndef fileno
 369 #define fileno    _fileno
 370 #endif
 371
 372 /* Defines that we need that aren't in the standard signal.h.  */
 373 #define SIGHUP  1               /* Hang up */
 374 #define SIGQUIT 3               /* Quit process */
 375 #define SIGTRAP 5               /* Trace trap */
 376 #define SIGKILL 9               /* Die, die die */
 377 #define SIGPIPE 13              /* Write on pipe with no readers */
 378 #define SIGALRM 14              /* Alarm */
 379 #define SIGCHLD 18              /* Death of child */
 380 #define SIGPROF 19              /* Profiling */
 381
 382 #ifndef NSIG
 383 #define NSIG 23
 384 #endif
 385
 386 #ifndef ENOTSUP
 387 #define ENOTSUP ENOSYS
 388 #endif
 389
 390 /* In case lib/errno.h is not used.  */
 391 #ifndef EOPNOTSUPP
 392 #define EOPNOTSUPP 130
 393 #endif
 394
 395 #ifdef _MSC_VER
 396 typedef int sigset_t;
 397 typedef int ssize_t;
 398 #endif
 399
 400 #ifdef MINGW_W64
 401 #ifndef _POSIX
 402 typedef _sigset_t sigset_t;
 403 #endif
 404 #endif
 405
 406 typedef void (_CALLBACK_ *signal_handler) (int);
 407 extern signal_handler sys_signal (int, signal_handler);
 408
 409 struct sigaction {
 410   int sa_flags;
 411   void (_CALLBACK_ *sa_handler)(int);
 412   sigset_t sa_mask;
 413 };
 414 #define SA_RESTART      0
 415 #define SIG_BLOCK       1
 416 #define SIG_SETMASK     2
 417 #define SIG_UNBLOCK     3
 418
 419 extern int sigemptyset (sigset_t *);
 420 extern int sigaddset (sigset_t *, int);
 421 extern int sigfillset (sigset_t *);
 422 extern int sigprocmask (int, const sigset_t *, sigset_t *);
 423 /* MinGW64 defines pthread_sigmask as zero in its pthread_signal.h
 424    header, but we have an implementation for that function in w32proc.c.  */
 425 #ifdef pthread_sigmask
 426 #undef pthread_sigmask
 427 #endif
 428 extern int pthread_sigmask (int, const sigset_t *, sigset_t *);
 429 extern int sigismember (const sigset_t *, int);
 430 extern int setpgrp (int, int);
 431 extern int sigaction (int, const struct sigaction *, struct sigaction *);
 432 extern int alarm (int);
 433
 434 extern int sys_kill (pid_t, int);
 435
 436
 437 /* For integration with MSDOS support.  */
 438 #define getdisk()               (_getdrive () - 1)
 439 #ifdef emacs
 440 #define getdefdir(_drv, _buf)   ((_buf[0] = (_drv + 'A' - 1), _buf[1] = ':', _buf[2] = '/', _buf[3] = 0), 1)
 441 #else
 442 #define getdefdir(_drv, _buf)   _getdcwd (_drv, _buf, MAXPATHLEN)
 443 #endif
 444
 445 #ifndef EMACS_CONFIGURATION
 446 extern char *get_emacs_configuration (void);
 447 extern char *get_emacs_configuration_options (void);
 448 #define EMACS_CONFIGURATION     get_emacs_configuration ()
 449 #define EMACS_CONFIG_OPTIONS    get_emacs_configuration_options ()
 450 #endif
 451
 452 /* Define this so that winsock.h definitions don't get included with
 453    windows.h.  For this to have proper effect, config.h must always be
 454    included before windows.h.  */
 455 #define _WINSOCKAPI_    1
 456 #define _WINSOCK_H
 457
 458 /* Defines size_t and alloca ().  */
 459 #include <stdlib.h>
 460 #include <sys/stat.h>
 461 #ifdef _MSC_VER
 462 #define alloca _alloca
 463 #else
 464 #include <malloc.h>
 465 #endif
 466
 467 #ifdef emacs
 468
 469 typedef void * (* malloc_fn)(size_t);
 470 typedef void * (* realloc_fn)(void *, size_t);
 471 typedef void (* free_fn)(void *);
 472
 473 extern void *malloc_before_dump(size_t);
 474 extern void *realloc_before_dump(void *, size_t);
 475 extern void free_before_dump(void *);
 476 extern void *malloc_after_dump(size_t);
 477 extern void *realloc_after_dump(void *, size_t);
 478 extern void free_after_dump(void *);
 479
 480 extern void *malloc_after_dump_9x(size_t);
 481 extern void *realloc_after_dump_9x(void *, size_t);
 482 extern void free_after_dump_9x(void *);
 483
 484 extern malloc_fn the_malloc_fn;
 485 extern realloc_fn the_realloc_fn;
 486 extern free_fn the_free_fn;
 487
 488 #define malloc(size) (*the_malloc_fn)(size)
 489 #define free(ptr)   (*the_free_fn)(ptr)
 490 #define realloc(ptr, size) (*the_realloc_fn)(ptr, size)
 491
 492 #endif
 493
 494 /* Define for those source files that do not include enough NT system files.  */
 495 #ifndef NULL
 496 #ifdef __cplusplus
 497 #define NULL    0
 498 #else
 499 #define NULL    ((void *)0)
 500 #endif
 501 #endif
 502
 503 /* For proper declaration of environ.  */
 504 #ifndef sys_nerr
 505 #define sys_nerr _sys_nerr
 506 #endif
 507
 508 /* This must be after including stdlib.h, which defines putenv on MinGW.  */
 509 #ifdef putenv
 510 # undef putenv
 511 #endif
 512 #define putenv    sys_putenv
 513 extern int sys_putenv (char *);
 514
 515 extern int getloadavg (double *, int);
 516 extern int getpagesize (void);
 517
 518 extern void * memrchr (void const *, int, size_t);
 519
 520 extern int mkostemp (char *, int);
 521
 522
 523 #if defined (__MINGW32__)
 524
 525 /* Define to 1 if the system has the type `long long int'. */
 526 # ifndef HAVE_LONG_LONG_INT
 527 #  define HAVE_LONG_LONG_INT 1
 528 # endif
 529
 530 /* Define to 1 if the system has the type `unsigned long long int'. */
 531 # ifndef HAVE_UNSIGNED_LONG_LONG_INT
 532 #  define HAVE_UNSIGNED_LONG_LONG_INT 1
 533 # endif
 534
 535 #endif
 536
 537 #ifdef _MSC_VER
 538 # if defined(_WIN64)
 539 typedef __int64 EMACS_INT;
 540 typedef unsigned __int64 EMACS_UINT;
 541 #  define EMACS_INT_MAX           LLONG_MAX
 542 #  define PRIuMAX                 "llu"
 543 #  define pI                      "ll"
 544 /* Fix a bug in MSVC headers : stdint.h */
 545 #  define _INTPTR 2
 546 # elif defined(_WIN32)
 547 /* Temporarily disable wider-than-pointer integers until they're tested more.
 548    Build with CFLAGS='-DWIDE_EMACS_INT' to try them out.  */
 549
 550 #  ifdef WIDE_EMACS_INT
 551
 552 /* Use pre-C99-style 64-bit integers.  */
 553 typedef __int64 EMACS_INT;
 554 typedef unsigned __int64 EMACS_UINT;
 555 #   define EMACS_INT_MAX           LLONG_MAX
 556 #   define PRIuMAX                 "llu"
 557 #   define pI                     "I64"
 558 #  else
 559 typedef int EMACS_INT;
 560 typedef unsigned int EMACS_UINT;
 561 #   define EMACS_INT_MAX           LONG_MAX
 562 #   define PRIuMAX                 "lu"
 563 #   define pI                     "l"
 564 #  endif
 565 # endif
 566 #endif
 567
 568 /* We need a little extra space, see ../../lisp/loadup.el.  */
 569 #define SYSTEM_PURESIZE_EXTRA 50000
 570
 571 #define DATA_START      get_data_start ()
 572
 573 /* For unexec to work on Alpha systems, we need to put Emacs'
 574    initialized data into a separate section from the CRT initialized
 575    data (because the Alpha linker freely reorders data variables, even
 576    across libraries, so our data and the CRT data get intermingled).
 577
 578    Starting with MSVC 5.0, we must also place the uninitialized data
 579    into its own section.  VC5 intermingles uninitialized data from the CRT
 580    between Emacs' static uninitialized data and its public uninitialized
 581    data.  A separate .bss section for Emacs groups both static and
 582    public uninitialized together.
 583
 584    Note that unexw32.c relies on this fact, and must be modified
 585    accordingly if this section name is changed, or if this pragma is
 586    removed.  Also, obviously, all files that define initialized data
 587    must include config.h to pick up this pragma.  */
 588
 589 /* Names must be < 8 bytes.  */
 590 #ifdef _MSC_VER
 591 #pragma data_seg("EMDATA")
 592 #pragma bss_seg("EMBSS")
 593 #endif
 594
 595 /* #define FULL_DEBUG */
 596 /* #define EMACSDEBUG */
 597
 598 #ifdef EMACSDEBUG
 599 extern void _DebPrint (const char *fmt, ...);
 600 #define DebPrint(stuff) _DebPrint stuff
 601 #else
 602 #define DebPrint(stuff)
 603 #endif
 604
 605 #ifdef _MSC_VER
 606 #if _MSC_VER >= 800 && !defined(__cplusplus)
 607 /* Unnamed type definition in parentheses.
 608    A structure, union, or enumerated type with no name is defined in a
 609    parenthetical expression.  The type definition is meaningless.  */
 610 #pragma warning(disable:4116)
 611 /* 'argument' : conversion from 'type1' to 'type2', possible loss of
 612    data A floating point type was converted to an integer type.  A
 613    possible loss of data may have occurred.  */
 614 #pragma warning(disable:4244)
 615 /* Negative integral constant converted to unsigned type.
 616    An expression converts a negative integer constant to an unsigned type.
 617    The result of the expression is probably meaningless.  */
 618 #pragma warning(disable:4308)
 619 #endif
 620 #endif
 621
 622 /* Event name for when emacsclient starts the Emacs daemon on Windows.  */
 623 #define W32_DAEMON_EVENT "EmacsServerEvent"
 624
 625 /* ============================================================ */