wiki.techinc.nl/includes/Credits.php

<?php
/**
 * Credits.php -- formats credits for articles
 * Copyright 2004, Evan Prodromou <evan@wikitravel.org>.
 *
 *  This program is free software; you can redistribute it and/or modify
 *  it under the terms of the GNU General Public License as published by
 *  the Free Software Foundation; either version 2 of the License, or
 *  (at your option) any later version.
 *
 *  This program is distributed in the hope that it will be useful,
 *  but WITHOUT ANY WARRANTY; without even the implied warranty of
 *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 *  GNU General Public License for more details.
 *
 *  You should have received a copy of the GNU General Public License
 *  along with this program; if not, write to the Free Software
 *  Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA
 *
 * @author <evan@wikitravel.org>
 * @package MediaWiki
 */

/**
 * This is largely cadged from PageHistory::history
 */
class Credits {
	function showCreditsPage($article) {
		global $wgOut;

		$fname = 'Credits::showCreditsPage';

		wfProfileIn( $fname );
	
		$wgOut->setPageTitle( $article->mTitle->getPrefixedText() );
		$wgOut->setSubtitle( wfMsg( 'creditspage' ) );
		$wgOut->setArticleFlag( false );
		$wgOut->setArticleRelated( true );
		$wgOut->setRobotpolicy( 'noindex,nofollow' );

		if( $article->mTitle->getArticleID() == 0 ) {
			$s = wfMsg( 'nocredits' );
		} else {
			$s = Credits::getCredits($article, -1);
		}

		$wgOut->addHTML( $s );

		wfProfileOut( $fname );
	}

	function getCredits($article, $cnt, $showIfMax=true) {
		$fname = 'Credits::getCredits';
		wfProfileIn( $fname );
		$s = '';

		if (isset($cnt) && $cnt != 0) {
			$s = Credits::getAuthorCredits($article);
			if ($cnt > 1 || $cnt < 0) {
				$s .= ' ' . Credits::getContributorCredits($article, $cnt - 1, $showIfMax);
			}
		}

		wfProfileOut( $fname );
		return $s;
	}

	/**
	 *
	 */
	function getAuthorCredits($article) {
		global $wgLang, $wgAllowRealName;

		$last_author = $article->getUser();

		if ($last_author == 0) {
			$author_credit = wfMsg('anonymous');
		} else {
			if($wgAllowRealName) { $real_name = User::whoIsReal($last_author); }
			$user_name = User::whoIs($last_author);

			if (!empty($real_name)) {
				$author_credit = Credits::creditLink($user_name, $real_name);
			} else {
				$author_credit = wfMsg('siteuser', Credits::creditLink($user_name));
			}
		}

		$timestamp = $article->getTimestamp();
		if ($timestamp) {
			$d = $wgLang->timeanddate($article->getTimestamp(), true);
		} else {
			$d = '';
		}
		return wfMsg('lastmodifiedby', $d, $author_credit);
	}

	/**
	 *
	 */
	function getContributorCredits($article, $cnt, $showIfMax) {

		global $wgLang, $wgAllowRealName;

		$contributors = $article->getContributors();

		$others_link = '';

		# Hmm... too many to fit!

		if ($cnt > 0 && count($contributors) > $cnt) {
			$others_link = Credits::creditOthersLink($article);
			if (!$showIfMax) {
				return wfMsg('othercontribs', $others_link);
			} else {
				$contributors = array_slice($contributors, 0, $cnt);
			}
		}

		$real_names = array();
		$user_names = array();

		$anon = '';

		# Sift for real versus user names

		foreach ($contributors as $user_parts) {
			if ($user_parts[0] != 0) {
				if ($wgAllowRealName && !empty($user_parts[2])) {
					$real_names[] = Credits::creditLink($user_parts[1], $user_parts[2]);
				} else {
					$user_names[] = Credits::creditLink($user_parts[1]);
				}
			} else {
				$anon = wfMsg('anonymous');
			}
		}

		# Two strings: real names, and user names

		$real = $wgLang->listToText($real_names);
		$user = $wgLang->listToText($user_names);

		# "ThisSite user(s) A, B and C"

		if (!empty($user)) {
			$user = wfMsg('siteusers', $user);
		}

		# This is the big list, all mooshed together. We sift for blank strings

		$fulllist = array();

		foreach (array($real, $user, $anon, $others_link) as $s) {
			if (!empty($s)) {
				array_push($fulllist, $s);
			}
		}

		# Make the list into text...

		$creds = $wgLang->listToText($fulllist);

		# "Based on work by ..."

		return (empty($creds)) ? '' : wfMsg('othercontribs', $creds);
	}

	/**
	 *
	 */
	function creditLink($user_name, $link_text = '') {
		global $wgUser, $wgContLang;
		$skin = $wgUser->getSkin();
		return $skin->makeLink($wgContLang->getNsText(NS_USER) . ':' . $user_name,
				       htmlspecialchars( (empty($link_text)) ? $user_name : $link_text ));
	}

	/**
	 *
	 */
	function creditOthersLink($article) {
		global $wgUser;
		$skin = $wgUser->getSkin();
		return $skin->makeKnownLink($article->mTitle->getPrefixedText(), wfMsg('others'), 'action=credits');
	}
}
?>