Subversion Repositories Keine

/* $Id: man.c 7 2024-09-11 15:46:04Z nishi $ */

#include "../config.h"

#include "kn_man.h"

#include "kn_util.h"

#include <stdbool.h>
#include <stdlib.h>
#include <dirent.h>
#include <string.h>
#include <unistd.h>
#include <sys/wait.h>
#include <sys/types.h>
#include <sys/stat.h>

char* kn_find(const char* root, const char* name) {
        DIR* dir = opendir(root);
        if(dir != NULL) {
                struct dirent* d;
                while((d = readdir(dir)) != NULL) {
                        if(strcmp(d->d_name, "..") != 0 && strcmp(d->d_name, ".") != 0) {
                                char* path = kn_strcat3(root, "/", d->d_name);
                                struct stat s;
                                if(stat(path, &s) == 0) {
                                        if(S_ISDIR(s.st_mode)) {
                                                char* v;
                                                if((v = kn_find(path, name)) != NULL) {
                                                        closedir(dir);
                                                        return v;
                                                }
                                        } else if(strcmp(d->d_name, name) == 0) {
                                                closedir(dir);
                                                return path;
                                        }
                                }
                                free(path);
                        }
                }
                closedir(dir);
        }
        return NULL;
}

bool kn_has_manpage(const char* str) {
#ifdef MANPAGE_DIRS
        int i;
        const char* dirs[] = MANPAGE_DIRS;
        for(i = 0; i < sizeof(dirs) / sizeof(*dirs); i++) {
                char* pth = kn_find(dirs[i], str);
                if(pth != NULL) {
                        free(pth);
                        return true;
                }
        }
        return false;
#else
        char* pth = kn_find(MANPAGE_DIR, str);
        if(pth == NULL) return false;
        free(pth);
#endif
        return true;
}

char* kn_manpage_process(const char* path) {
        char* b = malloc(1);
        b[0] = 0;
        int pipes[2];
        char cbuf[2];
        cbuf[1] = 0;
        pipe(pipes);
        pid_t pid = fork();
        if(pid == 0) {
                close(pipes[0]);
                dup2(pipes[1], STDOUT_FILENO);
                execlp("man", "man", path, NULL);
                _exit(1);
        } else {
                close(pipes[1]);
                char c;
                bool sta = false;
                char s = 0;
                char old = 0;
                char m = 0;
                while(1) {
                        if(read(pipes[0], &c, 1) <= 0) break;
                        if(c == 8) {
                                sta = true;
                        } else {
                                if(s != 0) {
                                        if(sta) {
                                                sta = false;
                                                old = s;
                                        } else {
                                                if(old == 0) {
                                                        char* tmp;
                                                        if(m == 'B') {
                                                                tmp = b;
                                                                b = kn_strcat(b, "</b>");
                                                                free(tmp);
                                                        } else if(m == 'U') {
                                                                tmp = b;
                                                                b = kn_strcat(b, "</u>");
                                                                free(tmp);
                                                        }
                                                        m = 0;
                                                        cbuf[0] = s;
                                                        tmp = b;
                                                        b = kn_strcat(b, cbuf);
                                                        free(tmp);
                                                } else {
                                                        if(old == s) {
                                                                cbuf[0] = s;
                                                                char* tmp;
                                                                if(m == 'U') {
                                                                        tmp = b;
                                                                        b = kn_strcat(b, "</u>");
                                                                        free(tmp);
                                                                }
                                                                if(m != 'B') {
                                                                        tmp = b;
                                                                        b = kn_strcat(b, "<b>");
                                                                        free(tmp);
                                                                }
                                                                m = 'B';
                                                                tmp = b;
                                                                b = kn_strcat(b, cbuf);
                                                                free(tmp);
                                                        } else if(old == '_') {
                                                                cbuf[0] = s;
                                                                char* tmp;
                                                                if(m == 'B') {
                                                                        tmp = b;
                                                                        b = kn_strcat(b, "</b>");
                                                                        free(tmp);
                                                                }
                                                                if(m != 'U') {
                                                                        tmp = b;
                                                                        b = kn_strcat(b, "<u>");
                                                                        free(tmp);
                                                                }
                                                                tmp = b;
                                                                b = kn_strcat(b, cbuf);
                                                                free(tmp);
                                                                tmp = b;
                                                                b = kn_strcat(b, "</u>");
                                                                free(tmp);
                                                        }
                                                        old = 0;
                                                }
                                        }
                                }
                                s = c;
                        }
                }
                waitpid(pid, 0, 0);
                char* tmp;
                if(m == 'B') {
                        tmp = b;
                        b = kn_strcat(b, "</b>");
                        free(tmp);
                } else if(m == 'U') {
                        tmp = b;
                        b = kn_strcat(b, "</u>");
                        free(tmp);
                }
        }
        return b;
}