/usr/share/arc/ldap-monitor/includes/comfun.inc is in nordugrid-arc-ldap-monitor 5.0.5-1ubuntu1.
This file is owned by root:root, with mode 0o644.
The actual contents of the file can be viewed below.
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103 104 105 106 107 108 109 110 111 112 113 114 115 116 117 118 119 120 121 122 123 124 125 126 127 128 129 130 131 132 133 134 | <?php
// Author: oxana.smirnova@hep.lu.se
// Collection of comparison functions
/**
* @return int
* @param a array
* @param b array
* @desc Compares LDAP entries
*/
function ldap_entry_comp($a, $b)
{
return strcasecmp ($a[CMPKEY][0],$b[CMPKEY][0]);
}
/**
* @return int
* @param a array
* @param b array
* @desc Compares DN strings
*/
function dncmp($a, $b)
{
return strcasecmp ($a["dn"],$b["dn"]);
}
/**
* @return int
* @param a array
* @param b array
* @desc Compares queues by maxcputime
*/
function quetcmp ($a, $b)
{
$tm1 = ($a[CMPKEY][0])?$a[CMPKEY][0]:999999;
$tm2 = ($b[CMPKEY][0])?$b[CMPKEY][0]:999999;
if (gettype($a) != "array") return -1;
if (gettype($b) != "array") return 1;
return $tm1-$tm2;
}
/**
* @return int
* @param a array
* @param b array
* @desc Compares VO strings, or else host names
*/
function vocmp ($a, $b)
{
// $cmpvo = strcasecmp ($a["zvoname"],$b["zvoname"]);
$cmpvo = strcasecmp ($a["zvolocale"],$b["zvolocale"]);
$cmpname = strcasecmp ($a["host"],$b["host"]);
if ( !$cmpvo ) return $cmpname;
return $cmpvo;
}
/**
* @return int
* @param a array
* @param b array
* @desc Sorts a list of human names specified as N.Ame (used in allusers.php)
*/
function hncmp ($a, $b)
{
$name1 = $a["name"];
$name2 = $b["name"];
$lname1 = substr(strrchr($name1," "),1);
$lname2 = substr(strrchr($name2," "),1);
return strcasecmp ($lname1,$lname2);
}
/**
* @return int
* @param a array
* @param b array
* @desc Compares countries, or else host aliases
*/
function comp_by_country ($a, $b)
{
/*
* Must deal with a beast like this:
* <a href="/monitor/loadmon1.php?debug=0&display=vo=Norway"><img src="icons/Norway.png" title="XXX" height="10" width="16" border="0"> <i><b>XXX</b></i></a>  </font></nobr>
*/
$geo1 = $a[0]; $geo2 = $b[0];
$geo1 = substr(stristr($geo1,"<b>"),3); $geo2 = substr(stristr($geo2,"<b>"),3);
$geo1 = substr($geo1,0,strpos($geo1,"<")); $geo2 = substr($geo2,0,strpos($geo2,"<"));
$ali1 = $a[1]; $ali2 = $b[1];
$ali1 = substr(stristr($ali1,"<b>"),3); $ali2 = substr(stristr($ali2,"<b>"),3);
$ali1 = substr($ali1,0,strpos($ali1,"<")); $ali2 = substr($ali2,0,strpos($ali2,"<"));
$cmpgeo = strcasecmp ($geo1,$geo2);
$cmpali = strcasecmp ($ali1,$ali2);
if ( !$cmpgeo ) return $cmpali;
return $cmpgeo;
}
/**
* @return int
* @param a array
* @param b array
* @desc Compares by CPU
*/
function comp_by_cpu ($a, $b)
{
$cpu1 = $a[2]; $cpu2 = $b[2];
$cmpcpu = $cpu2 - $cpu1;
return $cmpcpu;
}
/**
* @return int
* @param a array
* @param b array
* @desc Compares by grid running jobs
*/
function comp_by_grun ($a, $b)
{
$sum1 = $a[3]; $sum2 = $b[3];
// echo $sum1." vs ".$sum2."<br>";
$sum1 = substr(stristr($sum1,"alt=\""),5); $sum2 = substr(stristr($sum2,"alt=\""),5);
$sum1 = substr($sum1,0,strpos($sum1,"+")); $sum2 = substr($sum2,0,strpos($sum2,"+"));
$cmpsum = $sum2 - $sum1;
return $cmpsum;
}
?>
|