Solaris: fix a memory leak caused by calling ProcessList_getProcess twice for each LWP

This commit is contained in:
Guy M. Broome 2018-03-30 14:34:12 -04:00 committed by Hisham Muhammad
parent 0969f83b21
commit da4877f48c
3 changed files with 65 additions and 83 deletions

View File

@ -131,10 +131,10 @@ SolarisProcess* SolarisProcess_new(Settings* settings) {
} }
void Process_delete(Object* cast) { void Process_delete(Object* cast) {
SolarisProcess* this = (SolarisProcess*) cast; SolarisProcess* sp = (SolarisProcess*) cast;
Process_done((Process*)cast); Process_done((Process*)cast);
free(this->zname); free(sp->zname);
free(this); free(sp);
} }
void SolarisProcess_writeField(Process* this, RichString* str, ProcessField field) { void SolarisProcess_writeField(Process* this, RichString* str, ProcessField field) {

View File

@ -178,6 +178,7 @@ static inline void SolarisProcessList_scanMemoryInfo(ProcessList* pl) {
uint64_t totalfree = 0; uint64_t totalfree = 0;
int nswap = 0; int nswap = 0;
char *spath = NULL; char *spath = NULL;
char *spathbase = NULL;
// Part 1 - physical memory // Part 1 - physical memory
if (spl->kd != NULL) { meminfo = kstat_lookup(spl->kd,"unix",0,"system_pages"); } if (spl->kd != NULL) { meminfo = kstat_lookup(spl->kd,"unix",0,"system_pages"); }
@ -194,7 +195,7 @@ static inline void SolarisProcessList_scanMemoryInfo(ProcessList* pl) {
// Not really "buffers" but the best Solaris analogue that I can find to // Not really "buffers" but the best Solaris analogue that I can find to
// "memory in use but not by programs or the kernel itself" // "memory in use but not by programs or the kernel itself"
pl->buffersMem = (totalmem_pgs->value.ui64 - pages->value.ui64) * PAGE_SIZE_KB; pl->buffersMem = (totalmem_pgs->value.ui64 - pages->value.ui64) * PAGE_SIZE_KB;
} else { } else {
// Fall back to basic sysconf if kstat isn't working // Fall back to basic sysconf if kstat isn't working
pl->totalMem = sysconf(_SC_PHYS_PAGES) * PAGE_SIZE; pl->totalMem = sysconf(_SC_PHYS_PAGES) * PAGE_SIZE;
pl->buffersMem = 0; pl->buffersMem = 0;
@ -204,9 +205,10 @@ static inline void SolarisProcessList_scanMemoryInfo(ProcessList* pl) {
// Part 2 - swap // Part 2 - swap
nswap = swapctl(SC_GETNSWP, NULL); nswap = swapctl(SC_GETNSWP, NULL);
if (nswap > 0) { sl = malloc(nswap * sizeof(swapent_t) + sizeof(int)); } if (nswap > 0) { sl = xMalloc((nswap * sizeof(swapent_t)) + sizeof(int)); }
if (sl != NULL) { spath = malloc( nswap * MAXPATHLEN ); } if (sl != NULL) { spathbase = xMalloc( nswap * MAXPATHLEN ); }
if (spath != NULL) { if (spathbase != NULL) {
spath = spathbase;
swapdev = sl->swt_ent; swapdev = sl->swt_ent;
for (int i = 0; i < nswap; i++, swapdev++) { for (int i = 0; i < nswap; i++, swapdev++) {
swapdev->ste_path = spath; swapdev->ste_path = spath;
@ -220,20 +222,20 @@ static inline void SolarisProcessList_scanMemoryInfo(ProcessList* pl) {
for (int i = 0; i < nswap; i++, swapdev++) { for (int i = 0; i < nswap; i++, swapdev++) {
totalswap += swapdev->ste_pages; totalswap += swapdev->ste_pages;
totalfree += swapdev->ste_free; totalfree += swapdev->ste_free;
free(swapdev->ste_path);
} }
free(sl);
} }
free(spathbase);
free(sl);
pl->totalSwap = totalswap * PAGE_SIZE_KB; pl->totalSwap = totalswap * PAGE_SIZE_KB;
pl->usedSwap = pl->totalSwap - (totalfree * PAGE_SIZE_KB); pl->usedSwap = pl->totalSwap - (totalfree * PAGE_SIZE_KB);
} }
void ProcessList_delete(ProcessList* this) { void ProcessList_delete(ProcessList* pl) {
const SolarisProcessList* spl = (SolarisProcessList*) this; SolarisProcessList* spl = (SolarisProcessList*) pl;
if (spl->kd) kstat_close(spl->kd); ProcessList_done(pl);
free(spl->cpus); free(spl->cpus);
ProcessList_done(this); if (spl->kd) kstat_close(spl->kd);
free(this); free(spl);
} }
/* NOTE: the following is a callback function of type proc_walk_f /* NOTE: the following is a callback function of type proc_walk_f
@ -245,76 +247,56 @@ void ProcessList_delete(ProcessList* this) {
int SolarisProcessList_walkproc(psinfo_t *_psinfo, lwpsinfo_t *_lwpsinfo, void *listptr) { int SolarisProcessList_walkproc(psinfo_t *_psinfo, lwpsinfo_t *_lwpsinfo, void *listptr) {
struct timeval tv; struct timeval tv;
struct tm date; struct tm date;
bool preExistingP = false;
bool preExistingL = false;
bool preExisting; bool preExisting;
Process *cproc; pid_t getpid;
SolarisProcess *csproc;
// Setup process list // Setup process list
ProcessList *pl = (ProcessList*) listptr; ProcessList *pl = (ProcessList*) listptr;
SolarisProcessList *spl = (SolarisProcessList*) listptr; SolarisProcessList *spl = (SolarisProcessList*) listptr;
// Setup Process entry
Process *proc = ProcessList_getProcess(pl, _psinfo->pr_pid * 1024, &preExistingP, (Process_New) SolarisProcess_new);
SolarisProcess *sproc = (SolarisProcess*) proc;
// Setup LWP entry
id_t lwpid_real = _lwpsinfo->pr_lwpid; id_t lwpid_real = _lwpsinfo->pr_lwpid;
if (lwpid_real > 1023) return 0; if (lwpid_real > 1023) return 0;
pid_t lwpid = proc->pid + lwpid_real; pid_t lwpid = (_psinfo->pr_pid * 1024) + lwpid_real;
Process *lwp = ProcessList_getProcess(pl, lwpid, &preExistingL, (Process_New) SolarisProcess_new);
SolarisProcess *slwp = (SolarisProcess*) lwp;
bool onMasterLWP = (_lwpsinfo->pr_lwpid == _psinfo->pr_lwp.pr_lwpid); bool onMasterLWP = (_lwpsinfo->pr_lwpid == _psinfo->pr_lwp.pr_lwpid);
// Determine whether we're updating proc info or LWP info
// based on whether or not we're on the representative LWP
// for a given proc
if (onMasterLWP) { if (onMasterLWP) {
cproc = proc; getpid = _psinfo->pr_pid * 1024;
csproc = sproc;
preExisting = preExistingP;
} else { } else {
cproc = lwp; getpid = lwpid;
csproc = slwp;
preExisting = preExistingL;
} }
Process *proc = ProcessList_getProcess(pl, getpid, &preExisting, (Process_New) SolarisProcess_new);
SolarisProcess *sproc = (SolarisProcess*) proc;
gettimeofday(&tv, NULL); gettimeofday(&tv, NULL);
// Common code pass 1 // Common code pass 1
cproc->show = false; proc->show = false;
csproc->zoneid = _psinfo->pr_zoneid; sproc->taskid = _psinfo->pr_taskid;
csproc->zname = SolarisProcessList_readZoneName(spl->kd,sproc); sproc->projid = _psinfo->pr_projid;
csproc->taskid = _psinfo->pr_taskid; sproc->poolid = _psinfo->pr_poolid;
csproc->projid = _psinfo->pr_projid; sproc->contid = _psinfo->pr_contract;
csproc->poolid = _psinfo->pr_poolid; proc->priority = _lwpsinfo->pr_pri;
csproc->contid = _psinfo->pr_contract; proc->nice = _lwpsinfo->pr_nice;
cproc->priority = _lwpsinfo->pr_pri; proc->processor = _lwpsinfo->pr_onpro;
cproc->nice = _lwpsinfo->pr_nice; proc->state = _lwpsinfo->pr_sname;
cproc->processor = _lwpsinfo->pr_onpro;
cproc->state = _lwpsinfo->pr_sname;
// This could potentially get bungled if the master LWP is not the first
// one enumerated. Unaware of any workaround right now.
if ((cproc->state == 'O') && !onMasterLWP) proc->state = 'O';
// NOTE: This 'percentage' is a 16-bit BINARY FRACTIONS where 1.0 = 0x8000 // NOTE: This 'percentage' is a 16-bit BINARY FRACTIONS where 1.0 = 0x8000
// Source: https://docs.oracle.com/cd/E19253-01/816-5174/proc-4/index.html // Source: https://docs.oracle.com/cd/E19253-01/816-5174/proc-4/index.html
// (accessed on 18 November 2017) // (accessed on 18 November 2017)
cproc->percent_mem = ((uint16_t)_psinfo->pr_pctmem/(double)32768)*(double)100.0; proc->percent_mem = ((uint16_t)_psinfo->pr_pctmem/(double)32768)*(double)100.0;
cproc->st_uid = _psinfo->pr_euid; proc->st_uid = _psinfo->pr_euid;
cproc->user = UsersTable_getRef(pl->usersTable, proc->st_uid); proc->pgrp = _psinfo->pr_pgid;
cproc->pgrp = _psinfo->pr_pgid; proc->nlwp = _psinfo->pr_nlwp;
cproc->nlwp = _psinfo->pr_nlwp; proc->tty_nr = _psinfo->pr_ttydev;
cproc->comm = xStrdup(_psinfo->pr_fname); proc->m_resident = _psinfo->pr_rssize/PAGE_SIZE_KB;
cproc->commLen = strnlen(_psinfo->pr_fname,PRFNSZ); proc->m_size = _psinfo->pr_size/PAGE_SIZE_KB;
cproc->tty_nr = _psinfo->pr_ttydev;
cproc->m_resident = _psinfo->pr_rssize/PAGE_SIZE_KB;
cproc->m_size = _psinfo->pr_size/PAGE_SIZE_KB;
if (!preExisting) { if (!preExisting) {
csproc->realpid = _psinfo->pr_pid; sproc->realpid = _psinfo->pr_pid;
csproc->lwpid = lwpid_real; sproc->lwpid = lwpid_real;
sproc->zoneid = _psinfo->pr_zoneid;
sproc->zname = SolarisProcessList_readZoneName(spl->kd,sproc);
proc->user = UsersTable_getRef(pl->usersTable, proc->st_uid);
proc->comm = xStrdup(_psinfo->pr_fname);
proc->commLen = strnlen(_psinfo->pr_fname,PRFNSZ);
} }
// End common code pass 1 // End common code pass 1
@ -326,7 +308,7 @@ int SolarisProcessList_walkproc(psinfo_t *_psinfo, lwpsinfo_t *_lwpsinfo, void *
// See note above (in common section) about this BINARY FRACTION // See note above (in common section) about this BINARY FRACTION
proc->percent_cpu = ((uint16_t)_psinfo->pr_pctcpu/(double)32768)*(double)100.0; proc->percent_cpu = ((uint16_t)_psinfo->pr_pctcpu/(double)32768)*(double)100.0;
proc->time = _psinfo->pr_time.tv_sec; proc->time = _psinfo->pr_time.tv_sec;
if(!preExistingP) { // Tasks done only for NEW processes if(!preExisting) { // Tasks done only for NEW processes
sproc->is_lwp = false; sproc->is_lwp = false;
proc->starttime_ctime = _psinfo->pr_start.tv_sec; proc->starttime_ctime = _psinfo->pr_start.tv_sec;
} }
@ -347,35 +329,35 @@ int SolarisProcessList_walkproc(psinfo_t *_psinfo, lwpsinfo_t *_lwpsinfo, void *
} }
proc->show = !(pl->settings->hideKernelThreads && sproc->kernel); proc->show = !(pl->settings->hideKernelThreads && sproc->kernel);
} else { // We are not in the master LWP, so jump to the LWP handling code } else { // We are not in the master LWP, so jump to the LWP handling code
lwp->percent_cpu = ((uint16_t)_lwpsinfo->pr_pctcpu/(double)32768)*(double)100.0; proc->percent_cpu = ((uint16_t)_lwpsinfo->pr_pctcpu/(double)32768)*(double)100.0;
lwp->time = _lwpsinfo->pr_time.tv_sec; proc->time = _lwpsinfo->pr_time.tv_sec;
if (!preExistingL) { // Tasks done only for NEW LWPs if (!preExisting) { // Tasks done only for NEW LWPs
slwp->is_lwp = true; sproc->is_lwp = true;
lwp->basenameOffset = -1; proc->basenameOffset = -1;
lwp->ppid = proc->pid; proc->ppid = _psinfo->pr_pid * 1024;
lwp->tgid = proc->pid; proc->tgid = _psinfo->pr_pid * 1024;
slwp->realppid = sproc->realpid; sproc->realppid = _psinfo->pr_pid;
lwp->starttime_ctime = _lwpsinfo->pr_start.tv_sec; proc->starttime_ctime = _lwpsinfo->pr_start.tv_sec;
} }
// Top-level process only gets this for the representative LWP // Top-level process only gets this for the representative LWP
if (slwp->kernel && !pl->settings->hideKernelThreads) lwp->show = true; if (sproc->kernel && !pl->settings->hideKernelThreads) proc->show = true;
if (!slwp->kernel && !pl->settings->hideUserlandThreads) lwp->show = true; if (!sproc->kernel && !pl->settings->hideUserlandThreads) proc->show = true;
} // Top-level LWP or subordinate LWP } // Top-level LWP or subordinate LWP
// Common code pass 2 // Common code pass 2
if (!preExisting) { if (!preExisting) {
if ((sproc->realppid <= 0) && !(sproc->realpid <= 1)) { if ((sproc->realppid <= 0) && !(sproc->realpid <= 1)) {
csproc->kernel = true; sproc->kernel = true;
} else { } else {
csproc->kernel = false; sproc->kernel = false;
} }
(void) localtime_r((time_t*) &cproc->starttime_ctime, &date); (void) localtime_r((time_t*) &proc->starttime_ctime, &date);
strftime(cproc->starttime_show, 7, ((cproc->starttime_ctime > tv.tv_sec - 86400) ? "%R " : "%b%d "), &date); strftime(proc->starttime_show, 7, ((proc->starttime_ctime > tv.tv_sec - 86400) ? "%R " : "%b%d "), &date);
ProcessList_add(pl, cproc); ProcessList_add(pl, proc);
} }
cproc->updated = true; proc->updated = true;
// End common code pass 2 // End common code pass 2

View File

@ -48,7 +48,7 @@ char* SolarisProcessList_readZoneName(kstat_ctl_t* kd, SolarisProcess* sproc);
ProcessList* ProcessList_new(UsersTable* usersTable, Hashtable* pidWhiteList, uid_t userId); ProcessList* ProcessList_new(UsersTable* usersTable, Hashtable* pidWhiteList, uid_t userId);
void ProcessList_delete(ProcessList* this); void ProcessList_delete(ProcessList* pl);
/* NOTE: the following is a callback function of type proc_walk_f /* NOTE: the following is a callback function of type proc_walk_f
* and MUST conform to the appropriate definition in order * and MUST conform to the appropriate definition in order