summaryrefslogtreecommitdiffstats
path: root/Asenath/Asenath.cpp
diff options
context:
space:
mode:
Diffstat (limited to 'Asenath/Asenath.cpp')
-rw-r--r--Asenath/Asenath.cpp355
1 files changed, 0 insertions, 355 deletions
diff --git a/Asenath/Asenath.cpp b/Asenath/Asenath.cpp
deleted file mode 100644
index 13252ad..0000000
--- a/Asenath/Asenath.cpp
+++ /dev/null
@@ -1,355 +0,0 @@
-// Asenath.cpp : Defines the entry point for the DLL application.
-//
-
-#include "stdafx.h"
-#include "httpext.h"
-
-#include "corediatheke.h"
-
-#include <string>
-#include <strstream>
-
-BOOL APIENTRY DllMain( HANDLE hModule,
- DWORD ul_reason_for_call,
- LPVOID lpReserved
- )
-{
- return TRUE;
-}
-
-BOOL WINAPI GetExtensionVersion(HSE_VERSION_INFO *pVer)
-{
- pVer->dwExtensionVersion = HSE_VERSION;
- strncpy(pVer->lpszExtensionDesc, "Asenath ISAPI Extension", HSE_MAX_EXT_DLL_NAME_LEN);
- return TRUE;
-}
-
-void WriteContext(EXTENSION_CONTROL_BLOCK *pECB, const char *pszFormat, ...)
-{
- char szBuffer[1024];
- va_list arg_ptr;
- va_start(arg_ptr, pszFormat);
- vsprintf(szBuffer, pszFormat, arg_ptr);
- va_end(arg_ptr);
-
- DWORD dwSize = strlen(szBuffer);
- pECB->WriteClient(pECB->ConnID, szBuffer, &dwSize, 0);
-}
-
-void StartContext(EXTENSION_CONTROL_BLOCK *pECB, bool palm)
-{
- if (!palm) {
- WriteContext(pECB, "<html><head>");
- WriteContext(pECB, "<title>Diatheke Interlinear Bible</title>");
- WriteContext(pECB, "<meta http-equiv=\"Content-Type\" content=\"text/html; charset=UTF-8\">");
- WriteContext(pECB, "<meta name=\"palmcomputingplatform\" content=\"true\">");
- WriteContext(pECB, "<meta name=\"historylisttext\" content=\"Diatheke\">");
- WriteContext(pECB, "<style type=\"text/css\">");
- WriteContext(pECB, "#divBottom{position:absolute; visibility:hidden; font-family:arial,helvetica; height:30; width:100; font-size:10pt; font-weight:bold}");
- WriteContext(pECB, "A:link, A:visited, A:active{text-decoration: none}");
- WriteContext(pECB, "</style>");
- WriteContext(pECB, "<script type=\"text/javascript\" language=\"JavaScript\">");
- WriteContext(pECB, "/********************************************************************************");
- WriteContext(pECB, "Copyright (C) 1999 Thomas Brattli");
- WriteContext(pECB, "This script is made by and copyrighted to Thomas Brattli at www.bratta.com");
- WriteContext(pECB, "Visit for more great scripts. This may be used freely as long as this msg is intact!");
- WriteContext(pECB, "I will also appriciate any links you could give me.");
- WriteContext(pECB, "********************************************************************************/");
- WriteContext(pECB, "//Default browsercheck, added to all scripts!");
- WriteContext(pECB, "function checkBrowser(){");
- WriteContext(pECB, "this.ver=navigator.appVersion;");
- WriteContext(pECB, "this.dom=document.getElementById?1:0;");
- WriteContext(pECB, "this.ie5=( (this.ver.indexOf(\"MSIE 6\")>-1 || this.ver.indexOf(\"MSIE 5\")>-1) && this.dom)?1:0;");
- WriteContext(pECB, "this.ie4=(document.all && !this.dom)?1:0;");
- WriteContext(pECB, "this.ns5=(this.dom && parseInt(this.ver) >= 5) ?1:0;");
- WriteContext(pECB, "this.ns4=(document.layers && !this.dom)?1:0;");
- WriteContext(pECB, "this.bw=(this.ie5 || this.ie4 || this.ns4 || this.ns5);");
- WriteContext(pECB, "return this;");
- WriteContext(pECB, "}");
- WriteContext(pECB, "bw=new checkBrowser()");
- WriteContext(pECB, "/********************************************************************************");
- WriteContext(pECB, "Remeber to set the look of the divBottom layer in the stylesheet (if you wan't");
- WriteContext(pECB, "another font or something)");
- WriteContext(pECB, "********************************************************************************/");
- WriteContext(pECB, "/*Set these values, gright for how much from the right you wan't the layer to go");
- WriteContext(pECB, "and gbottom for how much from the bottom you want it*/");
- WriteContext(pECB, "var gright=160");
- WriteContext(pECB, "var gbottom=80");
- WriteContext(pECB, "/********************************************************************************");
- WriteContext(pECB, "Constructing the ChangeText object");
- WriteContext(pECB, "********************************************************************************/");
- WriteContext(pECB, "function makeObj(obj,nest){");
- WriteContext(pECB, "nest=(!nest) ? '':'document.'+nest+'.';");
- WriteContext(pECB, "this.css=bw.dom? document.getElementById(obj).style:bw.ie4?document.all[obj].style:bw.ns4?eval(nest+\"document.layers.\" +obj):0;");
- WriteContext(pECB, "this.moveIt=b_moveIt;");
- WriteContext(pECB, "}");
- WriteContext(pECB, "function b_moveIt(x,y){this.x=x; this.y=y; this.css.left=this.x; this.css.top=this.y}");
- WriteContext(pECB, "/********************************************************************************");
- WriteContext(pECB, "Initilizing the page, getting height and width to moveto and calls the ");
- WriteContext(pECB, "object constructor");
- WriteContext(pECB, "********************************************************************************/");
- WriteContext(pECB, "function geoInit(){");
- WriteContext(pECB, "oGeo=new makeObj('divBottom');");
- WriteContext(pECB, "pageWidth=(bw.ie4 || bw.ie5)?document.body.offsetWidth-4:innerWidth;");
- WriteContext(pECB, "pageHeight=(bw.ie4 || bw.ie5)?document.body.offsetHeight-2:innerHeight;");
- WriteContext(pECB, "checkIt();");
- WriteContext(pECB, "// sets the resize handler.");
- WriteContext(pECB, "onresize=resized;");
- WriteContext(pECB, "if(bw.ie4 || bw.ie5) window.onscroll=checkIt;");
- WriteContext(pECB, "// shows the div");
- WriteContext(pECB, "oGeo.css.visibility='visible';");
- WriteContext(pECB, "}");
- WriteContext(pECB, "/********************************************************************************");
- WriteContext(pECB, "This function executes onscroll in ie and every 30 millisecond in ns");
- WriteContext(pECB, "and checks if the user have scrolled, and if it has it moves the layer.");
- WriteContext(pECB, "********************************************************************************/");
- WriteContext(pECB, "function checkIt(){");
- WriteContext(pECB, "if(bw.ie4 || bw.ie5) oGeo.moveIt(document.body.scrollLeft +pageWidth-gright,document.body.scrollTop+pageHeight-gbottom);");
- WriteContext(pECB, "else if(bw.ns4){");
- WriteContext(pECB, "oGeo.moveIt(window.pageXOffset+pageWidth-gright, window.pageYOffset+pageHeight-gbottom);");
- WriteContext(pECB, "setTimeout('checkIt()',30);");
- WriteContext(pECB, "}");
- WriteContext(pECB, "}");
- WriteContext(pECB, "//Adds a onresize event handler to handle the resizing of the window.");
- WriteContext(pECB, "function resized(){");
- WriteContext(pECB, "pageWidth=(bw.ie4 || bw.ie5)?document.body.offsetWidth-4:innerWidth;");
- WriteContext(pECB, "pageHeight=(bw.ie4 || bw.ie5)?document.body.offsetHeight-2:innerHeight;");
- WriteContext(pECB, "if(bw.ie4 || bw.ie5) checkIt()");
- WriteContext(pECB, "}");
- WriteContext(pECB, "//Calls the geoInit onload");
- WriteContext(pECB, "if(bw.bw && !bw.ns5) onload=geoInit;");
- WriteContext(pECB, "//Here we will write the div out so that lower browser won't see it.'");
- WriteContext(pECB, "if(bw.bw && !bw.ns5) document.write('<div id=\"divBottom\"><table><tr><td align=\"center\">Powered by<br /><img src=\"http://www.crosswire.org/sword/pbsword.gif\"><br /><a href=\"http://www.crosswire.org/\">www.crosswire.org</td></tr></table></div>')");
- WriteContext(pECB, "</script>");
- WriteContext(pECB, "</head>");
- WriteContext(pECB, "<body>");
- }
- else {
- WriteContext(pECB, "<html><head>");
- WriteContext(pECB, "<title>HANDiatheke</title>");
- WriteContext(pECB, "<meta http-equiv=\"Content-Type\" content=\"text/html; charset=UTF-8\">");
- WriteContext(pECB, "<meta name=\"palmcomputingplatform\" content=\"true\">");
- WriteContext(pECB, "<meta name=\"historylisttext\" content=\"HANDiatheke\">");
- WriteContext(pECB, "</head>");
- WriteContext(pECB, "<body>");
- }
-}
-
-void EndContext(EXTENSION_CONTROL_BLOCK *pECB, bool palm)
-{
- if (palm) {
- WriteContext(pECB, "<hr>Powered by Diatheke (http://www.crosswire.org/sword/diatheke) and the SWORD Project (http://www.crosswire.org/sword).");
- }
-
- WriteContext(pECB, "<br /><br /><br /><br /></body></html>");
-}
-
-DWORD WINAPI HttpExtensionProc(EXTENSION_CONTROL_BLOCK *pECB)
-{
- int maxverses = -1;
- unsigned char outputformat = FMT_CGI, searchtype = ST_NONE, outputencoding = ENC_UTF8;
- unsigned long optionfilters = OP_NONE;
- std::string locale, ref, script, range, defversion;
- signed short variants = 0;
- bool debugmode = false, palm = false;
-
- std::string qstring;
- std::string savestring = "Asenath.dll?";
- std::string val, key;
-
- std::list<std::string> versionlist;
-
- string::size_type pos;
-
- qstring = pECB->lpszQueryString;
- unsigned char c;
- for (int i = 0; i < qstring.length(); i++) {
- if (qstring[i] == '+') {
- qstring[i] = ' ';
- }
- else if (qstring[i] == '%') {
- if (qstring[i+1] > 57) {
- c = 16 * (10 + toupper(qstring[i+1]) - 'A');
- }
- else {
- c = 16 * (qstring[i+1] - '0');
- }
-
- if (qstring[i+2] > 57) {
- c += 10 + toupper(qstring[i+2]) - 'A';
- }
- else {
- c += qstring[i+2] - '0';
- }
-
- qstring[i] = c;
- qstring.erase(i+1, 2);
- }
- }
-
- while (qstring.length()) {
- pos = qstring.find("&");
- if (pos != string::npos) {
- key = qstring.substr(0, pos);
- qstring.erase(0, pos+1);
- }
- else {
- key = qstring;
- qstring = "";
- }
-
- pos = key.find("=");
- if (pos != string::npos) {
- val = key.substr(pos+1, key.length()-(pos+1));
- key.erase(pos, key.length()-pos);
- }
- else {
- val = "";
- }
-
- if (!stricmp (key.c_str(), "verse")) {
- ref = val;
- }
- else if (!stricmp (key.c_str(), "search")) {
- if (!stricmp (val.c_str(), "phrase")) {
- searchtype = ST_PHRASE;
- savestring += key + "=" + val + "&";
- }
- else if (!stricmp (val.c_str(), "regex")) {
- searchtype = ST_REGEX;
- savestring += key + "=" + val + "&";
- }
- else if (!stricmp (val.c_str(), "multiword")) {
- searchtype = ST_MULTIWORD;
- savestring += key + "=" + val + "&";
- }
- }
- else if (!stricmp (key.c_str(), "range")) {
- range = val;
- savestring += key + "=" + val + "&";
- }
- else if (!stricmp (key.c_str(), "maxverses")) {
- maxverses = atoi(val.c_str());
- savestring += key + "=" + val + "&";
- }
- else if (!stricmp (key.c_str(), "variants")) {
- variants = atoi(val.c_str());
- savestring += key + "=" + val + "&";
- }
- else if (!stricmp (key.c_str(), "locale")) {
- locale = val;
- savestring += key + "=" + val + "&";
- }
- else if (!stricmp (key.c_str(), "debug")) {
- debugmode = true;
- savestring += key + "=" + val + "&";
- }
- else if (!stricmp (key.c_str(), "palm")) {
- palm = true;
- savestring += key + "=" + val + "&";
- }
- else if (!stricmp (key.c_str(), "defversion")) {
- defversion = val;
- savestring += key + "=" + val + "&";
- }
- else if (stricmp (val.c_str(), "off")) {
- if (!stricmp (key.c_str(), "strongs")) {
- optionfilters |= OP_STRONGS;
- savestring += key + "=" + val + "&";
- }
- else if (!stricmp (key.c_str(), "footnotes")) {
- optionfilters |= OP_FOOTNOTES;
- savestring += key + "=" + val + "&";
- }
- else if (!stricmp (key.c_str(), "headings")) {
- optionfilters |= OP_HEADINGS;
- savestring += key + "=" + val + "&";
- }
- else if (!stricmp (key.c_str(), "morph")) {
- optionfilters |= OP_MORPH;
- savestring += key + "=" + val + "&";
- }
- else if (!stricmp (key.c_str(), "hebcant")) {
- optionfilters |= OP_CANTILLATION;
- savestring += key + "=" + val + "&";
- }
- else if (!stricmp (key.c_str(), "hebvowels")) {
- optionfilters |= OP_HEBREWPOINTS;
- savestring += key + "=" + val + "&";
- }
- else if (!stricmp (key.c_str(), "grkacc")) {
- optionfilters |= OP_GREEKACCENTS;
- savestring += key + "=" + val + "&";
- }
- else if (!stricmp (key.c_str(), "lemmas")) {
- optionfilters |= OP_LEMMAS;
- savestring += key + "=" + val + "&";
- }
- else if (!stricmp (key.c_str(), "scriprefs")) {
- optionfilters |= OP_SCRIPREF;
- savestring += key + "=" + val + "&";
- }
- else if (!stricmp (key.c_str(), "arshape")) {
- optionfilters |= OP_ARSHAPE;
- savestring += key + "=" + val + "&";
- }
- else if (!stricmp (key.c_str(), "bidi")) {
- optionfilters |= OP_BIDI;
- savestring += key + "=" + val + "&";
- }
- else if (!stricmp (key.c_str(), "redletters")) {
- optionfilters |= OP_RED;
- savestring += key + "=" + val + "&";
- }
- else if (!stricmp (key.c_str(), "latinxlit")) {
- script = "Latin";
- savestring += key + "=" + val + "&";
- }
- else
- versionlist.push_back(string(key));
- }
- }
-
- if (!locale.length()) {
- unsigned long dsize = 2083;
- char * data = new char[2083];
- pECB->GetServerVariable(pECB->ConnID, "ACCEPT_LANGUAGE", data, &dsize);
- if (dsize) {
- locale = data;
- pos = locale.find("_");
- if (pos != string::npos)
- locale = locale.substr(0,pos);
- }
- else {
- locale = "abbr";
- }
- }
-
- StartContext(pECB, palm);
-
- if (versionlist.size() == 0)
- if (defversion.length())
- versionlist.push_back(defversion);
- else
- versionlist.push_back("KJV");
-
- while (versionlist.size() > 0)
- {
- ostrstream * output = new ostrstream();
- doquery(maxverses, outputformat, outputencoding, optionfilters, searchtype, range.c_str(), versionlist.front().c_str(), locale.c_str(), ref.c_str(), output, script.c_str(), variants);
- *output << ends;
- qstring = output->str();
- delete output;
- while ((pos = qstring.find("!DIATHEKE_URL!")) && pos != string::npos) {
- qstring.replace(pos, 14, savestring.c_str());
- }
- DWORD dwSize = qstring.length();
- pECB->WriteClient(pECB->ConnID, (void*)qstring.c_str(), &dwSize, 0);
- WriteContext(pECB, "<br /><br />");
- versionlist.pop_front();
- }
-
- EndContext(pECB, palm);
-
- return HSE_STATUS_SUCCESS;
-}
generated by cgit (git 2.34.1) at 2024-11-08 14:57:13 +0000