src/mem-limits.h

   1 /* Includes for memory limit warnings.
   2    Copyright (C) 1990, 93, 94, 95, 1996, 2004  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 #ifdef HAVE_SYS_RESOURCE_H
  41 # include <sys/time.h>
  42 # include <sys/resource.h>
  43 #else
  44 # if HAVE_SYS_VLIMIT_H
  45 #  include <sys/vlimit.h>       /* Obsolete, says glibc */
  46 # endif
  47 #endif
  48
  49 #ifdef __bsdi__
  50 #define BSD4_2
  51 #endif
  52
  53 #ifdef CYGWIN
  54 #define BSD4_2
  55 #endif
  56
  57 #ifndef BSD4_2
  58 #ifndef USG
  59 #ifndef MSDOS
  60 #ifndef WINDOWSNT
  61 #include <sys/vlimit.h>
  62 #endif /* not WINDOWSNT */
  63 #endif /* not MSDOS */
  64 #endif /* not USG */
  65 #else /* if BSD4_2 */
  66 #include <sys/time.h>
  67 #include <sys/resource.h>
  68 #endif /* BSD4_2 */
  69
  70 #ifdef emacs
  71 /* The important properties of this type are that 1) it's a pointer, and
  72    2) arithmetic on it should work as if the size of the object pointed
  73    to has a size of 1.  */
  74 typedef POINTER_TYPE *POINTER;
  75
  76 typedef unsigned long SIZE;
  77
  78 #ifdef NULL
  79 #undef NULL
  80 #endif
  81 #define NULL ((POINTER) 0)
  82
  83 extern POINTER start_of_data ();
  84 #if defined USE_LSB_TAG
  85 #define EXCEEDS_LISP_PTR(ptr) 0
  86 #elif defined DATA_SEG_BITS
  87 #define EXCEEDS_LISP_PTR(ptr) \
  88   (((EMACS_UINT) (ptr) & ~DATA_SEG_BITS) >> VALBITS)
  89 #else
  90 #define EXCEEDS_LISP_PTR(ptr) ((EMACS_UINT) (ptr) >> VALBITS)
  91 #endif
  92
  93 #ifdef DATA_START
  94 #define start_of_data() ((char *)DATA_START)
  95 #endif
  96
  97 #ifdef BSD_SYSTEM
  98 #ifndef DATA_SEG_BITS
  99 #ifndef DATA_START
 100 extern char etext;
 101 #define start_of_data() &etext
 102 #endif
 103 #endif
 104 #endif
 105
 106 #else  /* not emacs */
 107 extern char etext;
 108 #define start_of_data() &etext
 109 #endif /* not emacs */
 110
 111 #endif /* not _LIBC */
 112
 113
 114 /* start of data space; can be changed by calling malloc_init */
 115 static POINTER data_space_start;
 116
 117 /* Number of bytes of writable memory we can expect to be able to get */
 118 static unsigned long lim_data;
 119
 120 #ifdef NO_LIM_DATA
 121 static void
 122 get_lim_data ()
 123 {
 124   lim_data = -1;
 125 }
 126 #else /* not NO_LIM_DATA */
 127
 128 #ifdef USG
 129
 130 static void
 131 get_lim_data ()
 132 {
 133   extern long ulimit ();
 134
 135   lim_data = -1;
 136
 137   /* Use the ulimit call, if we seem to have it.  */
 138 #if !defined (ULIMIT_BREAK_VALUE) || defined (GNU_LINUX)
 139   lim_data = ulimit (3, 0);
 140 #endif
 141
 142   /* If that didn't work, just use the macro's value.  */
 143 #ifdef ULIMIT_BREAK_VALUE
 144   if (lim_data == -1)
 145     lim_data = ULIMIT_BREAK_VALUE;
 146 #endif
 147
 148   lim_data -= (long) data_space_start;
 149 }
 150
 151 #else /* not USG */
 152 #ifdef WINDOWSNT
 153
 154 static void
 155 get_lim_data ()
 156 {
 157   extern unsigned long reserved_heap_size;
 158   lim_data = reserved_heap_size;
 159 }
 160
 161 #else
 162 #if !defined (BSD4_2) && !defined (__osf__)
 163
 164 #ifdef MSDOS
 165 void
 166 get_lim_data ()
 167 {
 168   _go32_dpmi_meminfo info;
 169
 170   _go32_dpmi_get_free_memory_information (&info);
 171   lim_data = info.available_memory;
 172 }
 173 #else /* not MSDOS */
 174 static void
 175 get_lim_data ()
 176 {
 177   lim_data = vlimit (LIM_DATA, -1);
 178 }
 179 #endif /* not MSDOS */
 180
 181 #else /* BSD4_2 */
 182
 183 static void
 184 get_lim_data ()
 185 {
 186   struct rlimit XXrlimit;
 187
 188   getrlimit (RLIMIT_DATA, &XXrlimit);
 189 #ifdef RLIM_INFINITY
 190   lim_data = XXrlimit.rlim_cur & RLIM_INFINITY; /* soft limit */
 191 #else
 192   lim_data = XXrlimit.rlim_cur; /* soft limit */
 193 #endif
 194 }
 195 #endif /* BSD4_2 */
 196 #endif /* not WINDOWSNT */
 197 #endif /* not USG */
 198 #endif /* not NO_LIM_DATA */
 199
 200 /* arch-tag: fe39244e-e54f-4208-b7aa-02556f7841c5
 201    (do not change this comment) */