Mercurial > hg > xemacs-beta
view src/s/windowsnt.h @ 853:2b6fa2618f76
[xemacs-hg @ 2002-05-28 08:44:22 by ben]
merge my stderr-proc ws
make-docfile.c: Fix places where we forget to check for EOF.
code-init.el: Don't use CRLF conversion by default on process output. CMD.EXE and
friends work both ways but Cygwin programs don't like the CRs.
code-process.el, multicast.el, process.el: Removed.
Improvements to call-process-internal:
-- allows a buffer to be specified for input and stderr output
-- use it on all systems
-- implement C-g as documented
-- clean up and comment
call-process-region uses new call-process facilities; no temp file.
remove duplicate funs in process.el.
comment exactly how coding systems work and fix various problems.
open-multicast-group now does similar coding-system frobbing to
open-network-stream.
dumped-lisp.el, faces.el, msw-faces.el: Fix some hidden errors due to code not being defined at the right time.
xemacs.mak: Add -DSTRICT.
================================================================
ALLOW SEPARATION OF STDOUT AND STDERR IN PROCESSES
================================================================
Standard output and standard error can be processed separately in
a process. Each can have its own buffer, its own mark in that buffer,
and its filter function. You can specify a separate buffer for stderr
in `start-process' to get things started, or use the new primitives:
set-process-stderr-buffer
process-stderr-buffer
process-stderr-mark
set-process-stderr-filter
process-stderr-filter
Also, process-send-region takes a 4th optional arg, a buffer.
Currently always uses a pipe() under Unix to read the error output.
(#### Would a PTY be better?)
sysdep.h, sysproc.h, unexfreebsd.c, unexsunos4.c, nt.c, emacs.c, callproc.c, symsinit.h, sysdep.c, Makefile.in.in, process-unix.c: Delete callproc.c. Move child_setup() to process-unix.c.
wait_for_termination() now only needed on a few really old systems.
console-msw.h, event-Xt.c, event-msw.c, event-stream.c, event-tty.c, event-unixoid.c, events.h, process-nt.c, process-unix.c, process.c, process.h, procimpl.h: Rewrite the process methods to handle a separate channel for
error input. Create Lstreams for reading in the error channel.
Many process methods need change. In general the changes are
fairly clear as they involve duplicating what's used for reading
the normal stdout and changing for stderr -- although tedious,
as such changes are required throughout the entire process code.
Rewrote the code that reads process output to do two loops, one
for stdout and one for stderr.
gpmevent.c, tooltalk.c: set_process_filter takes an argument for stderr.
================================================================
NEW ERROR-TRAPPING MECHANISM
================================================================
Totally rewrite error trapping code to be unified and support more
features. Basic function is call_trapping_problems(), which lets
you specify, by means of flags, what sorts of problems you want
trapped. these can include
-- quit
-- errors
-- throws past the function
-- creation of "display objects" (e.g. buffers)
-- deletion of already-existing "display objects" (e.g. buffers)
-- modification of already-existing buffers
-- entering the debugger
-- gc
-- errors->warnings (ala suspended errors)
etc. All other error funs rewritten in terms of this one.
Various older mechanisms removed or rewritten.
window.c, insdel.c, console.c, buffer.c, device.c, frame.c: When creating a display object, added call to
note_object_created(), for use with trapping_problems mechanism.
When deleting, call check_allowed_operation() and note_object
deleted().
The trapping-problems code records the objects created since the
call-trapping-problems began. Those objects can be deleted, but
none others (i.e. previously existing ones).
bytecode.c, cmdloop.c: internal_catch takes another arg.
eval.c: Add long comments describing the "five lists" used to maintain
state (backtrace, gcpro, specbind, etc.) in the Lisp engine.
backtrace.h, eval.c: Implement trapping-problems mechanism, eliminate old mechanisms or
redo in terms of new one.
frame.c, gutter.c: Flush out the concept of "critical display section", defined by
the in_display() var. Use an internal_bind() to get it reset,
rather than just doing it at end, because there may be a non-local
exit.
event-msw.c, event-stream.c, console-msw.h, device.c, dialog-msw.c, frame.c, frame.h, intl.c, toolbar.c, menubar-msw.c, redisplay.c, alloc.c, menubar-x.c: Make use of new trapping-errors stuff and rewrite code based on
old mechanisms.
glyphs-widget.c, redisplay.h: Protect calling Lisp in redisplay.
insdel.c: Protect hooks against deleting existing buffers.
frame-msw.c: Use EQ, not EQUAL in hash tables whose keys are just numbers.
Otherwise we run into stickiness in redisplay because
internal_equal() can QUIT.
================================================================
SIGNAL, C-G CHANGES
================================================================
Here we change the way that C-g interacts with event reading. The
idea is that a C-g occurring while we're reading a user event
should be read as C-g, but elsewhere should be a QUIT. The former
code did all sorts of bizarreness -- requiring that no QUIT occurs
anywhere in event-reading code (impossible to enforce given the
stuff called or Lisp code invoked), and having some weird system
involving enqueue/dequeue of a C-g and interaction with Vquit_flag
-- and it didn't work.
Now, we simply enclose all code where we want C-g read as an event
with {begin/end}_dont_check_for_quit(). This completely turns off
the mechanism that checks (and may remove or alter) C-g in the
read-ahead queues, so we just get the C-g normal.
Signal.c documents this very carefully.
cmdloop.c: Correct use of dont_check_for_quit to new scheme, remove old
out-of-date comments.
event-stream.c: Fix C-g handling to actually work.
device-x.c: Disable quit checking when err out.
signal.c: Cleanup. Add large descriptive comment.
process-unix.c, process-nt.c, sysdep.c: Use QUIT instead of REALLY_QUIT.
It's not necessary to use REALLY_QUIT and just confuses the issue.
lisp.h: Comment quit handlers.
================================================================
CONS CHANGES
================================================================
free_cons() now takes a Lisp_Object not the result of XCONS().
car and cdr have been renamed so that they don't get used directly;
go through XCAR(), XCDR() instead.
alloc.c, dired.c, editfns.c, emodules.c, fns.c, glyphs-msw.c, glyphs-x.c, glyphs.c, keymap.c, minibuf.c, search.c, eval.c, lread.c, lisp.h: Correct free_cons calling convention: now takes Lisp_Object,
not Lisp_Cons
chartab.c: Eliminate direct use of ->car, ->cdr, should be black box.
callint.c: Rewrote using EXTERNAL_LIST_LOOP to avoid use of Lisp_Cons.
================================================================
USE INTERNAL-BIND-*
================================================================
eval.c: Cleanups of these funs.
alloc.c, fileio.c, undo.c, specifier.c, text.c, profile.c, lread.c, redisplay.c, menubar-x.c, macros.c: Rewrote to use internal_bind_int() and internal_bind_lisp_object()
in place of whatever varied and cumbersome mechanisms were
formerly there.
================================================================
SPECBIND SANITY
================================================================
backtrace.h: - Improved comments
backtrace.h, bytecode.c, eval.c: Add new mechanism check_specbind_stack_sanity() for sanity
checking code each time the catchlist or specbind stack change.
Removed older prototype of same mechanism.
================================================================
MISC
================================================================
lisp.h, insdel.c, window.c, device.c, console.c, buffer.c: Fleshed out authorship.
device-msw.c: Correct bad Unicode-ization.
print.c: Be more careful when not initialized or in fatal error handling.
search.c: Eliminate running_asynch_code, an FSF holdover.
alloc.c: Added comments about gc-cons-threshold.
dialog-x.c: Use begin_gc_forbidden() around code to build up a widget value
tree, like in menubar-x.c.
gui.c: Use Qunbound not Qnil as the default for
gethash.
lisp-disunion.h, lisp-union.h: Added warnings on use of VOID_TO_LISP().
lisp.h: Use ERROR_CHECK_STRUCTURES to turn on
ERROR_CHECK_TRAPPING_PROBLEMS and ERROR_CHECK_TYPECHECK
lisp.h: Add assert_with_message.
lisp.h: Add macros for gcproing entire arrays. (You could do this before
but it required manual twiddling the gcpro structure.)
lisp.h: Add prototypes for new functions defined elsewhere.
| author | ben |
|---|---|
| date | Tue, 28 May 2002 08:45:36 +0000 |
| parents | 28426972f654 |
| children | 79c6ff3eef26 |
line wrap: on
line source
/* System description file for Windows 9x and NT. Copyright (C) 1993, 1994, 1995 Free Software Foundation, Inc. Copyright (C) 2001, 2002 Ben Wing. This file is part of XEmacs. XEmacs is free software; you can redistribute it and/or modify it under the terms of the GNU General Public License as published by the Free Software Foundation; either version 2, or (at your option) any later version. XEmacs is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for more details. You should have received a copy of the GNU General Public License along with XEmacs; see the file COPYING. If not, write to the Free Software Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. */ /* Synched up with: FSF 19.31. */ /* Capsule summary of different preprocessor flags: 1. Keep in mind that there are two possible OS environments we are dealing with -- Cygwin and Native Windows. MS Windows natively provides file-system, process, and window-system services through the Win32 API, implemented by various DLL's. (The most important and KERNEL32, USER32, and GDI32. KERNEL32 implements the basic file-system and process services. USER32 implements the fundamental window-system services such as creating windows and handling messages. GDI32 implements higher-level drawing capabilities -- fonts, colors, lines, etc.) The C library is implemented on top of Win32 using either MSVCRT (dynamically linked) or LIBC.LIB (statically linked). Cygwin provides a POSIX emulation layer on top of MS Windows -- in particular, providing the file-system, process, tty, and signal semantics that are part of a modern, standard Unix operating system. Cygwin does this using its own DLL, cygwin1.dll, which makes calls to the Win32 API services in kernel32.dll. Cygwin also provides its own implementation of the C library, called `newlib' (libcygwin.a; libc.a and libm.a are symlinked to it), which is implemented on top of the Unix system calls provided in cygwin1.dll. In addition, Cygwin provides static import libraries that give you direct access to the Win32 API -- XEmacs uses this to provide GUI support under Cygwin. The two environments also use different compilers -- Native Windows uses Visual C++, and Cygwin uses GCC. (MINGW, however, is a way of using GCC to target the Native Windows environment. This works similarly to building with Cygwin, but the resulting executable does not use the Cygwin DLL. Instead, MINGW provides import libraries for the standard C library DLL's (specifically CRTDLL -- #### how does this differ from MSVCRT and LIBC.LIB?).) 2. There are two windowing environments we can target XEmacs for when running under MS Windows -- Windows native, and X. (It may seem strange to write an X application under Windows, but there are in fact many X servers out there running on Windows, and as far as I know there is no real (or at least, that works well) networking Window-system extension under MS Windows. Furthermore, if you're porting a Unix application to Windows and use Cygwin to assist you, it might seem natural to use an X server to avoid having to port all the code to Windows.) For XEmacs, there are various reasons people could come up with for why we would want to keep maintaining X Windows under MS Windows support. That gives us four possible build environments. I (Ben) build regularly on fully-native-everything, Andy builds on Cygwin + MS Windows + X Windows for windowing. The build flags used for these divisions are: CYGWIN -- for Cygwin-only stuff. WIN32_NATIVE -- Win32 native OS-level stuff (files, process, etc.). Applies whenever linking against the native C libraries -- i.e. all compilations with VC++ and with MINGW, but never Cygwin. HAVE_X_WINDOWS -- for X Windows (regardless of whether under MS Win) HAVE_MS_WINDOWS -- MS Windows native windowing system (anything related to the appearance of the graphical screen). May or may not apply to any of VC++, MINGW, Cygwin. Finally, there's also the MINGW build environment, which uses GCC \(similar to Cygwin), but native MS Windows libraries rather than a POSIX emulation layer (the Cygwin approach). This environment defines WIN32_NATIVE, but also defines MINGW, which is used mostly because uses its own include files (related to Cygwin), which have a few things messed up. Formerly, we had a whole host of flags. Here's the conversion, for porting code from GNU Emacs and such: WINDOWSNT -> WIN32_NATIVE WIN32 -> WIN32_NATIVE _WIN32 -> WIN32_NATIVE HAVE_WIN32 -> WIN32_NATIVE DOS_NT -> WIN32_NATIVE HAVE_NTGUI -> WIN32_NATIVE, unless it ends up already bracketed by this HAVE_FACES -> always true MSDOS -> determine whether this code is really specific to MS-DOS (and not Windows -- e.g. DJGPP code); if so, delete the code; otherwise, convert to WIN32_NATIVE (we do not support MS-DOS w/DOS Extender under XEmacs) __CYGWIN__ -> CYGWIN __CYGWIN32__ -> CYGWIN __MINGW32__ -> MINGW */ #include "win32-native.h" /* In case non-Microsoft compiler is used, we fake _MSC_VER */ #ifndef _MSC_VER #define _MSC_VER 1 #endif /* Stuff from old nt/config.h: */ #define NTHEAP_PROBE_BASE 1 #define LISP_FLOAT_TYPE #ifdef HAVE_X_WINDOWS #define HAVE_XREGISTERIMINSTANTIATECALLBACK #define THIS_IS_X11R6 #define HAVE_XMU #define HAVE_XLOCALE_H #define HAVE_X11_LOCALE_H #define GETTIMEOFDAY_ONE_ARGUMENT #define LWLIB_USES_ATHENA #define LWLIB_MENUBARS_LUCID #define LWLIB_SCROLLBARS_LUCID #define LWLIB_DIALOGS_ATHENA #define LWLIB_TABS_LUCID #define LWLIB_WIDGETS_ATHENA /* These are what gets defined under Cygwin */ #define _BSD_SOURCE 1 #define _SVID_SOURCE 1 #define X_LOCALE 1 #define NARROWPROTO 1 #endif /* HAVE_X_WINDOWS */ #define HAVE_LOCALE_H #define STDC_HEADERS #define HAVE_LONG_FILE_NAMES #define HAVE_TIMEVAL #define HAVE_TZNAME #define HAVE_H_ERRNO #define HAVE_CLOSEDIR #define HAVE_DUP2 #define HAVE_EXECVPE #define HAVE_FMOD #define HAVE_FREXP #define HAVE_FTIME #define HAVE_GETCWD #define HAVE_GETHOSTNAME #define HAVE_GETPAGESIZE #define getpagesize() 4096 #define HAVE_GETTIMEOFDAY #define HAVE_LINK #define HAVE_LOGB #define HAVE_MKDIR #define HAVE_MKTIME #define HAVE_RENAME #define HAVE_RMDIR #define HAVE_SELECT #define HAVE_STRERROR #define HAVE_SOCKETS #ifdef DEBUG_XEMACS #define USE_ASSERTIONS #define MEMORY_USAGE_STATS #endif /* DEBUG_XEMACS */ #define HAVE_DRAGNDROP #define SIZEOF_SHORT 2 #define SIZEOF_INT 4 #define SIZEOF_LONG 4 #define SIZEOF_LONG_LONG 0 #define SIZEOF_VOID_P 4 typedef int mode_t; typedef int pid_t; typedef int uid_t; typedef int gid_t; typedef int pid_t; typedef int ssize_t; /* If your system uses COFF (Common Object File Format) then define the preprocessor symbol "COFF". */ #define COFF /* define MAIL_USE_FLOCK if the mailer uses flock to interlock access to /usr/spool/mail/$USER. The alternative is that a lock file named /usr/spool/mail/$USER.lock. */ #define MAIL_USE_POP #define HAVE_LOCKING #define MAIL_USE_LOCKING /* See unexnt.c */ #if (_MSC_VER >= 1100) && !defined(PDUMP) #define DUMP_SEPARATE_SECTION #endif #ifdef DUMP_SEPARATE_SECTION #pragma data_seg("xdata") #pragma bss_seg("xdata") #endif #ifdef emacs /* intl-auto-encap-win32.[ch] assumes _WIN32_WINNT>=0x0400 We don't want this set when building command-line helpers in lib-src */ # ifndef _WIN32_WINNT # define _WIN32_WINNT 0x0400 # endif #endif /* The VC++ (5.0, at least) headers treat WINVER non-existent as 0x0400 */ #if defined (WINVER) && WINVER < 0x0400 # undef WINVER # define WINVER 0x0400 #endif /* MSVC 6.0 has a mechanism to declare functions which never return */ #if (_MSC_VER >= 1200) #define DOESNT_RETURN __declspec(noreturn) void #define DECLARE_DOESNT_RETURN(decl) __declspec(noreturn) extern void decl #define DECLARE_DOESNT_RETURN_GCC_ATTRIBUTE_SYNTAX_SUCKS(decl,str,idx) \ __declspec(noreturn) extern void decl PRINTF_ARGS(str,idx) #endif /* MSVC 6.0 */ /* MSVC warnings no-no crap. When adding one to this section, 1. Think twice 2. Insert textual description of the warning. 3. Think twice. Undo still works */ #if (_MSC_VER >= 800) /* 'expression' : signed/unsigned mismatch */ /* #pragma warning ( disable : 4018 ) */ /* unnamed type definition in parentheses (Martin added a pedantically correct definition of ALIGNOF, which generates temporary anonymous structures, and MSVC complains) */ #pragma warning ( disable : 4116 ) #endif /* compiler understands #pragma warning*/ /* MSVC version >= 2.x without /Za supports __inline */ #if (_MSC_VER < 900) || defined (__STDC__) # define inline #else # define inline __inline #endif /* lisp.h defines abort() as a macro. therefore, we must include all files that contain prototypes for abort() before then. */ #include <../include/process.h>