(jka-compr-handler): Save match data.
[emacs.git] / src / mem-limits.h
blob65384ba3c949e3d20c5be4da9848b19cc5d3803a
1 /* Includes for memory limit warnings.
2 Copyright (C) 1990, 1993, 1994 Free Software Foundation, Inc.
4 This file is part of GNU Emacs.
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.
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.
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, 675 Mass Ave, Cambridge, MA 02139, USA. */
20 #ifdef MSDOS
21 #include <dpmi.h>
22 #endif
24 /* Some systems need this before <sys/resource.h>. */
25 #include <sys/types.h>
27 #ifdef _LIBC
29 #include <sys/resource.h>
30 #define BSD4_2 /* Tell code below to use getrlimit. */
32 #else
34 #if defined (__osf__) && (defined (__mips) || defined (mips))
35 #include <sys/time.h>
36 #include <sys/resource.h>
37 #endif
39 #ifdef __bsdi__
40 #define BSD4_2
41 #endif
43 #ifndef BSD4_2
44 #ifndef USG
45 #ifndef MSDOS
46 #include <sys/vlimit.h>
47 #endif /* not MSDOS */
48 #endif /* not USG */
49 #else /* if BSD4_2 */
50 #include <sys/time.h>
51 #include <sys/resource.h>
52 #endif /* BSD4_2 */
54 #endif /* _LIBC */
56 #ifdef emacs
57 /* The important properties of this type are that 1) it's a pointer, and
58 2) arithmetic on it should work as if the size of the object pointed
59 to has a size of 1. */
60 #ifdef __STDC__
61 typedef void *POINTER;
62 #else
63 typedef char *POINTER;
64 #endif
66 typedef unsigned long SIZE;
68 #ifdef NULL
69 #undef NULL
70 #endif
71 #define NULL ((POINTER) 0)
73 extern POINTER start_of_data ();
74 #ifdef DATA_SEG_BITS
75 #define EXCEEDS_LISP_PTR(ptr) \
76 (((unsigned int) (ptr) & ~DATA_SEG_BITS) >> VALBITS)
77 #else
78 #define EXCEEDS_LISP_PTR(ptr) ((unsigned int) (ptr) >> VALBITS)
79 #endif
81 #ifdef BSD
82 #ifndef DATA_SEG_BITS
83 extern char etext;
84 #define start_of_data() &etext
85 #endif
86 #endif
88 #else /* Not emacs */
89 extern char etext;
90 #define start_of_data() &etext
91 #endif /* Not emacs */
95 /* start of data space; can be changed by calling malloc_init */
96 static POINTER data_space_start;
98 /* Number of bytes of writable memory we can expect to be able to get */
99 static unsigned int lim_data;
101 #ifdef USG
103 static void
104 get_lim_data ()
106 extern long ulimit ();
108 lim_data = -1;
110 /* Use the ulimit call, if we seem to have it. */
111 #if !defined (ULIMIT_BREAK_VALUE) || defined (LINUX)
112 lim_data = ulimit (3, 0);
113 #endif
115 /* If that didn't work, just use the macro's value. */
116 #ifdef ULIMIT_BREAK_VALUE
117 if (lim_data == -1)
118 lim_data = ULIMIT_BREAK_VALUE;
119 #endif
121 lim_data -= (long) data_space_start;
124 #else /* not USG */
125 #if !defined (BSD4_2) && !defined (__osf__)
127 #ifdef MSDOS
128 void
129 get_lim_data ()
131 _go32_dpmi_meminfo info;
133 _go32_dpmi_get_free_memory_information (&info);
134 lim_data = info.available_memory;
136 #else /* not MSDOS */
137 static void
138 get_lim_data ()
140 lim_data = vlimit (LIM_DATA, -1);
142 #endif /* not MSDOS */
144 #else /* BSD4_2 */
146 static void
147 get_lim_data ()
149 struct rlimit XXrlimit;
151 getrlimit (RLIMIT_DATA, &XXrlimit);
152 #ifdef RLIM_INFINITY
153 lim_data = XXrlimit.rlim_cur & RLIM_INFINITY; /* soft limit */
154 #else
155 lim_data = XXrlimit.rlim_cur; /* soft limit */
156 #endif
158 #endif /* BSD4_2 */
159 #endif /* not USG */