Changeset 101 for branches/stable
- Timestamp:
 - 12/07/04 16:06:13 (21 years ago)
 - File:
 - 
      
- 1 edited
 
- 
          
  branches/stable/cgi-bin/main.cgi (modified) (2 diffs)
 
 
Legend:
- Unmodified
 - Added
 - Removed
 
- 
      
branches/stable/cgi-bin/main.cgi
r100 r101 918 918 $city = $webvar{pop}; 919 919 $failmsg = "No suitable free block found.<br>\nYou will have to route another". 920 " superblock to $webvar{ city}<br>\nfrom one of the master blocks in Sudbury or".920 " superblock to $webvar{pop}<br>\nfrom one of the master blocks in Sudbury or". 921 921 " chose a smaller blocksize."; 922 922 } … … 1129 1129 1130 1130 # Insert the new freeblocks entries 1131 $sth = $ip_dbh->prepare("insert into freeblocks values (?, ?, ?,'y')");1131 $sth = $ip_dbh->prepare("insert into freeblocks values (?, ?, (select city from routed where cidr >> '$cidr'),'y')"); 1132 1132 foreach my $block (@newfreeblocks) { 1133 $sth->execute("$block", $block->masklen , $webvar{city});1133 $sth->execute("$block", $block->masklen); 1134 1134 } 1135 1135 # Insert the allocations entry  
  Note:
 See   TracChangeset
 for help on using the changeset viewer.
  ![[ DeepNet IP Database ]](/images/ipdb-logo.png)