17d101cc1SGerry Weißbach<?php 27d101cc1SGerry Weißbach 37d101cc1SGerry Weißbachif (!defined('DOKU_PLUGIN')) die('meh'); 47d101cc1SGerry Weißbachrequire_once(DOKU_PLUGIN . 'siteexport/inc/settings.php'); 57d101cc1SGerry Weißbachrequire_once(DOKU_PLUGIN . 'siteexport/inc/debug.php'); 67d101cc1SGerry Weißbach 7*09a16006SGerry Weißbachuse dokuwiki\File\PageResolver; 8*09a16006SGerry Weißbach 97d101cc1SGerry Weißbachclass siteexport_functions extends DokuWiki_Plugin 107d101cc1SGerry Weißbach{ 117d101cc1SGerry Weißbach public $debug = null; 127d101cc1SGerry Weißbach public $settings = null; 137d101cc1SGerry Weißbach 14b324a190SMichael Hamann public function __construct($init = true, $isAJAX = false) 157d101cc1SGerry Weißbach { 167d101cc1SGerry Weißbach if ($init) 177d101cc1SGerry Weißbach { 187d101cc1SGerry Weißbach $this->debug = new siteexport_debug(); 192270cdc5SGerry Weißbach $this->debug->isAJAX = $isAJAX; 202270cdc5SGerry Weißbach 217d101cc1SGerry Weißbach $this->settings = new settings_plugin_siteexport_settings($this); 227d101cc1SGerry Weißbach $this->debug->message("Settings completed: zipFile", $this->settings->zipFile, 1); 237d101cc1SGerry Weißbach } 247d101cc1SGerry Weißbach } 257d101cc1SGerry Weißbach 267d101cc1SGerry Weißbach public function getPluginName() 277d101cc1SGerry Weißbach { 287d101cc1SGerry Weißbach return 'siteexport'; 297d101cc1SGerry Weißbach } 307d101cc1SGerry Weißbach 317d101cc1SGerry Weißbach public function downloadURL() 327d101cc1SGerry Weißbach { 336792d0cfSGerry Weißbach $params = array('cache' => 'nocache', 'siteexport' => $this->settings->pattern); 346792d0cfSGerry Weißbach 356792d0cfSGerry Weißbach if ($this->debug->debugLevel() < 5) { 366792d0cfSGerry Weißbach // If debug, then debug! 376792d0cfSGerry Weißbach $params['debug'] = $this->debug->debugLevel(); 386792d0cfSGerry Weißbach } 396792d0cfSGerry Weißbach 406792d0cfSGerry Weißbach return ml($this->settings->origZipFile, $params, true, '&'); 417d101cc1SGerry Weißbach } 427d101cc1SGerry Weißbach 437d101cc1SGerry Weißbach public function checkIfCacheFileExistsForFileWithPattern($file, $pattern) 447d101cc1SGerry Weißbach { 457d101cc1SGerry Weißbach if (!@file_exists($file)) 467d101cc1SGerry Weißbach { 477d101cc1SGerry Weißbach // If the cache File does not exist, move the newly created one over ... 486792d0cfSGerry Weißbach $this->debug->message("'{$file}' does not exist. Checking original ZipFile", null, 3); 497d101cc1SGerry Weißbach $newCacheFile = mediaFN($this->getSpecialExportFileName($this->settings->origZipFile, $pattern)); 507d101cc1SGerry Weißbach 517d101cc1SGerry Weißbach if (!@file_exists($newCacheFile)) 527d101cc1SGerry Weißbach { 537d101cc1SGerry Weißbach $this->debug->message("The export must have gone wrong. The cached file does not exist.", array("pattern" => $pattern, "original File" => $this->settings->origZipFile, "expected cached file" => $newCacheFile), 3); 547d101cc1SGerry Weißbach } 557d101cc1SGerry Weißbach 567d101cc1SGerry Weißbach $status = io_rename($newCacheFile, $file); 577d101cc1SGerry Weißbach $this->debug->message("had to move another original file over. Did it work? " . ($status ? 'Yes, it did.' : 'No, it did not.'), null, 2); 586792d0cfSGerry Weißbach } else { 596792d0cfSGerry Weißbach $this->debug->message("The file does exist!", $file, 2); 607d101cc1SGerry Weißbach } 617d101cc1SGerry Weißbach } 627d101cc1SGerry Weißbach 637d101cc1SGerry Weißbach 647d101cc1SGerry Weißbach /** 657d101cc1SGerry Weißbach * Returns an utf8 encoded Namespace for a Page and input Namespace 667d101cc1SGerry Weißbach * @param $NS 677d101cc1SGerry Weißbach * @param $PAGE 687d101cc1SGerry Weißbach */ 69a8c17ab5Si-net /// software public function getNamespaceFromID($NS, &$PAGE) { 707d101cc1SGerry Weißbach global $conf; 717d101cc1SGerry Weißbach // Check current page - if its an NS add the startpage 72*09a16006SGerry Weißbach $NS = (new PageResolver($NS))->resolveId($NS); 733aa0ad13SGerry Weißbach $NSa = explode(':', $NS); 743aa0ad13SGerry Weißbach if (!page_exists($NS) && array_pop($NSa) != strtolower($conf['start'])) { // Compare to lowercase since clean lowers it. 757d101cc1SGerry Weißbach $NS .= ':' . $conf['start']; 76*09a16006SGerry Weißbach $NS = (new PageResolver($NS))->resolveId($NS); 777d101cc1SGerry Weißbach } 787d101cc1SGerry Weißbach 797d101cc1SGerry Weißbach $PAGE = noNS($NS); 807d101cc1SGerry Weißbach $NS = getNS($NS); 817d101cc1SGerry Weißbach 827d101cc1SGerry Weißbach return utf8_encodeFN(str_replace(':', '/', $NS)); 837d101cc1SGerry Weißbach } 847d101cc1SGerry Weißbach 857d101cc1SGerry Weißbach /** 867d101cc1SGerry Weißbach * create a file name for the page 877d101cc1SGerry Weißbach **/ 887d101cc1SGerry Weißbach public function getSiteName($ID, $overrideRewrite = false) { 897d101cc1SGerry Weißbach global $conf; 907d101cc1SGerry Weißbach 917d101cc1SGerry Weißbach if (empty($ID)) return false; 927d101cc1SGerry Weißbach 934c9a39daSGerry Weißbach // Remove extensions 944c9a39daSGerry Weißbach if ($overrideRewrite) { 95c6d15ed9SGerry Weißbach $ID = preg_replace("#\.(php|html)$#", '', $ID); 964c9a39daSGerry Weißbach } 974c9a39daSGerry Weißbach 987d101cc1SGerry Weißbach $url = $this->wl($this->cleanID($ID), null, true, null, null, $overrideRewrite); // this must be done with rewriting set to override 997d101cc1SGerry Weißbach $uri = @parse_url($url); 1007d101cc1SGerry Weißbach if ($uri['path'][0] == '/') { 1017d101cc1SGerry Weißbach $uri['path'] = substr($uri['path'], 1); 1027d101cc1SGerry Weißbach } 1037d101cc1SGerry Weißbach 1047d101cc1SGerry Weißbach return $this->shortenName($uri['path'] . '.' . $this->settings->fileType); 1057d101cc1SGerry Weißbach } 1067d101cc1SGerry Weißbach 1077d101cc1SGerry Weißbach /** 1087d101cc1SGerry Weißbach * get the Title for the page 1097d101cc1SGerry Weißbach **/ 1107d101cc1SGerry Weißbach public function getSiteTitle($ID) { 1117d101cc1SGerry Weißbach if (useHeading('content') && $ID) { 112ffaab539SGerry Weißbach $heading = null; 113ffaab539SGerry Weißbach if (class_exists('siteexport_pdfgenerator')) { 114ffaab539SGerry Weißbach $heading = p_get_metadata(cleanID($ID),'pdftitle',METADATA_RENDER_USING_SIMPLE_CACHE); 115ffaab539SGerry Weißbach } 116ffaab539SGerry Weißbach $heading = empty($heading) ? p_get_metadata(cleanID($ID),'breadtitle',METADATA_RENDER_USING_SIMPLE_CACHE) : $heading; 117ffaab539SGerry Weißbach $heading = empty($heading) ? p_get_first_heading($ID, true) : $heading; 1187d101cc1SGerry Weißbach if ($heading) { 1197d101cc1SGerry Weißbach return $this->xmlEntities($heading); 1207d101cc1SGerry Weißbach } 1217d101cc1SGerry Weißbach } 122bca58ac1SGerry Weißbach $elements = explode(':', $ID); 123bca58ac1SGerry Weißbach return ucwords($this->xmlEntities(array_pop($elements))); 1247d101cc1SGerry Weißbach } 1257d101cc1SGerry Weißbach 1267d101cc1SGerry Weißbach /** 1277d101cc1SGerry Weißbach * Encoding ()taken from DW - but without needing the renderer 1287d101cc1SGerry Weißbach **/ 1297d101cc1SGerry Weißbach public function xmlEntities($string) { 1307d101cc1SGerry Weißbach return htmlspecialchars($string, ENT_QUOTES, 'UTF-8'); 1317d101cc1SGerry Weißbach } 1327d101cc1SGerry Weißbach 1337d101cc1SGerry Weißbach /** 1347d101cc1SGerry Weißbach * Create name for the file inside the zip and the replacements 1357d101cc1SGerry Weißbach **/ 136a8c17ab5Si-net /// software public function shortenName($NAME) 1377d101cc1SGerry Weißbach { 1387d101cc1SGerry Weißbach $NS = $this->settings->exportNamespace; 139774a858aSGerry Weißbach $NAME = preg_replace("%^" . preg_quote(DOKU_BASE, '%') . "%", "", $NAME); 140774a858aSGerry Weißbach $NAME = preg_replace("%^((_media|_detail)/)?(" . preg_quote($NS, '%') . "/)?%", "", $NAME); 1417d101cc1SGerry Weißbach 1421701f03cSGerry Weißbach if (strstr($NAME, '%')) { $NAME = rawurldecode($NAME); } 1431701f03cSGerry Weißbach 1447d101cc1SGerry Weißbach $this->debug->message("Shortening file to '$NAME'", null, 1); 1457d101cc1SGerry Weißbach return $NAME; 1467d101cc1SGerry Weißbach } 1477d101cc1SGerry Weißbach 1487d101cc1SGerry Weißbach /** 1497d101cc1SGerry Weißbach * Remove unwanted chars from ID 1507d101cc1SGerry Weißbach * 1517d101cc1SGerry Weißbach * Cleans a given ID to only use allowed characters. Accented characters are 1527d101cc1SGerry Weißbach * converted to unaccented ones 1537d101cc1SGerry Weißbach * 1547d101cc1SGerry Weißbach * @author Andreas Gohr <andi@splitbrain.org> 1557d101cc1SGerry Weißbach * @param string $raw_id The pageid to clean 1567d101cc1SGerry Weißbach * @param boolean $ascii Force ASCII 1577d101cc1SGerry Weißbach * @param boolean $media Allow leading or trailing _ for media files 1587d101cc1SGerry Weißbach */ 159a8c17ab5Si-net /// software public function cleanID($raw_id, $ascii = false, $media = false) { 1607d101cc1SGerry Weißbach global $conf; 1617d101cc1SGerry Weißbach global $lang; 1627d101cc1SGerry Weißbach static $sepcharpat = null; 1637d101cc1SGerry Weißbach 1647d101cc1SGerry Weißbach global $cache_cleanid; 1657d101cc1SGerry Weißbach $cache = & $cache_cleanid; 1667d101cc1SGerry Weißbach 1677d101cc1SGerry Weißbach // check if it's already in the memory cache 1687d101cc1SGerry Weißbach if (isset($cache[(string) $raw_id])) { 1697d101cc1SGerry Weißbach return $cache[(string) $raw_id]; 1707d101cc1SGerry Weißbach } 1717d101cc1SGerry Weißbach 1727d101cc1SGerry Weißbach $sepchar = $conf['sepchar']; 1737d101cc1SGerry Weißbach if ($sepcharpat == null) // build string only once to save clock cycles 1747d101cc1SGerry Weißbach $sepcharpat = '#\\' . $sepchar . '+#'; 1757d101cc1SGerry Weißbach 1767d101cc1SGerry Weißbach $id = trim((string) $raw_id); 177a8c17ab5Si-net /// software // NO LowerCase for us! - Preserve it, that is why the call is missing here. 1787d101cc1SGerry Weißbach 1797d101cc1SGerry Weißbach //alternative namespace seperator 1807d101cc1SGerry Weißbach $id = strtr($id, ';', ':'); 1817d101cc1SGerry Weißbach if ($conf['useslash']) { 1827d101cc1SGerry Weißbach $id = strtr($id, '/', ':'); 1837d101cc1SGerry Weißbach } else { 1847d101cc1SGerry Weißbach $id = strtr($id, '/', $sepchar); 1857d101cc1SGerry Weißbach } 1867d101cc1SGerry Weißbach 1877d101cc1SGerry Weißbach if ($conf['deaccent'] == 2 || $ascii) $id = utf8_romanize($id); 1887d101cc1SGerry Weißbach if ($conf['deaccent'] || $ascii) $id = utf8_deaccent($id, -1); 1897d101cc1SGerry Weißbach 1905a843d1fSGerry Weißbach // We want spaces to be preserved when they are in the link. 1915a843d1fSGerry Weißbach global $UTF8_SPECIAL_CHARS2; 1925a843d1fSGerry Weißbach $UTF8_SPECIAL_CHARS2_SAVE = (string) $UTF8_SPECIAL_CHARS2; 1935a843d1fSGerry Weißbach $UTF8_SPECIAL_CHARS2 = str_replace(' ', '', $UTF8_SPECIAL_CHARS2); 1945a843d1fSGerry Weißbach 1957d101cc1SGerry Weißbach //remove specials 1967d101cc1SGerry Weißbach $id = utf8_stripspecials($id, $sepchar, '\*'); 1975a843d1fSGerry Weißbach $UTF8_SPECIAL_CHARS2 = $UTF8_SPECIAL_CHARS2_SAVE; 1987d101cc1SGerry Weißbach 1997d101cc1SGerry Weißbach if ($ascii) $id = utf8_strip($id); 2007d101cc1SGerry Weißbach 2017d101cc1SGerry Weißbach //clean up 2027d101cc1SGerry Weißbach $id = preg_replace($sepcharpat, $sepchar, $id); 2037d101cc1SGerry Weißbach $id = preg_replace('#:+#', ':', $id); 2047d101cc1SGerry Weißbach $id = ($media ? trim($id, ':.-') : trim($id, ':._-')); 2057d101cc1SGerry Weißbach $id = preg_replace('#:[:\._\-]+#', ':', $id); 2067d101cc1SGerry Weißbach 2077d101cc1SGerry Weißbach $cache[(string) $raw_id] = $id; 2087d101cc1SGerry Weißbach return($id); 2097d101cc1SGerry Weißbach } 2107d101cc1SGerry Weißbach 2117d101cc1SGerry Weißbach 2127d101cc1SGerry Weißbach /** 2137d101cc1SGerry Weißbach * This builds a link to a wikipage - changed for internal use here 2147d101cc1SGerry Weißbach * 2157d101cc1SGerry Weißbach * It handles URL rewriting and adds additional parameter if 2167d101cc1SGerry Weißbach * given in $more 2177d101cc1SGerry Weißbach * 2187d101cc1SGerry Weißbach * @author Andreas Gohr <andi@splitbrain.org> 2197d101cc1SGerry Weißbach */ 2207d101cc1SGerry Weißbach 221a8c17ab5Si-net /// software public function wl($id='',$more='',$abs=false,$sep='&', $IDexists=true, $overrideRewrite=false, $hadBase=false){ 2227d101cc1SGerry Weißbach global $conf; 2237d101cc1SGerry Weißbach 2241d20b534SGerry Weißbach $this->debug->message("Starting to build WL-URL for '$id'", $more, 1); 2257d101cc1SGerry Weißbach 2267d101cc1SGerry Weißbach if(is_array($more)){ 2271d20b534SGerry Weißbach 2281d20b534SGerry Weißbach $intermediateMore = ''; 2291d20b534SGerry Weißbach foreach( $more as $key => $value) { 2301d20b534SGerry Weißbach 2311d20b534SGerry Weißbach if ( strlen($intermediateMore) > 0 ) { 2321d20b534SGerry Weißbach $intermediateMore .= $sep; 2331d20b534SGerry Weißbach } 2341d20b534SGerry Weißbach 2351d20b534SGerry Weißbach if ( !is_array($value) ) { 2361d20b534SGerry Weißbach $intermediateMore .= rawurlencode($key) . '='; 2371d20b534SGerry Weißbach $intermediateMore .= rawurlencode($value); 2381d20b534SGerry Weißbach continue; 2391d20b534SGerry Weißbach } 2401d20b534SGerry Weißbach 2411d20b534SGerry Weißbach foreach( $value as $val ) { 2421d20b534SGerry Weißbach if ( strlen($intermediateMore) > 0 ) { 2431d20b534SGerry Weißbach $intermediateMore .= $sep; 2441d20b534SGerry Weißbach } 2451d20b534SGerry Weißbach 2461d20b534SGerry Weißbach $intermediateMore .= rawurlencode($key) . '[]='; 2471d20b534SGerry Weißbach $intermediateMore .= rawurlencode($val); 2481d20b534SGerry Weißbach } 2491d20b534SGerry Weißbach } 2501d20b534SGerry Weißbach 2511d20b534SGerry Weißbach $more = $intermediateMore; 2527d101cc1SGerry Weißbach } else { 2537d101cc1SGerry Weißbach $more = str_replace(',', $sep, $more); 2547d101cc1SGerry Weißbach } 2557d101cc1SGerry Weißbach 2567d101cc1SGerry Weißbach $id = idfilter($id); 2577d101cc1SGerry Weißbach 2587d101cc1SGerry Weißbach if ($abs) { 2597d101cc1SGerry Weißbach $xlink = DOKU_URL; 2607d101cc1SGerry Weißbach if (!$IDexists && !$hadBase) { // If the file does not exist, we have to remove the base. This link my be one to an parallel BASE. 2617d101cc1SGerry Weißbach $xlink = preg_replace('#' . DOKU_BASE . '$#', '', $xlink); 2627d101cc1SGerry Weißbach } 2637d101cc1SGerry Weißbach } else if ($IDexists || $hadBase) { // if the ID does exist, we may add the base. 2647d101cc1SGerry Weißbach $xlink = DOKU_BASE; 2657d101cc1SGerry Weißbach } else { 2667d101cc1SGerry Weißbach $xlink = ""; 2677d101cc1SGerry Weißbach } 2687d101cc1SGerry Weißbach 2697d101cc1SGerry Weißbach // $this->debug->message("internal WL function Before Replacing: '$xlink'", array(DOKU_REL, DOKU_URL, DOKU_BASE, $xlink), 2); 2707d101cc1SGerry Weißbach $xlink = preg_replace('#(?<!http:|https:)//+#', '/', ($abs ? '' : '/') . "$xlink/"); // ensure slashes at beginning and ending, but strip doubles 2717d101cc1SGerry Weißbach $this->debug->message("'$xlink'", array(DOKU_REL, DOKU_URL, DOKU_BASE, $xlink), 2); 2727d101cc1SGerry Weißbach 2737d101cc1SGerry Weißbach if ($overrideRewrite) { 2747d101cc1SGerry Weißbach $this->debug->message("Override enabled.", null, 1); 2757d101cc1SGerry Weißbach $id = strtr($id, ':', '/'); 2767d101cc1SGerry Weißbach 2777d101cc1SGerry Weißbach $xlink .= $id; 2787d101cc1SGerry Weißbach if ($more) $xlink .= '?' . $more; 2797d101cc1SGerry Weißbach } else { 2807d101cc1SGerry Weißbach if ($conf['userewrite'] == 2) { 2817d101cc1SGerry Weißbach $xlink .= DOKU_SCRIPT . '/' . $id; 2827d101cc1SGerry Weißbach if ($more) $xlink .= '?' . $more; 2837d101cc1SGerry Weißbach }elseif ($conf['userewrite']) { 2847d101cc1SGerry Weißbach $xlink .= $id; 2857d101cc1SGerry Weißbach if ($more) $xlink .= '?' . $more; 2867d101cc1SGerry Weißbach }elseif ($id) { 2877d101cc1SGerry Weißbach $xlink .= DOKU_SCRIPT . '?id=' . $id; 2887d101cc1SGerry Weißbach if ($more) $xlink .= $sep . $more; 2897d101cc1SGerry Weißbach } else { 2907d101cc1SGerry Weißbach $xlink .= DOKU_SCRIPT; 2917d101cc1SGerry Weißbach if ($more) $xlink .= '?' . $more; 2927d101cc1SGerry Weißbach } 2937d101cc1SGerry Weißbach } 2947d101cc1SGerry Weißbach 2957d101cc1SGerry Weißbach $this->debug->message("internal WL function result: '$xlink'", null, 2); 2967d101cc1SGerry Weißbach 2977d101cc1SGerry Weißbach return $xlink; 2987d101cc1SGerry Weißbach } 2997d101cc1SGerry Weißbach 3007d101cc1SGerry Weißbach /** 3017d101cc1SGerry Weißbach * Create the export file name - this is the file where everything is being stored 302a8c17ab5Si-net /// software * @param $FILE String name of the file 303a8c17ab5Si-net /// software * @param $PATTERN String additional pattern for re-using old files 3047d101cc1SGerry Weißbach */ 3057d101cc1SGerry Weißbach public function getSpecialExportFileName($FILE, $PATTERN = null) { 3067d101cc1SGerry Weißbach 3077d101cc1SGerry Weißbach if (empty($FILE)) 3087d101cc1SGerry Weißbach { 3097d101cc1SGerry Weißbach $FILE = $this->settings->origZipFile; 3107d101cc1SGerry Weißbach } 3117d101cc1SGerry Weißbach 3127d101cc1SGerry Weißbach if (empty($PATTERN) && empty($this->settings->pattern)) { 3136792d0cfSGerry Weißbach $this->debug->message("Generating an internal md5 pattern. This will go wrong - and won't cache properly.", null, 3); 3147d101cc1SGerry Weißbach $PATTERN = md5(microtime(false)); 3157d101cc1SGerry Weißbach } 3167d101cc1SGerry Weißbach 3177d101cc1SGerry Weißbach // Set Pattern Global for other stuff 3187d101cc1SGerry Weißbach if (empty($this->settings->pattern)) { 31982618ac8SGerry Weißbach $this->settings['pattern'] = $PATTERN; 3207d101cc1SGerry Weißbach } else { 3217d101cc1SGerry Weißbach $PATTERN = $this->settings->pattern; 3227d101cc1SGerry Weißbach } 3237d101cc1SGerry Weißbach 3247d101cc1SGerry Weißbach $FA = explode('.', $FILE); 3257d101cc1SGerry Weißbach $EXT = array_pop($FA); 3267d101cc1SGerry Weißbach array_push($FA, 'auto'); 3277d101cc1SGerry Weißbach array_push($FA, $PATTERN); 3287d101cc1SGerry Weißbach array_push($FA, $EXT); 3297d101cc1SGerry Weißbach 3307d101cc1SGerry Weißbach $fileName = implode('.', $FA); 3317d101cc1SGerry Weißbach $this->debug->message("Export Filename for '$FILE' will be: '$fileName'", null, 2); 3327d101cc1SGerry Weißbach return $fileName; 3337d101cc1SGerry Weißbach } 3347d101cc1SGerry Weißbach 3357d101cc1SGerry Weißbach public function getCacheFileNameForPattern($PATTERN = null) 3367d101cc1SGerry Weißbach { 3377d101cc1SGerry Weißbach if ($PATTERN == null) { 3387d101cc1SGerry Weißbach $PATTERN = $this->settings->pattern; 3397d101cc1SGerry Weißbach } 3407d101cc1SGerry Weißbach 3417d101cc1SGerry Weißbach return getCacheName($this->getSpecialExportFileName($this->settings->origZipFile, $PATTERN), '.' . basename(mediaFN($this->settings->origZipFile))); 3427d101cc1SGerry Weißbach } 3437d101cc1SGerry Weißbach 3440571ece2SScrutinizer Auto-Fixer /** 3450571ece2SScrutinizer Auto-Fixer * @param integer $counter 3460571ece2SScrutinizer Auto-Fixer */ 347a8c17ab5Si-net /// software public function startRedirctProcess($counter) { 3487d101cc1SGerry Weißbach global $ID; 3497d101cc1SGerry Weißbach 3507d101cc1SGerry Weißbach $URL = wl($ID); 3517d101cc1SGerry Weißbach 3527d101cc1SGerry Weißbach $additionalParameters = $_REQUEST; 3537d101cc1SGerry Weißbach $additionalParameters['startcounter'] = $counter; 3547d101cc1SGerry Weißbach $additionalParameters['pattern'] = $this->settings->pattern; 3557d101cc1SGerry Weißbach 3567d101cc1SGerry Weißbach unset($additionalParameters['id']); 3577d101cc1SGerry Weißbach unset($additionalParameters['u']); 3587d101cc1SGerry Weißbach unset($additionalParameters['p']); 3597d101cc1SGerry Weißbach unset($additionalParameters['r']); 3607d101cc1SGerry Weißbach unset($additionalParameters['http_credentials']); 3617d101cc1SGerry Weißbach 3627d101cc1SGerry Weißbach $this->addAdditionalParametersToURL($URL, $additionalParameters); 3637d101cc1SGerry Weißbach $this->debug->message("Redirecting to '$URL'", null, 2); 3647d101cc1SGerry Weißbach 3657d101cc1SGerry Weißbach send_redirect($URL); 3667d101cc1SGerry Weißbach exit(0); // Should not be reached, but anyways 3677d101cc1SGerry Weißbach } 3687d101cc1SGerry Weißbach 3697d101cc1SGerry Weißbach /** 3707d101cc1SGerry Weißbach * Builds additional Parameters into the URL given 3717d101cc1SGerry Weißbach * @param $URL 3727d101cc1SGerry Weißbach * @param $newAdditionalParameters 3737d101cc1SGerry Weißbach */ 374a8c17ab5Si-net /// software public function addAdditionalParametersToURL(&$URL, $newAdditionalParameters) { 3757d101cc1SGerry Weißbach 3767d101cc1SGerry Weißbach // Add additionalParameters 3777d101cc1SGerry Weißbach if (!empty($newAdditionalParameters)) { 3787d101cc1SGerry Weißbach foreach ($newAdditionalParameters as $key => $value) { 3797d101cc1SGerry Weißbach if (empty($key) || empty($value)) { continue; } 3807d101cc1SGerry Weißbach 3817d101cc1SGerry Weißbach if (is_array($value)) { 3827d101cc1SGerry Weißbach foreach (array_values($value) as $aValue) { // Array Handling 3837d101cc1SGerry Weißbach $URL .= (strstr($URL, '?') ? '&' : '?') . $key . "[]=$aValue"; 3847d101cc1SGerry Weißbach } 3857d101cc1SGerry Weißbach } else { 3867d101cc1SGerry Weißbach $append = "$key=$value"; 3877d101cc1SGerry Weißbach $URL .= empty($append) || strstr($URL, $append) ? '' : (strstr($URL, '?') ? '&' : '?') . $append; 3887d101cc1SGerry Weißbach } 3897d101cc1SGerry Weißbach } 3907d101cc1SGerry Weißbach } 3917d101cc1SGerry Weißbach } 3927d101cc1SGerry Weißbach 3937d101cc1SGerry Weißbach /** 3947d101cc1SGerry Weißbach * Cleans the wiki variables and returns a rebuild URL that has the new variables at hand 3957d101cc1SGerry Weißbach * @param $data 3967d101cc1SGerry Weißbach */ 397a8c17ab5Si-net /// software public function prepare_POSTData($data) 3987d101cc1SGerry Weißbach { 3990baac5adSGerry Weißbach $NS = array_key_exists( 'ns', $data ) ? $data['ns'] : ( array_key_exists( 'id', $data ) ? $data['id'] : ':' ); 4007d101cc1SGerry Weißbach 4017d101cc1SGerry Weißbach $this->removeWikiVariables($data); 4027d101cc1SGerry Weißbach $data['do'] = 'siteexport'; 4037d101cc1SGerry Weißbach $additionalKeys = ''; 4047d101cc1SGerry Weißbach 4057d101cc1SGerry Weißbach ksort($data); 4067d101cc1SGerry Weißbach 4077d101cc1SGerry Weißbach $this->debug->message("Prepared POST data:", $data, 1); 4087d101cc1SGerry Weißbach 4097d101cc1SGerry Weißbach foreach ($data as $key => $value) { 4107d101cc1SGerry Weißbach 4117d101cc1SGerry Weißbach if (!is_array($value)) { continue; } 4127d101cc1SGerry Weißbach $this->debug->message("Found inner Array:", $value, 1); 4137d101cc1SGerry Weißbach 4147d101cc1SGerry Weißbach asort($value); 4157d101cc1SGerry Weißbach foreach ($value as $innerKey => $aValue) 4167d101cc1SGerry Weißbach { 4177d101cc1SGerry Weißbach if (is_numeric($innerKey)) 4187d101cc1SGerry Weißbach { 4197d101cc1SGerry Weißbach $innerKey = ''; 4207d101cc1SGerry Weißbach } 4217d101cc1SGerry Weißbach 4227d101cc1SGerry Weißbach $additionalKeys .= "&$key" . "[$innerKey]=$aValue"; 4237d101cc1SGerry Weißbach } 4247d101cc1SGerry Weißbach 4257d101cc1SGerry Weißbach unset($data[$key]); 4267d101cc1SGerry Weißbach } 4277d101cc1SGerry Weißbach 4287d101cc1SGerry Weißbach return wl($NS, $data, true, '&') . $additionalKeys; 4297d101cc1SGerry Weißbach } 4307d101cc1SGerry Weißbach 4317d101cc1SGerry Weißbach /** 4327d101cc1SGerry Weißbach * Parses a String into a $_REQUEST Like variant. You have to tell if a decode of the values is needed 4337d101cc1SGerry Weißbach * @param $inputArray 4347d101cc1SGerry Weißbach * @param $decode 4357d101cc1SGerry Weißbach */ 4367d101cc1SGerry Weißbach public function parseStringToRequestArray($inputArray, $decode=false) 4377d101cc1SGerry Weißbach { 4387d101cc1SGerry Weißbach global $plugin_controller; 4397d101cc1SGerry Weißbach 4407d101cc1SGerry Weißbach $outputArray = $inputArray; 4417d101cc1SGerry Weißbach if ( !is_array($inputArray) ) 4427d101cc1SGerry Weißbach { 4437d101cc1SGerry Weißbach $intermediate = str_replace("&", "&", $inputArray); 4447d101cc1SGerry Weißbach 4457d101cc1SGerry Weißbach $outputArray = array(); 4467d101cc1SGerry Weißbach foreach( explode("&", $intermediate) as $param ) { 447d0db7817SGerry Weißbach list($key, $value) = array_pad( explode("=", $param, 2), 2, null ); 4487d101cc1SGerry Weißbach 4497d101cc1SGerry Weißbach // This is needed if we do want to calculate $_REQUEST for a non HTTP-Request 4507d101cc1SGerry Weißbach if ( $decode) 4517d101cc1SGerry Weißbach { 4527d101cc1SGerry Weißbach $value = urldecode($value); 4537d101cc1SGerry Weißbach } 4547d101cc1SGerry Weißbach 4557d101cc1SGerry Weißbach if ( empty($key) ) { continue; } // Don't check on Value, because there may be only the key that should be preserved 4567d101cc1SGerry Weißbach 4577d101cc1SGerry Weißbach if ( substr($key, -2) == '[]' ) { 4587d101cc1SGerry Weißbach $key = substr($key, 0, -2); 4597d101cc1SGerry Weißbach if ( !is_array($outputArray[$key]) ) { 4607d101cc1SGerry Weißbach $outputArray[$key] = array(); 4617d101cc1SGerry Weißbach } 4627d101cc1SGerry Weißbach 4637d101cc1SGerry Weißbach array_push($outputArray[$key], $value); // Array Handling 4647d101cc1SGerry Weißbach } else { 4657d101cc1SGerry Weißbach $outputArray[$key] = $value; 4667d101cc1SGerry Weißbach } 4677d101cc1SGerry Weißbach } 4687d101cc1SGerry Weißbach } 4697d101cc1SGerry Weißbach 4707d101cc1SGerry Weißbach if (!empty($outputArray['diPlu'])) { 4717d101cc1SGerry Weißbach 4727d101cc1SGerry Weißbach $allPlugins = array(); 4737d101cc1SGerry Weißbach foreach ($plugin_controller->getList(null, true) as $plugin) { 4747d101cc1SGerry Weißbach // check for CSS or JS 475a8c17ab5Si-net /// software if (!file_exists(DOKU_PLUGIN . $plugin . "/script.js") && !file_exists(DOKU_PLUGIN . $plugin . "/style.css")) { continue; } 4767d101cc1SGerry Weißbach $allPlugins[] = $plugin; 4777d101cc1SGerry Weißbach } 4787d101cc1SGerry Weißbach 4797d101cc1SGerry Weißbach if (count($outputArray['diPlu']) > (count($allPlugins)/2)) { 4807d101cc1SGerry Weißbach $outputArray['diInv'] = 1; 4817d101cc1SGerry Weißbach $outputArray['diPlu'] = array_diff($allPlugins, $outputArray['diPlu']); 4827d101cc1SGerry Weißbach } 4837d101cc1SGerry Weißbach } 4847d101cc1SGerry Weißbach 4857d101cc1SGerry Weißbach return $outputArray; 4867d101cc1SGerry Weißbach } 4877d101cc1SGerry Weißbach 4887d101cc1SGerry Weißbach /** 4897d101cc1SGerry Weißbach * Remove certain fields from the list. 4907d101cc1SGerry Weißbach * @param $removeArray 4917d101cc1SGerry Weißbach * @param $advanced 4927d101cc1SGerry Weißbach * @param $isString 4937d101cc1SGerry Weißbach */ 494a8c17ab5Si-net /// software public function removeWikiVariables(&$removeArray, $advanced = false, $isString = false) { 4957d101cc1SGerry Weißbach 4967d101cc1SGerry Weißbach $removeArray = $this->parseStringToRequestArray($removeArray); 497a8c17ab5Si-net /// software $removeKeys = array(); 4987d101cc1SGerry Weißbach 4997d101cc1SGerry Weißbach // 2010-08-23 - If there is still the media set, retain the id for e.g. detail.php 5007d101cc1SGerry Weißbach if (!isset($removeArray['media'])) { 501a8c17ab5Si-net /// software $removeKeys[] = 'id'; 5027d101cc1SGerry Weißbach } 5037d101cc1SGerry Weißbach 5047d101cc1SGerry Weißbach unset($removeArray['do']); 505a8c17ab5Si-net /// software $removeKeys[] = 'ns'; 506a8c17ab5Si-net /// software $removeKeys[] = 'call'; 507a8c17ab5Si-net /// software $removeKeys[] = 'sectok'; 508a8c17ab5Si-net /// software $removeKeys[] = 'rndval'; 509a8c17ab5Si-net /// software $removeKeys[] = 'tseed'; 510a8c17ab5Si-net /// software $removeKeys[] = 'http_credentials'; 511a8c17ab5Si-net /// software $removeKeys[] = 'u'; 512a8c17ab5Si-net /// software $removeKeys[] = 'p'; 513a8c17ab5Si-net /// software $removeKeys[] = 'r'; 514a8c17ab5Si-net /// software $removeKeys[] = 'base'; 515a8c17ab5Si-net /// software $removeKeys[] = 'siteexport'; 516a8c17ab5Si-net /// software $removeKeys[] = 'DokuWiki'; 5177d101cc1SGerry Weißbach 5180baac5adSGerry Weißbach if ( array_key_exists( 'renderer', $removeArray ) && $removeArray['renderer'] == 'xhtml') { 5197d101cc1SGerry Weißbach $removeArray['do'] = 'export_' . $removeArray['renderer']; 520a8c17ab5Si-net /// software $removeKeys[] = 'renderer'; 5217d101cc1SGerry Weißbach } 5227d101cc1SGerry Weißbach 5232270cdc5SGerry Weißbach // Keep custom options 5240baac5adSGerry Weißbach if ( array_key_exists( 'customoptionname', $removeArray ) && is_array($removeArray['customoptionname']) && is_array($removeArray['customoptionvalue']) && count($removeArray['customoptionname']) == count($removeArray['customoptionvalue'])) 5252270cdc5SGerry Weißbach { 526a8c17ab5Si-net /// software for ($index = count($removeArray['customoptionname']); $index >= 0; $index--) 5272270cdc5SGerry Weißbach { 5282270cdc5SGerry Weißbach $removeArray[$removeArray['customoptionname'][$index]] = $removeArray['customoptionvalue'][$index]; 5292270cdc5SGerry Weißbach } 530a8c17ab5Si-net /// software $removeKeys[] = 'customoptionname'; 531a8c17ab5Si-net /// software $removeKeys[] = 'customoptionvalue'; 5322270cdc5SGerry Weißbach } 5332270cdc5SGerry Weißbach 5347d101cc1SGerry Weißbach if ($advanced) { 5350baac5adSGerry Weißbach if ( array_key_exists( 'renderer', $removeArray ) && $removeArray['renderer'] != 'xhtml' && !empty($removeArray['renderer'])) { 5367d101cc1SGerry Weißbach $removeArray['do'] = 'export_' . $removeArray['renderer']; 5377d101cc1SGerry Weißbach } 5387d101cc1SGerry Weißbach 5397d101cc1SGerry Weißbach // 2010-08-25 - Need fakeMedia for some _detail cases with rewrite = 2 5407d101cc1SGerry Weißbach if (isset($removeArray['fakeMedia'])) { 541a8c17ab5Si-net /// software $removeKeys[] = 'media'; 542a8c17ab5Si-net /// software $removeKeys[] = 'fakeMedia'; 5437d101cc1SGerry Weißbach } 5447d101cc1SGerry Weißbach 5457d101cc1SGerry Weißbach /* remove internal params */ 546a8c17ab5Si-net /// software $removeKeys[] = 'ens'; 547a8c17ab5Si-net /// software $removeKeys[] = 'renderer'; 548a8c17ab5Si-net /// software $removeKeys[] = 'site'; 549a8c17ab5Si-net /// software $removeKeys[] = 'namespace'; 550a8c17ab5Si-net /// software $removeKeys[] = 'exportbody'; 551a8c17ab5Si-net /// software $removeKeys[] = 'addParams'; 552a8c17ab5Si-net /// software $removeKeys[] = 'template'; 553a8c17ab5Si-net /// software $removeKeys[] = 'eclipseDocZip'; 554a8c17ab5Si-net /// software $removeKeys[] = 'useTocFile'; 555a8c17ab5Si-net /// software $removeKeys[] = 'JavaHelpDocZip'; 556a8c17ab5Si-net /// software $removeKeys[] = 'depth'; 557a8c17ab5Si-net /// software $removeKeys[] = 'depthType'; 558a8c17ab5Si-net /// software $removeKeys[] = 'startcounter'; 559a8c17ab5Si-net /// software $removeKeys[] = 'pattern'; 560a8c17ab5Si-net /// software $removeKeys[] = 'TOCMapWithoutTranslation'; 561a8c17ab5Si-net /// software 562a8c17ab5Si-net /// software $removeKeys[] = 'debug'; 563a8c17ab5Si-net /// software } 564a8c17ab5Si-net /// software 565a8c17ab5Si-net /// software foreach($removeKeys as $key) { 566a8c17ab5Si-net /// software unset($removeArray[$key]); 5677d101cc1SGerry Weißbach } 5687d101cc1SGerry Weißbach 5697d101cc1SGerry Weißbach if ($isString && is_array($removeArray)) { 5707d101cc1SGerry Weißbach $intermediate = $removeArray; 5717d101cc1SGerry Weißbach $removeArray = array(); 5727d101cc1SGerry Weißbach 5737d101cc1SGerry Weißbach foreach ($intermediate as $key => $value) { 5747d101cc1SGerry Weißbach if (is_array($value)) { 5757d101cc1SGerry Weißbach foreach (array_values($value) as $aValue) { // Array Handling 5767d101cc1SGerry Weißbach $removeArray[] = $key . "[]=$aValue"; 5777d101cc1SGerry Weißbach } 5787d101cc1SGerry Weißbach } else { 5797d101cc1SGerry Weißbach $value = trim($value); 5807d101cc1SGerry Weißbach 5817d101cc1SGerry Weißbach $removeArray[] = "$key" . (((empty($value) && intval($value) !== 0)) || $value == '' ? '' : "=$value"); // If the Value is empty, the Key must be preserved 5827d101cc1SGerry Weißbach } 5837d101cc1SGerry Weißbach } 5847d101cc1SGerry Weißbach 5850b4abc9fSGerry Weißbach $removeArray = implode("&", $removeArray); // The & made problems with the HTTPClient / Apache. It should not be a problem to have & 5867d101cc1SGerry Weißbach } 5877d101cc1SGerry Weißbach } 5887d101cc1SGerry Weißbach 5897d101cc1SGerry Weißbach /** 5907d101cc1SGerry Weißbach * returns a hashed name for the parameters 5917d101cc1SGerry Weißbach * @param $parameters 5927d101cc1SGerry Weißbach */ 593f44c759aSGerry Weißbach public function hashNameForParameters($parameters) 5947d101cc1SGerry Weißbach { 5957d101cc1SGerry Weißbach return md5($parameters); 5967d101cc1SGerry Weißbach } 5977d101cc1SGerry Weißbach 5987d101cc1SGerry Weißbach /** 5997d101cc1SGerry Weißbach * Takes an URL and transforms it into the path+query part 6007d101cc1SGerry Weißbach * Used several times, e.g. for genering the hash for the cache file 6010571ece2SScrutinizer Auto-Fixer * @param string $url 6027d101cc1SGerry Weißbach */ 6037d101cc1SGerry Weißbach public function urlToPathAndParams($url) 6047d101cc1SGerry Weißbach { 6057d101cc1SGerry Weißbach $query = parse_url($url, PHP_URL_QUERY); 6067d101cc1SGerry Weißbach $path = preg_replace(":^" . DOKU_REL . ":", "", parse_url($url, PHP_URL_PATH)); 6077d101cc1SGerry Weißbach return "{$path}?{$query}"; 6087d101cc1SGerry Weißbach } 6097d101cc1SGerry Weißbach 6107d101cc1SGerry Weißbach /** 6117d101cc1SGerry Weißbach * Transforms an $_REQUEST into a Hash that can be used for cron and cache file 6127d101cc1SGerry Weißbach * @param $request 6137d101cc1SGerry Weißbach */ 6147d101cc1SGerry Weißbach public function requestParametersToCacheHash($request) 6157d101cc1SGerry Weißbach { 6167d101cc1SGerry Weißbach $params = $this->urlToPathAndParams($this->prepare_POSTData($request)); 6177d101cc1SGerry Weißbach $this->debug->message("Calculated the following Cache Hash URL: ", $params, 2); 618f44c759aSGerry Weißbach return $this->hashNameForParameters($params); 6197d101cc1SGerry Weißbach } 6207d101cc1SGerry Weißbach 6217d101cc1SGerry Weißbach /** 6223aa0ad13SGerry Weißbach * Check a replaceURL against a baseURL - and make the replaceURL relative against it 623a8c17ab5Si-net /// software * @param replaceURL String URL which will be made relative if needed 624a8c17ab5Si-net /// software * @param baseURL String URL which is the reference to be made relative against 625a8c17ab5Si-net /// software * @param existingPageID Array 6267d101cc1SGerry Weißbach */ 6278a20a4b4SGerry Weißbach public function getRelativeURL($replaceURL, $baseURL, $existingPageID = null) 6287d101cc1SGerry Weißbach { 6293aa0ad13SGerry Weißbach // Base is always absolute without anything at the beginning 6303aa0ad13SGerry Weißbach if (preg_match("#^(\.\./)+#", $baseURL)) { 6313aa0ad13SGerry Weißbach $this->debug->message("The baseURL was not absolute.", $baseURL, 1); 6323aa0ad13SGerry Weißbach return $replaceURL; 6333aa0ad13SGerry Weißbach } 6347d101cc1SGerry Weißbach 6353aa0ad13SGerry Weißbach $origReplaceURL = $replaceURL; 6363aa0ad13SGerry Weißbach $replaceURL = preg_replace("#^(\.\./)+#", '', $replaceURL); 6377d101cc1SGerry Weißbach 6383aa0ad13SGerry Weißbach // Remove ../ at beginning to get the absolute path 6393aa0ad13SGerry Weißbach if ($replaceURL == $origReplaceURL) { 6403aa0ad13SGerry Weißbach $this->debug->message("The replaceURL was already absolute.", $replaceURL, 1); 6413aa0ad13SGerry Weißbach return $replaceURL; 6423aa0ad13SGerry Weißbach } 6437d101cc1SGerry Weißbach 6443aa0ad13SGerry Weißbach $replaceParts = explode('/', $replaceURL); 6453aa0ad13SGerry Weißbach $fileName = array_pop($replaceParts); // Get file 6467d101cc1SGerry Weißbach 6473aa0ad13SGerry Weißbach $baseParts = explode('/', $baseURL); 6483aa0ad13SGerry Weißbach array_pop($baseParts); // Remove file. We only need the path to this location. 6497d101cc1SGerry Weißbach 6503aa0ad13SGerry Weißbach $this->debug->message("State before kicking.", array($replaceParts, $baseParts), 1); 6513aa0ad13SGerry Weißbach 6523aa0ad13SGerry Weißbach // Kick all ../ 6538a20a4b4SGerry Weißbach $originalBasePartsCount = count($baseParts); 6542c0d7043SGerry Weißbach $didKickSomeParts = 0; // true means, that some parts of the base URL were identical 6553aa0ad13SGerry Weißbach while (count($replaceParts) > 0 && count($baseParts) > 0) { 6563aa0ad13SGerry Weißbach 6573aa0ad13SGerry Weißbach if ($baseParts[0] == $replaceParts[0]) { 6583aa0ad13SGerry Weißbach // Beginning is OK, so remove it. 6597d101cc1SGerry Weißbach array_shift($replaceParts); 6607d101cc1SGerry Weißbach array_shift($baseParts); 6612c0d7043SGerry Weißbach $didKickSomeParts++; 6623aa0ad13SGerry Weißbach } else { 6637d101cc1SGerry Weißbach break; 6647d101cc1SGerry Weißbach } 6653aa0ad13SGerry Weißbach 6667d101cc1SGerry Weißbach } 6677d101cc1SGerry Weißbach 6683aa0ad13SGerry Weißbach $this->debug->message("Found URL '{$replaceURL}' that is relative to current page '{$baseURL}'.", array($replaceParts, $baseParts), 1); 6697d101cc1SGerry Weißbach 6703aa0ad13SGerry Weißbach // Remove everything that is identical 6713aa0ad13SGerry Weißbach $replaceParts[] = $fileName; 6727d101cc1SGerry Weißbach 6738a20a4b4SGerry Weißbach // do the final link calculation 6748a20a4b4SGerry Weißbach $finalLink = str_repeat('../', count($baseParts)) . implode('/', $replaceParts); 6758a20a4b4SGerry Weißbach 6762c0d7043SGerry Weißbach // Means nothing was kicked, so other plugin 6772c0d7043SGerry Weißbach $isExternalPage = count($baseParts) == $originalBasePartsCount; 6782c0d7043SGerry Weißbach 6792c0d7043SGerry Weißbach // the new page is in the same plugin, with a different subcontext and same language 6802c0d7043SGerry Weißbach $isExternalPage = $isExternalPage || ($didKickSomeParts == 1 && $baseParts[0] != $replaceParts[0] && $baseParts[1] == $replaceParts[1] ); 6812c0d7043SGerry Weißbach 6822c0d7043SGerry Weißbach // find out if this is outside of our own export context, beyond the baseURL 683de387d04SGerry Weißbach $offsiteTemplate = $this->getConf("offSiteLinkTemplate"); 6846ec22144SGerry Weißbach $this->debug->message("Checking for offsite links", array( 6856ec22144SGerry Weißbach "baseParts" => count($baseParts), 6866ec22144SGerry Weißbach "originalBaseParts" => $originalBasePartsCount, 6876ec22144SGerry Weißbach "ExistingPageID" => $existingPageID, 6882c0d7043SGerry Weißbach "finalLink" => $finalLink, 6892c0d7043SGerry Weißbach "offsiteTemplate" => $offsiteTemplate, 6902c0d7043SGerry Weißbach "isExternalPage" => $isExternalPage, 6912c0d7043SGerry Weißbach "didKickSomeParts" => $didKickSomeParts 6922c0d7043SGerry Weißbach 6936ec22144SGerry Weißbach ), 1); 6942c0d7043SGerry Weißbach 6952c0d7043SGerry Weißbach if ( $isExternalPage && $existingPageID != null && !empty($offsiteTemplate)) { 6968a20a4b4SGerry Weißbach 697de387d04SGerry Weißbach $offsiteTemplate = str_replace('RAWID', $existingPageID, $offsiteTemplate); 6988a20a4b4SGerry Weißbach 6998a20a4b4SGerry Weißbach $check = null; 700a8c17ab5Si-net /// software $mapID = $this->getMapID($existingPageID, null, $check); 701a8c17ab5Si-net /// software $offsiteTemplate = str_replace('CONTEXTID', array_pop($mapID), $offsiteTemplate); 702de387d04SGerry Weißbach $offsiteTemplate = str_replace('LINK', $finalLink, $offsiteTemplate); 7038a20a4b4SGerry Weißbach 7046ec22144SGerry Weißbach $this->debug->message("Replacing finalLink '${finalLink}' with offsiteLink '${offsiteTemplate}'", null, 1); 7056ec22144SGerry Weißbach $finalLink = $offsiteTemplate; 7068a20a4b4SGerry Weißbach } 7078a20a4b4SGerry Weißbach 7088a20a4b4SGerry Weißbach return $finalLink; 7098a20a4b4SGerry Weißbach } 7108a20a4b4SGerry Weißbach 711a8c17ab5Si-net /// software public function mapIDWithAnchor(&$n, $key, $postfix) 7128a20a4b4SGerry Weißbach { 7138a20a4b4SGerry Weißbach if (empty($postfix)) return; 7148a20a4b4SGerry Weißbach $n .= '-' . $postfix; 7158a20a4b4SGerry Weißbach } 7168a20a4b4SGerry Weißbach 717a8c17ab5Si-net /// software public function getMapID($elemID, $postfix, &$check) 7188a20a4b4SGerry Weißbach { 7198a20a4b4SGerry Weißbach $meta = p_get_metadata($elemID, 'context', true); 7208a20a4b4SGerry Weißbach 7218a20a4b4SGerry Weißbach if (empty($meta['id'])) { 722fbfbd79dSGerry Weißbach $title = empty($meta['title']) ? $this->getSiteTitle($elemID) : $meta['title']; 723677a5980SGerry Weißbach $meta['id'] = sectionID($this->cleanId($title), $check); 7248a20a4b4SGerry Weißbach } 7258a20a4b4SGerry Weißbach 7268a20a4b4SGerry Weißbach $mapID = explode('|', $meta['id']); 7278a20a4b4SGerry Weißbach array_walk($mapID, array($this, 'mapIDWithAnchor'), $postfix); 7288a20a4b4SGerry Weißbach 7298a20a4b4SGerry Weißbach return $mapID; 7307d101cc1SGerry Weißbach } 731ec1dc739SGerry Weißbach 732ec1dc739SGerry Weißbach public function hasAuthentication() { 733ec1dc739SGerry Weißbach $user = $this->getConf('defaultAuthenticationUser'); 734ec1dc739SGerry Weißbach $password = $this->getConf('defaultAuthenticationPassword'); 735ec1dc739SGerry Weißbach return empty($user) ? false : array( 736ec1dc739SGerry Weißbach 'user' => $user, 737ec1dc739SGerry Weißbach 'password' => $password 738ec1dc739SGerry Weißbach ); 739ec1dc739SGerry Weißbach } 740ec1dc739SGerry Weißbach 741ec1dc739SGerry Weißbach public function authenticate() { 742ec1dc739SGerry Weißbach if (!isset($_SERVER['HTTP_AUTHORIZATION']) && $this->hasAuthentication()) { 7431e0bea35SGerry Weissbach $authentication = $this->hasAuthentication(); 7441e0bea35SGerry Weissbach $_SERVER['HTTP_AUTHORIZATION'] = 'Basic ' . base64_encode($authentication['user'] . ':' . $authentication['password']); 7451e0bea35SGerry Weissbach $this->debug->message("Re-authenticating with default user from configuration", $authentication['user'], 3); 7461e0bea35SGerry Weissbach return auth_setup(); 747ec1dc739SGerry Weißbach } 7481e0bea35SGerry Weissbach 7491e0bea35SGerry Weissbach return false; 750ec1dc739SGerry Weißbach } 751a0417606SGerry Weißbach 752a0417606SGerry Weißbach /** 753a0417606SGerry Weißbach * Check the secret CSRF token, regardless of the current authorization 754a0417606SGerry Weißbach * 755a0417606SGerry Weißbach * @param null|string $token security token 756a0417606SGerry Weißbach * @param null|boolean $softfail if a message is to be thrown. 757a0417606SGerry Weißbach * @return bool success if the token matched 758a0417606SGerry Weißbach */ 759a8c17ab5Si-net /// software public function checkSecurityToken($token = null, $softfail = true) { 760a0417606SGerry Weißbach /** @var Input $INPUT */ 761a0417606SGerry Weißbach $secToken = $this->getSecurityToken(); 762a0417606SGerry Weißbach if ( empty( $secToken) && empty ( $token ) ) return false; 763a0417606SGerry Weißbach if($secToken != $token) { 764a8c17ab5Si-net /// software if ( $softfail !== true ) msg('Security Token did not match. Possible CSRF attack.', -1); 765a0417606SGerry Weißbach return false; 766a0417606SGerry Weißbach } 767a0417606SGerry Weißbach return true; 7687d101cc1SGerry Weißbach } 7697d101cc1SGerry Weißbach 770a0417606SGerry Weißbach /** 771a0417606SGerry Weißbach * Return a secret token to be used for CSRF attack prevention 772a0417606SGerry Weißbach * This is known to be flawed by default 773a0417606SGerry Weißbach * 774a0417606SGerry Weißbach * @author Andreas Gohr <andi@splitbrain.org> 775a0417606SGerry Weißbach * @link http://en.wikipedia.org/wiki/Cross-site_request_forgery 776a0417606SGerry Weißbach * @link http://christ1an.blogspot.com/2007/04/preventing-csrf-efficiently.html 777a0417606SGerry Weißbach * @link https://github.com/splitbrain/dokuwiki/issues/1883 778a0417606SGerry Weißbach * 779a0417606SGerry Weißbach * @return string 780a0417606SGerry Weißbach */ 781a8c17ab5Si-net /// software public function getSecurityToken() { 782a0417606SGerry Weißbach /** @var Input $INPUT */ 783a0417606SGerry Weißbach global $INPUT; 784a0417606SGerry Weißbach return PassHash::hmac('md5', session_id().'siteexport', 'siteexport_salt'.auth_cookiesalt()); 785a0417606SGerry Weißbach } 786a0417606SGerry Weißbach} 787