Changeset 120
- Timestamp:
- 01/07/05 11:00:06 (20 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/cgi-bin/IPDB.pm
r118 r120 408 408 $msg = "Unable to deallocate $type $cidr"; 409 409 $sth = $dbh->prepare("update poolips set custid='6750400',available='y',". 410 "city=(select city from allocations ". 411 "where cidr=(select pool from poolips where ip='$cidr')),". 410 "city=(select city from allocations where cidr >>= '$cidr'),". 412 411 "description='',notes='',circuitid='' where ip='$cidr'"); 413 412 $sth->execute; … … 471 470 472 471 # Set up query for compacting free blocks. 473 $sth = $dbh->prepare("select * from freeblocks where cidr << ".474 "(select cidr from routed where cidr >> '$cidr') ".472 $sth = $dbh->prepare("select * from freeblocks where cidr <<= ". 473 "(select cidr from routed where cidr >>= '$cidr') ". 475 474 " and maskbits<=".$cidr->masklen." and routed='y' order by maskbits desc"); 476 475
Note:
See TracChangeset
for help on using the changeset viewer.