/* $Id: w3mhelperpanel.c,v 1.8 2002/06/01 17:09:05 ukai Exp $ */
#include <errno.h>
#include <stdlib.h>
#include <stdio.h>
#include "config.h"
#include "Str.h"
#include "indep.h"
#include "textlist.h"
#include "parsetag.h"
#include "myctype.h"
#include "gcmain.c"
#if LANG == JA
#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"
#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);
}
}
}
printf("Content-Type: text/html\n\n");
printf
("<html><head><title>External Viewer Setup</title></head><body><h1>%s</h1>\n",
MSG_TITLE);
printf("<form method=get action=\"file:///$LIB/" W3MHELPERPANEL_CMDNAME
"\">\n");
printf("<input type=hidden name=mode value=edit>\n");
printf("<input type=hidden name=cookie value=\"%s\">\n", local_cookie);
printf
("%s: %s=<input type=text name=newtype><br>%s=<input type=text name=newcmd><br><input type=submit name=submit value=\"%s\">\n",
MSG_NEW_ENTRY, MSG_TYPE, MSG_COMMAND, MSG_REGISTER);
printf
("<p><hr width=50%%><p><table border='0' cellpadding='0'><tr><th> <th><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><td>%s<td>%s<td>", html_quote(type),
html_quote(viewer));
printf("<input type=checkbox name=delete value=\"%s\">%s\n",
html_quote(type), MSG_DELETE);
}
printf
("</table><input type=submit name=submit value=\"%s\"></form></body></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 *qs;
struct parsed_tagarg *cgiarg;
char *mode;
char *sent_cookie;
if ((qs = getenv("QUERY_STRING")) == NULL)
exit(1);
cgiarg = cgistr2tagarg(qs);
mode = tag_get_value(cgiarg, "mode");
local_cookie = getenv("LOCAL_COOKIE");
mailcapfile = Strnew_charp(expandPath(RC_DIR));
Strcat_charp(mailcapfile, "/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);
}
}
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",
"");
}
/* edit mailcap */
editMailcap(mailcapfile->ptr, cgiarg);
}
else {
/* initial panel */
printMailcapPanel(mailcapfile->ptr);
}
return 0;
}
