#include <sys/types.h>
#include <sys/stat.h>
#include <unistd.h>
+#include <dirent.h>
+#include <errno.h>
#include "webcit.h"
#include "webserver.h"
+HashList *WirelessTemplateCache;
+HashList *WirelessLocalTemplateCache;
+HashList *TemplateCache;
+HashList *LocalTemplateCache;
+
+typedef struct _TemplateToken {
+ const char *pTokenStart;
+ size_t TokenStart;
+ size_t TokenEnd;
+ const char *pTokenEnd;
+
+ const char *pName;
+ size_t NameEnd;
+
+ int HaveParameters;
+ int nParameters;
+ size_t ParamStart [10];
+ size_t ParamEnd [10];
+} WCTemplateToken;
+
+typedef struct _WCTemplate {
+ StrBuf *Data;
+ int nTokensUsed;
+ int TokenSpace;
+ WCTemplateToken **Tokens;
+} WCTemplate;
+
+HashList *GlobalNS;
+
+typedef struct _HashHandler {
+ int foo;
+}HashHandler;
+
+typedef int (*HandlerFunc)(int nArgs, va_list vaarg);
+void RegisterNS(const char *NSName, int nMinArgs, int nMaxArgs, HandlerFunc Handler)
+{
+
+}
+
+
/**
* \brief debugging function to print array to log
*/
* \brief Print the value of a variable
* \param keyname get a key to print
*/
-void print_value_of(char *keyname, size_t keylen) {
+void print_value_of(const char *keyname, size_t keylen) {
struct wcsession *WCC = WC;
wcsubst *ptr;
void *fcn();
/*if (WCC->vars != NULL) PrintHash(WCC->vars, VarPrintTransition, VarPrintEntry);*/
if (keyname[0] == '=') {
- do_template(&keyname[1]);
+ DoTemplate(keyname+1, keylen - 1);
}
/** Page-local variables */
if ((WCC->vars!= NULL) && GetHash(WCC->vars, keyname, keylen, &vVar)) {
ptr = (wcsubst*) vVar;
switch(ptr->wcs_type) {
case WCS_STRING:
- wprintf("%s", ptr->wcs_value);
+ wprintf("%s", (const char*)ptr->wcs_value);
break;
case WCS_SERVCMD:
pvo_do_cmd(ptr->wcs_value);
lprintf(1,"WARNING: invalid value in SV-Hash at %s!", keyname);
}
}
- else if (!strcasecmp(keyname, "SERV_PID")) {
- wprintf("%d", WCC->ctdl_pid);
- }
+ else {
+ char ch;
+ ch = keyname[keylen];
+ ((char*) keyname)[keylen] = '\0'; ////TODO
+ if (!strcasecmp(keyname, "SERV_PID")) {
+ wprintf("%d", WCC->ctdl_pid);
+ }
- else if (!strcasecmp(keyname, "SERV_NODENAME")) {
- escputs(serv_info.serv_nodename);
- }
+ else if (!strcasecmp(keyname, "SERV_NODENAME")) {
+ escputs(serv_info.serv_nodename);
+ }
- else if (!strcasecmp(keyname, "SERV_HUMANNODE")) {
- escputs(serv_info.serv_humannode);
- }
+ else if (!strcasecmp(keyname, "SERV_HUMANNODE")) {
+ escputs(serv_info.serv_humannode);
+ }
- else if (!strcasecmp(keyname, "SERV_FQDN")) {
- escputs(serv_info.serv_fqdn);
- }
+ else if (!strcasecmp(keyname, "SERV_FQDN")) {
+ escputs(serv_info.serv_fqdn);
+ }
- else if (!strcasecmp(keyname, "SERV_SOFTWARE")) {
- escputs(serv_info.serv_software);
- }
+ else if (!strcasecmp(keyname, "SERV_SOFTWARE")) {
+ escputs(serv_info.serv_software);
+ }
+
+ else if (!strcasecmp(keyname, "SERV_REV_LEVEL")) {
+ wprintf("%d.%02d",
+ serv_info.serv_rev_level / 100,
+ serv_info.serv_rev_level % 100
+ );
+ }
+
+ else if (!strcasecmp(keyname, "SERV_BBS_CITY")) {
+ escputs(serv_info.serv_bbs_city);
+ }
- else if (!strcasecmp(keyname, "SERV_REV_LEVEL")) {
- wprintf("%d.%02d",
- serv_info.serv_rev_level / 100,
- serv_info.serv_rev_level % 100
- );
+ else if (!strcasecmp(keyname, "CURRENT_USER")) {
+ escputs(WCC->wc_fullname);
+ }
+
+ else if (!strcasecmp(keyname, "CURRENT_ROOM")) {
+ escputs(WCC->wc_roomname);
+ }
+ ((char*) keyname)[keylen] = ch;//// TODO
+
}
- else if (!strcasecmp(keyname, "SERV_BBS_CITY")) {
- escputs(serv_info.serv_bbs_city);
+}
+
+extern char *static_dirs[PATH_MAX]; /**< Disk representation */
+
+
+void PutNewToken(WCTemplate *Template, WCTemplateToken *NewToken)
+{
+ if (Template->nTokensUsed + 1 >= Template->TokenSpace) {
+ if (Template->TokenSpace <= 0) {
+ Template->Tokens = (WCTemplateToken**)malloc(
+ sizeof(WCTemplateToken*) * 10);
+ Template->TokenSpace = 10;
+ }
+ else {
+ WCTemplateToken **NewTokens;
+ NewTokens= (WCTemplateToken**)malloc(
+ sizeof(WCTemplateToken*) *
+ Template->TokenSpace * 2);
+ memcpy(NewTokens, Template->Tokens,
+ sizeof(WCTemplateToken) * Template->nTokensUsed);
+ free(Template->Tokens);
+ Template->TokenSpace *= 2;
+ Template->Tokens = NewTokens;
+ }
+
+
}
+ Template->Tokens[(Template->nTokensUsed)++] = NewToken;
+}
+
+WCTemplateToken *NewTemlpateSubstitute(const char *pStart, const char *pTmplStart, const char *pTmplEnd)
+{
+ WCTemplateToken *NewToken = (WCTemplateToken*)malloc(sizeof(WCTemplateToken));
+
+ NewToken->pTokenStart = pTmplStart;
+ NewToken->TokenStart = pTmplStart - pStart;
+ NewToken->TokenEnd = (pTmplEnd - pStart) - NewToken->TokenStart;
+ NewToken->pTokenEnd = pTmplEnd;
+
+ NewToken->pName = pTmplStart + 2;
+ NewToken->NameEnd = NewToken->TokenEnd - 2;
+ NewToken->HaveParameters = 0;;
+ NewToken->nParameters = 0;
+ NewToken->ParamStart[0] = 0;
+ NewToken->ParamEnd[0] = 0;
+ return NewToken;
+}
- else if (!strcasecmp(keyname, "CURRENT_USER")) {
- escputs(WCC->wc_fullname);
+void FreeWCTemplate(void *vFreeMe)
+{
+ int i;
+ WCTemplate *FreeMe = (WCTemplate*)vFreeMe;
+
+ if (FreeMe->TokenSpace > 0) {
+ for (i = 0; i < FreeMe->nTokensUsed; i ++) {
+ free(FreeMe->Tokens[i]);
+ }
+ free(FreeMe->Tokens);
}
+ free(FreeMe);
+}
+
+void EvaluateToken(StrBuf *Target, WCTemplateToken *Token)
+{
- else if (!strcasecmp(keyname, "CURRENT_ROOM")) {
- escputs(WCC->wc_roomname);
+
+
+ print_value_of(Token->pName, Token->NameEnd);
+}
+
+
+void ProcessTemplate(WCTemplate *Tmpl, StrBuf *Target)
+{
+ int done = 0;
+ int i;
+ const char *pData, *pS;
+ long len;
+
+ pS = pData = ChrPtr(Tmpl->Data);
+ len = StrLength(Tmpl->Data);
+ i = 0;
+ while (!done) {
+ if (i >= Tmpl->nTokensUsed) {
+ StrBufAppendBufPlain(Target, pData, len, 0);
+ done = 1;
+ }
+ else {
+ StrBufAppendBufPlain(
+ Target, pData,
+ Tmpl->Tokens[i]->pTokenStart - pData, 0);
+ EvaluateToken(Target, Tmpl->Tokens[i]);
+ pData = Tmpl->Tokens[i++]->pTokenEnd + 1;
+ }
}
}
-extern char *static_dirs[PATH_MAX]; /**< Disk representation */
+
/**
* \brief Display a variable-substituted template
* \param templatename template file to load
*/
-void do_template(void *templatename) {
- char flat_filename[PATH_MAX];
- char filename[PATH_MAX];
- FILE *fp;
- char inbuf[1024];
- char outbuf[sizeof inbuf];
- char key[sizeof inbuf];
- int i, pos;
- struct stat mystat;
-
- strcpy(flat_filename, templatename);
- if (WC->is_wap)
- strcat(flat_filename, ".m.html");
- else
- strcat(flat_filename, ".html");
-
- strcpy(filename, static_dirs[1]);
- strcat(filename, flat_filename);
- if (stat(filename, &mystat) == -1)
- {
- strcpy(filename, static_dirs[0]);
- strcat(filename, flat_filename);
- }
-
- fp = fopen(filename, "r");
- if (fp == NULL) {
+void *load_template(StrBuf *filename, StrBuf *Key, HashList *PutThere)
+{
+ int fd;
+ struct stat statbuf;
+ const char *pS, *pE, *pch, *Err;
+ int pos;
+ WCTemplate *NewTemplate;
+
+ fd = open(ChrPtr(filename), O_RDONLY);
+ if (fd <= 0) {
wprintf(_("ERROR: could not open template "));
wprintf("'%s' - %s<br />\n",
- templatename, strerror(errno));
- return;
+ ChrPtr(filename), strerror(errno));
+ return NULL;
}
- strcpy(inbuf, "");
-
- while (fgets(inbuf, sizeof inbuf, fp) != NULL) {
- int len;
+ if (fstat(fd, &statbuf) == -1) {
+ wprintf(_("ERROR: could not stat template "));
+ wprintf("'%s' - %s<br />\n",
+ ChrPtr(filename), strerror(errno));
+ return NULL;
+ }
- strcpy(outbuf, "");
- len = strlen(inbuf);
- while (len > 0) {
- pos = (-1);
- for (i=len; i>=0; --i) {
- if ((inbuf[i]=='<')&&(inbuf[i+1]=='?')) pos = i;
- }
- if (pos < 0) {
- wprintf("%s", inbuf);
- strcpy(inbuf, "");
- len = 0;
- }
- else {
- strncpy(outbuf, inbuf, pos);
- outbuf[pos] = 0;
- wprintf("%s", outbuf);
- memmove(inbuf, &inbuf[pos], len - pos +1);
- len -= pos;
- pos = 1;
- for (i=len; i>=0; --i) {
- if (inbuf[i]=='>') pos = i;
- }
- strncpy(key, &inbuf[2], pos-2);
- key[pos-2] = 0;
- print_value_of(key, pos-2);
- pos++;
- memmove(inbuf, &inbuf[pos], len - pos + 1);
- len -= pos;
+ NewTemplate = (WCTemplate *) malloc(sizeof(WCTemplate));
+ NewTemplate->Data = NewStrBufPlain(NULL, statbuf.st_size);
+ NewTemplate->nTokensUsed = 0;
+ NewTemplate->TokenSpace = 0;
+ NewTemplate->Tokens = NULL;
+ if (StrBufReadBLOB(NewTemplate->Data, &fd, 1, statbuf.st_size, &Err) < 0) {
+ close(fd);
+ FreeWCTemplate(NewTemplate);
+ wprintf(_("ERROR: reading template "));
+ wprintf("'%s' - %s<br />\n",
+ ChrPtr(filename), strerror(errno));
+ return NULL;
+ }
+ close(fd);
+
+ pS = pch = ChrPtr(NewTemplate->Data);
+ pE = pS + StrLength(NewTemplate->Data);
+ while (pch < pE) {
+ const char *pts, *pte;
+ int InQuotes = 0;
+ int InDoubleQuotes = 0;
+ pos = (-1);
+ for (; pch < pE; pch ++) {
+ if ((*pch=='<')&&(*(pch + 1)=='?'))
+ break;
+ }
+ if (pch >= pE)
+ continue;
+ pts = pch;
+ for (; pch < pE - 1; pch ++) {
+ if (*pch == '"')
+ InDoubleQuotes = ! InDoubleQuotes;
+ else if (*pch == '\'')
+ InQuotes = ! InQuotes;
+ else if ((!InQuotes && !InDoubleQuotes) &&
+ ((*pch!='\\')&&(*(pch + 1)=='>'))) {
+ pch ++;
+ break;
}
}
+ if (pch + 1 >= pE)
+ continue;
+ pte = pch;
+ PutNewToken(NewTemplate, NewTemlpateSubstitute(pS, pts, pte));
+ pch ++;
+ }
+ Put(PutThere, ChrPtr(Key), StrLength(Key), NewTemplate, FreeWCTemplate);
+ return NewTemplate;
+}
+
+/**
+ * \brief Display a variable-substituted template
+ * \param templatename template file to load
+ */
+void DoTemplate(const char *templatename, long len)
+{
+ HashList *Static;
+ HashList *StaticLocal;
+ void *vTmpl;
+
+ if (WC->is_mobile) {
+ Static = WirelessTemplateCache;
+ StaticLocal = WirelessLocalTemplateCache;
+ }
+ else {
+ Static = TemplateCache;
+ StaticLocal = LocalTemplateCache;
+ }
+
+ if (!GetHash(StaticLocal, templatename, len, &vTmpl) &&
+ !GetHash(Static, templatename, len, &vTmpl)) {
+ printf ("didn't find %s\n", templatename);
+ return;
+ }
+ if (vTmpl == NULL)
+ return;
+ ProcessTemplate(vTmpl, WC->WBuf);
+
+}
+
+int LoadTemplateDir(const char *DirName, HashList *wireless, HashList *big)
+{
+ StrBuf *FileName;
+ StrBuf *Tag;
+ StrBuf *Dir;
+ DIR *filedir = NULL;
+ struct dirent *filedir_entry;
+ int d_namelen;
+ int d_without_ext;
+ int IsMobile;
+
+ Dir = NewStrBuf();
+ StrBufPrintf(Dir, "%s/t", DirName);
+ filedir = opendir (ChrPtr(Dir));
+ if (filedir == NULL) {
+ return 0;
+ }
+
+ FileName = NewStrBuf();
+ Tag = NewStrBuf();
+ while ((filedir_entry = readdir(filedir)))
+ {
+ char *MinorPtr;
+ char *PStart;
+#ifdef _DIRENT_HAVE_D_NAMELEN
+ d_namelen = filedir_entry->d_namelen;
+#else
+ d_namelen = strlen(filedir_entry->d_name);
+#endif
+ d_without_ext = d_namelen;
+ while ((d_without_ext > 0) && (filedir_entry->d_name[d_without_ext] != '.'))
+ d_without_ext --;
+ if ((d_without_ext == 0) || (d_namelen < 3))
+ continue;
+
+ IsMobile = (strstr(filedir_entry->d_name, ".m.html")!= NULL);
+ PStart = filedir_entry->d_name;
+ StrBufPrintf(FileName, "%s/t/%s", ChrPtr(Dir), filedir_entry->d_name);
+ MinorPtr = strchr(filedir_entry->d_name, '.');
+ if (MinorPtr != NULL)
+ *MinorPtr = '\0';
+ StrBufPlain(Tag, filedir_entry->d_name, MinorPtr - filedir_entry->d_name);
+
+
+ printf("%s %d %s\n",ChrPtr(FileName), IsMobile, ChrPtr(Tag));
+ load_template(FileName, Tag, (IsMobile)?wireless:big);
}
+ closedir(filedir);
+ FreeStrBuf(&FileName);
+ FreeStrBuf(&Tag);
+ FreeStrBuf(&Dir);
+ return 1;
+}
+
+void InitTemplateCache(void)
+{
+
+ LoadTemplateDir(static_dirs[0],
+ WirelessTemplateCache,
+ TemplateCache);
+ LoadTemplateDir(static_dirs[1],
+ WirelessLocalTemplateCache,
+ LocalTemplateCache);
+
- fclose(fp);
}
+void
+InitModule_SUBST
+(void)
+{
+}
/*@}*/
projects / citadel.git / blobdiff