// exportuje hlavicku HTML dokumentu, kam pojde vysledok query
void _hlavicka(char *title, FILE * expt, short int level, short int spec){
Log("_hlavicka() -- začiatok...\n");
_local_modlitba = _global_modlitba;
if ((_local_modlitba == MODL_PRVE_VESPERY) || (_local_modlitba == MODL_DRUHE_VESPERY)){
_local_modlitba = MODL_VESPERY;
}
if ((_local_modlitba == MODL_PRVE_KOMPLETORIUM) || (_local_modlitba == MODL_DRUHE_KOMPLETORIUM)){
_local_modlitba = MODL_KOMPLETORIUM;
}
if (_global_hlavicka_Export > 0){
Log("return... (_global_hlavicka_Export > 0)\n");
return;
}
_global_hlavicka_Export++;
// 2013-12-09: iné CSS budú len "doplnky" (overrides) k hlavnému CSS
if (_global_css != CSS_breviar_sk){
Log("ako prvý bude exportovaný nazov_css_suboru == %s...\n", nazov_css[CSS_breviar_sk]);
}
const char *nazov_css_suboru;
if (_global_css == CSS_UNDEF){
nazov_css_suboru = nazov_css[CSS_breviar_sk];
}// _global_css == CSS_UNDEF
else{
nazov_css_suboru = nazov_css[_global_css];
}// else
Log("nazov_css_suboru == %s...\n", nazov_css_suboru);
// 2011-05-05: nastavenie font-family
// zatiaľ len pevné reťazce; časom možno bude premenná pre názov fontu
// 2011-05-06: doplnené: najprv sa testuje nastavenie _global_font; následne sa prípadne nastavia defaulty
if ((_global_font == FONT_UNDEF) || (_global_font == FONT_CHECKBOX)){
Log("(_global_font == FONT_UNDEF) || (_global_font == FONT_CHECKBOX)...\n");
if (isGlobalOption(OPT_2_HTML_EXPORT, BIT_OPT_2_FONT_FAMILY)){
Log("_global_opt[OPT_2_HTML_EXPORT] & BIT_OPT_2_FONT_FAMILY...\n");
mystrcpy(_global_css_font_family, DEFAULT_FONT_FAMILY_SANS_SERIF, SMALL);
}
else{
Log("NOT _global_opt[OPT_2_HTML_EXPORT] & BIT_OPT_2_FONT_FAMILY...\n");
mystrcpy(_global_css_font_family, DEFAULT_FONT_FAMILY_SERIF, SMALL);
}
}// (_global_font == FONT_UNDEF) || (_global_font == FONT_CHECKBOX)
else if (_global_font == FONT_CSS){
Log("_global_font == FONT_CSS...\n");
mystrcpy(_global_css_font_family, DEFAULT_FONT_FAMILY_INHERIT, SMALL);
}// (_global_font == FONT_CSS)
else{
Log("_global_font != FONT_CSS...\n");
mystrcpy(_global_css_font_family, nazov_fontu[_global_font], SMALL);
}// else
Log("_global_css_font_family == %s...\n", _global_css_font_family);
// 2011-05-13: doplnené: nastavenie font-size
if (_global_font_size == FONT_SIZE_UNDEF){
mystrcpy(_global_css_font_size, STR_EMPTY, SMALL);
}// (_global_font_size == FONT_SIZE_UNDEF)
else if (_global_font_size == FONT_SIZE_CSS){
mystrcpy(_global_css_font_size, DEFAULT_FONT_SIZE_INHERIT, SMALL);
}// (_global_font_size == FONT_SIZE_CSS)
else{
mystrcpy(_global_css_font_size, nazov_font_size_css[_global_font_size], SMALL);
}// else
Log("_global_css_font_size == %s...\n", _global_css_font_size);
if (bol_content_type_text_html == NIE){
#if defined(BEHAVIOUR_WEB)
Export_to_file(expt, "Content-type: text/html\n");
Export_to_file(expt, "\n");
#endif
bol_content_type_text_html = ANO;
}
Log("creating header...\n");
Log("element <head>...\n");
Export_to_file(expt, (char *)html_header_1, nazov_charset[charset_jazyka[_global_jazyk]]);
// CSS (one or more)
if (_global_css != CSS_breviar_sk){
_header_css(expt, level, nazov_css[CSS_breviar_sk]);
}
_header_css(expt, level, nazov_css_suboru);
// CSS override night mode
if (isGlobalOption(OPT_2_HTML_EXPORT, BIT_OPT_2_NOCNY_REZIM)) {
_header_css(expt, level, nazov_css_invert_colors);
}
// CSS override normal font (no bold)
if (isGlobalOption(OPT_0_SPECIALNE, BIT_OPT_0_FONT_NORMAL)) {
_header_css(expt, level, nazov_css_normal_font_weight);
}
// blind-friendly CSS (no red text)
if (isGlobalOption(OPT_0_SPECIALNE, BIT_OPT_0_BLIND_FRIENDLY)) {
_header_css(expt, level, nazov_css_blind_friendly);
}
Export_to_file(expt, "\t<meta name=\"viewport\" content=\"width=device-width, user-scalable=yes, initial-scale=1.0\" />\n");
Export_to_file(expt, "<title>%s</title>\n", title);
Export_to_file(expt, "</head>\n\n");
Log("element </head>...\n");
Log("element <body>...\n");
Export_to_file(expt, "<body");
if ((_global_font != FONT_CSS) || (_global_font_size != FONT_SIZE_CSS) || (_global_style_margin != 0)){
Export_to_file(expt, " style=\"");
if (_global_font != FONT_CSS){
Export_to_file(expt, "font-family: %s; ", _global_css_font_family);
}
if (_global_font_size != FONT_SIZE_CSS){
Export_to_file(expt, "font-size: %s; ", _global_css_font_size);
}
if (_global_style_margin != 0){
Export_to_file(expt, "margin-left: %dpx; margin-right: %dpx; ", _global_style_margin, _global_style_margin);
}
Export_to_file(expt, "\"");
}
// 2010-02-15: kvôli špeciálnemu "zoznam.htm"
if (spec == 1){
Export_to_file(expt, " onLoad=\"fn_aktualne(0,0,0)\"");
}
Export_to_file(expt, ">\n");
#ifdef BEHAVIOUR_WEB
Export_to_file(expt, HTML_ANAME_TOP"\n");
#else
Export_to_file(expt, HTML_DIV_BEGIN"\n");
#endif
// 2010-02-15: doplnené predošlá a nasledovná modlitba
if (_global_opt_batch_monthly == ANO && query_type != PRM_BATCH_MODE){
_buttons_prev_up_next(expt);
}// << predošlá | ^ hore | nasledovná >>
Log("_hlavicka() -- koniec.\n");
return;
}// _hlavicka()
/* exportuje hlavicku HTML dokumentu, kam pojde vysledok query */
void _hlavicka(char *title, FILE * expt, short int level, short int spec) {
Log("_hlavicka() -- za�iatok...\n");
_local_modlitba = _global_modlitba;
if((_local_modlitba == MODL_PRVE_VESPERY) || (_local_modlitba == MODL_DRUHE_VESPERY))
_local_modlitba = MODL_VESPERY;
if((_local_modlitba == MODL_PRVE_KOMPLETORIUM) || (_local_modlitba == MODL_DRUHE_KOMPLETORIUM))
_local_modlitba = MODL_KOMPLETORIUM;
// 2009-08-04: viackr�t sa pri exporte modlitby do HTML exportovala hlavi�ka; pridan� kontrola
if(_global_hlavicka_Export > 0) {
Log("return... (_global_hlavicka_Export > 0)\n");
return;
}
_global_hlavicka_Export++;
/*
* 2003-07-01, pridane pripadne citanie zo suboru
* 2008-08-08: ��tanie zo s�boru odstr�nen�
*/
const char *nazov_css_suboru;
if(_global_css == CSS_UNDEF) {
nazov_css_suboru = nazov_css[CSS_breviar_sk];
}// _global_css == CSS_UNDEF
else {
nazov_css_suboru = nazov_css[_global_css];
}// else
Log("nazov_css_suboru == %s...\n", nazov_css_suboru);
/*
* 2011-05-05: nastavenie font-family
* zatia� len pevn� re�azce; �asom mo�no bude premenn� pre n�zov fontu
* 2011-05-06: doplnen�: najprv sa testuje nastavenie _global_font; n�sledne sa pr�padne nastavia defaulty
*/
if((_global_font == FONT_UNDEF) || (_global_font == FONT_CHECKBOX)) {
Log("(_global_font == FONT_UNDEF) || (_global_font == FONT_CHECKBOX)...\n");
if((_global_opt[OPT_2_HTML_EXPORT] & BIT_OPT_2_FONT_FAMILY) == BIT_OPT_2_FONT_FAMILY) {
Log("_global_opt[OPT_2_HTML_EXPORT] & BIT_OPT_2_FONT_FAMILY...\n");
mystrcpy(_global_css_font_family, DEFAULT_FONT_FAMILY_SANS_SERIF, SMALL);
}
else {
Log("NOT _global_opt[OPT_2_HTML_EXPORT] & BIT_OPT_2_FONT_FAMILY...\n");
mystrcpy(_global_css_font_family, DEFAULT_FONT_FAMILY_SERIF, SMALL);
}
}/* (_global_font == FONT_UNDEF) || (_global_font == FONT_CHECKBOX) */
else if(_global_font == FONT_CSS) {
Log("_global_font == FONT_CSS...\n");
mystrcpy(_global_css_font_family, DEFAULT_FONT_FAMILY_INHERIT, SMALL);
}// (_global_font == FONT_CSS)
else {
Log("_global_font != FONT_CSS...\n");
mystrcpy(_global_css_font_family, nazov_fontu[_global_font], SMALL);
}// else
Log("_global_css_font_family == %s...\n", _global_css_font_family);
// 2011-05-13: doplnen�: nastavenie font-size
if(_global_font_size == FONT_SIZE_UNDEF) {
mystrcpy(_global_css_font_size, STR_EMPTY, SMALL);
}// (_global_font_size == FONT_SIZE_UNDEF)
else if(_global_font_size == FONT_SIZE_CSS) {
mystrcpy(_global_css_font_size, DEFAULT_FONT_SIZE_INHERIT, SMALL);
}// (_global_font_size == FONT_SIZE_CSS)
else {
mystrcpy(_global_css_font_size, nazov_font_size_css[_global_font_size], SMALL);
}// else
Log("_global_css_font_size == %s...\n", _global_css_font_size);
if(bol_content_type_text_html == NIE) {
#if defined(OS_linux)
Export_to_file(expt, "Content-type: text/html\n");
Export_to_file(expt, "\n");
#elif defined(OS_Windows_Ruby)
Export_to_file(expt, "Content-type: text/html\n");
Export_to_file(expt, "\n");
#endif
bol_content_type_text_html = ANO;
}
Log("creating header...\n");
/* 2003-07-15, zmenene na hlavicku pre css-ko; zrusene <style>
* 2008-08-08: pridan� dynamicky css-ko
* 2010-02-15: statick� texty do kon�t�nt
* 2011-05-18: charset sa nastav� pod�a jazyka
*/
Log("<head>...\n");
Export_to_file(expt, (char *)html_header_1, charset_jazyka[_global_jazyk]);
_header_css(expt, level, nazov_css_suboru);
if (_global_opt[OPT_2_HTML_EXPORT] & BIT_OPT_2_NOCNY_REZIM) {
_header_css(expt, level, nazov_css_invert_colors);
}
Export_to_file(expt, "\t<meta name=\"viewport\" content=\"width=device-width, user-scalable=yes, initial-scale=1.0\" />\n");
Export_to_file(expt, "<title>%s</title>\n", title);
Export_to_file(expt, "</head>\n\n");
Log("</head>...\n");
Log("<body>...\n");
/* 2011-05-05: pridanie font-family
* 2011-05-06: font sa neprid�va v�dy
*/
Export_to_file(expt, "<body");
if((_global_font != FONT_CSS) || (_global_font_size != FONT_SIZE_CSS)) {
Export_to_file(expt, " style=\"");
if(_global_font != FONT_CSS) {
Export_to_file(expt, "font-family: %s", _global_css_font_family);
}
if(_global_font_size != FONT_SIZE_CSS) {
if(_global_font != FONT_CSS) {
Export_to_file(expt, "; ");
}
Export_to_file(expt, "font-size: %s", _global_css_font_size);
}
Export_to_file(expt, "\"");
}
/* 2010-02-15: kv�li �peci�lnemu "zoznam.htm" */
if(spec == 1) {
Export_to_file(expt, " onLoad=\"fn_aktualne(0,0,0)\"");
}
Export_to_file(expt, ">\n");
/* 2010-02-15: doplnen� predo�l� a nasledovn� modlitba */
if(_global_opt_batch_monthly == ANO && query_type != PRM_BATCH_MODE) {
Export_to_file(expt, "<center>\n");
pismeno_modlitby = CHAR_MODL_NEURCENA;
if((_local_modlitba < MODL_NEURCENA) && (_local_modlitba >= MODL_INVITATORIUM))
pismeno_modlitby = char_modlitby[_local_modlitba];
sprintf(ext, "%c", pismeno_modlitby);
strcat(ext, ".htm");
Export_to_file(expt, "<p>");
// << prev
mystrcpy(file_name_pom, FILE_EXPORT, MAX_STR);
ptr = strstr(file_name_pom, ext);
if((_local_modlitba < MODL_NEURCENA) && (_local_modlitba > MODL_INVITATORIUM)) {
if(ptr != NULL) {
sprintf(pismeno_prev, "%c", char_modlitby[_local_modlitba - 1]);
strncpy(ptr, pismeno_prev, 1);
}
Export_to_file(expt, "<a href=\"%s\" "HTML_CLASS_BUTTON">", file_name_pom);
Export_to_file(expt, (char *)html_text_batch_Prev[_global_jazyk]);
Export_to_file(expt, " ");
Export_to_file(expt, (char *)nazov_modlitby(_local_modlitba - 1));
Export_to_file(expt, "</a>");
}
// |
Export_to_file(expt, " | ");
// ^ hore
Export_to_file(expt, "<a href=\".%s%s\" "HTML_CLASS_BUTTON">", STR_PATH_SEPARATOR_HTML, _global_export_navig_hore); // v tom istom adres�ri
Export_to_file(expt, (char *)html_text_batch_Back[_global_jazyk]);
Export_to_file(expt, "</a>");
// |
Export_to_file(expt, " | ");
// >> next
mystrcpy(file_name_pom, FILE_EXPORT, MAX_STR);
ptr = strstr(file_name_pom, ext);
if((_local_modlitba != MODL_NEURCENA) && (_local_modlitba < MODL_KOMPLETORIUM)) {
if(ptr != NULL) {
sprintf(pismeno_next, "%c", char_modlitby[_local_modlitba + 1]);
strncpy(ptr, pismeno_next, 1);
}
Export_to_file(expt, "<a href=\"%s\" "HTML_CLASS_BUTTON">", file_name_pom);
Export_to_file(expt, (char *)nazov_modlitby(_local_modlitba + 1));
Export_to_file(expt, " ");
Export_to_file(expt, (char *)html_text_batch_Next[_global_jazyk]);
Export_to_file(expt, "</a>");
}
Export_to_file(expt, "</p>");
Export_to_file(expt, "</center>\n");
}/* << predo�l� | ^ hore | nasledovn� >> */
Log("_hlavicka() -- koniec.\n");
return;
}// _hlavicka()
