title));
$output = "
";
if (defined('STATUS_TRASH')) {
if ($node->status == STATUS_TRASH) {
$output .= t("The page '%tit' is trashed.",array('%tit' => $node->title));
$output .= "
";
}
}
switch($node->type) {
case 'image':
$refs = isedoc_pages_referencing_image ($node->title);
break;
case 'template':
$refs = isedoc_pages_referencing_template($node->title);
break;
case 'doc':
default:
$n_bn = isedoc_book_name ($node->book['bid']);
$refs = isedoc_pages_referencing ($node->title);
break;
}
if ($refs) {
$output .= t("The node '%tit' is referenced by the following %nb page(s):", array('%tit' => $node->title, '%nb' => count($refs)));
$output_by_book=array();
foreach($refs as $r_nid => $r) {
$n =& node_load($r_nid);
$bn = '';
if ($n) {
if ($n->type == 'doc') {
$bid = $n->book['bid'];
$bn = t("book %name", array('%name' => isedoc_book_name($bid)));
} elseif ($n->type == 'template') {
$bn = "Templates";
}
} else {
drupal_set_message(t("Unable to find info about '%tit' (node #%nid)", array('%nid' => $r_nid, '%tit' => $r['title'])),'error');
}
if (!isset($output_by_book[$bn])) {
$output_by_book[$bn] = array();
}
$output_by_book[$bn][$n->nid] = $n;
}
foreach($output_by_book as $bn => $lst) {
if ($bn == $n_bn) {
$t = "From current '".$bn."'";
} else {
$t = "From '".$bn."'";
}
$output .= _isedoc_display_references($t, $lst);
}
} else {
$output .= ''.t("It seems that no page references internally the node '%tit'.", array('%tit' => $node->title)).'';
}
$pnid = isedoc_book_parent_of($node->nid);
if ($pnid) {
$n =& node_load($pnid);
if ($n) {
$bid = $n->book['bid'];
$bn = isedoc_book_name($bid);
$output .= _isedoc_display_references("Parent page (from $bn):", array($n->nid => $n));
}
}
/* Backlink */
$l_url = url("node/".$node->nid, array('absolute' => True));
$output .= "External links:";
$output .= "- ".l('Search at Wikipedia ...', "http://en.wikipedia.org/w/index.php?title=Special:LinkSearch&target=" . rawurlencode($l_url)) . "
";
$output .= "- ".l('Search with Google ...', "http://www.google.com/search?q=" . rawurlencode ('link:' . $l_url))."
";
$output .= "
";
return $output;
}
function _isedoc_display_references($tit, $lst) {
$output = "$tit
";
$output .= "";
foreach($lst as $n) {
$t = '';
$t .= "".$n->title."";
$t .= " (".l(t("view"), $n->path);
if (isedoc_user_can_edit()) {
$t .= ", ".l(t("edit"), 'node/'.$n->nid.'/edit');
}
$t .= ")";
//$t .= " status=".$n->status;
//$t .= " version=".$n->vid;
if (defined('STATUS_TRASH') and $n->status == STATUS_TRASH) {
$t = "$t Trashed";
}
$output .= "- $t
\n";
}
$output .= "
";
return $output;
}
?>