aboutsummaryrefslogtreecommitdiffstats
path: root/w3mhelperpanel.c
diff options
context:
space:
mode:
Diffstat (limited to '')
-rw-r--r--w3mhelperpanel.c229
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);
+}