sarg 2.3.10-2 / usr / share / sarg / sarg-php / sarg-block-it.php

<?php

/*
 * AUTHOR: Pedro Lineu Orso                         pedro.orso@gmail.com
 *                                                            1998, 2006
 * SARG Squid Analysis Report Generator            http://sarg-squid.org
 *
 * SARG donations:
 *      please look at http://sarg.sourceforge.net/donations.php
 * ---------------------------------------------------------------------
 *
 *  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., 59 Temple Place, Suite 330, Boston, MA 02111, USA.
 *
 */

$filename = "/etc/squid/block.txt";

$url = $_GET['url'];
$url = $url."\n";

$ha = fopen($filename, 'a');
if ($filename == false) {
   print (gettext ("Could not open the filename"));
   echo '&nbsp;'.$filename;
   exit;
}
else {
   $written = fwrite($ha, $url);
   fclose($ha);
   if ($written != strlen($url)) {
      print (gettext ("Write error"));
      exit;
   }
   print (gettext ("Done!"));
   echo "<br><br>\n";
   echo "<a href=\"javascript:history.go(-1)\">";
   print (gettext("Return"));
   echo "</a>&nbsp;";
   print (gettext (" to Sarg."));
}