';
foreach($kalenderdaysofweek as $dayofweeknumber => $dayofweek){
$blank = "";
$daynumber=(substr($startdate,8,2)+0);
if($daynumber < 10) $blank = " ";
if(isset($inkalenderloop[$startdate]['kalenderloop_href'])){
//there exists a link due to db entry, so we want to link it
$formattedkalender['kalender_box'].='
';
}
$formattedkalender['kalender_box'].='';
$formattedkalender['result']=str_replace('###KALENDERBOX###',$formattedkalender['kalender_box'], $template);
}
if($resultparas["profiler_enabled"]) $pbaout['profiler']['End of format ' . $type . ' kalender']=microtime();
return $formattedkalender;
}
//helper functions
function analysepagetype(&$resultparas){
// we have pages with templates:
// 1. tickerpage - a tickerpage is a basic output list page
if($resultparas['archivdate'] == ""
&& $resultparas['searchphrase']== ""
&& $resultparas['feedrequest']==false
&& $resultparas['cacheid']==false
&& $resultparas['kalreq']==false
&& $resultparas['tickerpage']>1
&& !$resultparas['displayonlybox'] ) {
$pagetype['pagetype']='tickerpage';
$pagetype['template']='ticker';
}
// 2. searchpage - almost same as tickerpage, but with search specifica
if($resultparas['archivdate'] == ""
&& $resultparas['searchphrase']!= ""
&& $resultparas['feedrequest']==false
&& $resultparas['cacheid']==false
&& $resultparas['kalreq']==false
&& !$resultparas['displayonlybox']) {
$pagetype['pagetype']='searchpage';
$pagetype['template']='ticker';
}
// 3. datepage - almost same as tickerpage, but with datepage specifica
if($resultparas['archivdate'] != ""
&& $resultparas['searchphrase']== ""
&& $resultparas['feedrequest']==false
&& $resultparas['cacheid']==false
&& $resultparas['kalreq']==false
&& !$resultparas['displayonlybox'] ) {
$pagetype['pagetype']='datepage';
$pagetype['template']='ticker';
}
// 8. startpage - almost a tickerpage, but headers can be suppressed and a special uri can be assigned
if($resultparas['archivdate'] == ""
&& $resultparas['searchphrase']== ""
&& $resultparas['feedrequest']==false
&& $resultparas['cacheid']==false
&& $resultparas['kalreq']==false
&& $resultparas['tickerpage']==1
&& !$resultparas['displayonlybox'] ) {
$pagetype['pagetype']='startpage';
$pagetype['template']='ticker';
}
// these pagetypes above may use the same template with a preprocessor doing some modifications?
// 5. feedpage - a ticker- no search- no date - page with diffrent output preprocessing and diffrent template
if($resultparas['archivdate'] == ""
&& $resultparas['searchphrase']== ""
&& $resultparas['feedrequest']==true
&& $resultparas['cacheid']==false
&& $resultparas['kalreq']==false
&& !$resultparas['displayonlybox'] ) {
$pagetype['pagetype']='feedpage';
$pagetype['template']='feed';
}
// 5a. search feedpage - a feed ticker- with search - page
if($resultparas['archivdate'] == ""
&& $resultparas['searchphrase']!= ""
&& $resultparas['feedrequest']==true
&& $resultparas['cacheid']==false
&& $resultparas['kalreq']==false
&& !$resultparas['displayonlybox'] ) {
$pagetype['pagetype']='feedsearchpage';
$pagetype['template']='feed';
}
// 5b. date feedpage - a feed ticker- with date - page
if($resultparas['archivdate'] != ""
&& $resultparas['searchphrase']== ""
&& $resultparas['feedrequest']==true
&& $resultparas['cacheid']==false
&& $resultparas['kalreq']==false
&& !$resultparas['displayonlybox'] ) {
$pagetype['pagetype']='feeddatepage';
$pagetype['template']='feed';
}
// 7. cache page - a tickerpage with diffrent template and just one item requested
//these pages also use the main loop via search engine
//information which page was requested is in url, but limited by other config parameters
if($resultparas['archivdate'] == ""
&& $resultparas['searchphrase']== ""
&& $resultparas['feedrequest']==false //maybe have a cache page delivered as feed?
&& $resultparas['cacheid']> 0
&& $resultparas["iscachable"]=="Y"
&& $resultparas['kalreq']==false
&& !$resultparas['displayonlybox'] ) {
$pagetype['pagetype']='cachepage';
$pagetype['template']='cache';
}
// 4. kalenderpage - a special page with no content but showing all our navigation and boxes
if( $resultparas['searchphrase']== ""
&& $resultparas['feedrequest']==false
&& $resultparas['cacheid']==false
&& $resultparas['kalreq']==true
&& !$resultparas['displayonlybox']) {
$pagetype['pagetype']='kalpage';
$pagetype['template']='kalender';
}
// 9. nopage - maybe just a box was called? - great we could save a lot of time, when we know, that we don't need to process a page template
if($resultparas['feedrequest']==false
&& $resultparas['displayonlybox'] // just a box
) {
$pagetype['pagetype']='nopage';
$pagetype['template']= $resultparas['displayonlybox'];
// one of 'kalender_box', 'kalenderlist_box', 'search_box', 'feedlistsidebar_box', 'opml_box', 'feedlist_box', 'feedlistsidebar_box'
}
//10. errorpage - probably nobody wants this page, but maybe our system is not ready or it is not understandable what the user wanted
if(!isset($pagetype['pagetype']) || !isset($pagetype['template'])
) {
$pagetype['pagetype']='errorpage';
$pagetype['template']='error';
$pagetype['error'].='This error never should happen. Sorry for this. Cannot determine page type or template';
}
return $pagetype;
}
function analyze_needed_elements($rawtemplate, $type=''){
//avaliable_boxes: 'search_box, kalender_box, kalenderlist_box, feedlist_box, sendfeedpermail_box'; //do we really need this?
preg_match_all('/###[0-9A-Z_]+'.$type.'###/', $rawtemplate, $elementname);
//$element['boxname']=$elementname;
foreach($elementname[0] as $key => $elementnameupper){
$element['result'][str_replace('#','',strtolower($elementnameupper))]=true;
}
if(!isset($element['result'])) $element['result'] = false;
return $element;
}
function makebox($boxtomake, &$resultparas, &$pbaout){
$boxtemplate = $resultparas['template_' . $boxtomake]; //Fix this later to be a copy of resultparas
$preprocessed_boxtemplate=PBALIB::template_replacements($boxtemplate, $resultparas);
if($boxtomake == 'kalender_box' || $boxtomake == 'kalenderlist_box'){
//this one is tricky:
//1. to query db only once, if we have diffrent kalenderboxes to make, we want them all make at once
//2. we want to give some (?) other global results back like kalenderdate
//formatted_kalender gives out:
//1. result - as specified with boxtomake
//2. kalenderdate - needed later in page templates,
//3. maybe profiler, when profiler enabled set -> now directly sent to pbaout
//we shall better work with db query results cache ? - nice to see in profiler: mysql does caching automatically very well
$formatted_kalender=PBALIB::formatkalender($resultparas, $resultparas['archivdate'], $pbaout, $boxtomake, $preprocessed_boxtemplate);
$box['result']=$formatted_kalender['result']; //completely unused so far?
$pbaout['kalenderdate']=$formatted_kalender['kalenderdate'];
}elseif($boxtomake == 'opml_box' || $boxtomake == 'feedlist_box' || $boxtomake == 'feedlistsidebar_box'){
//we need to pass over dateformat for inside the loop
$dateformat="";
if (isset($resultparas['dateformat_' . $boxtomake])) $dateformat=$resultparas['dateformat_' . $boxtomake];
$feedlist = PBALIB::formatted_feedlist($resultparas, $dateformat, $preprocessed_boxtemplate);
$box['result']=$feedlist['result'];
}else{
//doing nothing special here is perfect for making a search box
$box['result']=$preprocessed_boxtemplate; //this
}
return $box;
}
function processtagset($tagsetfromdb){
//$bdprssTagSet: tags to possibly keep defined in programm code
//$tagsetfromdb - the tags defined as allowed as defined per output id
//$formattedtagset: the resulting tagset applied to the items in packageItemText
//to do: encapsulate this into function and store it in database!!!
global $bdprssTagSet;
$formattedtagset = '';
if($tagsetfromdb){
$kts = preg_split("','", $tagsetfromdb, -1, PREG_SPLIT_NO_EMPTY);
foreach($kts as $t){
$u = $bdprssTagSet[$t];
foreach($u as $v)
$formattedtagset .= "$v,";
}
}
return $formattedtagset;
}
function gettheage($seconds, &$resultparas=false, &$ageunitsstring=false){
//this function is used inside inner loops and has to be quick
//we set $resultparas['ageunit'] on first call with just a string and no array,
//so in following calls we won't have to loop
if(is_array($resultparas['ageunit'])){
$ageunit=$resultparas['ageunit'];
}else{
if(!$ageunitsstring) $ageunitsstring = get_pbadefaultparameter('ageunitsstring');
$ageunitsarray = explode(",", $ageunitsstring);
foreach($ageunitsarray as $valuepair){
$valuepairarray=explode(":", $valuepair);
$ageunit[trim($valuepairarray[0])]= trim($valuepairarray[1]);
}
$resultparas['ageunit']=$ageunit;
}
if($seconds < 100000) return $ageunit['never']; // usually true :)
$age = (time() - $seconds);
if($age < 0) {
$future = TRUE;
$age = -$age;
}
$unit = $ageunit['seconds'];
if($age>120.0) {
$age /= 60;
$unit = $ageunit['minutes'];
}
if($age>120.0 && $unit==$ageunit['minutes']){
$age /= 60;
$unit = $ageunit['hours'];
}
if($age>48.0 && $unit == $ageunit['hours']){
$age /= 24;
$unit = $ageunit['days'];
}
if($age>21.0 && $unit==$ageunit['days']){
$age /= 7;
$unit = $ageunit['weeks'];
}
if($age>13.0 && $unit==$ageunit['weeks'])
{
$age /= 4.34821;
$unit = $ageunit['months'];
}
if($age>=24.0 && $unit==$ageunit['months']){
$age /= 12;
$unit = $ageunit['years'];
}
$age = round($age, 0);
if(!isset($future)) {
if($ageunit['before'] != "") $ageunit['before'] = $ageunit['before'] . " ";
if($ageunit['beforeafter'] != "") $ageunit['beforeafter'] = " " . $ageunit['beforeafter'];
$return = $ageunit['before'] . "$age $unit" . $ageunit['beforeafter'];
} else {
$return = $ageunit['in'] . " $age $unit";
}
return $return;
}
//pba_cache($identifier, $content, 'write', $name, 'mixed', 0, 'OK');
//pba_cache($identifier, $content, 'housekeeping', $name, 'mixed', 500, 'OK');
//pba_cache($identifier, $content, 'clear', $name, 'mixed', 180, 'OK');
//$cachereturn=pba_cache($identifier, $dummy, 'get', $name, 'mixed', 1800, 'OK');
//if($cachereturn[1]) echo "Here is what I got: " . print_r($cachereturn);
//if($cachereturn[0]) echo "Got no cache";
function pba_cache(&$identifier, &$cache_content, $cache_mode='get', $name='c', $type='mixed', $cache_max_time=180, $serverstatus='OK'){
$cache_file=false;
$cache_path=PBA_CACHE_PATH;
//if identifier is just a short string containing nothing else then a-zA-Z0-9_-, we will use it as part of filename instead of md5
if(is_string($identifier)) {
if(strlen($identifier)<=40){
if(preg_match('/^[a-zA-Z0-9_-]+$/',$identifier)){
$cache_file=$cache_path . $name . '_' . $identifier;
}
}
}
if(!$cache_file){
$cache_file=$cache_path . $name . '_' . md5(serialize($identifier));
}
//to the filenames on disk will be appended:
//__c for check files, __d for data files, __t for tmp files
if($cache_mode=='write'){
$wrote_cache=false;
if ($serverstatus == 'OK' && !file_exists($cache_file."__t") && !(@filemtime($cache_file."__d") + $cache_max_time > time())){
$cache_file_handle = fopen($cache_file."__t", 'w+');
if($type=='string') {
if(fwrite($cache_file_handle, $cache_content)) $wrote_cache=true;
} else {
if(fwrite($cache_file_handle, serialize($cache_content))) $wrote_cache=true;
}
fclose($cache_file_handle);
rename($cache_file."__t",$cache_file."__d");
@touch($cache_file."__c");
}
return $wrote_cache;
}
if($cache_mode=='get'){
$got_cache=false;
if (file_exists($cache_file."__c")){
if( @filemtime($cache_file."__d") + $cache_max_time > time() && $serverstatus == 'OK' ) {
if($type=='string') {
if($get_cache=file_get_contents($cache_file."__d")) $got_cache=true;
} else {
if($get_cache=unserialize(file_get_contents($cache_file."__d"))) {
$got_cache=true;
}
}
}
}
if(!$got_cache) $get_cache = $identifier;
return array($get_cache,$got_cache);
}
if($cache_mode=='housekeeping'){
$counter=0;
if($serverstatus == 'OK'){
foreach (glob($cache_path . "*__?") as $filename) {
if(preg_match('/__[cd]$/',$filename)){
if(filemtime($filename) + $cache_max_time < time()) {
unlink($filename);
$counter++;
}
}
}
}
return $counter;
}
if($cache_mode=='clear'){
$counter=0;
foreach (glob($cache_path . "*__?") as $filename) {
unlink($filename);
$counter++;
}
return $counter;
}
}
}// end class PBALIB
?>