|
Packit |
d37888 |
/* Copyright (C) 1998-99 Martin Baulig
|
|
Packit |
d37888 |
This file is part of LibGTop 1.0.
|
|
Packit |
d37888 |
|
|
Packit |
d37888 |
Contributed by Martin Baulig <martin@home-of-linux.org>, April 1998.
|
|
Packit |
d37888 |
|
|
Packit |
d37888 |
LibGTop is free software; you can redistribute it and/or modify it
|
|
Packit |
d37888 |
under the terms of the GNU General Public License as published by
|
|
Packit |
d37888 |
the Free Software Foundation; either version 2 of the License,
|
|
Packit |
d37888 |
or (at your option) any later version.
|
|
Packit |
d37888 |
|
|
Packit |
d37888 |
LibGTop is distributed in the hope that it will be useful, but WITHOUT
|
|
Packit |
d37888 |
ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
|
|
Packit |
d37888 |
FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
|
|
Packit |
d37888 |
for more details.
|
|
Packit |
d37888 |
|
|
Packit |
d37888 |
You should have received a copy of the GNU General Public License
|
|
Packit |
d37888 |
along with LibGTop; see the file COPYING. If not, write to the
|
|
Packit |
d37888 |
Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor,
|
|
Packit |
d37888 |
Boston, MA 02110-1301, USA.
|
|
Packit |
d37888 |
*/
|
|
Packit |
d37888 |
|
|
Packit |
d37888 |
#include <config.h>
|
|
Packit |
d37888 |
#include <glibtop/error.h>
|
|
Packit |
d37888 |
#include <glibtop/procsegment.h>
|
|
Packit |
d37888 |
|
|
Packit |
d37888 |
#include "glibtop_private.h"
|
|
Packit |
d37888 |
|
|
Packit |
d37888 |
static const unsigned long _glibtop_sysdeps_proc_segment =
|
|
Packit |
d37888 |
(1L << GLIBTOP_PROC_SEGMENT_START_CODE) +
|
|
Packit |
d37888 |
(1L << GLIBTOP_PROC_SEGMENT_END_CODE) +
|
|
Packit |
d37888 |
(1L << GLIBTOP_PROC_SEGMENT_START_STACK);
|
|
Packit |
d37888 |
|
|
Packit |
d37888 |
static const unsigned long _glibtop_sysdeps_proc_segment_statm =
|
|
Packit |
d37888 |
(1L << GLIBTOP_PROC_SEGMENT_TEXT_RSS) +
|
|
Packit |
d37888 |
/* Disabled due to bug in the Linux Kernel. */
|
|
Packit |
d37888 |
/* (1L << GLIBTOP_PROC_SEGMENT_SHLIB_RSS) + */
|
|
Packit |
d37888 |
(1L << GLIBTOP_PROC_SEGMENT_DATA_RSS) +
|
|
Packit |
d37888 |
(1L << GLIBTOP_PROC_SEGMENT_DIRTY_SIZE);
|
|
Packit |
d37888 |
|
|
Packit |
d37888 |
/* Init function. */
|
|
Packit |
d37888 |
|
|
Packit |
d37888 |
void
|
|
Packit |
d37888 |
_glibtop_init_proc_segment_s (glibtop *server)
|
|
Packit |
d37888 |
{
|
|
Packit |
d37888 |
server->sysdeps.proc_segment = _glibtop_sysdeps_proc_segment |
|
|
Packit |
d37888 |
_glibtop_sysdeps_proc_segment_statm;
|
|
Packit |
d37888 |
}
|
|
Packit |
d37888 |
|
|
Packit |
d37888 |
/* Provides detailed information about a process. */
|
|
Packit |
d37888 |
|
|
Packit |
d37888 |
void
|
|
Packit |
d37888 |
glibtop_get_proc_segment_s (glibtop *server, glibtop_proc_segment *buf,
|
|
Packit |
d37888 |
pid_t pid)
|
|
Packit |
d37888 |
{
|
|
Packit |
d37888 |
char buffer [BUFSIZ], *p;
|
|
Packit |
d37888 |
const size_t pagesize = getpagesize();
|
|
Packit |
d37888 |
|
|
Packit |
d37888 |
memset (buf, 0, sizeof (glibtop_proc_segment));
|
|
Packit |
d37888 |
|
|
Packit |
d37888 |
if (proc_stat_to_buffer(buffer, sizeof buffer, pid))
|
|
Packit |
d37888 |
return;
|
|
Packit |
d37888 |
|
|
Packit |
d37888 |
p = proc_stat_after_cmd (buffer);
|
|
Packit |
d37888 |
if (!p) return;
|
|
Packit |
d37888 |
|
|
Packit |
d37888 |
p = skip_multiple_token (p, 23);
|
|
Packit |
d37888 |
|
|
Packit |
d37888 |
buf->start_code = strtoull (p, &p, 0);
|
|
Packit |
d37888 |
buf->end_code = strtoull (p, &p, 0);
|
|
Packit |
d37888 |
buf->start_stack = strtoull (p, &p, 0);
|
|
Packit |
d37888 |
|
|
Packit |
d37888 |
buf->flags = _glibtop_sysdeps_proc_segment;
|
|
Packit |
d37888 |
|
|
Packit |
d37888 |
if (proc_statm_to_buffer(buffer, sizeof buffer, pid))
|
|
Packit |
d37888 |
return;
|
|
Packit |
d37888 |
|
|
Packit |
d37888 |
p = skip_multiple_token (buffer, 3);
|
|
Packit |
d37888 |
|
|
Packit |
d37888 |
/* This doesn't work very well due to a bug in the Linux kernel.
|
|
Packit |
d37888 |
* I'll submit a patch to the kernel mailing list soon. */
|
|
Packit |
d37888 |
|
|
Packit |
d37888 |
buf->text_rss = strtoull (p, &p, 0);
|
|
Packit |
d37888 |
buf->shlib_rss = strtoull (p, &p, 0);
|
|
Packit |
d37888 |
buf->data_rss = strtoull (p, &p, 0);
|
|
Packit |
d37888 |
buf->dirty_size = strtoull (p, &p, 0);
|
|
Packit |
d37888 |
|
|
Packit |
d37888 |
buf->text_rss *= pagesize;
|
|
Packit |
d37888 |
buf->shlib_rss *= pagesize;
|
|
Packit |
d37888 |
buf->data_rss *= pagesize;
|
|
Packit |
d37888 |
buf->dirty_size *= pagesize;
|
|
Packit |
d37888 |
|
|
Packit |
d37888 |
buf->flags |= _glibtop_sysdeps_proc_segment_statm;
|
|
Packit |
d37888 |
}
|