1 /* Includes for memory limit warnings.
2 Copyright (C) 1990, 1993, 1994, 1995, 1996 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)
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, Inc., 59 Temple Place - Suite 330,
19 Boston, MA 02111-1307, USA. */
25 /* Some systems need this before <sys/resource.h>. */
26 #include <sys/types.h>
30 #include <sys/resource.h>
31 #define BSD4_2 /* Tell code below to use getrlimit. */
33 /* Old Linux startup code won't define __data_start. */
34 extern int etext
, __data_start
; weak_extern (__data_start
)
35 #define start_of_data() (&__data_start ?: &etext)
39 #if defined (__osf__) && (defined (__mips) || defined (mips) || defined(__alpha))
41 #include <sys/resource.h>
52 #include <sys/vlimit.h>
53 #endif /* not WINDOWSNT */
54 #endif /* not MSDOS */
58 #include <sys/resource.h>
62 /* The important properties of this type are that 1) it's a pointer, and
63 2) arithmetic on it should work as if the size of the object pointed
64 to has a size of 1. */
65 typedef POINTER_TYPE
*POINTER
;
67 typedef unsigned long SIZE
;
72 #define NULL ((POINTER) 0)
74 extern POINTER
start_of_data ();
76 #define EXCEEDS_LISP_PTR(ptr) \
77 (((EMACS_UINT) (ptr) & ~DATA_SEG_BITS) >> VALBITS)
79 #define EXCEEDS_LISP_PTR(ptr) ((EMACS_UINT) (ptr) >> VALBITS)
83 #define start_of_data() ((char *)DATA_START)
90 #define start_of_data() &etext
97 #define start_of_data() &etext
98 #endif /* not emacs */
100 #endif /* not _LIBC */
103 /* start of data space; can be changed by calling malloc_init */
104 static POINTER data_space_start
;
106 /* Number of bytes of writable memory we can expect to be able to get */
107 static unsigned long lim_data
;
115 #else /* not NO_LIM_DATA */
122 extern long ulimit ();
126 /* Use the ulimit call, if we seem to have it. */
127 #if !defined (ULIMIT_BREAK_VALUE) || defined (GNU_LINUX)
128 lim_data
= ulimit (3, 0);
131 /* If that didn't work, just use the macro's value. */
132 #ifdef ULIMIT_BREAK_VALUE
134 lim_data
= ULIMIT_BREAK_VALUE
;
137 lim_data
-= (long) data_space_start
;
146 extern unsigned long reserved_heap_size
;
147 lim_data
= reserved_heap_size
;
151 #if !defined (BSD4_2) && !defined (__osf__)
157 _go32_dpmi_meminfo info
;
159 _go32_dpmi_get_free_memory_information (&info
);
160 lim_data
= info
.available_memory
;
162 #else /* not MSDOS */
166 lim_data
= vlimit (LIM_DATA
, -1);
168 #endif /* not MSDOS */
175 struct rlimit XXrlimit
;
177 getrlimit (RLIMIT_DATA
, &XXrlimit
);
179 lim_data
= XXrlimit
.rlim_cur
& RLIM_INFINITY
; /* soft limit */
181 lim_data
= XXrlimit
.rlim_cur
; /* soft limit */
185 #endif /* not WINDOWSNT */
187 #endif /* not NO_LIM_DATA */