int protocol_nohttp(struct HTTPrecord *cacheitem,struct Url *url, unsigned *cacheitem_status, XSWAP *cacheitem_writeadr)
{
char *value;
#ifndef CLEMTEST
#ifdef OVRL
#ifndef XTVERSION
//---------------------------------------------------------------- finger:
if(!strcmpi(url->protocol,"finger"))
//------------------------------------------------------------------------
{
//finger to cache
*cacheitem_writeadr=Write2Cache(url,cacheitem,1,1);
strcpy(cacheitem->mime,"finger/out");
if(xfinger(url,cacheitem,url->user))
{
if(GLOBAL.abort)
return GOTO_ABORT;
UpdateInCache(*cacheitem_writeadr,cacheitem);
*cacheitem_status=REMOTE;
}
else
{
GLOBAL.reload=0;
return GOTO_ABORT;
}
}
else if(!strcmpi(url->protocol,"news") ||
!strcmpi(url->protocol,"nntp") )
{
//finger to cache
*cacheitem_writeadr=Write2Cache(url,cacheitem,1,1);
if(!url->host[0])
{
value=configvariable(&ARACHNEcfg,"NNTPserver",NULL);
if(value)
{
makestr(url->host,value,STRINGSIZE-1);
}
}
if(!url->file[0] || url->file[0]=='/' && !url->file[1])
strcpy(url->file,"LIST");
strcpy(cacheitem->mime,"news/list");
if(xfinger(url,cacheitem,url->file))
{
if(GLOBAL.abort)
return GOTO_ABORT;
UpdateInCache(*cacheitem_writeadr,cacheitem);
*cacheitem_status=REMOTE;
}
else
{
GLOBAL.reload=0;
return GOTO_ABORT;
}
}
//---------------------------------------------------------------- gopher:
else if(!strcmpi(url->protocol,"gopher"))
//------------------------------------------------------------------------
{
char *selector;
char dummy[IE_MAXLEN+1];
int plugin=externalprotocol(url->protocol,dummy);
if(plugin)
return GOTO_EXTERNAL;
//finger to cache
*cacheitem_writeadr=Write2Cache(url,cacheitem,1,1);
selector=&(url->file[1]);
if(!url->file[1])
{
strcpy(cacheitem->mime,"gopher/1");
}
else if(url->file[2]=='/')
{
sprintf(cacheitem->mime,"gopher/%c",url->file[1]);
if(url->file[1]=='7' && !strchr(url->file,'?')) //search
return GOTO_TRYPLUGIN;
selector=&(url->file[3]);
}
if(xfinger(url,cacheitem,selector))
{
if(GLOBAL.abort)
return GOTO_ABORT;
UpdateInCache(*cacheitem_writeadr,cacheitem);
*cacheitem_status=REMOTE;
}
else
{
GLOBAL.reload=0;
return GOTO_ABORT;
}
}
else
#endif //XTVERSION
#endif //statical version
//------------------------------------------------------------------- ftp:
if(!strcmpi(url->protocol,"ftp"))
//------------------------------------------------------------------------
{
char *ptr;
char dummy[IE_MAXLEN+1];
int plugin=externalprotocol(url->protocol,dummy);
if(plugin)
return GOTO_EXTERNAL;
if(url->user[0] && !url->password[0] &&
(strcmp(url->host,AUTHENTICATION->host) ||
strcmp(url->user,AUTHENTICATION->user) ||
strcmp(AUTHENTICATION->realm,"$ftp")))
{
sprintf(cacheitem->locname,"%s%sftplogin.ah",sharepath,GUIPATH);
strcpy(AUTHENTICATION->host,url->host);
return GOTO_LOCAL_HTML;
}
ptr=configvariable(&ARACHNEcfg,"UseFTPproxy",NULL);
if(ptr && toupper(*ptr)!='N')
{
char *no4all=configvariable(&ARACHNEcfg,"NoFTPproxy4all",NULL);
ptr=configvariable(&ARACHNEcfg,"NoFTPproxy",NULL);
if((!ptr || !strstr(strlwr(ptr),strlwr(url->host) )) &&
(!no4all || !strstr(strlwr(url->host), strlwr(no4all)) ) )
return GOTO_PROXY;
}
//ftp to cache
*cacheitem_writeadr=Write2Cache(url,cacheitem,1,1);
if(ftpsession(url,cacheitem,NULL))
{
if(GLOBAL.abort)
return GOTO_ABORT;
UpdateInCache(*cacheitem_writeadr,cacheitem);
*cacheitem_status=REMOTE;
}
else
{
GLOBAL.reload=0;
return GOTO_ABORT;
}
}
//------------------------------------------------------------------ pop3:
else if(!strcmpi(url->protocol,"pop3"))
//------------------------------------------------------------------------
{
char dele=1,log=0;
if(!url->host[0])
{
value=configvariable(&ARACHNEcfg,"POP3server",NULL);
if(value)
makestr(url->host,value,STRINGSIZE-1);
}
if(!url->user[0])
{
value=configvariable(&ARACHNEcfg,"POP3username",NULL);
if(value)
makestr(url->user,value,STRINGSIZE-1);
}
//Draw title and URL (without password):
MakeTitle(MSG_MAILDL);
url2str(url,GLOBAL.location);
SetInputAtom(&URLprompt,GLOBAL.location);
DrawTitle(0);
add2history(GLOBAL.location);
//Get password and other settings:
if(!url->password[0])
{
value=configvariable(&ARACHNEcfg,"POP3password",NULL);
if(value)
makestr(url->password,value,PASSWORDSIZE-1);
}
value=configvariable(&ARACHNEcfg,"KeepOnServer",NULL);
if(value && toupper(*value)=='Y') dele=0;
value=configvariable(&ARACHNEcfg,"POP3log",NULL);
if(value && toupper(*value)=='Y') log=1;
//POP3 download is performed here:
if(!xpopdump(url,dele,log))
{
sprintf(p->htmlframe[0].cacheitem.locname,"%s%serr_pop3.ah",sharepath,GUIPATH);
return GOTO_ERROR;
}
else if(arachne.scriptline==0)
{
value=configvariable(&ARACHNEcfg,"AfterPOP3",NULL);
if(!value)
strcpy(GLOBAL.location,"file://inbox.dgi");
else
strcpy(GLOBAL.location,value);
GLOBAL.reload=RELOAD_CURRENT_LOCATION;
return GOTO_IVEGOTNEWURL;
}
else
return GOTO_READSCRIPT;
}
//------------------------------------------------------------------ smtp:
else if(!strcmpi(url->protocol,"smtp"))
//------------------------------------------------------------------------
{
char helo=1,log=0;
if(!url->host[0])
{
value=configvariable(&ARACHNEcfg,"SMTPserver",NULL);
if(value)
makestr(url->host,value,STRINGSIZE-1);
}
//!!glennmcc: Feb 13, 2006 -- 'SendHelo' is more logical ;-)
value=configvariable(&ARACHNEcfg,"SendHELO",NULL);
if(!value || toupper(*value)!='N') helo=1; else helo=0;
// value=configvariable(&ARACHNEcfg,"NoHELO",NULL);
// if(value && toupper(*value)=='Y') helo=0;
//!!glennmcc: end
value=configvariable(&ARACHNEcfg,"SMTPlog",NULL);
if(value && toupper(*value)=='Y') log=1;
//!!glennmcc: begin Nov 09, 2003 --- for Authenticated SMTP
//!!glennmcc: Feb 17, 2006 -- moved down below
/*
value=configvariable(&ARACHNEcfg,"UseAuthSMTP",NULL);
if(!value || toupper(*value)!='N') helo=2;
*/
//!!glennmcc: end
//!!glennmcc: begin Apr 30, 2004 --- for Authenticated SMTP
value=configvariable(&ARACHNEcfg,"AuthSMTPusername",NULL);
//!!glennmcc: Sept 17, 2004
// changed so that "email" will always get used for "mail from"
// if(value) makestr(url->user,value,STRINGSIZE-1);
if(value) makestr(url->authuser,value,STRINGSIZE-1);
//!!glennmcc: end
value=configvariable(&ARACHNEcfg,"AuthSMTPpassword",NULL);
//!!glennmcc: Feb 17, 2006 -- switch to new variable 'authpassword'
if(value) makestr(url->authpassword,value,PASSWORDSIZE-1);
//if(value) makestr(url->password,value,STRINGSIZE-1);
//!!glennmcc: end
//!!glennmcc: Feb 17, 2006 -- switch to new variable 'authpassword'
if(strlen(url->authuser)>0 && strlen(url->authpassword)>0 &&
strstr(configvariable(&ARACHNEcfg,"UseAuthSMTP",NULL),"Yes")
)
helo=2; else helo=1;
//!!glennmcc: end
if(!url->user[0])
{
value=configvariable(&ARACHNEcfg,"eMail",NULL);
makestr(url->user,value,STRINGSIZE-1);
}
if(!url->file[0] || !url->file[1] ) //stmp: or smtp:/
{
value=configvariable(&ARACHNEcfg,"MailPath",NULL);
if(value)
{
sprintf(url->file,"/%s*.TBS",value);
}
}
//Draw title and URL:
MakeTitle(MSG_MAILUP);
url2str(url,GLOBAL.location);
SetInputAtom(&URLprompt,GLOBAL.location);
DrawTitle(0);
add2history(GLOBAL.location);
//SMTP upload is performed here:
if(!xsendmail(url,helo,log))
{
sprintf(p->htmlframe[0].cacheitem.locname,"%s%serr_smtp.ah",sharepath,GUIPATH);
return GOTO_ERROR;
}
else if(arachne.scriptline==0)
{
if(strchr(url->file,'*') || GLOBAL.mailaction & MAIL_OUTBOXNOW)
{
value=configvariable(&ARACHNEcfg,"AfterSMTP",NULL);
if(!value)
strcpy(GLOBAL.location,"file://outbox.dgi");
else
strcpy(GLOBAL.location,value);
GLOBAL.reload=RELOAD_CURRENT_LOCATION;
}
else
{
//!!glennmcc: Feb 27, 2005
// since 'smtp:' is not being saved into history, 2 goback()s when we hit
// 'send mail now' on any of the mail compose screens ends-up taking us
// back one step too far.
// Therefore, we only goback once when it's not being sent 'on the spot'
if(!strstr(GLOBAL.location,"smtp:")) goback(); //return to mailto: page...
//#ifdef NOKEY
// goback();
//#endif
//!!glennmcc: end
goback(); //return to page with <A HREF=mailto:...> tag...
GLOBAL.postdata=0;
// RAY: This is done automaticaly now for inbox and outbox,
// see guivent.c
// if(!strcmp(GLOBAL.location,"file://outbox.dgi"))
// GLOBAL.reload=RELOAD_CURRENT_LOCATION;
// else
//Ray: end
GLOBAL.reload=NO_RELOAD;
}
return GOTO_IVEGOTNEWURL;
}
else
return GOTO_READSCRIPT;
}
else
#endif //CLEMTEST
//--------------------------------------------------------------- error?
return UNKNOWN_PROTOCOL;
#ifndef CLEMTEST
return CONTINUE_TO_RENDER;
#endif //CLEMTEST
}
void setTXTprompt(char *str)
{
SetInputAtom(&TXTprompt,str);
}