| /* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */ |
| /* This Source Code Form is subject to the terms of the Mozilla Public |
| * License, v. 2.0. If a copy of the MPL was not distributed with this |
| * file, You can obtain one at http://mozilla.org/MPL/2.0/. */ |
| |
| #include "primpl.h" |
| #include "prsystem.h" |
| #include "prprf.h" |
| #include "prlong.h" |
| |
| #if defined(BEOS) |
| #include <kernel/OS.h> |
| #endif |
| |
| #if defined(OS2) |
| #define INCL_DOS |
| #define INCL_DOSMISC |
| #include <os2.h> |
| /* define the required constant if it is not already defined in the headers */ |
| #ifndef QSV_NUMPROCESSORS |
| #define QSV_NUMPROCESSORS 26 |
| #endif |
| #endif |
| |
| /* BSD-derived systems use sysctl() to get the number of processors */ |
| #if defined(BSDI) || defined(FREEBSD) || defined(NETBSD) \ |
| || defined(OPENBSD) || defined(DRAGONFLY) || defined(DARWIN) |
| #define _PR_HAVE_SYSCTL |
| #include <sys/param.h> |
| #include <sys/sysctl.h> |
| #endif |
| |
| #if defined(DARWIN) |
| #include <mach/mach_init.h> |
| #include <mach/mach_host.h> |
| #include <mach/mach_port.h> |
| #endif |
| |
| #if defined(HPUX) |
| #include <sys/mpctl.h> |
| #include <sys/pstat.h> |
| #endif |
| |
| #if defined(XP_UNIX) |
| #include <unistd.h> |
| #include <sys/utsname.h> |
| #endif |
| |
| #if defined(LINUX) |
| #include <string.h> |
| #include <ctype.h> |
| #define MAX_LINE 512 |
| #endif |
| |
| #if defined(AIX) |
| #include <cf.h> |
| #include <sys/cfgodm.h> |
| #endif |
| |
| PR_IMPLEMENT(char) PR_GetDirectorySeparator(void) |
| { |
| return PR_DIRECTORY_SEPARATOR; |
| } /* PR_GetDirectorySeparator */ |
| |
| /* |
| ** OBSOLETE -- the function name is misspelled. |
| */ |
| PR_IMPLEMENT(char) PR_GetDirectorySepartor(void) |
| { |
| #if defined(DEBUG) |
| static PRBool warn = PR_TRUE; |
| if (warn) { |
| warn = _PR_Obsolete("PR_GetDirectorySepartor()", |
| "PR_GetDirectorySeparator()"); |
| } |
| #endif |
| return PR_GetDirectorySeparator(); |
| } /* PR_GetDirectorySepartor */ |
| |
| PR_IMPLEMENT(char) PR_GetPathSeparator(void) |
| { |
| return PR_PATH_SEPARATOR; |
| } /* PR_GetPathSeparator */ |
| |
| PR_IMPLEMENT(PRStatus) PR_GetSystemInfo(PRSysInfo cmd, char *buf, PRUint32 buflen) |
| { |
| PRUintn len = 0; |
| |
| if (!_pr_initialized) _PR_ImplicitInitialization(); |
| |
| switch(cmd) |
| { |
| case PR_SI_HOSTNAME: |
| case PR_SI_HOSTNAME_UNTRUNCATED: |
| if (PR_FAILURE == _PR_MD_GETHOSTNAME(buf, (PRUintn)buflen)) |
| return PR_FAILURE; |
| |
| if (cmd == PR_SI_HOSTNAME_UNTRUNCATED) |
| break; |
| /* |
| * On some platforms a system does not have a hostname and |
| * its IP address is returned instead. The following code |
| * should be skipped on those platforms. |
| */ |
| #ifndef _PR_GET_HOST_ADDR_AS_NAME |
| /* Return the unqualified hostname */ |
| while (buf[len] && (len < buflen)) { |
| if (buf[len] == '.') { |
| buf[len] = '\0'; |
| break; |
| } |
| len += 1; |
| } |
| #endif |
| break; |
| |
| case PR_SI_SYSNAME: |
| /* Return the operating system name */ |
| #if defined(XP_UNIX) || defined(WIN32) |
| if (PR_FAILURE == _PR_MD_GETSYSINFO(cmd, buf, (PRUintn)buflen)) |
| return PR_FAILURE; |
| #else |
| (void)PR_snprintf(buf, buflen, _PR_SI_SYSNAME); |
| #endif |
| break; |
| |
| case PR_SI_RELEASE: |
| /* Return the version of the operating system */ |
| #if defined(XP_UNIX) || defined(WIN32) |
| if (PR_FAILURE == _PR_MD_GETSYSINFO(cmd, buf, (PRUintn)buflen)) |
| return PR_FAILURE; |
| #endif |
| #if defined(XP_OS2) |
| { |
| ULONG os2ver[2] = {0}; |
| DosQuerySysInfo(QSV_VERSION_MINOR, QSV_VERSION_REVISION, |
| &os2ver, sizeof(os2ver)); |
| /* Formatting for normal usage (2.11, 3.0, 4.0, 4.5); officially, |
| Warp 4 is version 2.40.00, WSeB 2.45.00 */ |
| if (os2ver[0] < 30) |
| (void)PR_snprintf(buf, buflen, "%s%lu", |
| "2.", os2ver[0]); |
| else if (os2ver[0] < 45) |
| (void)PR_snprintf(buf, buflen, "%lu%s%lu", |
| os2ver[0]/10, ".", os2ver[1]); |
| else |
| (void)PR_snprintf(buf, buflen, "%.1f", |
| os2ver[0]/10.0); |
| } |
| #endif /* OS2 */ |
| break; |
| |
| case PR_SI_ARCHITECTURE: |
| /* Return the architecture of the machine (ie. x86, mips, alpha, ...)*/ |
| (void)PR_snprintf(buf, buflen, _PR_SI_ARCHITECTURE); |
| break; |
| default: |
| PR_SetError(PR_INVALID_ARGUMENT_ERROR, 0); |
| return PR_FAILURE; |
| } |
| return PR_SUCCESS; |
| } |
| |
| /* |
| ** PR_GetNumberOfProcessors() |
| ** |
| ** Implementation notes: |
| ** Every platform does it a bit different. |
| ** numCpus is the returned value. |
| ** for each platform's "if defined" section |
| ** declare your local variable |
| ** do your thing, assign to numCpus |
| ** order of the if defined()s may be important, |
| ** especially for unix variants. Do platform |
| ** specific implementations before XP_UNIX. |
| ** |
| */ |
| PR_IMPLEMENT(PRInt32) PR_GetNumberOfProcessors( void ) |
| { |
| PRInt32 numCpus; |
| #if defined(WIN32) |
| SYSTEM_INFO info; |
| |
| GetSystemInfo( &info ); |
| numCpus = info.dwNumberOfProcessors; |
| #elif defined(BEOS) |
| system_info sysInfo; |
| |
| get_system_info(&sysInfo); |
| numCpus = sysInfo.cpu_count; |
| #elif defined(OS2) |
| DosQuerySysInfo( QSV_NUMPROCESSORS, QSV_NUMPROCESSORS, &numCpus, sizeof(numCpus)); |
| #elif defined(_PR_HAVE_SYSCTL) |
| int mib[2]; |
| int rc; |
| size_t len = sizeof(numCpus); |
| |
| mib[0] = CTL_HW; |
| mib[1] = HW_NCPU; |
| rc = sysctl( mib, 2, &numCpus, &len, NULL, 0 ); |
| if ( -1 == rc ) { |
| numCpus = -1; /* set to -1 for return value on error */ |
| _PR_MD_MAP_DEFAULT_ERROR( _MD_ERRNO() ); |
| } |
| #elif defined(HPUX) |
| numCpus = mpctl( MPC_GETNUMSPUS, 0, 0 ); |
| if ( numCpus < 1 ) { |
| numCpus = -1; /* set to -1 for return value on error */ |
| _PR_MD_MAP_DEFAULT_ERROR( _MD_ERRNO() ); |
| } |
| #elif defined(IRIX) |
| numCpus = sysconf( _SC_NPROC_ONLN ); |
| #elif defined(RISCOS) || defined(SYMBIAN) |
| numCpus = 1; |
| #elif defined(LINUX) |
| /* for the benefit of devices with advanced power-saving, that |
| actually hotplug their cpus in heavy load, try to figure out |
| the real number of CPUs */ |
| char buf[MAX_LINE]; |
| FILE *fin; |
| const char *cpu_present = "/sys/devices/system/cpu/present"; |
| size_t strsize; |
| numCpus = 0; |
| fin = fopen(cpu_present, "r"); |
| if (fin != NULL) { |
| if (fgets(buf, MAX_LINE, fin) != NULL) { |
| /* check that the format is what we expect */ |
| if (buf[0] == '0') { |
| strsize = strlen(buf); |
| if (strsize == 1) { |
| /* single core */ |
| numCpus = 1; |
| } else if (strsize >= 3 && strsize <= 5) { |
| /* should be of the form 0-999 */ |
| /* parse the part after the 0-, note count is 0-based */ |
| if (buf[1] == '-' && isdigit(buf[2])) { |
| numCpus = 1 + atoi(buf + 2); |
| } |
| } |
| } |
| } |
| fclose(fin); |
| } |
| /* if that fails, fall back to more standard methods */ |
| if (!numCpus) { |
| numCpus = sysconf( _SC_NPROCESSORS_CONF ); |
| } |
| #elif defined(XP_UNIX) |
| numCpus = sysconf( _SC_NPROCESSORS_CONF ); |
| #else |
| #error "An implementation is required" |
| #endif |
| return(numCpus); |
| } /* end PR_GetNumberOfProcessors() */ |
| |
| /* |
| ** PR_GetPhysicalMemorySize() |
| ** |
| ** Implementation notes: |
| ** Every platform does it a bit different. |
| ** bytes is the returned value. |
| ** for each platform's "if defined" section |
| ** declare your local variable |
| ** do your thing, assign to bytes. |
| ** |
| */ |
| PR_IMPLEMENT(PRUint64) PR_GetPhysicalMemorySize(void) |
| { |
| PRUint64 bytes = 0; |
| |
| #if defined(LINUX) || defined(SOLARIS) |
| |
| long pageSize = sysconf(_SC_PAGESIZE); |
| long pageCount = sysconf(_SC_PHYS_PAGES); |
| if (pageSize >= 0 && pageCount >= 0) |
| bytes = (PRUint64) pageSize * pageCount; |
| |
| #elif defined(NETBSD) || defined(OPENBSD) \ |
| || defined(FREEBSD) || defined(DRAGONFLY) |
| |
| int mib[2]; |
| int rc; |
| #ifdef HW_PHYSMEM64 |
| uint64_t memSize; |
| #else |
| unsigned long memSize; |
| #endif |
| size_t len = sizeof(memSize); |
| |
| mib[0] = CTL_HW; |
| #ifdef HW_PHYSMEM64 |
| mib[1] = HW_PHYSMEM64; |
| #else |
| mib[1] = HW_PHYSMEM; |
| #endif |
| rc = sysctl(mib, 2, &memSize, &len, NULL, 0); |
| if (-1 != rc) { |
| bytes = memSize; |
| } |
| |
| #elif defined(HPUX) |
| |
| struct pst_static info; |
| int result = pstat_getstatic(&info, sizeof(info), 1, 0); |
| if (result == 1) |
| bytes = (PRUint64) info.physical_memory * info.page_size; |
| |
| #elif defined(DARWIN) |
| |
| mach_port_t mach_host = mach_host_self(); |
| struct host_basic_info hInfo; |
| mach_msg_type_number_t count = HOST_BASIC_INFO_COUNT; |
| |
| int result = host_info(mach_host, |
| HOST_BASIC_INFO, |
| (host_info_t) &hInfo, |
| &count); |
| mach_port_deallocate(mach_task_self(), mach_host); |
| if (result == KERN_SUCCESS) |
| bytes = hInfo.max_mem; |
| |
| #elif defined(WIN32) |
| |
| MEMORYSTATUSEX memStat; |
| memStat.dwLength = sizeof(memStat); |
| if (GlobalMemoryStatusEx(&memStat)) |
| bytes = memStat.ullTotalPhys; |
| |
| #elif defined(OS2) |
| |
| ULONG ulPhysMem; |
| DosQuerySysInfo(QSV_TOTPHYSMEM, |
| QSV_TOTPHYSMEM, |
| &ulPhysMem, |
| sizeof(ulPhysMem)); |
| bytes = ulPhysMem; |
| |
| #elif defined(AIX) |
| |
| if (odm_initialize() == 0) { |
| int how_many; |
| struct CuAt *obj = getattr("sys0", "realmem", 0, &how_many); |
| if (obj != NULL) { |
| bytes = (PRUint64) atoi(obj->value) * 1024; |
| free(obj); |
| } |
| odm_terminate(); |
| } |
| |
| #else |
| |
| PR_SetError(PR_NOT_IMPLEMENTED_ERROR, 0); |
| |
| #endif |
| |
| return bytes; |
| } /* end PR_GetPhysicalMemorySize() */ |