// Perform at most one value conversion from the following set:
//
// - integer conversions
// - float conversions
// - numeric conversions (int to float)
// - boolean conversions
//
// TODO: Support conversion of T[N] to T[].
//
// TODO: Support pointer conversions.
//
// TODO: Support character conversions separately from integer
// conversions?
//
// TODO: Why are references not converted in C++?
Expr&
convert_value(Expr& e, Type& t)
{
// Value conversions do not apply to reeference types.
if (is<Reference_type>(&e.type()))
return e;
// Ignore qualifications in this comparison. Value categories
// include the cv-qualified versions of types.
Type& u = t.unqualified_type();
// Try a boolean conversion.
if (Boolean_type* b = as<Boolean_type>(&u))
return convert_to_bool(e, *b);
// Try an integer conversion.
if (Integer_type* z = as<Integer_type>(&u))
return convert_to_wider_integer(e, *z);
// Try one of the floating point conversions.
if (Float_type* f = as<Float_type>(&u))
return convert_to_float(e, *f);
return e;
}
void client_logic_create_note_decode (string data,
string& bible, int& book, int& chapter, int& verse,
string& summary, string& contents, bool& raw)
{
vector <string> lines = filter_string_explode (data, '\n');
if (!lines.empty ()) {
bible = lines [0];
lines.erase (lines.begin());
}
if (!lines.empty ()) {
book = convert_to_int (lines [0]);
lines.erase (lines.begin());
}
if (!lines.empty ()) {
chapter = convert_to_int (lines [0]);
lines.erase (lines.begin());
}
if (!lines.empty ()) {
verse = convert_to_int (lines [0]);
lines.erase (lines.begin());
}
if (!lines.empty ()) {
summary = lines [0];
lines.erase (lines.begin());
}
if (!lines.empty ()) {
raw = convert_to_bool (lines [0]);
lines.erase (lines.begin());
}
contents = filter_string_implode (lines, "\n");
}
// Returns whether the device, that matches the cookie it sent, is touch-enabled.
bool Database_Login::getTouchEnabled (string cookie)
{
SqliteDatabase sql (database ());
sql.add ("SELECT touch FROM logins WHERE cookie =");
sql.add (cookie);
sql.add (";");
vector <string> result = sql.query () ["touch"];
if (!result.empty()) return convert_to_bool (result [0]);
return false;
}
bool bitpattern_take(ustring & pattern)
// Return the next bit from "pattern" and removes it from that string.
// This implies that settngs from the pattern must be taken in the same order
// that they were added.
{
bool setting = false;
if (!pattern.empty()) {
setting = convert_to_bool(pattern.substr(0, 1));
pattern.erase(0, 1);
}
return setting;
}
static int
parse_logical_AND_expr(int need_eval, cfg_cond_value_t *prv)
{
cfg_cond_value_t v1, v2;
int b = 0, r;
if ((r = parse_OR_expr(need_eval, &v1)) < 0) return -1;
if (need_eval) {
while (parsecfg_state.raw.s[parsecfg_state.raw_i] > 0 && parsecfg_state.raw.s[parsecfg_state.raw_i] <= ' ') parsecfg_state.raw_i++;
if (parsecfg_state.raw.s[parsecfg_state.raw_i] != '&' || parsecfg_state.raw.s[parsecfg_state.raw_i + 1] != '&') {
*prv = v1;
return r;
}
if (!convert_to_bool(&v1)) {
set_bool_value(prv, 0);
b = 0;
need_eval = 0;
free_value(&v1);
}
}
while (1) {
while (parsecfg_state.raw.s[parsecfg_state.raw_i] > 0 && parsecfg_state.raw.s[parsecfg_state.raw_i] <= ' ') parsecfg_state.raw_i++;
if (parsecfg_state.raw.s[parsecfg_state.raw_i] != '&' || parsecfg_state.raw.s[parsecfg_state.raw_i + 1] != '&') break;
parsecfg_state.raw_i += 2;
while (parsecfg_state.raw.s[parsecfg_state.raw_i] > 0 && parsecfg_state.raw.s[parsecfg_state.raw_i] <= ' ') parsecfg_state.raw_i++;
if (parse_OR_expr(need_eval, &v2) < 0) return -1;
if (need_eval && !convert_to_bool(&v2)) {
set_bool_value(prv, 0);
b = 0;
need_eval = 0;
free_value(&v2);
}
}
if (need_eval) {
set_bool_value(prv, 1);
b = 1;
}
return b;
}
static int
parse_expr(int need_eval, cfg_cond_value_t *prv)
{
int b = 0;
if (parse_conditional_expr(need_eval, prv) < 0) return -1;
while (parsecfg_state.raw.s[parsecfg_state.raw_i] > 0 && parsecfg_state.raw.s[parsecfg_state.raw_i] <= ' ') parsecfg_state.raw_i++;
if (parsecfg_state.raw.s[parsecfg_state.raw_i]) {
fprintf(stderr, "%d: syntax error\n", parsecfg_state.lineno);
if (need_eval) free_value(prv);
return -1;
}
if (need_eval) b = convert_to_bool(prv);
return b;
}
// Returns whether the device that matches the remote IP $address and the browser's user $agent,
// and the other fingerprint, is touch-enabled.
bool Database_Login::getTouchEnabled (string address, string agent, string fingerprint)
{
address = md5 (address);
agent = md5 (agent);
fingerprint = md5 (fingerprint);
SqliteDatabase sql (database ());
sql.add ("SELECT touch FROM logins WHERE address =");
sql.add (address);
sql.add ("AND agent =");
sql.add (agent);
sql.add ("AND fingerprint =");
sql.add (fingerprint);
sql.add (";");
vector <string> result = sql.query () ["touch"];
if (!result.empty()) return convert_to_bool (result [0]);
return false;
}
string Database_Privileges::save (string username)
{
SqliteDatabase sql (database ());
vector <string> lines;
lines.push_back (bibles_start ());
sql.add ("SELECT bible, book, write FROM bibles WHERE username ="******";");
map <string, vector <string> > result = sql.query ();
vector <string> bible = result ["bible"];
vector <string> book = result ["book"];
vector <string> write = result ["write"];
for (size_t i = 0; i < bible.size (); i++) {
lines.push_back (bible [i]);
lines.push_back (book [i]);
// It could have just stored 0 or 1 for the boolean values.
// But if that were done, then there would be no change in the length of the file
// when changing only boolean values.
// And then the client would not re-download that file.
// To use "on" and "off", that solves the issue.
bool b = convert_to_bool (write[i]);
if (b) lines.push_back (on ());
else lines.push_back (off ());
}
lines.push_back (bibles_end ());
lines.push_back (features_start ());
sql.clear ();
sql.add ("SELECT feature FROM features WHERE username ="******";");
result = sql.query ();
vector <string> feature = result ["feature"];
for (size_t i = 0; i < feature.size (); i++) {
lines.push_back (feature [i]);
}
lines.push_back (features_end ());
return filter_string_implode (lines, "\n");
}
// Read the privilege from the database whether $username has access to $bible $book.
// The privileges are stored in $read for read-only access,
// and in $write for write access.
void Database_Privileges::getBibleBook (string username, string bible, int book, bool & read, bool & write)
{
SqliteDatabase sql (database ());
sql.add ("SELECT write FROM bibles WHERE username ="******"AND bible =");
sql.add (bible);
sql.add ("AND book =");
sql.add (book);
sql.add (";");
vector <string> result = sql.query () ["write"];
if (result.empty()) {
// Not in database: No access.
read = false;
write = false;
} else {
// Occurs in database: Read access.
read = true;
// Take write access from the database field.
write = convert_to_bool (result [0]);
}
}
string styles_view (void * webserver_request)
{
Webserver_Request * request = (Webserver_Request *) webserver_request;
string page;
Assets_Header header = Assets_Header (translate("Style"), webserver_request);
header.addBreadCrumb (menu_logic_settings_menu (), menu_logic_settings_text ());
header.addBreadCrumb (styles_indexm_url (), menu_logic_styles_indexm_text ());
page = header.run ();
Assets_View view;
Database_Styles database_styles;
string sheet = request->query ["sheet"];
view.set_variable ("sheet", filter_string_sanitize_html (sheet));
string style = request->query ["style"];
view.set_variable ("style", filter_string_sanitize_html (style));
Database_Styles_Item marker_data = database_styles.getMarkerData (sheet, style);
// Whether the logged-in user has write access to the stylesheet.
string username = request->session_logic ()->currentUser ();
int userlevel = request->session_logic ()->currentLevel ();
bool write = database_styles.hasWriteAccess (username, sheet);
if (userlevel >= Filter_Roles::admin ()) write = true;
// The style's name.
string name = marker_data.name;
if (request->query.count ("name")) {
Dialog_Entry dialog_entry = Dialog_Entry ("view", translate("Please enter the name for the style"), name, "name", "");
dialog_entry.add_query ("sheet", sheet);
dialog_entry.add_query ("style", style);
page += dialog_entry.run ();
return page;
}
if (request->post.count ("name")) {
name = request->post["entry"];
if (write) database_styles.updateName (sheet, style, name);
}
view.set_variable ("name", filter_string_sanitize_html (name));
// The style's info.
string info = marker_data.info;
if (request->query.count ("info")) {
Dialog_Entry dialog_entry = Dialog_Entry ("view", translate("Please enter the description for the style"), info, "info", "");
dialog_entry.add_query ("sheet", sheet);
dialog_entry.add_query ("style", style);
page += dialog_entry.run ();
return page;
}
if (request->post.count("info")) {
info = request->post["entry"];
if (write) database_styles.updateInfo (sheet, style, info);
}
view.set_variable ("info", filter_string_sanitize_html (info));
// The style's category.
string category = marker_data.category;
if (request->query.count("category")) {
category = request->query["category"];
if (category == "") {
Dialog_List dialog_list = Dialog_List ("view", translate("Would you like to change the category of this style?"),translate("Here are the various categories:"), translate("Please pick one."));
dialog_list.add_query ("sheet", sheet);
dialog_list.add_query ("style", style);
dialog_list.add_row (styles_logic_category_text ("id"), "category", "id");
dialog_list.add_row (styles_logic_category_text ("ith"), "category", "ith");
dialog_list.add_row (styles_logic_category_text ("ipp"), "category", "ipp");
dialog_list.add_row (styles_logic_category_text ("ioe"), "category", "ioe");
dialog_list.add_row (styles_logic_category_text ("t"), "category", "t");
dialog_list.add_row (styles_logic_category_text ("h"), "category", "h");
dialog_list.add_row (styles_logic_category_text ("cv"), "category", "cv");
dialog_list.add_row (styles_logic_category_text ("p"), "category", "p");
dialog_list.add_row (styles_logic_category_text ("l"), "category", "l");
dialog_list.add_row (styles_logic_category_text ("pe"), "category", "pe");
dialog_list.add_row (styles_logic_category_text ("te"), "category", "te");
dialog_list.add_row (styles_logic_category_text ("f"), "category", "f");
dialog_list.add_row (styles_logic_category_text ("x"), "category", "x");
dialog_list.add_row (styles_logic_category_text ("xsn"), "category", "xsn");
dialog_list.add_row (styles_logic_category_text ("st"), "category", "st");
dialog_list.add_row (styles_logic_category_text ("cs"), "category", "cs");
dialog_list.add_row (styles_logic_category_text ("sb"), "category", "sb");
dialog_list.add_row (styles_logic_category_text ("sf"), "category", "sf");
dialog_list.add_row (styles_logic_category_text ("pm"), "category", "pm");
dialog_list.add_row (styles_logic_category_text (""), "category", "");
page += dialog_list.run ();
return page;
} else {
if (write) database_styles.updateCategory (sheet, style, category);
}
}
view.set_variable ("category", styles_logic_category_text(category));
// The style's type.
int type = marker_data.type;
if (request->query.count ("type")) {
string s = request->query["type"];
type = convert_to_int (s);
if (s == "") {
Dialog_List dialog_list = Dialog_List ("view", translate("Would you like to change the type of this style?"), translate("Here are the various types:"), translate("Please pick one."));
dialog_list.add_query ("sheet", sheet);
dialog_list.add_query ("style", style);
for (int i = 0; i < 99; i++) {
string text = styles_logic_type_text (i);
if (text.length () > 2) {
dialog_list.add_row (text, "type", convert_to_string (i));
}
}
page += dialog_list.run ();
return page;
} else {
if (write) database_styles.updateType (sheet, style, type);
}
}
view.set_variable ("type", convert_to_string (type));
view.set_variable ("type_text", styles_logic_type_text (type));
// The style's subtype.
int subtype = marker_data.subtype;
if (request->query.count ("subtype")) {
string s = request->query["subtype"];
subtype = convert_to_int (s);
if (s == "") {
Dialog_List dialog_list = Dialog_List ("view", translate("Would you like to change the sub type of this style?"), "", "");
dialog_list.add_query ("sheet", sheet);
dialog_list.add_query ("style", style);
Database_Styles_Item marker_data = database_styles.getMarkerData (sheet, style);
int type = marker_data.type;
for (int i = 0; i < 99; i++) {
string text = styles_logic_subtype_text (type, i);
if (text.length () > 2) {
dialog_list.add_row (text, "subtype", convert_to_string (i));
}
}
page += dialog_list.run ();
return page;
} else {
if (write) database_styles.updateSubType (sheet, style, subtype);
}
}
view.set_variable ("subtype",convert_to_string (subtype));
string subtype_text = styles_logic_subtype_text (type, subtype);
view.set_variable ("subtype_text", subtype_text);
if (subtype_text.length () > 2) view.enable_zone ("subtype_text");
// The fontsize.
if (styles_logic_fontsize_is_relevant (type, subtype)) view.enable_zone ("fontsize_relevant");
float fontsize = marker_data.fontsize;
if (request->query.count ("fontsize")) {
Dialog_Entry dialog_entry = Dialog_Entry ("view", translate("Please enter a fontsize between 5 and 60 points"), convert_to_string (fontsize), "fontsize", translate ("The value to enter is just a number, e.g. 12."));
dialog_entry.add_query ("sheet", sheet);
dialog_entry.add_query ("style", style);
page += dialog_entry.run ();
return page;
}
if (request->post.count("fontsize")) {
float fs = convert_to_float (request->post["entry"]);
if ((fs >= 5) && (fs <= 60)) {
fontsize = fs;
if (write) database_styles.updateFontsize (sheet, style, fontsize);
}
}
view.set_variable ("fontsize", convert_to_string (fontsize));
// Italics, bold, underline, small caps relevance.
if (styles_logic_italic_bold_underline_smallcaps_are_relevant (type, subtype)) view.enable_zone ("ibus_relevant");
// Italic.
int italic = marker_data.italic;
if (request->query.count ("italic")) {
string s = request->query["italic"];
if (s == "") {
Dialog_List dialog_list = Dialog_List ("view", translate("Would you like to change whether this style is in italics?"), "", "");
dialog_list.add_query ("sheet", sheet);
dialog_list.add_query ("style", style);
Database_Styles_Item marker_data = database_styles.getMarkerData (sheet, style);
int last_value = ooitOn;
if (styles_logic_italic_bold_underline_smallcaps_are_full (marker_data.type, marker_data.subtype))
last_value = ooitToggle;
for (int i = 0; i <= last_value; i++) {
dialog_list.add_row (styles_logic_off_on_inherit_toggle_text (i), "italic", convert_to_string (i));
}
page += dialog_list.run ();
return page;
} else {
italic = convert_to_int (s);
if (write) database_styles.updateItalic (sheet, style, italic);
}
}
view.set_variable ("italic", styles_logic_off_on_inherit_toggle_text (italic));
// Bold.
int bold = marker_data.bold;
if (request->query.count ("bold")) {
string s = request->query["bold"];
if (s == "") {
Dialog_List dialog_list = Dialog_List ("view", translate("Would you like to change whether this style is in bold?"), "", "");
dialog_list.add_query ("sheet", sheet);
dialog_list.add_query ("style", style);
Database_Styles_Item marker_data = database_styles.getMarkerData (sheet, style);
int last_value = ooitOn;
if (styles_logic_italic_bold_underline_smallcaps_are_full (marker_data.type, marker_data.subtype))
last_value = ooitToggle;
for (int i = 0; i <= last_value; i++) {
dialog_list.add_row (styles_logic_off_on_inherit_toggle_text (i), "bold", convert_to_string (i));
}
page += dialog_list.run ();
return page;
} else {
bold = convert_to_int (s);
if (write) database_styles.updateBold (sheet, style, bold);
}
}
view.set_variable ("bold", styles_logic_off_on_inherit_toggle_text (bold));
// Underline.
int underline = marker_data.underline;
if (request->query.count ("underline")) {
string s = request->query["underline"];
if (s == "") {
Dialog_List dialog_list = Dialog_List ("view", translate("Would you like to change whether this style is underlined?"), "", "");
dialog_list.add_query ("sheet", sheet);
dialog_list.add_query ("style", style);
Database_Styles_Item marker_data = database_styles.getMarkerData (sheet, style);
int last_value = ooitOn;
if (styles_logic_italic_bold_underline_smallcaps_are_full (type, subtype))
last_value = ooitToggle;
for (int i = 0; i <= last_value; i++) {
dialog_list.add_row (styles_logic_off_on_inherit_toggle_text (i), "underline", convert_to_string (i));
}
page += dialog_list.run ();
return page;
} else {
underline = convert_to_int (s);
if (write) database_styles.updateUnderline (sheet, style, underline);
}
}
view.set_variable ("underline", styles_logic_off_on_inherit_toggle_text (underline));
// Small caps.
int smallcaps = marker_data.smallcaps;
if (request->query.count ("smallcaps")) {
string s = request->query["smallcaps"];
if (s == "") {
Dialog_List dialog_list = Dialog_List ("view", translate("Would you like to change whether this style is in small caps?"), "", "");
dialog_list.add_query ("sheet", sheet);
dialog_list.add_query ("style", style);
Database_Styles_Item marker_data = database_styles.getMarkerData (sheet, style);
int last_value = ooitOn;
if (styles_logic_italic_bold_underline_smallcaps_are_full (marker_data.type, marker_data.subtype))
last_value = ooitToggle;
for (int i = 0; i <= last_value; i++) {
dialog_list.add_row (styles_logic_off_on_inherit_toggle_text (i), "smallcaps", convert_to_string (i));
}
page += dialog_list.run ();
return page;
} else {
smallcaps = convert_to_int (s);
if (write) database_styles.updateSmallcaps (sheet, style, smallcaps);
}
}
view.set_variable ("smallcaps", styles_logic_off_on_inherit_toggle_text (smallcaps));
// Superscript.
if (styles_logic_superscript_is_relevant (type, subtype)) view.enable_zone ("superscript_relevant");
int superscript = marker_data.superscript;
if (request->query.count ("superscript")) {
superscript = convert_to_int (request->query["superscript"]);
if (write) database_styles.updateSuperscript (sheet, style, superscript);
}
view.set_variable ("superscript_value", styles_logic_off_on_inherit_toggle_text (superscript));
view.set_variable ("superscript_toggle", convert_to_string (!(bool) superscript));
// Whether a list of the following paragraph treats are relevant.
if (styles_logic_paragraph_treats_are_relevant (type, subtype)) view.enable_zone ("paragraph_treats_relevant");
// Text alignment.
int justification = marker_data.justification;
if (request->query.count ("alignment")) {
Dialog_List dialog_list = Dialog_List ("view", translate("Would you like to change the text alignment of this style?"), "", "");
dialog_list.add_query ("sheet", sheet);
dialog_list.add_query ("style", style);
for (int i = AlignmentLeft; i <= AlignmentJustify; i++) {
dialog_list.add_row (styles_logic_alignment_text (i), "justification", convert_to_string (i));
}
page += dialog_list.run ();
return page;
}
if (request->query.count ("justification")) {
justification = convert_to_int (request->query["justification"]);
if (write) database_styles.updateJustification (sheet, style, justification);
}
view.set_variable ("justification", styles_logic_alignment_text (justification));
// Space before paragraph.
float spacebefore = marker_data.spacebefore;
if (request->query.count ("spacebefore")) {
Dialog_Entry dialog_entry = Dialog_Entry ("view", translate("Please enter a space of between 0 and 100 mm before the paragraph"), convert_to_string (spacebefore), "spacebefore", translate ("This is the space before, or in other words, above the paragraph. The value to enter is just a number, e.g. 0."));
dialog_entry.add_query ("sheet", sheet);
dialog_entry.add_query ("style", style);
page += dialog_entry.run ();
return page;
}
if (request->post.count ("spacebefore")) {
spacebefore = convert_to_float (request->post["entry"]);
if (spacebefore < 0) spacebefore = 0;
if (spacebefore > 100) spacebefore = 100;
if (write) database_styles.updateSpaceBefore (sheet, style, spacebefore);
}
view.set_variable ("spacebefore", convert_to_string (spacebefore));
// Space after paragraph.
float spaceafter = marker_data.spaceafter;
if (request->query.count ("spaceafter")) {
Dialog_Entry dialog_entry = Dialog_Entry ("view", translate("Please enter a space of between 0 and 100 mm after the paragraph"), convert_to_string (spaceafter), "spaceafter", translate ("This is the space after, or in other words, below the paragraph. The value to enter is just a number, e.g. 0."));
dialog_entry.add_query ("sheet", sheet);
dialog_entry.add_query ("style", style);
page += dialog_entry.run ();
return page;
}
if (request->post.count("spaceafter")) {
spaceafter = convert_to_float (request->post["entry"]);
if (spaceafter < 0) spaceafter = 0;
if (spaceafter > 100) spaceafter = 100;
if (write) database_styles.updateSpaceAfter (sheet, style, spaceafter);
}
view.set_variable ("spaceafter", convert_to_string (spaceafter));
// Left margin.
float leftmargin = marker_data.leftmargin;
if (request->query.count ("leftmargin")) {
Dialog_Entry dialog_entry = Dialog_Entry ("view", translate("Please enter a left margin of between -100 and 100 mm"), convert_to_string (leftmargin), "leftmargin", translate ("This is the left margin of the paragraph. The value to enter is just a number, e.g. 0."));
dialog_entry.add_query ("sheet", sheet);
dialog_entry.add_query ("style", style);
page += dialog_entry.run ();
return page;
}
if (request->post.count("leftmargin")) {
leftmargin = convert_to_float (request->post ["entry"]);
if (leftmargin < 0) leftmargin = 0;
if (leftmargin > 100) leftmargin = 100;
if (write) database_styles.updateLeftMargin (sheet, style, leftmargin);
}
view.set_variable ("leftmargin", convert_to_string (leftmargin));
// Right margin.
float rightmargin = marker_data.rightmargin;
if (request->query.count ("rightmargin")) {
Dialog_Entry dialog_entry = Dialog_Entry ("view", translate("Please enter a right margin of between -100 and 100 mm"), convert_to_string (rightmargin), "rightmargin", translate ("This is the right margin of the paragraph. The value to enter is just a number, e.g. 0."));
dialog_entry.add_query ("sheet", sheet);
dialog_entry.add_query ("style", style);
page += dialog_entry.run ();
return page;
}
if (request->post.count("rightmargin")) {
rightmargin = convert_to_float (request->post["entry"]);
if (rightmargin < -100) rightmargin = -100;
if (rightmargin > 100) rightmargin = 100;
if (write) database_styles.updateRightMargin (sheet, style, rightmargin);
}
view.set_variable ("rightmargin", convert_to_string (rightmargin));
// First line indent.
float firstlineindent = marker_data.firstlineindent;
if (request->query.count ("firstlineindent")) {
Dialog_Entry dialog_entry = Dialog_Entry ("view", translate("Please enter a first line indent of between -100 and 100 mm"), convert_to_string (firstlineindent), "firstlineindent", translate ("This is the indent of the first line of the the paragraph. The value to enter is just a number, e.g. 0."));
dialog_entry.add_query ("sheet", sheet);
dialog_entry.add_query ("style", style);
page += dialog_entry.run ();
return page;
}
if (request->post.count ("firstlineindent")) {
firstlineindent = convert_to_float (request->post["entry"]);
if (firstlineindent < -100) firstlineindent = -100;
if (firstlineindent > 100) firstlineindent = 100;
if (write) database_styles.updateFirstLineIndent (sheet, style, firstlineindent);
}
view.set_variable ("firstlineindent", convert_to_string (firstlineindent));
// Columns spanning.
if (styles_logic_columns_are_relevant (type, subtype)) view.enable_zone ("columns_relevant");
bool spancolumns = marker_data.spancolumns;
if (request->query.count ("spancolumns")) {
spancolumns = convert_to_bool (request->query["spancolumns"]);
if (write) database_styles.updateSpanColumns (sheet, style, spancolumns);
}
view.set_variable ("spancolumns", styles_logic_off_on_inherit_toggle_text (spancolumns));
view.set_variable ("spancolumns_toggle", convert_to_string (!spancolumns));
// Color.
if (styles_logic_color_is_relevant (type, subtype)) view.enable_zone ("color_relevant");
string color = marker_data.color;
if (request->query.count ("textcolor")) {
color = request->query["color"];
if (color == "") {
Dialog_Color dialog_color = Dialog_Color ("view", translate("Please specify a new color"));
dialog_color.add_query ("textcolor", "true");
dialog_color.add_query ("sheet", sheet);
dialog_color.add_query ("style", style);
page += dialog_color.run ();
return page;
} else {
if (color.find ("#") == string::npos) color.insert (0, "#");
if (color.length () != 7) color = "#000000";
if (write) database_styles.updateColor (sheet, style, color);
}
}
view.set_variable ("color", color);
string backgroundcolor = marker_data.backgroundcolor;
if (request->query.count ("backgroundcolor")) {
backgroundcolor = request->query["color"];
if (backgroundcolor == "") {
Dialog_Color dialog_color = Dialog_Color ("view", translate("Please specify a new color"));
dialog_color.add_query ("backgroundcolor", "true");
dialog_color.add_query ("sheet", sheet);
dialog_color.add_query ("style", style);
page += dialog_color.run ();
return page;
} else {
if (backgroundcolor.find ("#") == string::npos) backgroundcolor.insert (0, "#");
if (backgroundcolor.length () != 7) backgroundcolor = "#FFFFFF";
if (write) {
database_styles.updateBackgroundColor (sheet, style, backgroundcolor);
}
}
}
view.set_variable ("backgroundcolor", backgroundcolor);
// Whether to print this style.
if (styles_logic_print_is_relevant (type, subtype)) view.enable_zone ("print_relevant");
bool print = marker_data.print;
if (request->query.count ("print")) {
print = convert_to_bool (request->query["print"]);
if (write) database_styles.updatePrint (sheet, style, print);
}
view.set_variable ("print", styles_logic_off_on_inherit_toggle_text (print));
view.set_variable ("print_toggle", convert_to_string (!print));
// Userbool1
string userbool1_function = styles_logic_get_userbool1_text (styles_logic_get_userbool1_function (type, subtype));
if (userbool1_function.length () > 2) view.enable_zone ("userbool1_relevant");
view.set_variable ("userbool1_function", userbool1_function);
bool userbool1 = marker_data.userbool1;
if (request->query.count ("userbool1")) {
userbool1 = convert_to_bool (request->query["userbool1"]);
if (write) database_styles.updateUserbool1 (sheet, style, userbool1);
}
view.set_variable ("userbool1_value", styles_logic_off_on_inherit_toggle_text (userbool1));
view.set_variable ("userbool1_toggle", convert_to_string (!userbool1));
// Userbool2
string userbool2_function = styles_logic_get_userbool2_text (styles_logic_get_userbool2_function (type, subtype));
if (userbool2_function.length () > 2) view.enable_zone ("userbool2_relevant");
view.set_variable ("userbool2_function", userbool2_function);
bool userbool2 = marker_data.userbool2;
if (request->query.count ("userbool2")) {
userbool2 = convert_to_bool (request->query["userbool2"]);
if (write) database_styles.updateUserbool2 (sheet, style, userbool2);
}
view.set_variable ("userbool2_value", styles_logic_off_on_inherit_toggle_text (userbool2));
view.set_variable ("userbool2_toggle", convert_to_string (!userbool2));
// Userbool3
string userbool3_function = styles_logic_get_userbool3_text (styles_logic_get_userbool3_function (type, subtype));
if (userbool3_function.length () > 2) view.enable_zone ("userbool3_relevant");
view.set_variable ("userbool3_function", userbool3_function);
bool userbool3 = marker_data.userbool3;
if (request->query.count ("userbool3")) {
userbool3 = convert_to_bool (request->query["userbool3"]);
if (write) database_styles.updateUserbool3 (sheet, style, userbool3);
}
view.set_variable ("userbool3_value", styles_logic_off_on_inherit_toggle_text (userbool3));
view.set_variable ("userbool3_toggle", convert_to_string (!userbool3));
// Userint1.
int userint1 = marker_data.userint1;
switch (styles_logic_get_userint1_function (type, subtype)) {
case UserInt1None :
break;
case UserInt1NoteNumbering :
view.enable_zone ("userint1_notenumbering");
if (request->query.count ("notenumbering")) {
Dialog_List dialog_list = Dialog_List ("view", translate("Would you like to change the numbering of the note?"), "", "");
dialog_list.add_query ("sheet", sheet);
dialog_list.add_query ("style", style);
for (int i = NoteNumbering123; i <= NoteNumberingUser; i++) {
dialog_list.add_row (styles_logic_note_numbering_text (i), "userint1", convert_to_string (i));
}
page += dialog_list.run ();
return page;
}
if (request->query.count ("userint1")) {
userint1 = convert_to_int (request->query["userint1"]);
if (write) database_styles.updateUserint1 (sheet, style, userint1);
}
view.set_variable ("userint1", styles_logic_note_numbering_text (userint1));
break;
case UserInt1TableColumnNumber :
view.enable_zone ("userint1_columnnumber");
if (request->query.count ("userint1")) {
Dialog_Entry dialog_entry = Dialog_Entry ("view", translate("Please enter a column number between 1 and 4"), convert_to_string (userint1), "userint1", translate ("This is the column number for the style. The first columm is number 1."));
dialog_entry.add_query ("sheet", sheet);
dialog_entry.add_query ("style", style);
page += dialog_entry.run ();
return page;
}
if (request->post.count ("userint1")) {
int value = convert_to_int (request->post["entry"]);
if ((value >= 1) && (value <= 4)) {
userint1 = value;
if (write) database_styles.updateUserint1 (sheet, style, userint1);
}
}
view.set_variable ("userint1", convert_to_string (userint1));
break;
}
// Userint2.
int userint2 = marker_data.userint2;
switch (styles_logic_get_userint2_function (type, subtype)) {
case UserInt2None :
break;
case UserInt2NoteNumberingRestart :
view.enable_zone ("userint2_notenumberingrestart");
if (request->query.count ("notenumberingrestart")) {
Dialog_List dialog_list = Dialog_List ("view", translate("Would you like to change when the note numbering restarts?"), "", "");
dialog_list.add_query ("sheet", sheet);
dialog_list.add_query ("style", style);
for (int i = NoteRestartNumberingNever; i <= NoteRestartNumberingEveryChapter; i++) {
dialog_list.add_row (styles_logic_note_restart_numbering_text (i), "userint2", convert_to_string (i));
}
page += dialog_list.run ();
return page;
}
if (request->query.count ("userint2")) {
userint2 = convert_to_int (request->query["userint2"]);
if (write) database_styles.updateUserint2 (sheet, style, userint2);
}
view.set_variable ("userint2", styles_logic_note_restart_numbering_text (userint2));
break;
case UserInt2EndnotePosition :
view.enable_zone ("userint2_endnoteposition");
if (request->query.count ("endnoteposition")) {
Dialog_List dialog_list = Dialog_List ("view", translate("Would you like to change the position where to dump the endnotes?"), "", "");
dialog_list.add_query ("sheet", sheet);
dialog_list.add_query ("style", style);
for (int i = EndNotePositionAfterBook; i <= EndNotePositionAtMarker; i++) {
dialog_list.add_row (styles_logic_end_note_position_text (i), "userint2", convert_to_string(i));
}
page += dialog_list.run ();
return page;
}
if (request->query.count ("userint2")) {
userint2 = convert_to_int (request->query["userint2"]);
if (write) database_styles.updateUserint2 (sheet, style, userint2);
}
view.set_variable ("userint2", styles_logic_end_note_position_text (userint2));
break;
}
// Userint3 not yet used.
// Userstring1.
string userstring1 = marker_data.userstring1;
string userstring1_question;
string userstring1_help;
switch (styles_logic_get_userstring1_function (type, subtype)) {
case UserString1None :
break;
case UserString1NoteNumberingSequence :
if (userint1 == NoteNumberingUser) {
view.enable_zone ("userstring1_numberingsequence");
userstring1_question = translate("Please enter a new note numbering sequence");
userstring1_help = translate("This gives a sequence for numbering the notes. When for example § † * is entered, the numbering goes like §, †, *, §, †, *, and so forth. Any sequence of characters can be used. Spaces should separate the characters");
}
break;
case UserString1WordListEntryAddition :
view.enable_zone ("userstring1_wordlistaddition");
userstring1_question = translate("Please enter a new addition to the word list entry");
userstring1_help = translate("This given an optional string to be added after each definition in the body of text. In some Bibles the unusual words are marked with an asterisk and then explained in a glossary. If you would enter the asterisk here, or indeed any string, Bibledit would include this in the exported documents.");
break;
}
if (request->query.count ("userstring1")) {
Dialog_Entry dialog_entry = Dialog_Entry ("view", userstring1_question, userstring1, "userstring1", userstring1_help);
dialog_entry.add_query ("sheet", sheet);
dialog_entry.add_query ("style", style);
page += dialog_entry.run ();
return page;
}
if (request->post.count ("userstring1")) {
userstring1 = request->post["entry"];
if (write) database_styles.updateUserstring1 (sheet, style, userstring1);
}
if (userstring1 == "") userstring1 = "--";
view.set_variable ("userstring1", filter_string_sanitize_html (userstring1));
// Userstring2
string userstring2 = marker_data.userstring2;
string userstring2_question;
string userstring2_info;
switch (styles_logic_get_userstring2_function (type, subtype)) {
case UserString2None :
break;
case UserString2DumpEndnotesHere :
if (userint2 == EndNotePositionAtMarker) {
view.enable_zone ("userstring2_dumpendnotes");
userstring2_question = translate("Please enter a marker at which the endnotes should be dumped");
userstring2_info = translate("The marker is to be given without the backslash, e.g. \"zendnotes\".");
}
break;
}
if (request->query.count ("userstring2")) {
Dialog_Entry dialog_entry = Dialog_Entry ("view", userstring2_question, userstring2, "userstring2", userstring2_info);
dialog_entry.add_query ("sheet", sheet);
dialog_entry.add_query ("style", style);
page += dialog_entry.run ();
return page;
}
if (request->post.count("userstring2")) {
userstring2 = request->post["entry"];
if (write) database_styles.updateUserstring2 (sheet, style, userstring2);
}
if (userstring2 == "") userstring2 = "--";
view.set_variable ("userstring2", filter_string_sanitize_html (userstring2));
// Recreate stylesheets after editing a style.
if ((request->query.size () != 2) || (request->post.size () != 0)) {
styles_sheets_create_all ();
}
// Userstring3 not yet used.
page += view.render ("styles", "view");
page += Assets_Page::footer ();
return page;
}
bool Database_Config_General::getBValue (const char * key, bool default_value)
{
string value = getValue (key, convert_to_string (default_value).c_str());
return convert_to_bool (value);
}
string resource_organize (void * webserver_request)
{
Webserver_Request * request = (Webserver_Request *) webserver_request;
string checkbox = request->post ["checkbox"];
bool checked = convert_to_bool (request->post ["checked"]);
if (request->query.count ("add") || request->post.count ("add")) {
string add = request->query["add"];
if (add.empty ()) add = request->post ["add"];
vector <string> resources = request->database_config_user()->getActiveResources ();
resources.push_back (add);
request->database_config_user()->setActiveResources (resources);
request->database_config_user()->addUpdatedSetting (Sync_Logic::settings_send_resources_organization);
}
if (request->query.count ("remove")) {
size_t remove = convert_to_int (request->query["remove"]);
vector <string> resources = request->database_config_user()->getActiveResources ();
if (remove < resources.size ()) {
resources.erase (resources.begin () + remove);
}
request->database_config_user()->setActiveResources (resources);
request->database_config_user()->addUpdatedSetting (Sync_Logic::settings_send_resources_organization);
}
if (request->query.count ("moveup")) {
size_t moveup = convert_to_int (request->query["moveup"]);
vector <string> resources = request->database_config_user()->getActiveResources ();
array_move_up_down (resources, moveup, true);
request->database_config_user()->setActiveResources (resources);
request->database_config_user()->addUpdatedSetting (Sync_Logic::settings_send_resources_organization);
}
if (request->query.count ("movedown")) {
size_t movedown = convert_to_int (request->query["movedown"]);
vector <string> resources = request->database_config_user()->getActiveResources ();
array_move_up_down (resources, movedown, false);
request->database_config_user()->setActiveResources (resources);
request->database_config_user()->addUpdatedSetting (Sync_Logic::settings_send_resources_organization);
}
string page;
Assets_Header header = Assets_Header (translate("Resources"), request);
page = header.run ();
Assets_View view;
// Active resources.
vector <string> active_resources = request->database_config_user()->getActiveResources ();
string activesblock;
for (size_t i = 0; i < active_resources.size (); i++) {
activesblock.append ("<p>");
activesblock.append ("<a href=\"?remove=" + convert_to_string (i) + "\">");
activesblock.append (emoji_wastebasket ());
activesblock.append ("</a>");
activesblock.append (" ");
activesblock.append ("<a href=\"?moveup=" + convert_to_string (i) + "\">");
activesblock.append (unicode_black_up_pointing_triangle ());
activesblock.append ("</a>");
activesblock.append ("<a href=\"?movedown=" + convert_to_string (i) + "\">");
activesblock.append (unicode_black_down_pointing_triangle ());
activesblock.append ("</a>");
activesblock.append (" ");
activesblock.append (active_resources [i]);
activesblock.append ("</p>");
activesblock.append ("\n");
}
view.set_variable ("activesblock", activesblock);
// Context before.
if (request->query.count ("before")) {
Dialog_Entry dialog_entry = Dialog_Entry ("organize", translate("Please enter the number of verses"), convert_to_string (request->database_config_user ()->getResourceVersesBefore ()), "before", translate ("How many verses of context to display before the focused verse."));
page += dialog_entry.run ();
return page;
}
if (request->post.count ("before")) {
int value = convert_to_int (request->post["entry"]);
if ((value >= 0) && (value <= 100)) {
request->database_config_user ()->setResourceVersesBefore (value);
}
}
view.set_variable ("before", convert_to_string (request->database_config_user ()->getResourceVersesBefore ()));
// Context after.
if (request->query.count ("after")) {
Dialog_Entry dialog_entry = Dialog_Entry ("organize", translate("Please enter the number of verses"), convert_to_string (request->database_config_user ()->getResourceVersesAfter ()), "after", translate ("How many verses of context to display after the focused verse."));
page += dialog_entry.run ();
return page;
}
if (request->post.count ("after")) {
int value = convert_to_int (request->post["entry"]);
if ((value >= 0) && (value <= 100)) {
request->database_config_user ()->setResourceVersesAfter (value);
}
}
view.set_variable ("after", convert_to_string (request->database_config_user ()->getResourceVersesAfter ()));
if (checkbox == "related") {
request->database_config_user ()->setIncludeRelatedPassages (checked);
return "";
}
view.set_variable ("related", get_checkbox_status (request->database_config_user ()->getIncludeRelatedPassages ()));
if (request->query.count ("install")) {
vector <string> usfm_resources = client_logic_usfm_resources_get ();
vector <string> original_language_resources = resource_external_get_original_language_resources ();
vector <string> bible_resources = resource_external_get_bibles ();
vector <string> commentary_resources = resource_external_get_commentaries ();
vector <string> general_resources = resource_external_get_general_resources ();
vector <string> sword_resources = sword_logic_get_available ();
vector <string> installable_resources;
installable_resources.insert (installable_resources.end (), usfm_resources.begin (), usfm_resources.end ());
installable_resources.insert (installable_resources.end (), original_language_resources.begin (), original_language_resources.end ());
installable_resources.insert (installable_resources.end (), bible_resources.begin (), bible_resources.end ());
installable_resources.insert (installable_resources.end (), commentary_resources.begin (), commentary_resources.end ());
installable_resources.insert (installable_resources.end (), general_resources.begin (), general_resources.end ());
installable_resources.insert (installable_resources.end (), sword_resources.begin (), sword_resources.end ());
vector <string> installing_resources = Database_Config_General::getResourcesToCache ();
vector <string> active_resources = request->database_config_user()->getActiveResources ();
for (auto & resource : active_resources) {
if (in_array (resource, installable_resources)) {
if (!in_array (resource, installing_resources)) {
installing_resources.push_back (resource);
Database_Config_General::setResourcesToCache (installing_resources);
}
}
}
tasks_logic_queue (SYNCRESOURCES);
view.set_variable ("success", translate ("Will install the resources.") + " " + translate ("The journal displays the progress."));
}
#ifdef HAVE_CLIENT
view.enable_zone ("client");
#endif
page += view.render ("resource", "organize");
page += Assets_Page::footer ();
return page;
}
string checks_settings (void * webserver_request)
{
Webserver_Request * request = (Webserver_Request *) webserver_request;
string page;
Assets_Header header = Assets_Header (translate("Manage Checks"), webserver_request);
header.addBreadCrumb (menu_logic_settings_menu (), menu_logic_settings_text ());
page = header.run ();
Assets_View view;
if (request->query.count ("bible")) {
string bible = request->query["bible"];
if (bible == "") {
Dialog_List dialog_list = Dialog_List ("settings", translate("Select which Bible to manage"), "", "");
vector <string> bibles = access_bible_bibles (webserver_request);
for (auto bible : bibles) {
dialog_list.add_row (bible, "bible", bible);
}
page += dialog_list.run();
return page;
} else {
request->database_config_user()->setBible (bible);
}
}
string bible = access_bible_clamp (webserver_request, request->database_config_user()->getBible ());
if (request->query.count ("run")) {
checks_logic_start (bible);
view.set_variable ("success", translate("Will run the checks. See the Journal for progress."));
}
string checkbox = request->post ["checkbox"];
bool checked = convert_to_bool (request->post ["checked"]);
if (checkbox == "doublespacesusfm") {
Database_Config_Bible::setCheckDoubleSpacesUsfm (bible, checked);
}
view.set_variable ("doublespacesusfm", get_checkbox_status (Database_Config_Bible::getCheckDoubleSpacesUsfm (bible)));
if (checkbox == "fullstopheadings") {
Database_Config_Bible::setCheckFullStopInHeadings (bible, checked);
}
view.set_variable ("fullstopheadings", get_checkbox_status (Database_Config_Bible::getCheckFullStopInHeadings (bible)));
if (checkbox == "spacebeforepunctuation") {
Database_Config_Bible::setCheckSpaceBeforePunctuation (bible, checked);
}
view.set_variable ("spacebeforepunctuation", get_checkbox_status (Database_Config_Bible::getCheckSpaceBeforePunctuation (bible)));
if (checkbox == "sentencestructure") {
Database_Config_Bible::setCheckSentenceStructure (bible, checked);
}
view.set_variable ("sentencestructure", get_checkbox_status (Database_Config_Bible::getCheckSentenceStructure (bible)));
if (checkbox == "paragraphstructure") {
Database_Config_Bible::setCheckParagraphStructure (bible, checked);
}
view.set_variable ("paragraphstructure", get_checkbox_status (Database_Config_Bible::getCheckParagraphStructure (bible)));
if (checkbox == "booksversification") {
Database_Config_Bible::setCheckBooksVersification (bible, checked);
}
view.set_variable ("booksversification", get_checkbox_status (Database_Config_Bible::getCheckBooksVersification (bible)));
if (checkbox == "chaptersversesversification") {
Database_Config_Bible::setCheckChaptesVersesVersification (bible, checked);
}
view.set_variable ("chaptersversesversification", get_checkbox_status (Database_Config_Bible::getCheckChaptesVersesVersification (bible)));
if (checkbox == "wellformedusfm") {
Database_Config_Bible::setCheckWellFormedUsfm (bible, checked);
}
view.set_variable ("wellformedusfm", get_checkbox_status (Database_Config_Bible::getCheckWellFormedUsfm (bible)));
if (checkbox == "punctuationatendverse") {
Database_Config_Bible::setCheckMissingPunctuationEndVerse (bible, checked);
}
view.set_variable ("punctuationatendverse", get_checkbox_status (Database_Config_Bible::getCheckMissingPunctuationEndVerse (bible)));
if (checkbox == "patterns") {
Database_Config_Bible::setCheckPatterns (bible, checked);
}
view.set_variable ("patterns", get_checkbox_status (Database_Config_Bible::getCheckPatterns (bible)));
if (checkbox == "pairs") {
Database_Config_Bible::setCheckMatchingPairs (bible, checked);
}
view.set_variable ("pairs", get_checkbox_status (Database_Config_Bible::getCheckMatchingPairs (bible)));
view.set_variable ("bible", bible);
#ifdef HAVE_CLIENT
view.enable_zone ("client");
#else
view.enable_zone ("cloud");
#endif
page += view.render ("checks", "settings");
page += Assets_Page::footer ();
return page;
}
Stylesheet::Stylesheet(const ustring & name_in)
{
gw_message("Creating Stylesheet called '" + name_in + "'");
// Save the sheet's name.
name = name_in;
// If the name is empty, read from the template.
ustring filename = stylesheet_xml_filename(name);
if (name.empty())
filename = stylesheet_xml_template_filename();
// Read the xml data, bail out on failure.
gchar *contents;
g_file_get_contents(filename.c_str(), &contents, NULL, NULL);
if (contents == NULL) {
gw_critical(_("Failure reading stylesheet ") + filename);
return;
}
// Parse the stylesheet.
xmlParserInputBufferPtr inputbuffer;
inputbuffer = xmlParserInputBufferCreateMem(contents, strlen(contents), XML_CHAR_ENCODING_NONE);
ustring value;
xmlTextReaderPtr reader = xmlNewTextReader(inputbuffer, NULL);
if (reader) {
StyleV2 * style = NULL;
while ((xmlTextReaderRead(reader) == 1)) {
switch (xmlTextReaderNodeType(reader)) {
case XML_READER_TYPE_ELEMENT:
{
xmlChar *element_name = xmlTextReaderName(reader);
if (!xmlStrcmp(element_name, BAD_CAST "style")) {
char *attribute = (char *)xmlTextReaderGetAttribute(reader, BAD_CAST "marker");
if (attribute) {
style = new StyleV2 (0);
style->marker = attribute;
free(attribute);
}
}
free(element_name); element_name = NULL;
break;
}
case XML_READER_TYPE_TEXT:
{
xmlChar *text = xmlTextReaderValue(reader);
if (text) {
value = (gchar *) text;
xmlFree(text);
}
break;
}
case XML_READER_TYPE_END_ELEMENT:
{
xmlChar *element_name = xmlTextReaderName(reader);
if (style) {
if (!xmlStrcmp(element_name, BAD_CAST "marker"))
style->marker = value;
if (!xmlStrcmp(element_name, BAD_CAST "name"))
style->name = value;
if (!xmlStrcmp(element_name, BAD_CAST "info"))
style->info = value;
if (!xmlStrcmp(element_name, BAD_CAST "type"))
style->type = (StyleType) convert_to_int(value);
if (!xmlStrcmp(element_name, BAD_CAST "subtype"))
style->subtype = convert_to_int(value);
if (!xmlStrcmp(element_name, BAD_CAST "fontsize"))
style->fontsize = convert_to_double(value);
if (!xmlStrcmp(element_name, BAD_CAST "italic"))
style->italic = value;
if (!xmlStrcmp(element_name, BAD_CAST "bold"))
style->bold = value;
if (!xmlStrcmp(element_name, BAD_CAST "underline"))
style->underline = value;
if (!xmlStrcmp(element_name, BAD_CAST "smallcaps"))
style->smallcaps = value;
if (!xmlStrcmp(element_name, BAD_CAST "superscript"))
style->superscript = convert_to_bool(value);
if (!xmlStrcmp(element_name, BAD_CAST "justification"))
style->justification = value;
if (!xmlStrcmp(element_name, BAD_CAST "spacebefore"))
style->spacebefore = convert_to_double(value);
if (!xmlStrcmp(element_name, BAD_CAST "spaceafter"))
style->spaceafter = convert_to_double(value);
if (!xmlStrcmp(element_name, BAD_CAST "leftmargin"))
style->leftmargin = convert_to_double(value);
if (!xmlStrcmp(element_name, BAD_CAST "rightmargin"))
style->rightmargin = convert_to_double(value);
if (!xmlStrcmp(element_name, BAD_CAST "firstlineindent"))
style->firstlineindent = convert_to_double(value);
if (!xmlStrcmp(element_name, BAD_CAST "spancolumns"))
style->spancolumns = convert_to_bool(value);
if (!xmlStrcmp(element_name, BAD_CAST "color"))
style->color = convert_to_int(value);
if (!xmlStrcmp(element_name, BAD_CAST "print"))
style->print = convert_to_bool(value);
if (!xmlStrcmp(element_name, BAD_CAST "userbool1"))
style->userbool1 = convert_to_bool(value);
if (!xmlStrcmp(element_name, BAD_CAST "userbool2"))
style->userbool2 = convert_to_bool(value);
if (!xmlStrcmp(element_name, BAD_CAST "userbool3"))
style->userbool3 = convert_to_bool(value);
if (!xmlStrcmp(element_name, BAD_CAST "userint1"))
style->userint1 = convert_to_int(value);
if (!xmlStrcmp(element_name, BAD_CAST "userint2"))
style->userint2 = convert_to_int(value);
if (!xmlStrcmp(element_name, BAD_CAST "userint3"))
style->userint3 = convert_to_int(value);
if (!xmlStrcmp(element_name, BAD_CAST "userstring1"))
style->userstring1 = value;
if (!xmlStrcmp(element_name, BAD_CAST "userstring2"))
style->userstring2 = value;
if (!xmlStrcmp(element_name, BAD_CAST "userstring3"))
style->userstring3 = value;
}
value.clear();
if (!xmlStrcmp(element_name, BAD_CAST "style")) {
if (style) {
insert (style);
style = NULL;
}
}
free(element_name); element_name = NULL;
break;
}
}
}
}
// Free memory.
if (reader)
xmlFreeTextReader(reader);
if (inputbuffer)
xmlFreeParserInputBuffer(inputbuffer);
if (contents)
g_free(contents);
}
bool Database_Config_Bible::getBValue (string bible, const char * key, bool default_value)
{
return convert_to_bool (getValue (bible, key, convert_to_string (default_value).c_str()));
}
static int
handle_conditional(FILE *f)
{
int c;
unsigned char *cmd, *p;
struct cond_stack *new_item = 0;
cfg_cond_value_t val;
// initialize the parsecfg_state.raw buffer
parsecfg_state.raw.u = 0;
if (!parsecfg_state.raw.a) {
parsecfg_state.raw.a = 1024;
XCALLOC(parsecfg_state.raw.s, parsecfg_state.raw.a);
}
parsecfg_state.raw.s[parsecfg_state.raw.u] = 0;
// read the line into the buffer
while ((c = fgetc(f)) != EOF && c != '\n') {
if (!c) continue;
if (parsecfg_state.raw.u >= parsecfg_state.raw.a) {
parsecfg_state.raw.a *= 2;
XREALLOC(parsecfg_state.raw.s, parsecfg_state.raw.a);
}
parsecfg_state.raw.s[parsecfg_state.raw.u++] = c;
}
if (parsecfg_state.raw.u >= parsecfg_state.raw.a) {
parsecfg_state.raw.a *= 2;
XREALLOC(parsecfg_state.raw.s, parsecfg_state.raw.a);
}
parsecfg_state.raw.s[parsecfg_state.raw.u] = 0;
while (parsecfg_state.raw.u > 0 && isspace(parsecfg_state.raw.s[parsecfg_state.raw.u - 1])) parsecfg_state.raw.s[--parsecfg_state.raw.u] = 0;
parsecfg_state.raw_i = 0;
while (parsecfg_state.raw.s[parsecfg_state.raw_i] > 0 && parsecfg_state.raw.s[parsecfg_state.raw_i] <= ' ') parsecfg_state.raw_i++;
//fprintf(stderr, ">>%s\n", parsecfg_state.raw.s + parsecfg_state.raw_i);
if (parsecfg_state.raw.s[parsecfg_state.raw_i] != '@') {
fprintf(stderr, "%d: invalid conditional directive\n", parsecfg_state.lineno);
goto failure;
}
parsecfg_state.raw_i++;
while (parsecfg_state.raw.s[parsecfg_state.raw_i] > 0 && parsecfg_state.raw.s[parsecfg_state.raw_i] <= ' ') parsecfg_state.raw_i++;
XALLOCA(cmd, parsecfg_state.raw.u + 1);
p = cmd;
while (isalnum(parsecfg_state.raw.s[parsecfg_state.raw_i]) || parsecfg_state.raw.s[parsecfg_state.raw_i] == '_') *p++ = parsecfg_state.raw.s[parsecfg_state.raw_i++];
*p = 0;
if (!strcmp(cmd, "if")) {
XCALLOC(new_item, 1);
new_item->next = parsecfg_state.cond_stack;
parsecfg_state.cond_stack = new_item;
if (parse_expr(1, &val) < 0) goto failure;
//print_value(&val);
if (!parsecfg_state.output_enabled) {
parsecfg_state.cond_stack->was_true = 1;
parsecfg_state.output_enabled = parsecfg_state.cond_stack->output_enabled = 0;
} else if (convert_to_bool(&val)) {
parsecfg_state.cond_stack->was_true = 1;
parsecfg_state.output_enabled = parsecfg_state.cond_stack->output_enabled = 1;
} else {
parsecfg_state.output_enabled = parsecfg_state.cond_stack->output_enabled = 0;
}
free_value(&val);
} else if (!strcmp(cmd, "elif")) {
if (!parsecfg_state.cond_stack) {
fprintf(stderr, "%d: dangling elif\n", parsecfg_state.lineno);
goto failure;
}
if (parsecfg_state.cond_stack->was_else) {
fprintf(stderr, "%d: elif after else\n", parsecfg_state.lineno);
goto failure;
}
if (parse_expr(1, &val) < 0) goto failure;
if (!parsecfg_state.cond_stack->was_true && convert_to_bool(&val)) {
parsecfg_state.cond_stack->was_true = 1;
parsecfg_state.output_enabled = parsecfg_state.cond_stack->output_enabled = 1;
} else {
parsecfg_state.output_enabled = parsecfg_state.cond_stack->output_enabled = 0;
}
free_value(&val);
} else if (!strcmp(cmd, "else")) {
if (!parsecfg_state.cond_stack) {
fprintf(stderr, "%d: dangling else\n", parsecfg_state.lineno);
goto failure;
}
if (parsecfg_state.cond_stack->was_else) {
fprintf(stderr, "%d: else after else\n", parsecfg_state.lineno);
goto failure;
}
while (parsecfg_state.raw.s[parsecfg_state.raw_i] > 0 && parsecfg_state.raw.s[parsecfg_state.raw_i] <= ' ') parsecfg_state.raw_i++;
if (parsecfg_state.raw.s[parsecfg_state.raw_i]) {
fprintf(stderr, "%d: garbage after else\n", parsecfg_state.lineno);
goto failure;
}
parsecfg_state.cond_stack->was_else = 1;
if (!parsecfg_state.cond_stack->was_true) {
parsecfg_state.cond_stack->was_true = 1;
parsecfg_state.output_enabled = parsecfg_state.cond_stack->output_enabled = 1;
} else {
parsecfg_state.output_enabled = parsecfg_state.cond_stack->output_enabled = 0;
}
} else if (!strcmp(cmd, "endif")) {
if (!parsecfg_state.cond_stack) {
fprintf(stderr, "%d: dangling endif\n", parsecfg_state.lineno);
goto failure;
}
while (parsecfg_state.raw.s[parsecfg_state.raw_i] > 0 && parsecfg_state.raw.s[parsecfg_state.raw_i] <= ' ') parsecfg_state.raw_i++;
if (parsecfg_state.raw.s[parsecfg_state.raw_i]) {
fprintf(stderr, "%d: garbage after endif\n", parsecfg_state.lineno);
goto failure;
}
new_item = parsecfg_state.cond_stack;
parsecfg_state.cond_stack = parsecfg_state.cond_stack->next;
if (!parsecfg_state.cond_stack) parsecfg_state.output_enabled = 1;
else parsecfg_state.output_enabled = parsecfg_state.cond_stack->output_enabled;
xfree(new_item);
} else {
fprintf(stderr, "%d: invalid conditional compilation directive\n", parsecfg_state.lineno);
goto failure;
}
parsecfg_state.lineno++;
return 0;
failure:
parsecfg_state.lineno++;
return -1;
}
void OTQuotations::read()
{
// Get contents of the data file. Bail out if not there.
ustring xmlfilename = gw_build_filename(Directories->get_package_data(), "ot-quotations-in-nt.xml");
if (!g_file_test(xmlfilename.c_str(), G_FILE_TEST_IS_REGULAR))
return;
gchar *contents;
g_file_get_contents(xmlfilename.c_str(), &contents, NULL, NULL);
/*
Read the xml data. Example:
<set>
<nt book="Matthew" chapter="1" verse="23"/>
<ot book="Isaiah" chapter="8" verse="8"/>
<ot book="Isaiah" chapter="8" verse="10"/>
<lxx>1</lxx>
</set>
*/
xmlParserInputBufferPtr inputbuffer;
inputbuffer = xmlParserInputBufferCreateMem(contents, strlen(contents), XML_CHAR_ENCODING_NONE);
xmlTextReaderPtr reader = xmlNewTextReader(inputbuffer, NULL);
if (reader) {
char *opening_element = NULL;
OTQuotation quotation(0);
while ((xmlTextReaderRead(reader) == 1)) {
switch (xmlTextReaderNodeType(reader)) {
case XML_READER_TYPE_ELEMENT:
{
opening_element = (char *)xmlTextReaderName(reader);
if (!strcmp(opening_element, "set")) {
quotation.reference.clear();
quotation.referents.clear();
quotation.lxx = false;
free(opening_element); opening_element = NULL; // not used next loop iteration
}
else if (!strcmp(opening_element, "nt") || !strcmp(opening_element, "ot")) {
Reference ref;
char *attribute;
attribute = (char *)xmlTextReaderGetAttribute(reader, BAD_CAST "book");
if (attribute) {
ref.book_set(books_english_to_id(attribute));
free(attribute);
}
attribute = (char *)xmlTextReaderGetAttribute(reader, BAD_CAST "chapter");
if (attribute) {
ref.chapter_set(convert_to_int(attribute));
free(attribute);
}
attribute = (char *)xmlTextReaderGetAttribute(reader, BAD_CAST "verse");
if (attribute) {
ref.verse_set(attribute);
free(attribute);
}
if (!strcmp(opening_element, "nt")) {
quotation.reference.assign(ref);
}
if (!strcmp(opening_element, "ot")) {
quotation.referents.push_back(ref);
}
// cannot free(opening_element) because it will be used next loop iter in following switch case
}
break;
}
case XML_READER_TYPE_TEXT:
{
char *text = (char *)xmlTextReaderValue(reader);
if (opening_element && text) {
if (!strcmp(opening_element, "lxx")) {
quotation.lxx = convert_to_bool(text);
}
free(text);
free(opening_element); opening_element = NULL;
}
break;
}
case XML_READER_TYPE_END_ELEMENT:
{
char *closing_element = (char *)xmlTextReaderName(reader);
if (!strcmp(closing_element, "set")) {
quotations_nt_order.push_back(quotation);
}
free(closing_element);
break;
}
}
}
}
// Free memory.
if (reader)
xmlFreeTextReader(reader);
if (inputbuffer)
xmlFreeParserInputBuffer(inputbuffer);
if (contents)
g_free(contents);
}
string search_search2 (void * webserver_request)
{
Webserver_Request * request = (Webserver_Request *) webserver_request;
Database_Volatile database_volatile = Database_Volatile ();
string siteUrl = config_logic_site_url ();
string bible = request->database_config_user()->getBible ();
if (request->query.count ("bible")) bible = request->query ["bible"];
bool hit_is_set = request->query.count ("h");
bool query_is_set = request->query.count ("q");
int identifier = convert_to_int (request->query ["i"]);
string query = request->query ["q"];
string hit = request->query ["h"];
// Get one search hit.
if (hit_is_set) {
// Retrieve the search parameters from the volatile database.
string query = database_volatile.getValue (identifier, "query");
//bool casesensitive = convert_to_bool (database_volatile.getValue (identifier, "casesensitive"));
bool plaintext = convert_to_bool (database_volatile.getValue (identifier, "plaintext"));
// Get the Bible and passage for this identifier.
Passage details = Passage::from_text (hit);
string bible = details.bible;
int book = details.book;
int chapter = details.chapter;
string verse = details.verse;
// Get the plain text or USFM.
string text;
if (plaintext) {
text = search_logic_get_bible_verse_text (bible, book, chapter, convert_to_int (verse));
} else {
text = search_logic_get_bible_verse_usfm (bible, book, chapter, convert_to_int (verse));
}
// Format it.
string link = filter_passage_link_for_opening_editor_at (book, chapter, verse);
text = filter_string_markup_words ({query}, text);
string output = "<div>" + link + " " + text + "</div>";
// Output to browser.
return output;
}
// Perform the initial search.
if (query_is_set) {
// Get extra search parameters and store them all in the volatile database.
bool casesensitive = (request->query ["c"] == "true");
bool plaintext = (request->query ["p"] == "true");
bool currentbook = (request->query ["b"] == "true");
string sharing = request->query ["s"];
database_volatile.setValue (identifier, "query", query);
database_volatile.setValue (identifier, "casesensitive", convert_to_string (casesensitive));
database_volatile.setValue (identifier, "plaintext", convert_to_string (plaintext));
// Deal with case sensitivity.
// Deal with whether to search the plain text, or the raw USFM.
// Fetch the initial set of hits.
vector <Passage> passages;
if (plaintext) {
if (casesensitive) {
passages = search_logic_search_bible_text_case_sensitive (bible, query);
} else {
passages = search_logic_search_bible_text (bible, query);
}
} else {
if (casesensitive) {
passages = search_logic_search_bible_usfm_case_sensitive (bible, query);
} else {
passages = search_logic_search_bible_usfm (bible, query);
}
}
// Deal with possible searching in the current book only.
if (currentbook) {
int book = Ipc_Focus::getBook (request);
vector <Passage> bookpassages;
for (auto & passage : passages) {
if (book == passage.book) {
bookpassages.push_back (passage);
}
}
passages = bookpassages;
}
// Deal with how to share the results.
vector <string> hits;
for (auto & passage : passages) {
hits.push_back (passage.to_text ());
}
if (sharing != "load") {
vector <string> loaded_hits = filter_string_explode (database_volatile.getValue (identifier, "hits"), '\n');
if (sharing == "add") {
hits.insert (hits.end(), loaded_hits.begin(), loaded_hits.end());
}
if (sharing == "remove") {
hits = filter_string_array_diff (loaded_hits, hits);
}
if (sharing == "intersect") {
hits = array_intersect (loaded_hits, hits);
}
hits = array_unique (hits);
}
// Generate one string from the hits.
string output = filter_string_implode (hits, "\n");
// Store search hits in the volatile database.
database_volatile.setValue (identifier, "hits", output);
// Output results.
return output;
}
// Build the advanced search page.
string page;
Assets_Header header = Assets_Header (translate("Search"), request);
header.setNavigator ();
header.addBreadCrumb (menu_logic_search_menu (), menu_logic_search_text ());
page = header.run ();
Assets_View view;
view.set_variable ("bible", bible);
string script = "var searchBible = \"" + bible + "\";";
view.set_variable ("script", script);
page += view.render ("search", "search2");
page += Assets_Page::footer ();
return page;
}
