htop/darwin/DarwinProcessList.c

212 lines
6.5 KiB
C
Raw Normal View History

/*
htop - DarwinProcessList.c
(C) 2014 Hisham H. Muhammad
Released under the GNU GPLv2, see the COPYING file
in the source distribution for its full text.
*/
#include "ProcessList.h"
#include "DarwinProcess.h"
#include "DarwinProcessList.h"
2015-11-02 15:22:10 +00:00
#include "CRT.h"
#include "zfs/ZfsArcStats.h"
#include "zfs/openzfs_sysctl.h"
#include <stdlib.h>
#include <string.h>
2015-07-13 06:17:14 +00:00
#include <unistd.h>
#include <stdio.h>
#include <libproc.h>
2015-07-13 21:53:46 +00:00
#include <sys/mman.h>
2015-07-14 02:02:40 +00:00
#include <utmpx.h>
#include <err.h>
#include <sys/sysctl.h>
#include <stdbool.h>
struct kern {
short int version[3];
};
void GetKernelVersion(struct kern *k) {
static short int version_[3] = {0};
if (!version_[0]) {
// just in case it fails someday
version_[0] = version_[1] = version_[2] = -1;
char str[256] = {0};
size_t size = sizeof(str);
int ret = sysctlbyname("kern.osrelease", str, &size, NULL, 0);
if (ret == 0) sscanf(str, "%hd.%hd.%hd", &version_[0], &version_[1], &version_[2]);
}
memcpy(k->version, version_, sizeof(version_));
}
/* compare the given os version with the one installed returns:
0 if equals the installed version
positive value if less than the installed version
negative value if more than the installed version
*/
int CompareKernelVersion(short int major, short int minor, short int component) {
struct kern k;
GetKernelVersion(&k);
if ( k.version[0] != major) return k.version[0] - major;
if ( k.version[1] != minor) return k.version[1] - minor;
if ( k.version[2] != component) return k.version[2] - component;
return 0;
}
2015-07-13 06:17:14 +00:00
void ProcessList_getHostInfo(host_basic_info_data_t *p) {
mach_msg_type_number_t info_size = HOST_BASIC_INFO_COUNT;
if(0 != host_info(mach_host_self(), HOST_BASIC_INFO, (host_info_t)p, &info_size)) {
CRT_fatalError("Unable to retrieve host info\n");
2015-07-13 06:17:14 +00:00
}
}
2015-07-13 22:09:18 +00:00
void ProcessList_freeCPULoadInfo(processor_cpu_load_info_t *p) {
if(NULL != p && NULL != *p) {
2015-07-13 21:53:46 +00:00
if(0 != munmap(*p, vm_page_size)) {
CRT_fatalError("Unable to free old CPU load information\n");
2015-07-13 21:53:46 +00:00
}
*p = NULL;
2015-07-13 21:53:46 +00:00
}
2015-07-13 22:09:18 +00:00
}
unsigned ProcessList_allocateCPULoadInfo(processor_cpu_load_info_t *p) {
mach_msg_type_number_t info_size = sizeof(processor_cpu_load_info_t);
unsigned cpu_count;
2015-07-14 16:46:16 +00:00
// TODO Improving the accuracy of the load counts woule help a lot.
2015-07-13 06:17:14 +00:00
if(0 != host_processor_info(mach_host_self(), PROCESSOR_CPU_LOAD_INFO, &cpu_count, (processor_info_array_t *)p, &info_size)) {
CRT_fatalError("Unable to retrieve CPU info\n");
2015-07-13 06:17:14 +00:00
}
return cpu_count;
}
void ProcessList_getVMStats(vm_statistics_t p) {
mach_msg_type_number_t info_size = HOST_VM_INFO_COUNT;
2015-07-14 02:02:40 +00:00
if (host_statistics(mach_host_self(), HOST_VM_INFO, (host_info_t)p, &info_size) != 0)
CRT_fatalError("Unable to retrieve VM statistics\n");
2015-07-14 02:02:40 +00:00
}
2015-07-13 06:17:14 +00:00
struct kinfo_proc *ProcessList_getKInfoProcs(size_t *count) {
int mib[4] = { CTL_KERN, KERN_PROC, KERN_PROC_ALL, 0 };
struct kinfo_proc *processes = NULL;
/* Note the two calls to sysctl(). One to get length and one to get the
* data. This -does- mean that the second call could end up with a missing
* process entry or two.
*/
*count = 0;
if (sysctl(mib, 4, NULL, count, NULL, 0) < 0)
CRT_fatalError("Unable to get size of kproc_infos");
2015-07-13 06:17:14 +00:00
2016-02-02 14:53:02 +00:00
processes = xMalloc(*count);
if (processes == NULL)
CRT_fatalError("Out of memory for kproc_infos");
2015-07-13 06:17:14 +00:00
if (sysctl(mib, 4, processes, count, NULL, 0) < 0)
CRT_fatalError("Unable to get kinfo_procs");
2015-07-13 06:17:14 +00:00
*count = *count / sizeof(struct kinfo_proc);
return processes;
}
ProcessList* ProcessList_new(UsersTable* usersTable, Hashtable* pidMatchList, uid_t userId) {
2016-02-02 14:53:02 +00:00
DarwinProcessList* this = xCalloc(1, sizeof(DarwinProcessList));
2015-07-13 06:17:14 +00:00
ProcessList_init(&this->super, Class(Process), usersTable, pidMatchList, userId);
2015-07-14 02:02:40 +00:00
/* Initialize the CPU information */
2015-07-13 22:09:18 +00:00
this->super.cpuCount = ProcessList_allocateCPULoadInfo(&this->prev_load);
2015-07-13 21:53:46 +00:00
ProcessList_getHostInfo(&this->host_info);
2015-07-13 22:09:18 +00:00
ProcessList_allocateCPULoadInfo(&this->curr_load);
2015-07-13 06:17:14 +00:00
2015-07-14 02:02:40 +00:00
/* Initialize the VM statistics */
ProcessList_getVMStats(&this->vm_stats);
2019-07-07 21:30:37 +00:00
/* Initialize the ZFS kstats, if zfs.kext loaded */
openzfs_sysctl_init(&this->zfs);
openzfs_sysctl_updateArcStats(&this->zfs);
2019-07-07 21:30:37 +00:00
2015-07-14 02:02:40 +00:00
this->super.kernelThreads = 0;
this->super.userlandThreads = 0;
this->super.totalTasks = 0;
this->super.runningTasks = 0;
2015-07-13 06:17:14 +00:00
return &this->super;
}
void ProcessList_delete(ProcessList* this) {
ProcessList_done(this);
free(this);
}
void ProcessList_goThroughEntries(ProcessList* super, bool pauseProcessUpdate) {
2015-07-13 06:17:14 +00:00
DarwinProcessList *dpl = (DarwinProcessList *)super;
bool preExisting = true;
2015-07-13 06:17:14 +00:00
struct kinfo_proc *ps;
size_t count;
2015-07-14 16:46:16 +00:00
DarwinProcess *proc;
2015-07-13 06:17:14 +00:00
2015-07-14 02:02:40 +00:00
/* Update the global data (CPU times and VM stats) */
2015-07-13 22:09:18 +00:00
ProcessList_freeCPULoadInfo(&dpl->prev_load);
dpl->prev_load = dpl->curr_load;
ProcessList_allocateCPULoadInfo(&dpl->curr_load);
2015-07-14 02:02:40 +00:00
ProcessList_getVMStats(&dpl->vm_stats);
openzfs_sysctl_updateArcStats(&dpl->zfs);
2015-07-14 02:02:40 +00:00
// in pause mode only gather global data for meters (CPU/memory/...)
if (pauseProcessUpdate)
return;
2015-07-14 16:46:16 +00:00
/* Get the time difference */
dpl->global_diff = 0;
for(int i = 0; i < dpl->super.cpuCount; ++i) {
for(size_t j = 0; j < CPU_STATE_MAX; ++j) {
dpl->global_diff += dpl->curr_load[i].cpu_ticks[j] - dpl->prev_load[i].cpu_ticks[j];
}
}
2015-07-14 02:02:40 +00:00
/* Clear the thread counts */
super->kernelThreads = 0;
super->userlandThreads = 0;
super->totalTasks = 0;
super->runningTasks = 0;
2015-07-13 21:53:46 +00:00
2015-07-13 06:17:14 +00:00
/* We use kinfo_procs for initial data since :
*
* 1) They always succeed.
* 2) The contain the basic information.
*
* We attempt to fill-in additional information with libproc.
*/
ps = ProcessList_getKInfoProcs(&count);
for(size_t i = 0; i < count; ++i) {
2015-07-14 16:46:16 +00:00
proc = (DarwinProcess *)ProcessList_getProcess(super, ps[i].kp_proc.p_pid, &preExisting, (Process_New)DarwinProcess_new);
2015-07-13 06:17:14 +00:00
DarwinProcess_setFromKInfoProc(&proc->super, &ps[i], preExisting);
2015-07-14 16:46:16 +00:00
DarwinProcess_setFromLibprocPidinfo(proc, dpl);
// Disabled for High Sierra due to bug in macOS High Sierra
bool isScanThreadSupported = ! ( CompareKernelVersion(17, 0, 0) >= 0 && CompareKernelVersion(17, 5, 0) < 0);
if (isScanThreadSupported){
DarwinProcess_scanThreads(proc);
}
2015-07-14 02:02:40 +00:00
super->totalTasks += 1;
2015-07-13 06:17:14 +00:00
if(!preExisting) {
2015-07-14 16:46:16 +00:00
proc->super.user = UsersTable_getRef(super->usersTable, proc->super.st_uid);
2015-07-13 06:17:14 +00:00
2015-07-14 16:46:16 +00:00
ProcessList_add(super, &proc->super);
2015-07-13 06:17:14 +00:00
}
}
2015-07-13 06:17:14 +00:00
free(ps);
}