diff options
Diffstat (limited to '')
-rw-r--r-- | w3mhelperpanel.c | 229 |
1 files changed, 229 insertions, 0 deletions
diff --git a/w3mhelperpanel.c b/w3mhelperpanel.c new file mode 100644 index 0000000..30a85db --- /dev/null +++ b/w3mhelperpanel.c @@ -0,0 +1,229 @@ +/* $Id: w3mhelperpanel.c,v 1.13 2003/09/23 18:42:25 ukai Exp $ */ +#include <errno.h> +#include <stdlib.h> +#include <stdio.h> +#include <string.h> +#include "config.h" +#include "Str.h" +#include "indep.h" +#include "textlist.h" +#include "parsetag.h" +#include "myctype.h" + +#if LANG == JA +/* FIXME: gettextize here */ +#define MSG_TITLE "外部ビューアの編集" +#define MSG_NEW_ENTRY "新規登録" +#define MSG_TYPE "データタイプ" +#define MSG_COMMAND "外部コマンド" +#define MSG_REGISTER "登録" +#define MSG_DELETE "削除" +#define MSG_DOIT "実行" +#else /* LANG != JA */ +#define MSG_TITLE "External Viewers Setup" +#define MSG_NEW_ENTRY "New Entry" +#define MSG_TYPE "Type" +#define MSG_COMMAND "Command" +#define MSG_REGISTER "Register" +#define MSG_DELETE "Delete" +#define MSG_DOIT "Do it" +#endif /* LANG != JA */ + +char *local_cookie; + +void +extractMailcapEntry(char *mcap_entry, char **type, char **cmd) +{ + int j; + + while (*mcap_entry && IS_SPACE(*mcap_entry)) + mcap_entry++; + for (j = 0; + mcap_entry[j] && mcap_entry[j] != ';' && !IS_SPACE(mcap_entry[j]); + j++) ; + *type = allocStr(mcap_entry, j); + if (mcap_entry[j] == ';') + j++; + while (mcap_entry[j] && IS_SPACE(mcap_entry[j])) + j++; + *cmd = allocStr(&mcap_entry[j], -1); +} + +static void +bye(const char *action, const char *mailcap) +{ + printf("Content-Type: text/plain\n\n%s %s\n", action, mailcap); + exit(1); +} + +void +printMailcapPanel(char *mailcap) +{ + FILE *f; + Str tmp; + char *type, *viewer; + + if ((f = fopen(mailcap, "rt")) == NULL) { + if (errno != ENOENT) + bye("Can't open", mailcap); + + if (!(f = fopen(mailcap, "a+"))) /* if $HOME/.mailcap is not found, make it now! */ + bye("Can't open", mailcap); + + { + char *SysMailcap = getenv("SYS_MAILCAP"); + FILE *s = fopen(SysMailcap ? SysMailcap : "/etc/mailcap", "r"); + if (s) { + char buffer[256]; + while (fgets(buffer, sizeof buffer, s)) /* Copy system mailcap to */ + fputs(buffer, f); /* users' new one */ + fclose(s); + rewind(f); + } + } + } +#if LANG == JA + /* FIXME: gettextize here */ + printf("Content-Type: text/html; charset=EUC-JP\n\n"); +#else + printf("Content-Type: text/html\n\n"); +#endif + printf("<html>\n<head>\n<title>%s</title>\n</head>\n<body>\n<h1>%s</h1>\n", + MSG_TITLE, MSG_TITLE); + printf("<form method=post action=\"file:///$LIB/" W3MHELPERPANEL_CMDNAME + "\">\n"); + printf("<input type=hidden name=mode value=edit>\n"); + printf("<input type=hidden name=cookie value=\"%s\">\n", + html_quote(local_cookie)); + printf("<table>\n<tr><td>%s:<td>%s=<input type=text name=newtype size=40>\n\ +<tr><td><td>%s=<input type=text name=newcmd size=40>\n\ +<tr><td><input type=submit name=submit value=\"%s\">\n</table>\n", + MSG_NEW_ENTRY, MSG_TYPE, MSG_COMMAND, MSG_REGISTER); + printf("<p><hr width=50%%><p>\n<table border='0' cellpadding='0'>\n\ +<tr><th align=left><b>%s</b><th><b>%s</b>\n", + MSG_TYPE, MSG_COMMAND); + while (tmp = Strfgets(f), tmp->length > 0) { + if (tmp->ptr[0] == '#') + continue; + Strchop(tmp); + extractMailcapEntry(tmp->ptr, &type, &viewer); + printf("<tr valign=top><td>%s<td>%s<td nowrap>", html_quote(type), + html_quote(viewer)); + printf("<input type=checkbox name=delete value=\"%s\">%s\n", + html_quote(type), MSG_DELETE); + } + printf("</table>\n<input type=submit name=submit value=\"%s\">\n</form>\n\ +</body>\n</html>\n", + MSG_DOIT); +} + +void +editMailcap(char *mailcap, struct parsed_tagarg *args) +{ + TextList *t = newTextList(); + TextListItem *ti; + FILE *f; + Str tmp; + char *type, *viewer; + struct parsed_tagarg *a; + int delete_it; + + if ((f = fopen(mailcap, "rt")) == NULL) + bye("Can't open", mailcap); + + while (tmp = Strfgets(f), tmp->length > 0) { + if (tmp->ptr[0] == '#') + continue; + Strchop(tmp); + extractMailcapEntry(tmp->ptr, &type, &viewer); + delete_it = 0; + for (a = args; a != NULL; a = a->next) { + if (!strcmp(a->arg, "delete") && !strcmp(a->value, type)) { + delete_it = 1; + break; + } + } + if (!delete_it) + pushText(t, Sprintf("%s;\t%s\n", type, viewer)->ptr); + } + type = tag_get_value(args, "newtype"); + viewer = tag_get_value(args, "newcmd"); + if (type != NULL && *type != '\0' && viewer != NULL && *viewer != '\0') + pushText(t, Sprintf("%s;\t%s\n", type, viewer)->ptr); + fclose(f); + if ((f = fopen(mailcap, "w")) == NULL) + bye("Can't write to", mailcap); + + for (ti = t->first; ti != NULL; ti = ti->next) + fputs(ti->ptr, f); + fclose(f); + printf("Content-Type: text/plain\n"); + printf("w3m-control: BACK\nw3m-control: BACK\n"); + printf("w3m-control: REINIT MAILCAP\n"); +} + +int +main(int argc, char *argv[], char **envp) +{ + Str mailcapfile; + extern char *getenv(); + char *p; + int length; + Str qs = NULL; + struct parsed_tagarg *cgiarg; + char *mode; + char *sent_cookie; + + p = getenv("REQUEST_METHOD"); + if (p == NULL || strcasecmp(p, "post")) + goto request_err; + p = getenv("CONTENT_LENGTH"); + if (p == NULL || (length = atoi(p)) <= 0) + goto request_err; + + qs = Strfgets(stdin); + Strchop(qs); + if (qs->length != length) + goto request_err; + cgiarg = cgistr2tagarg(qs->ptr); + + p = getenv("LOCAL_COOKIE_FILE"); + if (p) { + FILE *f = fopen(p, "r"); + if (f) { + local_cookie = Strfgets(f)->ptr; + fclose(f); + } + } + sent_cookie = tag_get_value(cgiarg, "cookie"); + if (local_cookie == NULL || sent_cookie == NULL || + strcmp(local_cookie, sent_cookie) != 0) { + /* Local cookie doesn't match */ + bye("Local cookie doesn't match: It may be an illegal execution", ""); + } + + mode = tag_get_value(cgiarg, "mode"); + mailcapfile = Strnew_charp(expandPath(USER_MAILCAP)); + if (mode && !strcmp(mode, "edit")) { + char *referer; + /* check if I can edit my mailcap */ + if ((referer = getenv("HTTP_REFERER")) != NULL) { + if (strncmp(referer, "file://", 7) != 0 && + strncmp(referer, "exec://", 7) != 0) { + /* referer is not file: nor exec: */ + bye("It may be an illegal execution\n referer=", referer); + } + } + /* edit mailcap */ + editMailcap(mailcapfile->ptr, cgiarg); + } + else { + /* initial panel */ + printMailcapPanel(mailcapfile->ptr); + } + return 0; + + request_err: + bye("Incomplete Request:", qs ? qs->ptr : "(null)"); + exit(1); +} |