Upgraded to mh-e version 6.1.1.
[bpt/emacs.git] / src / mem-limits.h
1 /* Includes for memory limit warnings.
2 Copyright (C) 1990, 1993, 1994, 1995, 1996 Free Software Foundation, Inc.
3
4 This file is part of GNU Emacs.
5
6 GNU Emacs is free software; you can redistribute it and/or modify
7 it under the terms of the GNU General Public License as published by
8 the Free Software Foundation; either version 2, or (at your option)
9 any later version.
10
11 GNU Emacs is distributed in the hope that it will be useful,
12 but WITHOUT ANY WARRANTY; without even the implied warranty of
13 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
14 GNU General Public License for more details.
15
16 You should have received a copy of the GNU General Public License
17 along with GNU Emacs; 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 #ifdef MSDOS
22 #include <dpmi.h>
23 extern int etext;
24 #endif
25
26 /* Some systems need this before <sys/resource.h>. */
27 #include <sys/types.h>
28
29 #ifdef _LIBC
30
31 #include <sys/resource.h>
32 #define BSD4_2 /* Tell code below to use getrlimit. */
33
34 /* Old Linux startup code won't define __data_start. */
35 extern int etext, __data_start; weak_extern (__data_start)
36 #define start_of_data() (&__data_start ?: &etext)
37
38 #else /* not _LIBC */
39
40 #if defined (__osf__) && (defined (__mips) || defined (mips) || defined(__alpha))
41 #include <sys/time.h>
42 #include <sys/resource.h>
43 #endif
44
45 #ifdef __bsdi__
46 #define BSD4_2
47 #endif
48
49 #ifndef BSD4_2
50 #ifndef USG
51 #ifndef MSDOS
52 #ifndef WINDOWSNT
53 #include <sys/vlimit.h>
54 #endif /* not WINDOWSNT */
55 #endif /* not MSDOS */
56 #endif /* not USG */
57 #else /* if BSD4_2 */
58 #include <sys/time.h>
59 #include <sys/resource.h>
60 #endif /* BSD4_2 */
61
62 #ifdef emacs
63 /* The important properties of this type are that 1) it's a pointer, and
64 2) arithmetic on it should work as if the size of the object pointed
65 to has a size of 1. */
66 typedef POINTER_TYPE *POINTER;
67
68 typedef unsigned long SIZE;
69
70 #ifdef NULL
71 #undef NULL
72 #endif
73 #define NULL ((POINTER) 0)
74
75 extern POINTER start_of_data ();
76 #ifdef DATA_SEG_BITS
77 #define EXCEEDS_LISP_PTR(ptr) \
78 (((EMACS_UINT) (ptr) & ~DATA_SEG_BITS) >> VALBITS)
79 #else
80 #define EXCEEDS_LISP_PTR(ptr) ((EMACS_UINT) (ptr) >> VALBITS)
81 #endif
82
83 #ifdef DATA_START
84 #define start_of_data() ((char *)DATA_START)
85 #endif
86
87 #ifdef BSD_SYSTEM
88 #ifndef DATA_SEG_BITS
89 #ifndef DATA_START
90 extern char etext;
91 #define start_of_data() &etext
92 #endif
93 #endif
94 #endif
95
96 #else /* not emacs */
97 extern char etext;
98 #define start_of_data() &etext
99 #endif /* not emacs */
100
101 #endif /* not _LIBC */
102
103
104 /* start of data space; can be changed by calling malloc_init */
105 static POINTER data_space_start;
106
107 /* Number of bytes of writable memory we can expect to be able to get */
108 static unsigned long lim_data;
109
110 #ifdef NO_LIM_DATA
111 static void
112 get_lim_data ()
113 {
114 lim_data = -1;
115 }
116 #else /* not NO_LIM_DATA */
117
118 #ifdef USG
119
120 static void
121 get_lim_data ()
122 {
123 extern long ulimit ();
124
125 lim_data = -1;
126
127 /* Use the ulimit call, if we seem to have it. */
128 #if !defined (ULIMIT_BREAK_VALUE) || defined (GNU_LINUX)
129 lim_data = ulimit (3, 0);
130 #endif
131
132 /* If that didn't work, just use the macro's value. */
133 #ifdef ULIMIT_BREAK_VALUE
134 if (lim_data == -1)
135 lim_data = ULIMIT_BREAK_VALUE;
136 #endif
137
138 lim_data -= (long) data_space_start;
139 }
140
141 #else /* not USG */
142 #ifdef WINDOWSNT
143
144 static void
145 get_lim_data ()
146 {
147 extern unsigned long reserved_heap_size;
148 lim_data = reserved_heap_size;
149 }
150
151 #else
152 #if !defined (BSD4_2) && !defined (__osf__)
153
154 #ifdef MSDOS
155 void
156 get_lim_data ()
157 {
158 _go32_dpmi_meminfo info;
159
160 _go32_dpmi_get_free_memory_information (&info);
161 lim_data = info.available_memory;
162 }
163 #else /* not MSDOS */
164 static void
165 get_lim_data ()
166 {
167 lim_data = vlimit (LIM_DATA, -1);
168 }
169 #endif /* not MSDOS */
170
171 #else /* BSD4_2 */
172
173 static void
174 get_lim_data ()
175 {
176 struct rlimit XXrlimit;
177
178 getrlimit (RLIMIT_DATA, &XXrlimit);
179 #ifdef RLIM_INFINITY
180 lim_data = XXrlimit.rlim_cur & RLIM_INFINITY; /* soft limit */
181 #else
182 lim_data = XXrlimit.rlim_cur; /* soft limit */
183 #endif
184 }
185 #endif /* BSD4_2 */
186 #endif /* not WINDOWSNT */
187 #endif /* not USG */
188 #endif /* not NO_LIM_DATA */