--- db/prgsrc/db.cgi	2003/04/09 23:31:54	1.95
+++ db/prgsrc/db.cgi	2003/04/14 23:52:12	1.98
@@ -23,11 +23,16 @@ $outputkvo=100 if $outputkvo>100;
 
 if (param('debug')) {$debug=1; $printqueries=1}
 *STDERR=*STDOUT if $debug;
-if ($url !~ /db\.chgk\.info/ && $url !~ /localhost/ ) {
+if ($url !~ /db\.chgk\.info/ && $url !~ /(localhost)||(bilbo)/ ) {
    my $u="http://db.chgk.info/cgi-bin/db.cgi?$qs";
    Redirect ($u);
    exit;
 }
+if (!param('sstr') && param('all')) {
+	   my $destination='http://db.chgk.info/all.html';
+		Redirect($destination);
+                exit;
+}
 my $thislocale;
 if ($^O =~ /win/i) {
 	$thislocale = "Russian_Russia.20866";
@@ -766,7 +771,7 @@ sub PrintList {
             a({href=>url."?".$qs."\&first=$llprint"},">>").(" "x4)
         }
 	$Output.= "$nav".br."\n";
-	my @q=@$Questions[$first..$last];
+	my @q=@$Questions[$first-1..$last-1];
 	my %q=();
 	my $sth=SelectQuestions($dbh,\@q,1);
 	for (my $i = $first; $i <= $last; $i++) {
@@ -1817,7 +1822,7 @@ th	{font-size: x-small; font-family : sa
 		$globaloutput.=&Include_virtual("../dimrub/db/reklama.html");
 	}
 
-       if (length ($qs)<=255 && $qs !~ /(sstr)|(rand)|(comp)/i) {
+       if (length ($qs)<=255 && $qs !~ /(sstr)|(rand)|(comp)|(all=)/i) {
         	my $sth=$dbh->prepare("SELECT page,times,t from hash where query=".$dbh->quote($qs));
         	$sth->execute();
         	my ($p,$times,$t)=$sth->fetchrow();
@@ -1857,7 +1862,8 @@ th	{font-size: x-small; font-family : sa
 		    else 
 		        {
                           $sth = $dbh->prepare("SELECT Id FROM Tournaments
-			             WHERE FileName = '$tour.txt'");
+			             WHERE FileName = '$tour.txt' OR 
+                                       FileName = '$tour'");
 			}
 		    $sth->execute;
 	            $tour = ($sth->fetchrow)[0];
@@ -1910,7 +1916,10 @@ EOT
  	elsif (param('getfile')){
            $globaloutput.=&writefile
  	} elsif (param('all')) {
-		$globaloutput.=&PrintAll($dbh, 0);
+	   my $destination='http://db.chgk.info/all.html';
+		Redirect($destination);
+                exit;
+#		$globaloutput.=&PrintAll($dbh, 0);
 	} elsif (param('from_year') && param('to_year')) {
 		$globaloutput.=&PrintDates($dbh);
 	} elsif (param('comp')) {