Changeset 13 for trunk/cgi-bin/main.cgi

Timestamp:

10/25/04 17:30:13 (20 years ago)

Author:

Kris Deugau

Message:

main.cgi: Fix broken or not-quite-right SQL statements

File:

• trunk/cgi-bin/main.cgi (modified) (3 diffs)

trunk/cgi-bin/main.cgi

@@ -857 +857 @@
       }
       $sql = "select * from freeblocks where city='$city' and maskbits<=$webvar{maskbits}".
-        " and routed='y' order by maskbits desc";
+        " and routed='y' order by cidr,maskbits desc";
     }
     $sth = $ip_dbh->prepare($sql);
@@ -1424 +1424 @@
         if ($webvar{alloctype} =~ /^[sdcmw]p$/) {
           # We have to delete the IPs from the pool listing.
-          $sth = $ip_dbh->prepare("delete * from poolips where pool='$webvar{block}'");
+          $sth = $ip_dbh->prepare("delete from poolips where pool='$webvar{block}'");
           $sth->execute;
         }
@@ -1465 +1465 @@
         $sth = $ip_dbh->prepare("delete from freeblocks where cidr=?");
         foreach my $block (@combinelist) {
-          $sth->execute($block);
+          $sth->execute("$block");
         }
       }