Changeset 753
- Timestamp:
- 06/29/15 18:31:06 (9 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/cgi-bin/IPDB.pm
r752 r753 2456 2456 # ... er, how do we detect this? 2457 2457 2458 # Return early if the block wasn't flagged as rDNS-able 2459 return \@retlist unless $binfo->{revavail} || $binfo->{revpartial}; 2460 2458 2461 if ($args{newtype} =~ /.[cm]/) { 2459 2462 … … 2914 2917 } else { 2915 2918 my $binfo = $dbh->selectrow_hashref(qq( 2916 SELECT a.id, a.cidr AS block, a.city, a.vrf, a.parent_id, a.master_id, swip, $commonfields, 2917 f.cidr AS reserve, f.id as reserve_id 2918 FROM allocations a LEFT JOIN freeblocks f ON a.id=f.reserve_for 2919 SELECT a.id, a.cidr AS block, a.city, a.vrf, a.parent_id, a.master_id, swip, revzone, $commonfields, 2920 f.cidr AS reserve, f.id as reserve_id, 2921 d.zone >>= a.cidr AS revavail, d.zone << a.cidr AS revpartial 2922 FROM allocations a 2923 LEFT JOIN freeblocks f ON a.id=f.reserve_for 2924 LEFT JOIN dnsavail d ON a.parent_id = d.parent_alloc AND (a.cidr <<= d.zone OR a.cidr >> d.zone) 2919 2925 WHERE a.id = ? 2920 2926 ), undef, ($id) );
Note:
See TracChangeset
for help on using the changeset viewer.