blob: 9e0d3a620319ac331c065f5a1632c7598668f59a [file] [log] [blame]
/*
* Copyright (c) 2004-2005 Silicon Graphics, Inc.
* All Rights Reserved.
*
* This program is free software; you can redistribute it and/or
* modify it under the terms of the GNU General Public License as
* published by the Free Software Foundation.
*
* This program is distributed in the hope that it would be useful,
* but WITHOUT ANY WARRANTY; without even the implied warranty of
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
* GNU General Public License for more details.
*
* You should have received a copy of the GNU General Public License
* along with this program; if not, write the Free Software Foundation,
* Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA
*/
#include "command.h"
#include "input.h"
#include <sys/mman.h>
#include "init.h"
#include "io.h"
static cmdinfo_t mincore_cmd;
int
mincore_f(
int argc,
char **argv)
{
off64_t offset, llength;
size_t length;
size_t blocksize, sectsize;
void *start;
void *current, *previous;
unsigned char *vec;
int i;
if (argc == 1) {
offset = mapping->offset;
length = mapping->length;
} else if (argc == 3) {
init_cvtnum(&blocksize, &sectsize);
offset = cvtnum(blocksize, sectsize, argv[1]);
if (offset < 0) {
printf(_("non-numeric offset argument -- %s\n"),
argv[1]);
return 0;
}
llength = cvtnum(blocksize, sectsize, argv[2]);
if (llength < 0) {
printf(_("non-numeric length argument -- %s\n"),
argv[2]);
return 0;
} else if (llength > (size_t)llength) {
printf(_("length argument too large -- %lld\n"),
(long long)llength);
return 0;
} else
length = (size_t)llength;
} else {
return command_usage(&mincore_cmd);
}
start = check_mapping_range(mapping, offset, length, 1);
if (!start)
return 0;
vec = calloc(length/pagesize, sizeof(unsigned char));
if (!vec) {
perror("calloc");
return 0;
}
if (mincore(start, length, vec) < 0) {
perror("mincore");
free(vec);
return 0;
}
previous = NULL;
current = start;
for (i = 0; i < length/pagesize; i++, current += pagesize) {
if (vec[i]) {
if (!previous) { /* print start address */
printf("0x%lx - ", (unsigned long)current);
previous = start + (i * pagesize);
}
} else if (previous) { /* print end and page count */
printf(_("0x%lx %lu pages (%llu : %lu)\n"),
(unsigned long)current,
(unsigned long)(current - previous) / pagesize,
(unsigned long long)offset +
(unsigned long long)(previous - start),
(unsigned long)(current - previous));
previous = NULL;
}
}
if (previous)
printf(_("0x%lx %lu pages (%llu : %lu)\n"),
(unsigned long)current,
(unsigned long)(current - previous) / pagesize,
(unsigned long long)offset +
(unsigned long long)(previous - start),
(unsigned long)(current - previous));
free(vec);
return 0;
}
void
mincore_init(void)
{
mincore_cmd.name = "mincore";
mincore_cmd.altname = "mi";
mincore_cmd.cfunc = mincore_f;
mincore_cmd.argmin = 0;
mincore_cmd.argmax = 2;
mincore_cmd.flags = CMD_NOFILE_OK | CMD_FOREIGN_OK;
mincore_cmd.args = _("[off len]");
mincore_cmd.oneline = _("find mapping pages that are memory resident");
add_command(&mincore_cmd);
}