"; */ session_start(); $user_admin=$_COOKIE["user_admin"]; $eid = $_GET['eid']; require("func_highlight.php"); require_once("func_ansicht.php"); ##### ÄNDERUNG NEUE LUTHERBIBEL ######## if(date("Y") < 2019){ require("bibellookup_1984.php"); }else{ require("bibellookup_2017.php"); } $jahr = date("Y"); include_once 'classes/lg-on_Smarty.class.php'; $smarty = new lgon_Smarty(); require_once("config.inc.php"); require_once("func_rollenrechte.php"); $templatename = substr(basename($_SERVER['PHP_SELF']),0,-3)."html"; require_once "language/german.inc.php"; $suchart = $_GET['suchart']; $inhalt_hig = stripslashes($_GET['inhalt_hig']); $inhalt_hig = unserialize($inhalt_hig); if ($user_admin == ""){ require("index.php"); exit;} //Wenn man nicht angemeldet ist, darf man nicht auf die Seite $db = dbconnect(); $result = $db->query("SELECT eid, thema, einleitung, ausfuehrung, extrakt, bezeichnung, gruppe FROM lue_quelle a, lue_art b WHERE a.lueaid = b.lueaid AND eid='$eid'"); $row = $result->fetch_array(); $smarty->assign('lue_inhalt_thema', "$row[thema]"); $smarty->assign('lue_inhalt_art', "$row[bezeichnung]"); $sid = session_id(); $datum=date("Y-m-d H:i:s"); $result_1 = $db->query( "INSERT INTO historie (vaid, datum, session_id, art, art_id) VALUES ('$user_vaid;', '$datum', '$sid', 'E', '$eid')" ); if($row['gruppe'] != ''){ $query1 = "SELECT eid, thema, bezeichnung FROM lue_quelle a, lue_art b WHERE a.lueaid = b.lueaid AND eid IN ($row[gruppe]) AND eid != '$eid' ORDER BY eid ASC "; $result1 = $db->query($query1) or die ("Cannot execute query1a"); while ($row1 = $result1->fetch_array()){ $value1[] = $row1; } $smarty->assign('table_data1', $value1); } ## Die Funktionen wurden mit Luther 2017 auskommentiert und in Zeile 17 fun_ansicht.php eingebunden. Dort gibt es diese Funktionen auch. ## Vorteil ist, dass man dann auch KNK und KNK-FA einblenden kann, was vorher nicht der Fall war /* function makeLink($a, $b, $c, $d, $e, $f, $g, $h,$eid, $link, $jahr) { $a=trim($a); $b=trim($b); $c=trim($c); $d=trim($d); $e=trim($e); $f=trim($f); $g=trim($g); $h=trim($h); # $d muss immer ein Komma haben, wenn danach noch was kommt if($e != '' or $f != "" or $g != "" or $h != ""){ if($d == ''){ $d=','; } } ## echo "a: '$a'
## b: '$b'
## c: '$c'
## d: '$d'
## e: '$e'
## f: '$f'
## g: '$g'
## h: '$h'
## i: '$i'
## "; ## $b =str_replace ("Ruth", "Rut" , $b); $b =str_replace ("Esther", "Ester" , $b); $b =str_replace ("Judith", "Judit" , $b); $b =str_replace ("Ezechiel", "Hesekiel" , $b); $b =str_replace ("Ijob", "Hiob" , $b); if($a!=''){ $a=$a." "; } if($c!=''){ $c=" ".$c; } if($e!=''){ $e=" ".$e." "; } if($g == '-'){ #$wort="Römer 8,31-39"; $wort="$a$b$c$d$f$g$h"; $wort=trim($wort); if($link == 'lokal'){ $wort="$wort|L|$eid"; #target=\"_blank\" ##### ÄNDERUNG NEUE LUTHERBIBEL ######## if($jahr < 2019){ return sprintf("%s", $a.$b.$c.$d.$f.$g.$h, $a.$b.$c.$d.$f.$g.$h, $a.$b.$c.$d.$e.$f.$g.$h); }else{ return sprintf("%s", $a.$b.$c.$d.$f.$g.$h, $a.$b.$c.$d.$f.$g.$h, $a.$b.$c.$d.$e.$f.$g.$h); } }elseif($link == 'bibleserver'){ #target=\"_blank\" ##### ÄNDERUNG NEUE LUTHERBIBEL ######## if($jahr < 2019){ return sprintf("%s", $a.$b.$c.$d.$f.$g.$h, $a.$b.$c.$d.$f.$g.$h, $a.$b.$c.$d.$e.$f.$g.$h); }else{ return sprintf("%s", $a.$b.$c.$d.$f.$g.$h, $a.$b.$c.$d.$f.$g.$h, $a.$b.$c.$d.$e.$f.$g.$h); } } }elseif($g == '.'){ // Wenn Punkt, dann muss unterschieden werden, ob die Textstelle forlaufend ist $next=$f+1; if($h==$next){ // Beispiel Matthäus 1,1.2 // aus dem Punkt wird ein Bindestrich für bibleserver $g1='-'; $wort="$a$b$c$d$f$g1$h"; $wort=trim($wort); if($link == 'lokal'){ $wort="$wort|L|$eid"; ##### ÄNDERUNG NEUE LUTHERBIBEL ######## if($jahr < 2019){ return sprintf("%s", $a.$b.$c.$d.$f.$g1.$h, $a.$b.$c.$d.$f.$g1.$h, $a.$b.$c.$d.$e.$f.$g.$h); }else{ return sprintf("%s", $a.$b.$c.$d.$f.$g1.$h, $a.$b.$c.$d.$f.$g1.$h, $a.$b.$c.$d.$e.$f.$g.$h); } }elseif($link == 'bibleserver'){ ##### ÄNDERUNG NEUE LUTHERBIBEL ######## if($jahr < 2019){ return sprintf("%s", $a.$b.$c.$d.$f.$g1.$h, $a.$b.$c.$d.$f.$g1.$h, $a.$b.$c.$d.$e.$f.$g.$h); }else{ return sprintf("%s", $a.$b.$c.$d.$f.$g1.$h, $a.$b.$c.$d.$f.$g1.$h, $a.$b.$c.$d.$e.$f.$g.$h); } } }else{ // Beispiel Matthäus 1,1.3 // Da Vers 2 nicht aufgeführt ist, darf man nicht 1-3 machen // Parameter $g und $h (.3) wird daher nicht im Link übergeben $wort="$a$b$c$d$f"; $wort=trim($wort); if($link == 'lokal'){ $wort="$wort|L|$eid"; ##### ÄNDERUNG NEUE LUTHERBIBEL ######## if($jahr < 2019){ return sprintf("%s", $a.$b.$c.$d.$f, $a.$b.$c.$d.$f, $a.$b.$c.$d.$e.$f.$g.$h); }else{ return sprintf("%s", $a.$b.$c.$d.$f, $a.$b.$c.$d.$f, $a.$b.$c.$d.$e.$f.$g.$h); } }elseif($link == 'bibleserver'){ ##### ÄNDERUNG NEUE LUTHERBIBEL ######## if($jahr < 2019){ return sprintf("%s", $a.$b.$c.$d.$f, $a.$b.$c.$d.$f, $a.$b.$c.$d.$e.$f.$g.$h); }else{ return sprintf("%s", $a.$b.$c.$d.$f, $a.$b.$c.$d.$f, $a.$b.$c.$d.$e.$f.$g.$h); } } } }else{ // Alles Ohne Bindestrich und Punkt, daher auch kein $g und $h $wort="$a$b$c$d$f$g$h"; $wort=trim($wort); if($link == 'lokal'){ $wort="$wort|L|$eid"; ##### ÄNDERUNG NEUE LUTHERBIBEL ######## if($jahr < 2019){ return sprintf("%s", $a.$b.$c.$d.$f.$g.$h, $a.$b.$c.$d.$f.$g.$h, $a.$b.$c.$d.$e.$f.$g.$h); }else{ return sprintf("%s", $a.$b.$c.$d.$f.$g.$h, $a.$b.$c.$d.$f.$g.$h, $a.$b.$c.$d.$e.$f.$g.$h); } }elseif($link == 'bibleserver'){ ##### ÄNDERUNG NEUE LUTHERBIBEL ######## if($jahr < 2019){ return sprintf("%s", $a.$b.$c.$d.$f.$g.$h, $a.$b.$c.$d.$f.$g.$h, $a.$b.$c.$d.$e.$f.$g.$h); }else{ return sprintf("%s", $a.$b.$c.$d.$f.$g.$h, $a.$b.$c.$d.$f.$g.$h, $a.$b.$c.$d.$e.$f.$g.$h); } } } } function refill($a,$b,$c,$d,$e,$f,$g,$h,$i) { // Funktion die aus Textstellenkurzeichen die vollständige Textstelle erstellt ##echo "a: '$a'
## b: '$b'
## c: '$c'
## d: '$d'
## e: '$e'
## f: '$f'
## g: '$g'
## h: '$h'
## i: '$i'
## "; switch($c) { case'Sir': $c= 'Sirach'; break; case'Mo': $c= 'Mose'; break; case'Jos': $c= 'Josua'; break; case'Ri': $c= 'Richter'; break; case'Rut': $c= 'Rut'; break; case'Sam': $c= 'Samuel'; break; case'Kön': $c= 'Könige'; break; case'Chr': $c= 'Chronik'; break; case'Esr': $c= 'Esra'; break; case'Neh': $c= 'Nehemia'; break; case'Est': $c= 'Esther'; break; case'Hiob': $c= 'Hiob'; break; case'Hi': $c= 'Hiob'; break; case'Ps': $c= 'Psalm'; break; case'Spr': $c= 'Sprüche'; break; case'Pred': $c= 'Prediger'; break; case'Hld': $c= 'Hoheslied'; break; case'Jes': $c= 'Jesaja'; break; case'Jer': $c= 'Jeremia'; break; case'Kla': $c= 'Klagelieder'; break; case'Klgl': $c= 'Klagelieder'; break; case'Hes': $c= 'Hesekiel'; break; case'Dan': $c= 'Daniel'; break; case'Hos': $c= 'Hosea'; break; case'Joel': $c= 'Joel'; break; case'Am': $c= 'Amos'; break; case'Obd': $c= 'Obadja'; break; case'Jona': $c= 'Jona'; break; case'Mi': $c= 'Micha'; break; case'Nah': $c= 'Nahum'; break; case'Hab': $c= 'Habakuk'; break; case'Zef': $c= 'Zefanja'; break; case'Hag': $c= 'Haggai'; break; case'Sach': $c= 'Sacharja'; break; case'Mal': $c= 'Maleachi'; break; case'Tob': $c= 'Tobias'; break; case'Mt': $c= 'Matthäus'; break; case'Mk': $c= 'Markus'; break; case'Lk': $c= 'Lukas'; break; case'Luk': $c= 'Lukas'; break; case'Joh': $c= 'Johannes'; break; case'Jh': $c= 'Johannes'; break; case'Apg': $c= 'Apostelgeschichte'; break; case'Röm': $c= 'Römer'; break; case'Rom': $c= 'Römer'; break; case'Kor': $c= 'Korinther'; break; case'Gal': $c= 'Galater'; break; case'Eph': $c= 'Epheser'; break; case'Phil': $c= 'Philipper'; break; case'Kol': $c= 'Kolosser'; break; case'Thess': $c= 'Thessalonicher'; break; case'Tim': $c= 'Timotheus'; break; case'Tit': $c= 'Titus'; break; case'Phlm': $c= 'Philemon'; break; case'Ptr': $c= 'Petrus'; break; case'Petr': $c= 'Petrus'; break; case'Hbr': $c= 'Hebräer'; break; case'Hebr': $c= 'Hebräer'; break; case'Jak': $c= 'Jakobus'; break; case'Jk': $c= 'Jakobus'; break; case'Jud': $c= 'Judas'; break; case'Offb': $c= 'Offenbarung'; break; case'Off': $c= 'Offenbarung'; break; } # $a=trim($a); if($a !=""){$a=trim($a).".";} // nach der Zahl noch der Punkt hinzufügen if($a != ""){$a=trim($a)." ";$b="";} // nach dem Punkt ein Leerzeichen, B kann dann entfallen if($d ==""){$d=" ";} if($g !=""){$g=" ".$g." ";} // --> "1. Johannes 3,aus3" wird "1. Johannes 3, aus 3" #return sprintf('%s', $a.$b.$c.$d.$e.$f.$g.$h, $a.$b.$c.$d.$e.$f.$g.$h); return trim($a.$b.$c.$d.$e.$f.$g.$h); } */ $db = dbconnect(); $result_link_bibel = $db->query("SELECT bibellink FROM profil WHERE user='$user_admin'"); $row_link_bibel = $result_link_bibel->fetch_array(); $suchmuster = '/(KNK) (([0-9]{1,2}\.?){0,5})/'; $suchmuster2 = '/(KNK-FA) ([0-9]{1,3})/'; $einleitung = strip_tags($row['einleitung'], '
,,,
,
,
,
,^{');
$einleitung = str_replace('"', '\"', $einleitung);
$einleitung=preg_replace_callback("/([0-9]\s*)?()?(Sir|Mo|Jos|Ri|Rut|Sam|Kön|Chr|Esr|Neh|Est|Hiob|Ps|Spr|Pred|Hld|Jes|Jer|Kla|Klgl|Hes|Dan|Hos|Joel|Am|Obd|Jona|Mi|Nah|Hab|Zef|Hag|Sach|Mal|Tob|Mt|Mk|Lk|Luk|Joh|Jh|Apg|Röm|Rom|Kor|Gal|Eph|Phil|Kol|Thess|Tim|Tit|Phlm|Ptr|Petr|Joh|Hbr|Hebr|Jak|Jk|Jud|Offb|Off)(\s*)".
"([0-9]{1,3})(\,\s*)?(aus\s*)?([0-9]{0,3})/", function($m) use (&$lid) { return refill($m[1], $m[2], $m[3], $m[4], $m[5], $m[6], $m[7], $m[8], $m[9]);}, $einleitung);

$bibellink = $row_link_bibel['bibellink'];
$einleitung=preg_replace_callback("/([0-9][0-9]?\.\s*)?(Makkabäer|Johannes|Mose|Könige|Chronik|Korinther|Samuel|Thessalonicher|Timotheus|Petrus|Gebet Manasses|Stücke zu Daniel|Stücke zu Ester|Baruch|Weisheit|Judit|Judith|Sirach|Josua|Richter|Rut|Ruth|Esra|Nehemia|Esther|Ester|Hiob|Ijob|Psalm|Sprüche|Prediger|Hoheslied|Jesaja|Jeremia|Klagelieder|Hesekiel|Ezechiel|Daniel|Hosea|Joel|Amos|Tobias|Obadja|Jona|Micha|Nahum|Habakuk|Zefanja|Haggai|Sacharja|Maleachi|Matthäus|Markus|Lukas|Apostelgeschichte|Römer|Galater|Epheser|Philipper|Kolosser|Titus|Hebräer|Jakobus|Offenbarung|Philemon|Judas)(\s*[0-9]{1,3})(,\s*)?(\s*aus\s*|\s*Verse\s*|\s*Vers\s*)?([0-9]{0,3})?(\s*\-\s*|\s*\.\s*)?([0-9]{0,3})?/", function($m) use (&$eid,&$bibellink,&$jahr) { return makeLink($m[1], $m[2], $m[3], $m[4], $m[5], $m[6], $m[7], $m[8], $eid, $bibellink,$jahr);}, $einleitung);
$einleitung=preg_replace_callback($suchmuster, function($m) { return makeKNK($m[1], $m[2]);}, $einleitung);
$einleitung=preg_replace_callback($suchmuster2, function($m) { return makeKNK_FA($m[1], $m[2]);}, $einleitung);

$ausfuehrung = strip_tags($row['ausfuehrung'], '
,,,}
,
,
,
,^{,,,,');
$ausfuehrung = str_replace('"', '\"', $ausfuehrung);
$ausfuehrung=preg_replace_callback("/([0-9]\s*)?()?(Sir|Mo|Jos|Ri|Rut|Sam|Kön|Chr|Esr|Neh|Est|Hiob|Ps|Spr|Pred|Hld|Jes|Jer|Kla|Klgl|Hes|Dan|Hos|Joel|Am|Obd|Jona|Mi|Nah|Hab|Zef|Hag|Sach|Mal|Tob|Mt|Mk|Lk|Luk|Joh|Jh|Apg|Röm|Rom|Kor|Gal|Eph|Phil|Kol|Thess|Tim|Tit|Phlm|Ptr|Petr|Joh|Hbr|Hebr|Jak|Jk|Jud|Offb|Off)(\s*)".
"([0-9]{1,3})(\,\s*)?(aus\s*)?([0-9]{0,3})/", function($m) use (&$lid) { return refill($m[1], $m[2], $m[3], $m[4], $m[5], $m[6], $m[7], $m[8], $m[9]);}, $ausfuehrung);

$ausfuehrung=preg_replace_callback("/([0-9][0-9]?\.\s*)?(Makkabäer|Johannes|Mose|Könige|Chronik|Korinther|Samuel|Thessalonicher|Timotheus|Petrus|Gebet Manasses|Stücke zu Daniel|Stücke zu Ester|Baruch|Weisheit|Judit|Judith|Sirach|Josua|Richter|Rut|Ruth|Esra|Nehemia|Esther|Ester|Hiob|Ijob|Psalm|Sprüche|Prediger|Hoheslied|Jesaja|Jeremia|Klagelieder|Hesekiel|Ezechiel|Daniel|Hosea|Joel|Amos|Tobias|Obadja|Jona|Micha|Nahum|Habakuk|Zefanja|Haggai|Sacharja|Maleachi|Matthäus|Markus|Lukas|Apostelgeschichte|Römer|Galater|Epheser|Philipper|Kolosser|Titus|Hebräer|Jakobus|Offenbarung|Philemon|Judas)(\s*[0-9]{1,3})(,\s*)?(\s*aus\s*|\s*Verse\s*|\s*Vers\s*)?([0-9]{0,3})?(\s*\-\s*|\s*\.\s*)?([0-9]{0,3})?/", function($m) use (&$eid,&$bibellink,&$jahr) { return makeLink($m[1], $m[2], $m[3], $m[4], $m[5], $m[6], $m[7], $m[8], $eid, $bibellink,$jahr);}, $ausfuehrung);
$ausfuehrung=preg_replace_callback($suchmuster, function($m) { return makeKNK($m[1], $m[2]);}, $ausfuehrung);
$ausfuehrung=preg_replace_callback($suchmuster2, function($m) { return makeKNK_FA($m[1], $m[2]);}, $ausfuehrung);

$extrakt = strip_tags($row['extrakt'], '
,,,,,,,^{');
$extrakt = str_replace('"', '\"', $extrakt);
$extrakt=preg_replace_callback("/([0-9]\s*)?()?(Sir|Mo|Jos|Ri|Rut|Sam|Kön|Chr|Esr|Neh|Est|Hiob|Ps|Spr|Pred|Hld|Jes|Jer|Kla|Klgl|Hes|Dan|Hos|Joel|Am|Obd|Jona|Mi|Nah|Hab|Zef|Hag|Sach|Mal|Tob|Mt|Mk|Lk|Luk|Joh|Jh|Apg|Röm|Rom|Kor|Gal|Eph|Phil|Kol|Thess|Tim|Tit|Phlm|Ptr|Petr|Joh|Hbr|Hebr|Jak|Jk|Jud|Offb|Off)(\s*)".
"([0-9]{1,3})(\,\s*)?(aus\s*)?([0-9]{0,3})/", function($m) use (&$lid) { return refill($m[1], $m[2], $m[3], $m[4], $m[5], $m[6], $m[7], $m[8], $m[9]);}, $extrakt);
$extrakt=preg_replace_callback("/([0-9][0-9]?\.\s*)?(Makkabäer|Johannes|Mose|Könige|Chronik|Korinther|Samuel|Thessalonicher|Timotheus|Petrus|Gebet Manasses|Stücke zu Daniel|Stücke zu Ester|Baruch|Weisheit|Judit|Judith|Sirach|Josua|Richter|Rut|Ruth|Esra|Nehemia|Esther|Ester|Hiob|Ijob|Psalm|Sprüche|Prediger|Hoheslied|Jesaja|Jeremia|Klagelieder|Hesekiel|Ezechiel|Daniel|Hosea|Joel|Amos|Tobias|Obadja|Jona|Micha|Nahum|Habakuk|Zefanja|Haggai|Sacharja|Maleachi|Matthäus|Markus|Lukas|Apostelgeschichte|Römer|Galater|Epheser|Philipper|Kolosser|Titus|Hebräer|Jakobus|Offenbarung|Philemon|Judas)(\s*[0-9]{1,3})(,\s*)?(\s*aus\s*|\s*Verse\s*|\s*Vers\s*)?([0-9]{0,3})?(\s*\-\s*|\s*\.\s*)?([0-9]{0,3})?/", function($m) use (&$eid,&$bibellink,&$jahr) { return makeLink($m[1], $m[2], $m[3], $m[4], $m[5], $m[6], $m[7], $m[8], $eid, $bibellink,$jahr);}, $extrakt);

$extrakt=preg_replace_callback($suchmuster, function($m) { return makeKNK($m[1], $m[2]);}, $extrakt);
$extrakt=preg_replace_callback($suchmuster2, function($m) { return makeKNK_FA($m[1], $m[2]);}, $extrakt);

if(rore($user_admin,'a_luebear','RE')){
$smarty->assign('lue_inhalt_editrecht', "1");
$smarty->assign('lue_inhalt_icon_edit', "}");
}

$thema = strpos("$row[thema]", "Teil"); // Ermitteln wo das Wort "Teil" steht
$thema = substr("$row[thema]",0 ,$thema ); // Alles vor dem Wort "Teil" anzeigen
$thema = trim($thema);

while(substr($thema, -1) =='-' or substr($thema, -1)==':' or substr($thema, -1) =='(' or substr($thema, -1) ==' '){
$thema=trim($thema);
$thema=substr($thema, 0, -1);
$thema=trim($thema);
}

// Vor zurückbuttons bei mehrteiliger LuE
if($thema!=''){
$result_last = $db->query("SELECT eid, thema
FROM lue_quelle
WHERE eid < $row[eid]
AND thema LIKE '%$thema%'
ORDER BY eid DESC
LIMIT 1");
$row_last = $result_last->fetch_array();

if($row_last['eid'] != ''){
$smarty->assign('lue_inhalt_mvback', "1");
$smarty->assign('lue_inhalt_mvback_eid', "$row_last[eid]");
$smarty->assign('lue_inhalt_mvback_thema', "$row_last[thema]");
}
}

if($thema!=''){
$result_next = $db->query("SELECT eid, thema
FROM lue_quelle
WHERE eid > $row[eid]
AND thema LIKE '%$thema%'
ORDER BY eid ASC
LIMIT 1");
$row_next = $result_next->fetch_array();

if($row_next['eid'] != ''){
$smarty->assign('lue_inhalt_mvnext', "1");
$smarty->assign('lue_inhalt_mvnext_eid', "$row_next[eid]");
$smarty->assign('lue_inhalt_mvnext_thema', "$row_next[thema]");
}
}

if ($suchart == 1){
$suchopt = "{0,1}";
}else{
$suchopt = "";
}

if($inhalt_hig == ""){
$text2 = $ausfuehrung;
}else{
$text2 = highlight_results(" ".$ausfuehrung." ", $suchopt, "$inhalt_hig");
}
$smarty->assign('lue_inhalt_inhalt', "$text2");
$smarty->assign('lue_inhalt_einleitung', "$einleitung");

if($extrakt != ''){
$smarty->assign('lue_inhalt_extraktexists', "1");
$smarty->assign('lue_inhalt_extrakt', "$extrakt");
}

$smarty->display("$template/$templatename");
?>}