277 lines
7.2 KiB
C
277 lines
7.2 KiB
C
/*
|
|
* Copyright (c) 2015, 2016, 2022, 2023 Jonas 'Sortie' Termansen.
|
|
*
|
|
* Permission to use, copy, modify, and distribute this software for any
|
|
* purpose with or without fee is hereby granted, provided that the above
|
|
* copyright notice and this permission notice appear in all copies.
|
|
*
|
|
* THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
|
|
* WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
|
|
* MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
|
|
* ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
|
|
* WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
|
|
* ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
|
|
* OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
|
|
*
|
|
* ps.c
|
|
* Lists processes.
|
|
*/
|
|
|
|
#include <sys/types.h>
|
|
|
|
#include <err.h>
|
|
#include <errno.h>
|
|
#include <locale.h>
|
|
#include <memusage.h>
|
|
#include <psctl.h>
|
|
#include <pwd.h>
|
|
#include <stdbool.h>
|
|
#include <stdio.h>
|
|
#include <stdlib.h>
|
|
#include <string.h>
|
|
#include <unistd.h>
|
|
|
|
static char* format_bytes_amount(uintmax_t num_bytes, int unit, bool raw)
|
|
{
|
|
uintmax_t value = num_bytes;
|
|
uintmax_t value_fraction = 0;
|
|
uintmax_t exponent = 1024;
|
|
char suffixes[] = { 'B', 'K', 'M', 'G', 'T', 'P', 'E', 'Z', 'Y' };
|
|
size_t num_suffixes = sizeof(suffixes) / sizeof(suffixes[0]);
|
|
size_t suffix_index = 0;
|
|
while ( (unit < 0 ? exponent <= value : (int) suffix_index < unit) &&
|
|
suffix_index + 1 < num_suffixes )
|
|
{
|
|
value_fraction = value % exponent;
|
|
value /= exponent;
|
|
suffix_index++;
|
|
}
|
|
char suffix_char = raw ? 0 : suffixes[suffix_index];
|
|
char value_fraction_char = '0' + (value_fraction / (1024 / 10 + 1)) % 10;
|
|
char decimals[3] = {suffix_index ? '.' : 0, value_fraction_char, 0};
|
|
char* result;
|
|
if ( asprintf(&result, "%ju%s%c", value, decimals, suffix_char) < 0 )
|
|
return NULL;
|
|
return result;
|
|
}
|
|
|
|
static char* get_program_path_of_pid(pid_t pid)
|
|
{
|
|
struct psctl_program_path ctl;
|
|
memset(&ctl, 0, sizeof(ctl));
|
|
ctl.buffer = NULL;
|
|
ctl.size = 0;
|
|
if ( psctl(pid, PSCTL_PROGRAM_PATH, &ctl) < 0 )
|
|
return NULL;
|
|
while ( true )
|
|
{
|
|
char* new_buffer = (char*) realloc(ctl.buffer, ctl.size);
|
|
if ( !new_buffer )
|
|
return free(ctl.buffer), (char*) NULL;
|
|
ctl.buffer = new_buffer;
|
|
if ( psctl(pid, PSCTL_PROGRAM_PATH, &ctl) == 0 )
|
|
return ctl.buffer;
|
|
if ( errno != ERANGE )
|
|
return free(ctl.buffer), (char*) NULL;
|
|
}
|
|
}
|
|
|
|
static char* get_ttyname_of_pid(pid_t pid)
|
|
{
|
|
struct psctl_ttyname ctl;
|
|
memset(&ctl, 0, sizeof(ctl));
|
|
ctl.buffer = NULL;
|
|
ctl.size = 0;
|
|
if ( psctl(pid, PSCTL_TTYNAME, &ctl) < 0 )
|
|
return NULL;
|
|
while ( true )
|
|
{
|
|
char* new_buffer = (char*) realloc(ctl.buffer, ctl.size);
|
|
if ( !new_buffer )
|
|
return free(ctl.buffer), (char*) NULL;
|
|
ctl.buffer = new_buffer;
|
|
if ( psctl(pid, PSCTL_TTYNAME, &ctl) == 0 )
|
|
return ctl.buffer;
|
|
if ( errno != ERANGE )
|
|
return free(ctl.buffer), (char*) NULL;
|
|
}
|
|
}
|
|
|
|
static void compact_arguments(int* argc, char*** argv)
|
|
{
|
|
for ( int i = 0; i < *argc; i++ )
|
|
{
|
|
while ( i < *argc && !(*argv)[i] )
|
|
{
|
|
for ( int n = i; n < *argc; n++ )
|
|
(*argv)[n] = (*argv)[n+1];
|
|
(*argc)--;
|
|
}
|
|
}
|
|
}
|
|
|
|
static void help(FILE* fp, const char* argv0)
|
|
{
|
|
fprintf(fp, "Usage: %s [OPTION]...\n", argv0);
|
|
fprintf(fp, "List processes.\n");
|
|
}
|
|
|
|
static void version(FILE* fp, const char* argv0)
|
|
{
|
|
fprintf(fp, "%s (Sortix) %s\n", argv0, VERSIONSTR);
|
|
}
|
|
|
|
int main(int argc, char* argv[])
|
|
{
|
|
setlocale(LC_ALL, "");
|
|
|
|
bool select_all = false;
|
|
bool show_full = false;
|
|
bool show_long = false;
|
|
bool show_memory = false;
|
|
|
|
const char* argv0 = argv[0];
|
|
for ( int i = 1; i < argc; i++ )
|
|
{
|
|
const char* arg = argv[i];
|
|
if ( arg[0] != '-' || !arg[1] )
|
|
continue;
|
|
argv[i] = NULL;
|
|
if ( !strcmp(arg, "--") )
|
|
break;
|
|
if ( arg[1] != '-' )
|
|
{
|
|
char c;
|
|
while ( (c = *++arg) ) switch ( c )
|
|
{
|
|
case 'a': select_all = true; break;
|
|
case 'A': select_all = true; break;
|
|
case 'd': select_all = true; break;
|
|
case 'e': select_all = true; break;
|
|
case 'f': show_full = true; break;
|
|
//case 'g': break;
|
|
//case 'G': break;
|
|
case 'l': show_long = true; break;
|
|
case 'm': show_long = true; break;
|
|
//case 'n': break;
|
|
//case 'o': break;
|
|
//case 'p': break;
|
|
//case 't': break;
|
|
//case 'u': break;
|
|
//case 'U': break;
|
|
// TODO: -o or some better more standard design for this.
|
|
case 'v': show_memory = true; break;
|
|
default:
|
|
fprintf(stderr, "%s: unknown option -- '%c'\n", argv0, c);
|
|
help(stderr, argv0);
|
|
exit(1);
|
|
}
|
|
}
|
|
else if ( !strcmp(arg, "--help") )
|
|
help(stdout, argv0), exit(0);
|
|
else if ( !strcmp(arg, "--version") )
|
|
version(stdout, argv0), exit(0);
|
|
else
|
|
{
|
|
fprintf(stderr, "%s: unknown option: %s\n", argv0, arg);
|
|
help(stderr, argv0);
|
|
exit(1);
|
|
}
|
|
}
|
|
|
|
compact_arguments(&argc, &argv);
|
|
|
|
if ( 1 < argc )
|
|
errx(1, "extra operand: %s", argv[1]);
|
|
|
|
size_t total_counter = MEMUSAGE_TOTAL;
|
|
size_t total_memory;
|
|
if ( show_memory && memusage(&total_counter, &total_memory, 1) < 0 )
|
|
err(1, "memusage");
|
|
|
|
if ( show_full || show_long )
|
|
printf("UID\t");
|
|
printf("PID\t");
|
|
if ( show_full || show_long )
|
|
printf("PPID\t");
|
|
if ( show_long )
|
|
printf("PGID\t");
|
|
if ( show_long )
|
|
printf("SID\t");
|
|
if ( show_long )
|
|
printf("NI\t");
|
|
printf("TTY\t");
|
|
printf("TIME\t ");
|
|
if ( show_memory )
|
|
{
|
|
printf("%%MEM\t");
|
|
printf("VMS\t");
|
|
}
|
|
printf("CMD\n");
|
|
pid_t pid = 0;
|
|
while ( true )
|
|
{
|
|
struct psctl_next_pid ctl_next_pid;
|
|
if ( psctl(pid, PSCTL_NEXT_PID, &ctl_next_pid) < 0 )
|
|
err(1, "psctl: PSCTL_NEXT_PID");
|
|
if ( (pid = ctl_next_pid.next_pid) == -1 )
|
|
break;
|
|
struct psctl_stat psst;
|
|
if ( psctl(pid, PSCTL_STAT, &psst) < 0 )
|
|
{
|
|
if ( errno != ESRCH )
|
|
warn("psctl: PSCTL_STAT: [%" PRIiPID "]", pid);
|
|
continue;
|
|
}
|
|
if ( !select_all && psst.euid != geteuid() )
|
|
continue;
|
|
if ( show_full )
|
|
{
|
|
struct passwd* pwd = getpwuid(psst.uid);
|
|
if ( pwd )
|
|
printf("%s\t", pwd->pw_name);
|
|
else
|
|
printf("%" PRIuUID "\t", psst.uid);
|
|
}
|
|
else if ( show_long )
|
|
printf("%" PRIuUID "\t", psst.uid);
|
|
printf("%" PRIiPID "\t", pid);
|
|
if ( show_full || show_long )
|
|
printf("%" PRIiPID "\t", psst.ppid);
|
|
if ( show_long )
|
|
printf("%" PRIiPID "\t", psst.pgid);
|
|
if ( show_long )
|
|
printf("%" PRIiPID "\t", psst.sid);
|
|
if ( show_long )
|
|
printf("%-4i\t", psst.nice);
|
|
char* ttyname = get_ttyname_of_pid(pid);
|
|
// TODO: Strip special characters from the ttyname lest an attacker
|
|
// do things to the user's terminal.
|
|
printf("%s\t", ttyname ? ttyname : "?");
|
|
free(ttyname);
|
|
time_t time = psst.tmns.tmns_utime.tv_sec;
|
|
int hours = (time / (60 * 60)) % 24;
|
|
int minutes = (time / 60) % 60;
|
|
int seconds = (time / 1) % 60;
|
|
printf("%02i:%02i:%02i ", hours, minutes, seconds);
|
|
if ( show_memory )
|
|
{
|
|
unsigned percent = ((uintmax_t) psst.vms * 100) / total_memory;
|
|
printf("%3u%%\t", percent);
|
|
char* usage = format_bytes_amount(psst.vms, -1, false);
|
|
if ( !usage )
|
|
err(1, "malloc");
|
|
printf("%s\t", usage);
|
|
free(usage);
|
|
}
|
|
char* program_path = get_program_path_of_pid(pid);
|
|
// TODO: Strip special characters from the process name lest an attacker
|
|
// do things to the user's terminal.
|
|
printf("%s", program_path ? program_path : "<unknown>");
|
|
free(program_path);
|
|
printf("\n");
|
|
}
|
|
|
|
return ferror(stdout) || fflush(stdout) == EOF ? 1 : 0;
|
|
}
|