annotate src/w32heap.h @ 89439:bc52ad30b028

(Fgenerate_new_buffer_name): EXFUN it.
author Kenichi Handa <handa@m17n.org>
date Wed, 28 May 2003 11:35:32 +0000
parents d943962e1b24
children 695cf19ef79e d7ddb3e565de
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
9803
fa698fd10c05 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
1 /* Heap management routines (including unexec) for GNU Emacs on Windows NT.
fa698fd10c05 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
2 Copyright (C) 1994 Free Software Foundation, Inc.
fa698fd10c05 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
3
14186
ee40177f6c68 Update FSF's address in the preamble.
Erik Naggum <erik@naggum.no>
parents: 11944
diff changeset
4 This file is part of GNU Emacs.
9803
fa698fd10c05 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
5
14186
ee40177f6c68 Update FSF's address in the preamble.
Erik Naggum <erik@naggum.no>
parents: 11944
diff changeset
6 GNU Emacs is free software; you can redistribute it and/or modify
ee40177f6c68 Update FSF's address in the preamble.
Erik Naggum <erik@naggum.no>
parents: 11944
diff changeset
7 it under the terms of the GNU General Public License as published by
ee40177f6c68 Update FSF's address in the preamble.
Erik Naggum <erik@naggum.no>
parents: 11944
diff changeset
8 the Free Software Foundation; either version 2, or (at your option)
ee40177f6c68 Update FSF's address in the preamble.
Erik Naggum <erik@naggum.no>
parents: 11944
diff changeset
9 any later version.
9803
fa698fd10c05 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
10
14186
ee40177f6c68 Update FSF's address in the preamble.
Erik Naggum <erik@naggum.no>
parents: 11944
diff changeset
11 GNU Emacs is distributed in the hope that it will be useful,
ee40177f6c68 Update FSF's address in the preamble.
Erik Naggum <erik@naggum.no>
parents: 11944
diff changeset
12 but WITHOUT ANY WARRANTY; without even the implied warranty of
ee40177f6c68 Update FSF's address in the preamble.
Erik Naggum <erik@naggum.no>
parents: 11944
diff changeset
13 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
ee40177f6c68 Update FSF's address in the preamble.
Erik Naggum <erik@naggum.no>
parents: 11944
diff changeset
14 GNU General Public License for more details.
9803
fa698fd10c05 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
15
14186
ee40177f6c68 Update FSF's address in the preamble.
Erik Naggum <erik@naggum.no>
parents: 11944
diff changeset
16 You should have received a copy of the GNU General Public License
ee40177f6c68 Update FSF's address in the preamble.
Erik Naggum <erik@naggum.no>
parents: 11944
diff changeset
17 along with GNU Emacs; see the file COPYING. If not, write to
ee40177f6c68 Update FSF's address in the preamble.
Erik Naggum <erik@naggum.no>
parents: 11944
diff changeset
18 the Free Software Foundation, Inc., 59 Temple Place - Suite 330,
ee40177f6c68 Update FSF's address in the preamble.
Erik Naggum <erik@naggum.no>
parents: 11944
diff changeset
19 Boston, MA 02111-1307, USA.
9803
fa698fd10c05 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
20
fa698fd10c05 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
21 Geoff Voelker (voelker@cs.washington.edu) 7-29-94
fa698fd10c05 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
22 */
fa698fd10c05 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
23
fa698fd10c05 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
24 #ifndef NTHEAP_H_
fa698fd10c05 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
25 #define NTHEAP_H_
fa698fd10c05 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
26
fa698fd10c05 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
27 #include <windows.h>
fa698fd10c05 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
28
24104
939f14a75ce2 (ROUND_UP):
Andrew Innes <andrewi@gnu.org>
parents: 21610
diff changeset
29 #define ROUND_UP(p, align) (((DWORD)(p) + (align)-1) & ~((align)-1))
939f14a75ce2 (ROUND_UP):
Andrew Innes <andrewi@gnu.org>
parents: 21610
diff changeset
30 #define ROUND_DOWN(p, align) ((DWORD)(p) & ~((align)-1))
939f14a75ce2 (ROUND_UP):
Andrew Innes <andrewi@gnu.org>
parents: 21610
diff changeset
31
9803
fa698fd10c05 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
32 /*
fa698fd10c05 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
33 * Heap related stuff.
fa698fd10c05 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
34 */
11944
89ccf3b3208d (get_data_region_base): Undefined.
Geoff Voelker <voelker@cs.washington.edu>
parents: 9803
diff changeset
35 #define get_reserved_heap_size() reserved_heap_size
9803
fa698fd10c05 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
36 #define get_committed_heap_size() (get_data_end () - get_data_start ())
fa698fd10c05 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
37 #define get_heap_start() get_data_start ()
fa698fd10c05 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
38 #define get_heap_end() get_data_end ()
fa698fd10c05 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
39 #define get_page_size() sysinfo_cache.dwPageSize
fa698fd10c05 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
40 #define get_allocation_unit() sysinfo_cache.dwAllocationGranularity
fa698fd10c05 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
41 #define get_processor_type() sysinfo_cache.dwProcessorType
16588
481b7874a1e9 Change identifiers of the form win32* to w32*.
Geoff Voelker <voelker@cs.washington.edu>
parents: 14186
diff changeset
42 #define get_w32_major_version() w32_major_version
481b7874a1e9 Change identifiers of the form win32* to w32*.
Geoff Voelker <voelker@cs.washington.edu>
parents: 14186
diff changeset
43 #define get_w32_minor_version() w32_minor_version
9803
fa698fd10c05 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
44
fa698fd10c05 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
45 extern unsigned char *get_data_start();
fa698fd10c05 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
46 extern unsigned char *get_data_end();
11944
89ccf3b3208d (get_data_region_base): Undefined.
Geoff Voelker <voelker@cs.washington.edu>
parents: 9803
diff changeset
47 extern unsigned long reserved_heap_size;
9803
fa698fd10c05 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
48 extern SYSTEM_INFO sysinfo_cache;
24887
c440aa9c1485 w32heap.h (osinfo_cache): Declare.
Geoff Voelker <voelker@cs.washington.edu>
parents: 24104
diff changeset
49 extern OSVERSIONINFO osinfo_cache;
24104
939f14a75ce2 (ROUND_UP):
Andrew Innes <andrewi@gnu.org>
parents: 21610
diff changeset
50 extern BOOL using_dynamic_heap;
16588
481b7874a1e9 Change identifiers of the form win32* to w32*.
Geoff Voelker <voelker@cs.washington.edu>
parents: 14186
diff changeset
51 extern int w32_major_version;
481b7874a1e9 Change identifiers of the form win32* to w32*.
Geoff Voelker <voelker@cs.washington.edu>
parents: 14186
diff changeset
52 extern int w32_minor_version;
33214
3ee9bf6f1dd2 (w32_build_number): Add extern.
Andrew Innes <andrewi@gnu.org>
parents: 31112
diff changeset
53 extern int w32_build_number;
9803
fa698fd10c05 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
54
19709
6b326be52f18 Enumerate operating system types.
Geoff Voelker <voelker@cs.washington.edu>
parents: 16588
diff changeset
55 enum {
6b326be52f18 Enumerate operating system types.
Geoff Voelker <voelker@cs.washington.edu>
parents: 16588
diff changeset
56 OS_WIN95 = 1,
6b326be52f18 Enumerate operating system types.
Geoff Voelker <voelker@cs.washington.edu>
parents: 16588
diff changeset
57 OS_NT
6b326be52f18 Enumerate operating system types.
Geoff Voelker <voelker@cs.washington.edu>
parents: 16588
diff changeset
58 };
6b326be52f18 Enumerate operating system types.
Geoff Voelker <voelker@cs.washington.edu>
parents: 16588
diff changeset
59
6b326be52f18 Enumerate operating system types.
Geoff Voelker <voelker@cs.washington.edu>
parents: 16588
diff changeset
60 extern int os_subtype;
6b326be52f18 Enumerate operating system types.
Geoff Voelker <voelker@cs.washington.edu>
parents: 16588
diff changeset
61
9803
fa698fd10c05 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
62 /* Emulation of Unix sbrk(). */
fa698fd10c05 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
63 extern void *sbrk (unsigned long size);
fa698fd10c05 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
64
24104
939f14a75ce2 (ROUND_UP):
Andrew Innes <andrewi@gnu.org>
parents: 21610
diff changeset
65 /* Initialize heap structures for sbrk on startup. */
939f14a75ce2 (ROUND_UP):
Andrew Innes <andrewi@gnu.org>
parents: 21610
diff changeset
66 extern void init_heap ();
9803
fa698fd10c05 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
67
fa698fd10c05 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
68 /* Round the heap to this size. */
fa698fd10c05 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
69 extern void round_heap (unsigned long size);
fa698fd10c05 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
70
fa698fd10c05 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
71 /* Cache system info, e.g., the NT page size. */
fa698fd10c05 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
72 extern void cache_system_info (void);
fa698fd10c05 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
73
19709
6b326be52f18 Enumerate operating system types.
Geoff Voelker <voelker@cs.washington.edu>
parents: 16588
diff changeset
74 /* ----------------------------------------------------------------- */
6b326be52f18 Enumerate operating system types.
Geoff Voelker <voelker@cs.washington.edu>
parents: 16588
diff changeset
75 /* Useful routines for manipulating memory-mapped files. */
6b326be52f18 Enumerate operating system types.
Geoff Voelker <voelker@cs.washington.edu>
parents: 16588
diff changeset
76
6b326be52f18 Enumerate operating system types.
Geoff Voelker <voelker@cs.washington.edu>
parents: 16588
diff changeset
77 typedef struct file_data {
6b326be52f18 Enumerate operating system types.
Geoff Voelker <voelker@cs.washington.edu>
parents: 16588
diff changeset
78 char *name;
6b326be52f18 Enumerate operating system types.
Geoff Voelker <voelker@cs.washington.edu>
parents: 16588
diff changeset
79 unsigned long size;
6b326be52f18 Enumerate operating system types.
Geoff Voelker <voelker@cs.washington.edu>
parents: 16588
diff changeset
80 HANDLE file;
6b326be52f18 Enumerate operating system types.
Geoff Voelker <voelker@cs.washington.edu>
parents: 16588
diff changeset
81 HANDLE file_mapping;
6b326be52f18 Enumerate operating system types.
Geoff Voelker <voelker@cs.washington.edu>
parents: 16588
diff changeset
82 unsigned char *file_base;
6b326be52f18 Enumerate operating system types.
Geoff Voelker <voelker@cs.washington.edu>
parents: 16588
diff changeset
83 } file_data;
6b326be52f18 Enumerate operating system types.
Geoff Voelker <voelker@cs.washington.edu>
parents: 16588
diff changeset
84
6b326be52f18 Enumerate operating system types.
Geoff Voelker <voelker@cs.washington.edu>
parents: 16588
diff changeset
85 #define OFFSET_TO_RVA(var,section) \
6b326be52f18 Enumerate operating system types.
Geoff Voelker <voelker@cs.washington.edu>
parents: 16588
diff changeset
86 (section->VirtualAddress + ((DWORD)(var) - section->PointerToRawData))
6b326be52f18 Enumerate operating system types.
Geoff Voelker <voelker@cs.washington.edu>
parents: 16588
diff changeset
87
6b326be52f18 Enumerate operating system types.
Geoff Voelker <voelker@cs.washington.edu>
parents: 16588
diff changeset
88 #define RVA_TO_OFFSET(var,section) \
6b326be52f18 Enumerate operating system types.
Geoff Voelker <voelker@cs.washington.edu>
parents: 16588
diff changeset
89 (section->PointerToRawData + ((DWORD)(var) - section->VirtualAddress))
6b326be52f18 Enumerate operating system types.
Geoff Voelker <voelker@cs.washington.edu>
parents: 16588
diff changeset
90
6b326be52f18 Enumerate operating system types.
Geoff Voelker <voelker@cs.washington.edu>
parents: 16588
diff changeset
91 #define RVA_TO_PTR(var,section,filedata) \
6b326be52f18 Enumerate operating system types.
Geoff Voelker <voelker@cs.washington.edu>
parents: 16588
diff changeset
92 ((void *)(RVA_TO_OFFSET(var,section) + (filedata).file_base))
6b326be52f18 Enumerate operating system types.
Geoff Voelker <voelker@cs.washington.edu>
parents: 16588
diff changeset
93
6b326be52f18 Enumerate operating system types.
Geoff Voelker <voelker@cs.washington.edu>
parents: 16588
diff changeset
94 int open_input_file (file_data *p_file, char *name);
6b326be52f18 Enumerate operating system types.
Geoff Voelker <voelker@cs.washington.edu>
parents: 16588
diff changeset
95 int open_output_file (file_data *p_file, char *name, unsigned long size);
6b326be52f18 Enumerate operating system types.
Geoff Voelker <voelker@cs.washington.edu>
parents: 16588
diff changeset
96 void close_file_data (file_data *p_file);
6b326be52f18 Enumerate operating system types.
Geoff Voelker <voelker@cs.washington.edu>
parents: 16588
diff changeset
97
6b326be52f18 Enumerate operating system types.
Geoff Voelker <voelker@cs.washington.edu>
parents: 16588
diff changeset
98 /* Return pointer to section header for named section. */
6b326be52f18 Enumerate operating system types.
Geoff Voelker <voelker@cs.washington.edu>
parents: 16588
diff changeset
99 IMAGE_SECTION_HEADER * find_section (char * name, IMAGE_NT_HEADERS * nt_header);
6b326be52f18 Enumerate operating system types.
Geoff Voelker <voelker@cs.washington.edu>
parents: 16588
diff changeset
100
6b326be52f18 Enumerate operating system types.
Geoff Voelker <voelker@cs.washington.edu>
parents: 16588
diff changeset
101 /* Return pointer to section header for section containing the given
6b326be52f18 Enumerate operating system types.
Geoff Voelker <voelker@cs.washington.edu>
parents: 16588
diff changeset
102 relative virtual address. */
6b326be52f18 Enumerate operating system types.
Geoff Voelker <voelker@cs.washington.edu>
parents: 16588
diff changeset
103 IMAGE_SECTION_HEADER * rva_to_section (DWORD rva, IMAGE_NT_HEADERS * nt_header);
6b326be52f18 Enumerate operating system types.
Geoff Voelker <voelker@cs.washington.edu>
parents: 16588
diff changeset
104
9803
fa698fd10c05 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
105 #endif /* NTHEAP_H_ */