SimpleWebPresenter: Sitemap.inc annotate

annotate Sitemap.inc @ 129:16c3ee204330

Fixes flag.

author	Tom Fredrik Blenning <bfg@bfgconsult.no>
date	Wed, 28 Dec 2022 11:20:19 +0100
parents	6766250a0baa
children	6b882fb6ea46

rev	line source
121 e3f97bbf12f3 Better checking for uncommon conditions. Tom Fredrik Blenning Klaussen <bfg@bfgconsult.no> parents: 114 diff changeset	1 <?php
73 947d53f95ccd Refactor Sitemap into a separate class. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: diff changeset	2 include_once 'ScriptIncludeCache.inc';
947d53f95ccd Refactor Sitemap into a separate class. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: diff changeset	3
947d53f95ccd Refactor Sitemap into a separate class. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: diff changeset	4 /// @cond
947d53f95ccd Refactor Sitemap into a separate class. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: diff changeset	5 $baseDir = dirname(__FILE__);
947d53f95ccd Refactor Sitemap into a separate class. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: diff changeset	6 $cache = ScriptIncludeCache::instance(__FILE__);
93 8aadd7a23b68 Moved some functionality from common-functions into Http class. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 91 diff changeset	7 $cache->includeOnce('Http.inc', $baseDir);
8aadd7a23b68 Moved some functionality from common-functions into Http class. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 91 diff changeset	8 $cache->includeOnce('Page.inc', $baseDir);
73 947d53f95ccd Refactor Sitemap into a separate class. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: diff changeset	9 $cache->includeOnce('common-functions.inc', $baseDir);
99 d98e315308cd Improved caching of flag and sitemap. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 98 diff changeset	10 $cache->includeOnce('CacheTimeCheck.inc', $baseDir);
73 947d53f95ccd Refactor Sitemap into a separate class. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: diff changeset	11 /// @endcond
947d53f95ccd Refactor Sitemap into a separate class. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: diff changeset	12
99 d98e315308cd Improved caching of flag and sitemap. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 98 diff changeset	13 class SimpleCache extends Cache {
d98e315308cd Improved caching of flag and sitemap. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 98 diff changeset	14 private $time;
d98e315308cd Improved caching of flag and sitemap. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 98 diff changeset	15
d98e315308cd Improved caching of flag and sitemap. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 98 diff changeset	16 function __construct($time = 0) {
d98e315308cd Improved caching of flag and sitemap. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 98 diff changeset	17 $this->time = $time;
d98e315308cd Improved caching of flag and sitemap. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 98 diff changeset	18 }
d98e315308cd Improved caching of flag and sitemap. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 98 diff changeset	19 function getNewest() {
d98e315308cd Improved caching of flag and sitemap. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 98 diff changeset	20 return $this->time;
d98e315308cd Improved caching of flag and sitemap. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 98 diff changeset	21 }
d98e315308cd Improved caching of flag and sitemap. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 98 diff changeset	22 };
d98e315308cd Improved caching of flag and sitemap. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 98 diff changeset	23
98 f2d52fed708c Split retrieval and production of urls. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 96 diff changeset	24 function cmp_length_lex($a, $b)
f2d52fed708c Split retrieval and production of urls. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 96 diff changeset	25 {
f2d52fed708c Split retrieval and production of urls. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 96 diff changeset	26 if ($a == $b) {
f2d52fed708c Split retrieval and production of urls. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 96 diff changeset	27 return 0;
f2d52fed708c Split retrieval and production of urls. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 96 diff changeset	28 }
f2d52fed708c Split retrieval and production of urls. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 96 diff changeset	29 $la = strlen($a);
f2d52fed708c Split retrieval and production of urls. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 96 diff changeset	30 $lb = strlen($b);
f2d52fed708c Split retrieval and production of urls. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 96 diff changeset	31 if ($la == $lb) {
f2d52fed708c Split retrieval and production of urls. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 96 diff changeset	32 return ($la < $lb) ? -1 : 1;
f2d52fed708c Split retrieval and production of urls. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 96 diff changeset	33 }
f2d52fed708c Split retrieval and production of urls. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 96 diff changeset	34 return ($a < $b) ? -1 : 1;
f2d52fed708c Split retrieval and production of urls. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 96 diff changeset	35 }
f2d52fed708c Split retrieval and production of urls. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 96 diff changeset	36
f2d52fed708c Split retrieval and production of urls. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 96 diff changeset	37
74 1d5166aba2c5 Documentation fixes. Tom Fredrik Blenning Klaussen <bfg@blenning.no> parents: 73 diff changeset	38 /**
1d5166aba2c5 Documentation fixes. Tom Fredrik Blenning Klaussen <bfg@blenning.no> parents: 73 diff changeset	39 * Functionality for generating a sitemap
1d5166aba2c5 Documentation fixes. Tom Fredrik Blenning Klaussen <bfg@blenning.no> parents: 73 diff changeset	40 */
78 7c68015b211a Common source for all page generators. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 74 diff changeset	41 class Sitemap extends Page
73 947d53f95ccd Refactor Sitemap into a separate class. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: diff changeset	42 {
947d53f95ccd Refactor Sitemap into a separate class. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: diff changeset	43 private $master;
947d53f95ccd Refactor Sitemap into a separate class. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: diff changeset	44 private $options;
947d53f95ccd Refactor Sitemap into a separate class. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: diff changeset	45
74 1d5166aba2c5 Documentation fixes. Tom Fredrik Blenning Klaussen <bfg@blenning.no> parents: 73 diff changeset	46 /**
1d5166aba2c5 Documentation fixes. Tom Fredrik Blenning Klaussen <bfg@blenning.no> parents: 73 diff changeset	47 * Constructs a sitemap object from a master document
1d5166aba2c5 Documentation fixes. Tom Fredrik Blenning Klaussen <bfg@blenning.no> parents: 73 diff changeset	48 *
1d5166aba2c5 Documentation fixes. Tom Fredrik Blenning Klaussen <bfg@blenning.no> parents: 73 diff changeset	49 * @param $path location of master document
1d5166aba2c5 Documentation fixes. Tom Fredrik Blenning Klaussen <bfg@blenning.no> parents: 73 diff changeset	50 */
73 947d53f95ccd Refactor Sitemap into a separate class. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: diff changeset	51 function __construct($path) {
947d53f95ccd Refactor Sitemap into a separate class. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: diff changeset	52 $this->master = new DOMDocument();
947d53f95ccd Refactor Sitemap into a separate class. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: diff changeset	53 $this->master->load($path);
947d53f95ccd Refactor Sitemap into a separate class. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: diff changeset	54
947d53f95ccd Refactor Sitemap into a separate class. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: diff changeset	55 $this->options = new Options($this->master);
99 d98e315308cd Improved caching of flag and sitemap. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 98 diff changeset	56 $this->lastmod=0;
73 947d53f95ccd Refactor Sitemap into a separate class. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: diff changeset	57 }
947d53f95ccd Refactor Sitemap into a separate class. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: diff changeset	58
78 7c68015b211a Common source for all page generators. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 74 diff changeset	59 function cacheCheck()
7c68015b211a Common source for all page generators. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 74 diff changeset	60 {
99 d98e315308cd Improved caching of flag and sitemap. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 98 diff changeset	61 if ($this->lastmod == 0)
d98e315308cd Improved caching of flag and sitemap. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 98 diff changeset	62 return Cacheable::UNDETERMINED;
d98e315308cd Improved caching of flag and sitemap. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 98 diff changeset	63 else
d98e315308cd Improved caching of flag and sitemap. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 98 diff changeset	64 return Cacheable::YES;
78 7c68015b211a Common source for all page generators. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 74 diff changeset	65 }
7c68015b211a Common source for all page generators. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 74 diff changeset	66
91 1d4c980f4255 Change the way headers are set. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 86 diff changeset	67 function mayValidate()
1d4c980f4255 Change the way headers are set. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 86 diff changeset	68 {
1d4c980f4255 Change the way headers are set. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 86 diff changeset	69 return false;
1d4c980f4255 Change the way headers are set. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 86 diff changeset	70 }
1d4c980f4255 Change the way headers are set. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 86 diff changeset	71
112 4854db07f14f Fix bug when creating sitemaps introduced when adding common element. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 104 diff changeset	72 private function processDir($dir, $lang, $acceptedLanguages, $base) {
4854db07f14f Fix bug when creating sitemaps introduced when adding common element. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 104 diff changeset	73 $urls = array();
4854db07f14f Fix bug when creating sitemaps introduced when adding common element. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 104 diff changeset	74
124 6766250a0baa Support for parameters as directory structure. Tom Fredrik Blenning Klaussen <bfg@bfgconsult.no> parents: 122 diff changeset	75 $base=basePath();
6766250a0baa Support for parameters as directory structure. Tom Fredrik Blenning Klaussen <bfg@bfgconsult.no> parents: 122 diff changeset	76 $base=$_SERVER['DOCUMENT_ROOT'];
6766250a0baa Support for parameters as directory structure. Tom Fredrik Blenning Klaussen <bfg@bfgconsult.no> parents: 122 diff changeset	77 $baseurl = $_SERVER["REQUEST_SCHEME"] ."://". $_SERVER["SERVER_NAME"];
6766250a0baa Support for parameters as directory structure. Tom Fredrik Blenning Klaussen <bfg@bfgconsult.no> parents: 122 diff changeset	78
6766250a0baa Support for parameters as directory structure. Tom Fredrik Blenning Klaussen <bfg@bfgconsult.no> parents: 122 diff changeset	79
6766250a0baa Support for parameters as directory structure. Tom Fredrik Blenning Klaussen <bfg@bfgconsult.no> parents: 122 diff changeset	80 if ($handle = opendir($base . "/${dir}")) {
112 4854db07f14f Fix bug when creating sitemaps introduced when adding common element. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 104 diff changeset	81 while (false !== ($entry = readdir($handle))) {
4854db07f14f Fix bug when creating sitemaps introduced when adding common element. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 104 diff changeset	82 if (endsWith($entry, '.xml')) {
124 6766250a0baa Support for parameters as directory structure. Tom Fredrik Blenning Klaussen <bfg@bfgconsult.no> parents: 122 diff changeset	83 $fentry = $base . "/${dir}/${entry}";
112 4854db07f14f Fix bug when creating sitemaps introduced when adding common element. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 104 diff changeset	84 $doc = new DOMDocument();
4854db07f14f Fix bug when creating sitemaps introduced when adding common element. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 104 diff changeset	85
4854db07f14f Fix bug when creating sitemaps introduced when adding common element. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 104 diff changeset	86 if (file_exists($fentry)) {
4854db07f14f Fix bug when creating sitemaps introduced when adding common element. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 104 diff changeset	87 $doc->load($fentry);
113 d547cae319f0 Fix missing closing XML tag. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 112 diff changeset	88
112 4854db07f14f Fix bug when creating sitemaps introduced when adding common element. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 104 diff changeset	89 $opts = array();
4854db07f14f Fix bug when creating sitemaps introduced when adding common element. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 104 diff changeset	90 if (count($acceptedLanguages) > 1) {
4854db07f14f Fix bug when creating sitemaps introduced when adding common element. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 104 diff changeset	91 $opts['lang'] = $lang;
4854db07f14f Fix bug when creating sitemaps introduced when adding common element. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 104 diff changeset	92 }
4854db07f14f Fix bug when creating sitemaps introduced when adding common element. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 104 diff changeset	93
4854db07f14f Fix bug when creating sitemaps introduced when adding common element. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 104 diff changeset	94 $toplevel = $doc->getElementsByTagName("toplevel");
4854db07f14f Fix bug when creating sitemaps introduced when adding common element. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 104 diff changeset	95
4854db07f14f Fix bug when creating sitemaps introduced when adding common element. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 104 diff changeset	96 if($toplevel->length) {
4854db07f14f Fix bug when creating sitemaps introduced when adding common element. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 104 diff changeset	97 $name = substr($entry, 0, -4);
4854db07f14f Fix bug when creating sitemaps introduced when adding common element. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 104 diff changeset	98
4854db07f14f Fix bug when creating sitemaps introduced when adding common element. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 104 diff changeset	99 if ($name != $this->options->getInputDefault('name')) {
4854db07f14f Fix bug when creating sitemaps introduced when adding common element. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 104 diff changeset	100 $opts['name'] = $name;
4854db07f14f Fix bug when creating sitemaps introduced when adding common element. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 104 diff changeset	101 }
4854db07f14f Fix bug when creating sitemaps introduced when adding common element. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 104 diff changeset	102
4854db07f14f Fix bug when creating sitemaps introduced when adding common element. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 104 diff changeset	103 $optstring = genUrl($opts, array(), array('lang', 'name'));
124 6766250a0baa Support for parameters as directory structure. Tom Fredrik Blenning Klaussen <bfg@bfgconsult.no> parents: 122 diff changeset	104 $location = "${baseurl}${optstring}/";
112 4854db07f14f Fix bug when creating sitemaps introduced when adding common element. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 104 diff changeset	105 array_push($urls, $location);
4854db07f14f Fix bug when creating sitemaps introduced when adding common element. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 104 diff changeset	106 }
4854db07f14f Fix bug when creating sitemaps introduced when adding common element. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 104 diff changeset	107 }
4854db07f14f Fix bug when creating sitemaps introduced when adding common element. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 104 diff changeset	108 }
4854db07f14f Fix bug when creating sitemaps introduced when adding common element. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 104 diff changeset	109 }
4854db07f14f Fix bug when creating sitemaps introduced when adding common element. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 104 diff changeset	110 closedir($handle);
4854db07f14f Fix bug when creating sitemaps introduced when adding common element. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 104 diff changeset	111 }
4854db07f14f Fix bug when creating sitemaps introduced when adding common element. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 104 diff changeset	112 return $urls;
4854db07f14f Fix bug when creating sitemaps introduced when adding common element. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 104 diff changeset	113 }
113 d547cae319f0 Fix missing closing XML tag. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 112 diff changeset	114
78 7c68015b211a Common source for all page generators. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 74 diff changeset	115 function generateContent() {
112 4854db07f14f Fix bug when creating sitemaps introduced when adding common element. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 104 diff changeset	116
73 947d53f95ccd Refactor Sitemap into a separate class. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: diff changeset	117 /// The final output variable
947d53f95ccd Refactor Sitemap into a separate class. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: diff changeset	118 $out = '<?xml version="1.0" encoding="UTF-8"?>';
947d53f95ccd Refactor Sitemap into a separate class. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: diff changeset	119 $out .= "\n";
98 f2d52fed708c Split retrieval and production of urls. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 96 diff changeset	120 $out .= '<?xml-stylesheet type="text/xsl" href="/css/gss.xsl"?>';
f2d52fed708c Split retrieval and production of urls. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 96 diff changeset	121 $out .= "\n";
73 947d53f95ccd Refactor Sitemap into a separate class. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: diff changeset	122 $out .= '<urlset
947d53f95ccd Refactor Sitemap into a separate class. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: diff changeset	123 xmlns="http://www.sitemaps.org/schemas/sitemap/0.9"
947d53f95ccd Refactor Sitemap into a separate class. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: diff changeset	124 xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance"
947d53f95ccd Refactor Sitemap into a separate class. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: diff changeset	125 xsi:schemaLocation="http://www.sitemaps.org/schemas/sitemap/0.9
947d53f95ccd Refactor Sitemap into a separate class. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: diff changeset	126 http://www.sitemaps.org/schemas/sitemap/0.9/sitemap.xsd">
947d53f95ccd Refactor Sitemap into a separate class. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: diff changeset	127 ';
947d53f95ccd Refactor Sitemap into a separate class. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: diff changeset	128
122 74c22a8dd38f Support for both http and https for Sitemap Tom Fredrik Blenning Klaussen <bfg@bfgconsult.no> parents: 121 diff changeset	129 $base = $_SERVER["REQUEST_SCHEME"] ."://". $_SERVER["SERVER_NAME"] . $_SERVER["REQUEST_URI"];
96 c7de7a4641d7 Generate humanreadable urls for sitemap. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 95 diff changeset	130 $l = strrpos($base, '/');
c7de7a4641d7 Generate humanreadable urls for sitemap. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 95 diff changeset	131 if ($l)
c7de7a4641d7 Generate humanreadable urls for sitemap. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 95 diff changeset	132 $base = substr($base, 0, $l);
73 947d53f95ccd Refactor Sitemap into a separate class. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: diff changeset	133
947d53f95ccd Refactor Sitemap into a separate class. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: diff changeset	134 $acceptedLanguages = $this->options->getAcceptedLanguages();
947d53f95ccd Refactor Sitemap into a separate class. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: diff changeset	135
98 f2d52fed708c Split retrieval and production of urls. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 96 diff changeset	136 $urls = array();
f2d52fed708c Split retrieval and production of urls. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 96 diff changeset	137
73 947d53f95ccd Refactor Sitemap into a separate class. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: diff changeset	138 foreach($this->options->getAcceptedLanguages() as $lang) {
112 4854db07f14f Fix bug when creating sitemaps introduced when adding common element. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 104 diff changeset	139 $urls=array_merge($urls,
4854db07f14f Fix bug when creating sitemaps introduced when adding common element. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 104 diff changeset	140 $this->processDir($lang, $lang,
4854db07f14f Fix bug when creating sitemaps introduced when adding common element. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 104 diff changeset	141 $acceptedLanguages, $base)
4854db07f14f Fix bug when creating sitemaps introduced when adding common element. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 104 diff changeset	142 );
4854db07f14f Fix bug when creating sitemaps introduced when adding common element. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 104 diff changeset	143 $urls=array_merge($urls,
4854db07f14f Fix bug when creating sitemaps introduced when adding common element. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 104 diff changeset	144 $this->processDir("common", $lang,
4854db07f14f Fix bug when creating sitemaps introduced when adding common element. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 104 diff changeset	145 $acceptedLanguages, $base)
4854db07f14f Fix bug when creating sitemaps introduced when adding common element. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 104 diff changeset	146 );
73 947d53f95ccd Refactor Sitemap into a separate class. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: diff changeset	147 }
113 d547cae319f0 Fix missing closing XML tag. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 112 diff changeset	148
104 a5c37e845d7c Fix quotes Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 99 diff changeset	149 usort($urls, "cmp_length_lex");
98 f2d52fed708c Split retrieval and production of urls. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 96 diff changeset	150
f2d52fed708c Split retrieval and production of urls. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 96 diff changeset	151 foreach($urls as $location) {
f2d52fed708c Split retrieval and production of urls. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 96 diff changeset	152 $headers = Http::getHeaders($location, 5);
f2d52fed708c Split retrieval and production of urls. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 96 diff changeset	153
f2d52fed708c Split retrieval and production of urls. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 96 diff changeset	154 $location = htmlentities($location);
f2d52fed708c Split retrieval and production of urls. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 96 diff changeset	155
121 e3f97bbf12f3 Better checking for uncommon conditions. Tom Fredrik Blenning Klaussen <bfg@bfgconsult.no> parents: 114 diff changeset	156 if (array_key_exists('Last-Modified', $headers)) {
e3f97bbf12f3 Better checking for uncommon conditions. Tom Fredrik Blenning Klaussen <bfg@bfgconsult.no> parents: 114 diff changeset	157 $lastmod = $headers["Last-Modified"];
e3f97bbf12f3 Better checking for uncommon conditions. Tom Fredrik Blenning Klaussen <bfg@bfgconsult.no> parents: 114 diff changeset	158 }
98 f2d52fed708c Split retrieval and production of urls. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 96 diff changeset	159
f2d52fed708c Split retrieval and production of urls. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 96 diff changeset	160 $n = StatusCodes::codeFromHeader($headers['']);
f2d52fed708c Split retrieval and production of urls. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 96 diff changeset	161
f2d52fed708c Split retrieval and production of urls. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 96 diff changeset	162 if ($n == StatusCodes::HTTP_OK) {
121 e3f97bbf12f3 Better checking for uncommon conditions. Tom Fredrik Blenning Klaussen <bfg@bfgconsult.no> parents: 114 diff changeset	163 if (isset($lastmod)) {
e3f97bbf12f3 Better checking for uncommon conditions. Tom Fredrik Blenning Klaussen <bfg@bfgconsult.no> parents: 114 diff changeset	164
e3f97bbf12f3 Better checking for uncommon conditions. Tom Fredrik Blenning Klaussen <bfg@bfgconsult.no> parents: 114 diff changeset	165 $lastmod = strtotime($lastmod);
e3f97bbf12f3 Better checking for uncommon conditions. Tom Fredrik Blenning Klaussen <bfg@bfgconsult.no> parents: 114 diff changeset	166 if ($lastmod > $this->lastmod) {
e3f97bbf12f3 Better checking for uncommon conditions. Tom Fredrik Blenning Klaussen <bfg@bfgconsult.no> parents: 114 diff changeset	167 $this->lastmod = $lastmod;
e3f97bbf12f3 Better checking for uncommon conditions. Tom Fredrik Blenning Klaussen <bfg@bfgconsult.no> parents: 114 diff changeset	168 }
e3f97bbf12f3 Better checking for uncommon conditions. Tom Fredrik Blenning Klaussen <bfg@bfgconsult.no> parents: 114 diff changeset	169 $lastmod = date(DateTime::W3C, $lastmod);
99 d98e315308cd Improved caching of flag and sitemap. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 98 diff changeset	170 }
98 f2d52fed708c Split retrieval and production of urls. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 96 diff changeset	171
f2d52fed708c Split retrieval and production of urls. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 96 diff changeset	172 $out .= "<url>\n";
f2d52fed708c Split retrieval and production of urls. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 96 diff changeset	173 $out .= "<loc>${location}</loc>\n";
121 e3f97bbf12f3 Better checking for uncommon conditions. Tom Fredrik Blenning Klaussen <bfg@bfgconsult.no> parents: 114 diff changeset	174 if (isset($lastmod)) {
e3f97bbf12f3 Better checking for uncommon conditions. Tom Fredrik Blenning Klaussen <bfg@bfgconsult.no> parents: 114 diff changeset	175 $out .= "<lastmod>${lastmod}</lastmod>\n";
e3f97bbf12f3 Better checking for uncommon conditions. Tom Fredrik Blenning Klaussen <bfg@bfgconsult.no> parents: 114 diff changeset	176 }
98 f2d52fed708c Split retrieval and production of urls. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 96 diff changeset	177 $out .= "</url>\n";
f2d52fed708c Split retrieval and production of urls. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 96 diff changeset	178 }
f2d52fed708c Split retrieval and production of urls. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 96 diff changeset	179 }
f2d52fed708c Split retrieval and production of urls. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 96 diff changeset	180
114 f498ea087d67 Revert wrong xml closing tag. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 113 diff changeset	181 $out .= "</urlset>";
73 947d53f95ccd Refactor Sitemap into a separate class. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: diff changeset	182
86 b9654b9c4a66 Make headers a part of the content, rather than setting them directly. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 78 diff changeset	183 $res = new PageContent($out);
99 d98e315308cd Improved caching of flag and sitemap. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 98 diff changeset	184 $cache=new SimpleCache($this->lastmod);
d98e315308cd Improved caching of flag and sitemap. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 98 diff changeset	185 $cache->setMaxAge(86400);
d98e315308cd Improved caching of flag and sitemap. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 98 diff changeset	186 $this->setCache($cache);
91 1d4c980f4255 Change the way headers are set. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 86 diff changeset	187 $res->setHeader('Content-type', 'application/xml');
86 b9654b9c4a66 Make headers a part of the content, rather than setting them directly. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: 78 diff changeset	188 return $res;
73 947d53f95ccd Refactor Sitemap into a separate class. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: diff changeset	189 }
947d53f95ccd Refactor Sitemap into a separate class. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: diff changeset	190 }
947d53f95ccd Refactor Sitemap into a separate class. Tom Fredrik "BFG" Klaussen <bfg@blenning.no> parents: diff changeset	191 ?>

Mercurial > SimpleWebPresenter

annotate Sitemap.inc @ 129:16c3ee204330