XEmacs 21.4.4 "Artificial Intelligence".
[chise/xemacs-chise.git.1] / src / nt.h
1 /* Support routines for the NT version of XEmacs.
2    Copyright (C) 1994 Free Software Foundation, Inc.
3
4 This file is part of XEmacs.
5
6 XEmacs is free software; you can redistribute it and/or modify it
7 under the terms of the GNU General Public License as published by the
8 Free Software Foundation; either version 2, or (at your option) any
9 later version.
10
11 XEmacs is distributed in the hope that it will be useful, but WITHOUT
12 ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
13 FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License
14 for more details.
15
16 You should have received a copy of the GNU General Public License
17 along with XEmacs; see the file COPYING.  If not, write to
18 the Free Software Foundation, Inc., 59 Temple Place - Suite 330,
19 Boston, MA 02111-1307, USA.  */
20
21 /* Adapted for XEmacs by David Hobley <david@spook-le0.cia.com.au> */
22 /* Sync'ed with Emacs 19.34.6 by Marc Paquette <marcpa@cam.org> */
23
24 /* #define FULL_DEBUG */
25
26 #ifndef INCLUDED_nt_h_
27 #define INCLUDED_nt_h_
28
29 #include "syswindows.h"
30
31 #ifdef DEBUG_XEMACS
32 #define DebPrint(stuff) _DebPrint stuff
33 #else
34 #define DebPrint(stuff)
35 #endif
36
37 /* ------------------------------------------------------------------------- */
38
39 /* child_process.status values */
40 enum {
41   STATUS_READ_ERROR = -1,
42   STATUS_READ_READY,
43   STATUS_READ_IN_PROGRESS,
44   STATUS_READ_FAILED,
45   STATUS_READ_SUCCEEDED,
46   STATUS_READ_ACKNOWLEDGED
47 };
48
49 /* This structure is used for both pipes and sockets; for
50    a socket, the process handle in pi is NULL. */
51 typedef struct _child_process
52 {
53   int                   fd;
54   int                   pid;
55   HANDLE                char_avail;
56   HANDLE                char_consumed;
57   HANDLE                thrd;
58   HWND                  hwnd;
59   PROCESS_INFORMATION   procinfo;
60   volatile int          status;
61   char                  chr;
62 } child_process;
63
64 #define MAX_CHILDREN  MAXDESC/2
65 #define CHILD_ACTIVE(cp) ((cp)->char_avail != NULL)
66
67 /* parallel array of private info on file handles */
68 typedef struct
69 {
70   unsigned         flags;
71   HANDLE           hnd;
72   child_process *  cp;
73 } filedesc;
74
75 extern filedesc fd_info [];
76
77 /* fd_info flag definitions */
78 #define FILE_READ    0x0001
79 #define FILE_WRITE   0x0002
80 #define FILE_BINARY  0x0010
81 #define FILE_LAST_CR            0x0020
82 #define FILE_AT_EOF             0x0040
83 #define FILE_SEND_SIGCHLD       0x0080
84 #define FILE_PIPE    0x0100
85 #define FILE_SOCKET  0x0200
86
87 extern child_process * new_child (void);
88 extern void delete_child (child_process *cp);
89
90 /* ------------------------------------------------------------------------- */
91
92 /* Get long (aka "true") form of file name, if it exists.  */
93 extern BOOL win32_get_long_filename (char * name, char * buf, int size);
94
95 /* Prepare our standard handles for proper inheritance by child processes.  */
96 extern void prepare_standard_handles (int in, int out, 
97                                       int err, HANDLE handles[4]);
98
99 /* Reset our standard handles to their original state.  */
100 extern void reset_standard_handles (int in, int out, 
101                                     int err, HANDLE handles[4]);
102
103 /* Return the string resource associated with KEY of type TYPE.  */
104 extern LPBYTE nt_get_resource (char * key, LPDWORD type);
105
106 void set_process_dir (const char * dir);
107 time_t convert_time (FILETIME ft);
108 int mswindows_utime (Lisp_Object path, struct utimbuf *times);
109
110 extern void init_ntproc (void);
111 extern void term_ntproc (int unused);
112
113 /* ----------------------------------------------------------------- */
114 /* Useful routines for manipulating memory-mapped files. */
115
116 typedef struct file_data
117 {
118   const char    *name;
119   unsigned long  size;
120   HANDLE         file;
121   HANDLE         file_mapping;
122   char *file_base;
123 } file_data;
124
125 #define OFFSET_TO_RVA(var,section) \
126           (section->VirtualAddress + ((DWORD)(var) - section->PointerToRawData))
127
128 #define RVA_TO_OFFSET(var,section) \
129           (section->PointerToRawData + ((DWORD)(var) - section->VirtualAddress))
130
131 #define RVA_TO_PTR(var,section,filedata) \
132           ((void *)(RVA_TO_OFFSET(var,section) + (filedata).file_base))
133
134 int open_input_file (file_data *p_file, const char *name);
135 int open_output_file (file_data *p_file, const char *name, unsigned long size);
136 void close_file_data (file_data *p_file);
137 void mswindows_executable_type (const char * filename, int * is_dos_app,
138                                 int * is_cygnus_app);
139
140 /* In process-nt.c */
141 extern int compare_env (const void *strp1, const void *strp2);
142
143 void mswindows_set_errno (unsigned long win32_error);
144 void mswindows_set_last_errno (void);
145
146 void wait_for_termination (HANDLE pid);
147
148 int mswindows_fstat (int handle, struct stat *buffer);
149 int mswindows_stat (const char * path, struct stat * buf);
150
151 #endif /* INCLUDED_nt_h_ */