/**
* Add comments to the specified resource.
*
* @param ID_TEXT The type (download, etc) that this commenting is for
* @param ID_TEXT The ID of the type that this commenting is for
* @param mixed The URL to where the commenting will pass back to (to put into the comment topic header) (URLPATH or Tempcode)
* @param ?string The title to where the commenting will pass back to (to put into the comment topic header) (NULL: don't know, but not first post so not important)
* @param ?string The name of the forum to use (NULL: default comment forum)
* @param ?BINARY Whether the post is validated (NULL: unknown, find whether it needs to be marked unvalidated initially). This only works with the OCF driver (hence is the last parameter).
* @return boolean Whether a hidden post has been made
*/
function do_salmon_as_comment($module, $id, $self_url, $self_title, $title = NULL, $post = NULL, $email = '', $poster_name_if_guest = '', $forum = NULL, $validated = NULL)
{
if (!is_null($post)) {
$_POST['post'] = $post;
}
if (!is_null($title)) {
$_POST['title'] = $title;
}
$_POST['email'] = $email;
$_POST['poster_name_if_guest'] = $poster_name_if_guest;
return do_comments(true, $module, $id, $self_url, $self_title, $forum, true, $validated, false, true);
}
$fs = floor(filesize($full_fn) / 1000);
if (!is_dir($full_fn) && eregi("\\.(zip|rar|arj|arc|lzh|lha|tar\\.gz|tar|tgz|tar\\.bz)\$", $fn)) {
$fnu = rawurlencode($fn);
if ($tablestat == 0) {
$tablestat = 1;
echo "<TR><TD COLSPAN=6><pre>";
}
echo "ARCH: <A HREF=\"{$newwd}/{$fnu}\">{$fn}</A> ({$fs}" . "k)\n";
}
}
if ($tablestat == 1) {
echo "</TD></TR>";
}
if ($comments_enabled && !file_exists($path == "" ? ".nodircomments" : $path . "/.nodircomments")) {
echo "<TR><TD COLSPAN=6><CENTER>";
do_comments(".index");
echo "</CENTER></TD></TR>";
}
}
}
}
echo "</TABLE></CENTER>";
echo $bottomlinestart;
if ($wasrescale == 0 && $width != "") {
echo "Maximum display size: ";
}
echo "<A HREF=\"{$thisfn}?setrescale=";
if ($wasrescale == 0) {
echo "1";
}
if ($path != "") {
