[2008] in Moira Commits
/svn/moira r4147 - trunk/moira/clients/mrtest
daemon@ATHENA.MIT.EDU (Garry Zacheiss)
Fri Sep 27 14:49:48 2013
Date: Fri, 27 Sep 2013 14:49:41 -0400
From: Garry Zacheiss <zacheiss@MIT.EDU>
Message-Id: <201309271849.r8RInfog016565@drugstore.mit.edu>
To: moira-commits@MIT.EDU
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit
Author: zacheiss
Date: 2013-09-27 14:49:41 -0400 (Fri, 27 Sep 2013)
New Revision: 4147
Modified:
trunk/moira/clients/mrtest/qy
Log:
Even more hackery. We eventually need to fix these queries server side.
Modified: trunk/moira/clients/mrtest/qy
===================================================================
--- trunk/moira/clients/mrtest/qy 2013-09-25 00:21:13 UTC (rev 4146)
+++ trunk/moira/clients/mrtest/qy 2013-09-27 18:49:41 UTC (rev 4147)
@@ -159,7 +159,10 @@
if ($query[0] eq "usnt" || $query[0] eq "update_subnet") { $idx = 1 };
foreach $arg (6..9) {
$decimal_form = unpack('N', inet_aton($query[$arg + $idx]));
- if ($decimal_form) { $query[$arg + $idx] = $decimal_form; }
+ if ($decimal_form) {
+ $decimal_form -= 2**32 if $decimal_form >= 2**31;
+ $query[$arg + $idx] = $decimal_form;
+ }
}
}
