src/mem-limits.h

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