Командный файл, выводящий список пользователей в системе и их процессов

#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <stdbool.h>
#include <ctype.h>
#include <errno.h>
 
#include <unistd.h>
#include <pwd.h>
#include <dirent.h>
 
#define INVALID_UID ((uid_t) -1)
 
static void print_users(FILE* dest) {
 
    fprintf(dest, "Users:\n");
 
    struct passwd* ptr;
 
    setpwent();
 
    while ((ptr = getpwent()) != NULL)
        fprintf(dest, "%s\n", ptr->pw_name);
 
    endpwent();
 
    fflush(dest);
}
 
static bool is_numeric(const char* s) {
    if (*s == '\0')
        return false;
 
    while ((*s != '\0') && isdigit(*s))
        s++;
 
    return *s == '\0';
}
 
static bool parse_ulong(const char* const s, unsigned long* const p_ulong) {
 
    char* temp;
 
    *p_ulong = strtoul(s, &temp, 0);
 
    if ((temp == s) || (*temp != '\0') || ((*p_ulong == ULONG_MAX) && (errno == ERANGE)))
        return false;
    else
        return true;
}
 
static uid_t parse_uid(const char* const s) {
 
    unsigned long temp;
 
    if (parse_ulong(s, &temp))
        return (uid_t) temp;
    else
        return INVALID_UID;
}
 
static uid_t get_uid_for_pid(const char* pid) {
 
    char uid_file_name[PATH_MAX];
 
    sprintf(uid_file_name, "/proc/%s/uid", pid);
 
    FILE* f = fopen(uid_file_name, "r");
 
    uid_t uid = INVALID_UID;
 
    if (f != NULL) {
 
        char buf[32];
 
        fgets(buf, sizeof(buf), f);
        buf[strlen(buf) - 1] = '\0';
 
        uid = parse_uid(buf);
 
        fclose(f);
    }
 
    return uid;
}
 
static uid_t get_uid_for_user(const char* user) {
    struct passwd* passwd = getpwnam(user);
 
    if (passwd != NULL)
        return passwd->pw_uid;
    else
        return INVALID_UID;
}
 
static void print_processes(FILE* dest, const char* username) {
 
    fprintf(dest, "Processes of %s (PIDs):\n", username);
 
    uid_t user_id = get_uid_for_user(username);
 
    if (user_id == INVALID_UID) {
 
        fprintf(dest, "User %s not found\n", username);
        fflush(dest);
        return;
    }
 
    DIR* dir = opendir("/proc");
 
    if (dir != NULL) {
 
        struct dirent* dirent;
 
        while ((dirent = readdir(dir)) != NULL) {
 
            if ((strcmp(dirent->d_name, ".") != 0) && (strcmp(dirent->d_name, "..") != 0) &&
                is_numeric(dirent->d_name) && (user_id == get_uid_for_pid(dirent->d_name))) {
 
                fprintf(dest, "%s\n", dirent->d_name);
            }
        }
        closedir(dir);
    }
 
    fflush(dest);
}
 
static void print_usage(FILE* dest) {
    fprintf(dest, "Usage: program [-l] [-u username]\n");
    fflush(dest);
}
 
int main(int argc, char* argv[]) {
 
    if (argc < 2) {
 
        print_usage(stderr);
        return EXIT_FAILURE;
    }
 
    static const char* opt_string = "lu:h";
 
    int opt;
 
    while ((opt = getopt(argc, argv, opt_string)) != -1) {
 
        switch (opt) {
 
            case 'l':
                print_users(stdout);
                break;
            case 'u':
                print_processes(stdout, optarg);
                break;
            case 'h':
                print_usage(stdout);
                break;
            default:
                break;
        }
    }
 
    return EXIT_SUCCESS;
}