1 ///////////////////////////////////////////////////////////////////////////////
3 /// \file tuklib_physmem.c
4 /// \brief Get the amount of physical memory
6 // Author: Lasse Collin
8 // This file has been put into the public domain.
9 // You can do whatever you want with this file.
11 ///////////////////////////////////////////////////////////////////////////////
13 #include "tuklib_physmem.h"
15 // We want to use Windows-specific code on Cygwin, which also has memory
16 // information available via sysconf(), but on Cygwin 1.5 and older it
17 // gives wrong results (from our point of view).
18 #if defined(_WIN32) || defined(__CYGWIN__)
20 # define _WIN32_WINNT 0x0500
24 #elif defined(__OS2__)
28 #elif defined(__DJGPP__)
32 # include <lib$routines.h>
37 #elif defined(TUKLIB_PHYSMEM_AIX)
38 # include <sys/systemcfg.h>
40 #elif defined(TUKLIB_PHYSMEM_SYSCONF)
43 #elif defined(TUKLIB_PHYSMEM_SYSCTL)
44 # ifdef HAVE_SYS_PARAM_H
45 # include <sys/param.h>
47 # include <sys/sysctl.h>
50 #elif defined(TUKLIB_PHYSMEM_GETSYSINFO)
51 # include <sys/sysinfo.h>
52 # include <machine/hal_sysinfo.h>
55 #elif defined(TUKLIB_PHYSMEM_PSTAT_GETSTATIC)
56 # include <sys/param.h>
57 # include <sys/pstat.h>
60 #elif defined(TUKLIB_PHYSMEM_GETINVENT_R)
63 // This sysinfo() is Linux-specific.
64 #elif defined(TUKLIB_PHYSMEM_SYSINFO)
65 # include <sys/sysinfo.h>
74 #if defined(_WIN32) || defined(__CYGWIN__)
75 if ((GetVersion() & 0xFF) >= 5) {
76 // Windows 2000 and later have GlobalMemoryStatusEx() which
77 // supports reporting values greater than 4 GiB. To keep the
78 // code working also on older Windows versions, use
79 // GlobalMemoryStatusEx() conditionally.
80 HMODULE kernel32
= GetModuleHandle("kernel32.dll");
81 if (kernel32
!= NULL
) {
82 BOOL (WINAPI
*gmse
)(LPMEMORYSTATUSEX
) = GetProcAddress(
83 kernel32
, "GlobalMemoryStatusEx");
85 MEMORYSTATUSEX meminfo
;
86 meminfo
.dwLength
= sizeof(meminfo
);
88 ret
= meminfo
.ullTotalPhys
;
94 // GlobalMemoryStatus() is supported by Windows 95 and later,
95 // so it is fine to link against it unconditionally. Note that
96 // GlobalMemoryStatus() has no return value.
98 meminfo
.dwLength
= sizeof(meminfo
);
99 GlobalMemoryStatus(&meminfo
);
100 ret
= meminfo
.dwTotalPhys
;
103 #elif defined(__OS2__)
105 if (DosQuerySysInfo(QSV_TOTPHYSMEM
, QSV_TOTPHYSMEM
,
106 &mem
, sizeof(mem
)) == 0)
109 #elif defined(__DJGPP__)
110 __dpmi_free_mem_info meminfo
;
111 if (__dpmi_get_free_memory_information(&meminfo
) == 0
112 && meminfo
.total_number_of_physical_pages
113 != (unsigned long)-1)
114 ret
= (uint64_t)meminfo
.total_number_of_physical_pages
* 4096;
118 int val
= SYI$_MEMSIZE
;
119 if (LIB$
GETSYI(&val
, &vms_mem
, 0, 0, 0, 0) == SS$_NORMAL
)
120 ret
= (uint64_t)vms_mem
* 8192;
122 #elif defined(TUKLIB_PHYSMEM_AIX)
123 ret
= _system_configuration
.physmem
;
125 #elif defined(TUKLIB_PHYSMEM_SYSCONF)
126 const long pagesize
= sysconf(_SC_PAGESIZE
);
127 const long pages
= sysconf(_SC_PHYS_PAGES
);
128 if (pagesize
!= -1 && pages
!= -1)
129 // According to docs, pagesize * pages can overflow.
130 // Simple case is 32-bit box with 4 GiB or more RAM,
131 // which may report exactly 4 GiB of RAM, and "long"
132 // being 32-bit will overflow. Casting to uint64_t
133 // hopefully avoids overflows in the near future.
134 ret
= (uint64_t)pagesize
* (uint64_t)pages
;
136 #elif defined(TUKLIB_PHYSMEM_SYSCTL)
149 size_t mem_ptr_size
= sizeof(mem
.u64
);
150 if (sysctl(name
, 2, &mem
.u64
, &mem_ptr_size
, NULL
, 0) != -1) {
151 // IIRC, 64-bit "return value" is possible on some 64-bit
152 // BSD systems even with HW_PHYSMEM (instead of HW_PHYSMEM64),
154 if (mem_ptr_size
== sizeof(mem
.u64
))
156 else if (mem_ptr_size
== sizeof(mem
.u32
))
160 #elif defined(TUKLIB_PHYSMEM_GETSYSINFO)
161 // Docs are unclear if "start" is needed, but it doesn't hurt
165 if (getsysinfo(GSI_PHYSMEM
, (caddr_t
)&memkb
, sizeof(memkb
), &start
)
167 ret
= (uint64_t)memkb
* 1024;
169 #elif defined(TUKLIB_PHYSMEM_PSTAT_GETSTATIC)
170 struct pst_static pst
;
171 if (pstat_getstatic(&pst
, sizeof(pst
), 1, 0) != -1)
172 ret
= (uint64_t)pst
.physical_memory
* (uint64_t)pst
.page_size
;
174 #elif defined(TUKLIB_PHYSMEM_GETINVENT_R)
175 inv_state_t
*st
= NULL
;
176 if (setinvent_r(&st
) != -1) {
178 while ((i
= getinvent_r(st
)) != NULL
) {
179 if (i
->inv_class
== INV_MEMORY
180 && i
->inv_type
== INV_MAIN_MB
) {
181 ret
= (uint64_t)i
->inv_state
<< 20;
189 #elif defined(TUKLIB_PHYSMEM_SYSINFO)
191 if (sysinfo(&si
) == 0)
192 ret
= (uint64_t)si
.totalram
* si
.mem_unit
;