Hi Arnott - I'm still feeling my way and haven't got everything working, yet. For the "global" tagcloud (combining tags from all Blogs) I used the following code in "Page.php"
function GlobalTags() {
$allTags = array();
$max = 0;
$entries = DataObject::get("BlogEntry","`ParentID` > 0","`BlogEntry`.Date DESC",'',"$limit");
if($entries) {
foreach($entries as $entry) {
$theseTags = split(" *, *", strtolower(trim($entry->Tags)));
foreach($theseTags as $tag) {
if($tag != "") {
$allTags[$tag] = isset($allTags[$tag]) ? $allTags[$tag] + 1 : 1; //getting the count into key => value map
$max = ($allTags[$tag] > $max) ? $allTags[$tag] : $max;
}
}
}
if($allTags) {
//TODO: move some or all of the sorts to the database for more efficiency
if($this->Limit > 0){
uasort($allTags, array($this, "column_sort_by_popularity")); //sort by popularity
$allTags = array_slice($allTags, 0, $this->Limit);
}
if($this->Sortby == "alphabet"){
$this->natksort($allTags);
}
$sizes = array();
foreach($allTags as $tag => $count){
$sizes[$count] = true;
}
$numsizes = count($sizes)-1; //Work out the number of different sizes
if($numsizes > 5){$numsizes = 5;}
foreach($allTags as $tag => $count) {
$popularity = floor($count / $max * $numsizes);
switch($popularity) {
case 0:
$class = "not-popular";
break;
case 1:
$class = "not-very-popular";
break;
case 2:
$class = "somewhat-popular";
break;
case 3:
$class = "popular";
break;
case 4:
$class = "very-popular";
break;
case 5:
$class = "ultra-popular";
break;
default:
$class = "broken";
break;
}
$output .='<a href="/home/tag/'.urlencode($tag).'" class="'.$class.'">'.$tag.'</a> ';
}
}
$output = "TagCloud: ".$output;
return $output;
}
return;
}
/**
* Helper method to compare 2 Vars to work out the results.
* @param mixed
* @param mixed
* @return int
*/
private function column_sort_by_popularity($a, $b){
if($a == $b) {
$result = 0;
}
else {
$result = $b - $a;
}
return $result;
}
private function natksort(&$aToBeSorted) {
$aResult = array();
$aKeys = array_keys($aToBeSorted);
natcasesort($aKeys);
foreach ($aKeys as $sKey) {
$aResult[$sKey] = $aToBeSorted[$sKey];
}
$aToBeSorted = $aResult;
return true;
}
Putting $GlobalTags in your template file will display the tagcloud.
However I've yet to write some code to recognise /home/tag/tagname - but I think I should be able to use my LatestPosts function to do that. Hope this makes sense, I'll post it up once I've got it working.