Mercurial > hg > marc_php

comparison marcus.php @ 1:caa68b502313 draft

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Added the MARC DNS server (and small fixes in marcus and anoclaims)
author Ivo Smits <Ivo@UCIS.nl>
date Thu, 13 Nov 2014 17:22:12 +0100
parents 3ac7bd7495fd
children 5c8c4fa95803
comparison
equal deleted inserted replaced
0:3ac7bd7495fd 1:caa68b502313
260 case 'IPV6': return ipnettolabel($argv[$argi++]); 260 case 'IPV6': return ipnettolabel($argv[$argi++]);
261 case 'AS': return chr(3).marc_decode_int32be($argv[$argi++]); 261 case 'AS': return chr(3).marc_decode_int32be($argv[$argi++]);
262 case 'DOM': 262 case 'DOM':
263 case 'DOMAIN': return chr(4).strtolower(trim($argv[$argi++], '.')); 263 case 'DOMAIN': return chr(4).strtolower(trim($argv[$argi++], '.'));
264 default: 264 default:
265 if (preg_match('/^AS[0-9]{1-9}$/', $t)) return chr(3).marc_decode_int32be(substr($argv[$argi++], 2)); 265 if (preg_match('/^AS[0-9]{1-9}$/', $t)) return chr(3).marc_decode_int32be(substr($t, 2));
266 if (preg_match('_^[0-9]{1-3}\.[0-9]{1-3}\.[0-9]{1-3}\.[0-9]{1-3}/[0-9]{1-2}$_', $t)) return ipv4tolabel($t); 266 if (preg_match('_^[0-9]{1-3}\.[0-9]{1-3}\.[0-9]{1-3}\.[0-9]{1-3}/[0-9]{1-2}$_', $t)) return ipnettolabel($t);
267 if (preg_match('_^(((?=.*(::))(?!.*\3.+\3))\3?|([\dA-F]{1,4}(\3|:\b|$)|\2))(?4){5}((?4){2}|(((2[0-4]|1\d|[1-9])?\d|25[0-5])\.?\b){4})\z/[0-9]{1-3}_i', $t)) return ipv6tolabel($t); 267 if (preg_match('_^(((?=.*(::))(?!.*\3.+\3))\3?|([\dA-F]{1,4}(\3|:\b|$)|\2))(?4){5}((?4){2}|(((2[0-4]|1\d|[1-9])?\d|25[0-5])\.?\b){4})\z/[0-9]{1-3}_i', $t)) return ipnettolabel($t);
268 if (preg_match('/^[a-f0-9]{64}$/i', $t)) return chr(0).hex2bin($t); 268 if (preg_match('/^[a-f0-9]{64}$/i', $t)) return chr(0).hex2bin($t);
269 if (preg_match('/^[a-z0-9]+([\-\.]{1}[a-z0-9]+)*\.[a-z]{2,6}$/i', $t)) return chr(4).strtolower(trim($t, '.')); 269 if (preg_match('/^[a-z0-9]+([\-\.]{1}[a-z0-9]+)*\.[a-z]{2,6}$/i', $t)) return chr(4).strtolower(trim($t, '.'));
270 throw new Exception('Could not detect label type for '.$t); 270 throw new Exception('Could not detect label type for '.$t);
271 } 271 }
272 } 272 }