source: trunk/web2/addons/job_monarch/libtoga.php @ 562

Last change on this file since 562 was 562, checked in by ramonb, 15 years ago

web2/addons/job_monarch/libtoga.php:

  • once and for all REALLY fixed hostname FQDN detection
  • fixed owner filtering of nodes when multiple jobs present with different owners

web2/addons/job_monarch/jobstore.php:

  • removed domain/hostname FQDN handling: is now all done in libtoga

web2/addons/job_monarch/js/jobgrid.js:

  • test alert
File size: 49.5 KB
Line 
1<?php
2/*
3 *
4 * This file is part of Jobmonarch
5 *
6 * Copyright (C) 2006  Ramon Bastiaans
7 *
8 * Jobmonarch is free software; you can redistribute it and/or modify
9 * it under the terms of the GNU General Public License as published by
10 * the Free Software Foundation; either version 2 of the License, or
11 * (at your option) any later version.
12 *
13 * Jobmonarch is distributed in the hope that it will be useful,
14 * but WITHOUT ANY WARRANTY; without even the implied warranty of
15 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
16 * GNU General Public License for more details.
17 *
18 * You should have received a copy of the GNU General Public License
19 * along with this program; if not, write to the Free Software
20 * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA  02110-1301  USA
21 *
22 * SVN $Id: libtoga.php 531 2008-07-08 09:04:51Z ramonb $
23 *
24 */
25
26
27class HTTPVariables
28{
29        var $clustername, $metricname;
30        var $restvars, $httpvars;
31
32        function HTTPVariables( $httpvars, $getvars )
33        {
34                $this->restvars         = array();
35
36                $this->clustername      = $httpvars["c"] ? $httpvars["c"] : $getvars["c"];
37                $this->metricname       = $httpvars["m"] ? $httpvars["m"] : $getvars["m"];
38
39                if( count( $httpvars ) > 0 )
40                {
41                        foreach( $httpvars as $httpvar => $httpval )
42                        {
43                                if( $httpval )
44                                {
45                                        $this->restvars[$httpvar] = $httpval;
46                                }
47                        }
48                }
49
50                if( count( $getvars ) > 0 )
51                {
52                        foreach( $getvars as $getvar => $getval )
53                        {
54                                if( $getval )
55                                {
56                                        $this->restvars[$getvar] = $getval;
57                                }
58                        }
59                }
60        }
61
62        function getClusterName()
63        {
64                return $this->clustername;
65        }
66
67        function getMetricName()
68        {
69                return $this->metricname;
70        }
71
72        function getHttpVar( $var )
73        {
74                if( isset( $this->restvars[$var] ) )
75                {
76                        return $this->restvars[$var];
77                }
78                else
79                {
80                        return null;
81                }
82        }
83}
84
85$CLUSTER_CONFS  = array();
86
87// Monarch's conf
88//
89include_once "./conf.php";
90include_once "./version.php";
91
92global $GANGLIA_PATH;
93global $RRDTOOL;
94global $JOB_ARCHIVE_DIR;
95global $JOB_ARCHIVE_DBASE;
96global $skan_str;
97global $x_first, $y_first;
98global $CLUSTER_CONFS;
99
100$my_dir = getcwd();
101
102// Load Ganglia's PHP
103chdir( $GANGLIA_PATH );
104
105include_once "./conf.php";
106include_once "./functions.php";
107include_once "./ganglia.php";
108include_once "./get_context.php";
109
110$context = 'cluster';
111include_once "./get_ganglia.php";
112
113// Back to our PHP
114chdir( $my_dir );
115
116global $SMALL_CLUSTERIMAGE_MAXWIDTH, $SMALL_CLUSTERIMAGE_NODEWIDTH, $DATA_SOURCE, $HTTP_GET_VARS, $_GET;
117$httpvars = new HTTPVariables( $HTTP_GET_VARS, $_GET );
118
119// Set cluster context so that Ganglia will
120// provide us with the correct metrics array
121//
122global $context, $clustername, $reports;
123
124global $default_metric;
125
126// Ganglia's array of host metrics
127//
128global $metrics, $hosts_up;
129global $range, $start;
130
131global $DATETIME_FORMAT;
132
133function makeDate( $time )
134{
135        global $DATETIME_FORMAT;
136        return strftime( $DATETIME_FORMAT, $time );
137}
138
139
140class TarchDbase
141{
142        var $ip, $dbase, $conn;
143
144        function TarchDbase( $ip = null, $dbase = null )
145        {
146                global $CLUSTER_CONFS, $clustername;
147                global $JOB_ARCHIVE_DBASE;
148
149                // Import cluster specific settings
150                //
151                foreach( $CLUSTER_CONFS as $confcluster => $conffile )
152                {
153                        if( strtolower( trim($this->clustername) ) == strtolower(trim($confcluster)) )
154                        {
155                                include_once $conffile;
156                        }
157                }
158
159                $db_fields = explode( '/', $JOB_ARCHIVE_DBASE );
160
161                $this->ip       = $db_fields[0];
162                $this->dbase    = $db_fields[1];
163                $this->conn     = null;
164        }
165
166        function connect()
167        {
168                if( $this->ip == null )
169                        $this->conn = pg_connect( "dbname=".$this->dbase );
170                else
171                        $this->conn = pg_connect( "host=".$this->ip." dbname=".$this->dbase );
172        }
173
174        function searchDbase( $id = null, $queue = null, $user = null, $name = null, $start_from_time = null, $start_to_time = null, $end_from_time = null, $end_to_time = null )
175        {
176                global $SEARCH_RESULT_LIMIT;
177
178                if( $id )
179                {
180                        $select_query = "SELECT job_id FROM jobs WHERE job_id = '$id' AND job_status = 'F'";
181                        $this->resultcount = 1;
182                }
183                else
184                {
185                        $query_args = array();
186                       
187                        if( $queue )
188                        {
189                                $query_args[] = "job_queue ='$queue'";
190                        }
191                        if( $user )
192                        {
193                                $query_args[] = "job_owner ='$user'";
194                        }
195                        if( $name )
196                        {
197                                $query_args[] = "job_name = '$name'";
198                        }
199                        if( $start_from_time )
200                        {
201                                $query_args[] = "job_start_timestamp >= $start_from_time";
202                        }
203                        if( $start_to_time )
204                        {
205                                $query_args[] = "job_start_timestamp <= $start_to_time";
206                        }
207                        if( $end_from_time )
208                        {
209                                $query_args[] = "job_stop_timestamp >= $end_from_time";
210                        }
211                        if( $end_to_time )
212                        {
213                                $query_args[] = "job_stop_timestamp <= $end_to_time";
214                        }
215
216                        $query = "FROM jobs WHERE job_status = 'F' AND ";
217                        $extra_query_args = '';
218
219                        foreach( $query_args as $myquery )
220                        {
221                                if( $extra_query_args == '' )
222                                {
223                                        $extra_query_args = $myquery;
224                                }
225                                else
226                                {
227                                        $extra_query_args .= " AND ".$myquery;
228                                }
229                        }
230                        $query .= $extra_query_args;
231
232                        $count_result_idname = "COUNT(job_id)";
233                        $select_result_idname = "job_id";
234
235                        $count_query = "SELECT " . $count_result_idname . " " . $query;
236
237                        $count_result = $this->queryDbase( $count_query );
238                        $this->resultcount = (int) $count_result[0][count];
239
240                        $select_query = "SELECT " . $select_result_idname . " " . $query . " ORDER BY job_id DESC LIMIT " . $SEARCH_RESULT_LIMIT;
241                }
242
243                $ids = $this->queryDbase( $select_query );
244
245                $ret = array();
246
247                foreach( $ids as $crow)
248                {
249                        $ret[] = $crow[job_id];
250                }
251
252                return $ret;
253        }
254
255        function getNodesForJob( $jobid )
256        {
257                $result = $this->queryDbase( "SELECT node_id FROM job_nodes WHERE job_id = '$jobid'" );
258
259                $nodes = array();
260
261                foreach( $result as $result_row ) 
262                {
263                        $nodes[] = $this->getNodeArray( $result_row[node_id] );
264                }
265
266                return $nodes;
267        }
268
269        function getJobsForNode( $nodeid )
270        {
271                $result = $this->queryDbase( "SELECT job_id FROM job_nodes WHERE node_id = '$nodeid'" );
272
273                $jobs = array();
274
275                foreach( $result as $result_row )
276                {
277                        $jobs[] = $this->getJobArray( $result_row[job_id] );
278                }
279                return $jobs;
280        }
281
282        function getJobArray( $id )
283        {
284                $result = $this->queryDbase( "SELECT * FROM jobs WHERE job_id = '$id'" );
285
286                return ( $this->makeArray( $result[0] ) );
287        }
288
289        function getNodeArray( $id )
290        {
291                $result = $this->queryDbase( "SELECT * FROM nodes WHERE node_id = '$id'" );
292
293                return ( $this->makeArray( $result[0] ) );
294        }
295
296        function makeArray( $result_row )
297        {
298                $myar = array();
299
300                foreach( $result_row as $mykey => $myval )
301                {
302                        $map_key = explode( '_', $mykey );
303
304                        $rmap_key = array_reverse( $map_key );
305                        array_pop( $rmap_key );
306                        $map_key = array_reverse( $rmap_key );
307                       
308                        $newkey = implode( '_', $map_key );
309                       
310                        $myar[$newkey] = $result_row[$mykey];
311                }
312
313                return $myar;
314        }
315
316        function queryDbase( $query )
317        {
318                $result_rows = array();
319       
320                if( !$this->conn )
321                {
322                        $this->connect();
323                }
324
325                $result = pg_query( $this->conn, $query );
326
327                while ($row = pg_fetch_assoc($result))
328                {
329                        $result_rows[] = $row;
330                }
331
332                return $result_rows;
333        }
334}
335
336class TarchRrdGraph
337{
338        var $rrdbin, $rrdvalues, $clustername, $hostname, $tempdir, $tarchdir, $metrics;
339
340        function TarchRrdGraph( $clustername, $hostname )
341        {
342                global $RRDTOOL;
343                global $JOB_ARCHIVE_DIR;
344
345                $this->rrdbin           = $RRDTOOL;
346                $this->rrdvalues        = array();
347                $this->tarchdir         = $JOB_ARCHIVE_DIR;
348                $this->clustername      = $clustername;
349                $this->hostname         = $hostname;
350        }
351
352        function doCmd( $command )
353        {
354                $pipe = popen( $command . ' 2>&1', 'r' );
355
356                if (!$pipe)
357                {
358                        print "pipe failed.";
359                        return "";
360                }
361
362                $output = '';
363
364                while(!feof($pipe))
365                {
366                        $output .= fread($pipe, 1024);
367                }
368
369                pclose($pipe);
370
371                $output = explode( "\n", $output );
372
373                return $output;
374        }
375
376        function dirList( $dir )
377        {
378                $dirlist = array();
379
380                if ($handle = opendir( $dir ))
381                {
382                        while (false !== ($file = readdir($handle)))
383                        {
384                                if ($file != "." && $file != "..")
385                                {
386                                        $dirlist[] = $file;
387                                }
388                        }
389                        closedir($handle);
390                }
391
392                return $dirlist;
393        }
394
395        function getTimePeriods( $start, $end )
396        {
397                $times = array();
398                $dirlist = $this->dirList( $this->tarchdir . '/' . $this->clustername . '/' . $this->hostname );
399
400                $first = 0;
401                $last = 9999999999999;
402
403                foreach( $dirlist as $dir )
404                {
405                        if( $dir > $first and $dir <= $start )
406                        {
407                                $first = $dir;
408                        }
409                        if( $dir < $last and $dir >= $end )
410                        {
411                                $last = $dir;
412                        }
413                }
414
415                foreach( $dirlist as $dir )
416                {
417                        if( $dir >= $first and $dir <= $last and !array_key_exists( $dir, $times ) )
418                        {
419                                $times[] = $dir;
420                        }
421                }
422
423                sort( $times );
424
425                return $times;
426        }
427
428        function getRrdDirs( $start, $stop )
429        {
430                $timess = $this->getTimePeriods( $start, $stop );
431
432                $rrd_files = array();
433
434                foreach( $timess as $time )
435                {
436                        $rrd_files[] = $this->tarchdir . '/' . $this->clustername . '/' . $this->hostname. '/'.$time;
437                }
438
439                return $rrd_files;
440        }
441
442        function getRrdFiles( $metric, $start, $stop )
443        {
444                $times = $this->getTimePeriods( $start, $stop );
445
446                $rrd_files = array();
447
448                foreach( $times as $time )
449                {
450                        $rrd_files[] = $this->tarchdir . '/' . $this->clustername . '/' . $this->hostname . '/' .$time. '/' . $metric. '.rrd';
451                }
452
453                return $rrd_files;
454        }
455}
456
457class DataSource
458{
459        var $data, $ip, $port;
460
461        function DataSource()
462        {
463                global $DATA_SOURCE;
464
465                $ds_fields      = explode( ':', $DATA_SOURCE );
466
467                $ds_ip          = $ds_fields[0];
468                $ds_port        = $ds_fields[1];
469
470                $this->ip       = $ds_ip;
471                $this->port     = $ds_port;
472
473        }
474
475        function getData()
476        {
477                $errstr;
478                $errno = 0;
479                $timeout = 3;
480
481                $fp = fsockopen( $this->ip, $this->port, $errno, $errstr, $timeout );
482
483                if( !$fp )
484                {
485                        echo 'Unable to connect to '.$this->ip.':'.$this->port; // printf( 'Unable to connect to [%s:%.0f]', $this->ip, $this->port );
486                        return;
487                }
488
489                stream_set_timeout( $fp, 30 );
490
491                while ( !feof( $fp ) )
492                {
493                        $data .= fread( $fp, 16384 );
494                }
495
496                fclose( $fp );
497
498                return $data;
499        }
500}
501
502class DataGatherer
503{
504        var $xmlhandler, $data, $httpvars;
505
506        function DataGatherer( $cluster )
507        {
508                $this->cluster  = $cluster;
509                $this->httpvars = $httpvars;
510        }
511
512        function parseXML( $data )
513        {
514                $this->parser           = xml_parser_create();
515                $this->xmlhandler       = new TorqueXMLHandler( $this->cluster );
516
517                xml_set_element_handler( $this->parser, array( &$this->xmlhandler, 'startElement' ), array( &$this->xmlhandler, 'stopElement' ) );
518
519                if ( !xml_parse( $this->parser, $data ) )
520                {
521                        $error = sprintf( 'XML error: %s at %d', xml_error_string( xml_get_error_code( $this->parser ) ), xml_get_current_line_number( $this->parser ) );
522                }
523        }
524
525        function printInfo()
526        {
527                $handler = $this->xmlhandler;
528                $handler->printInfo();
529        }
530
531        function getUsingFQDN()
532        {
533                $handler = $this->xmlhandler;
534                return $handler->getUsingFQDN();
535        }
536
537        function getNodes()
538        {
539                $handler = $this->xmlhandler;
540                return $handler->getNodes();
541        }
542
543        function getNode( $node )
544        {
545                $handler = $this->xmlhandler;
546                return $handler->getNode( $node );
547        }
548
549        function getCpus()
550        {
551                $handler = $this->xmlhandler;
552                return $handler->getCpus();
553        }
554
555        function getJobs()
556        {
557                $handler = $this->xmlhandler;
558                return $handler->getJobs();
559        }
560
561        function getJob( $job )
562        {
563                $handler = $this->xmlhandler;
564                return $handler->getJob( $job );
565        }
566
567        function getHeartbeat()
568        {
569                $handler = $this->xmlhandler;
570                return $handler->getHeartbeat();
571        }
572
573        function isJobmonRunning()
574        {
575                $handler = $this->xmlhandler;
576                return $handler->isJobmonRunning();
577        }
578}
579
580class TorqueXMLHandler
581{
582        var $clusters, $heartbeat, $nodes, $jobs, $clustername, $proc_cluster;
583
584        function TorqueXMLHandler( $clustername )
585        {
586                $jobs                   = array();
587                $clusters               = array();
588                $this->nodes            = array();
589                $heartbeat              = array();
590                $down_nodes             = array();
591                $offline_nodes          = array();
592                $this->clustername      = $clustername;
593                $this->fqdn             = 0;
594                $this->fqdnFound        = 0;
595        }
596
597        function getUsingFQDN()
598        {
599                return $this->fqdn;
600        }
601
602        function getCpus()
603        {
604                $cpus = 0;
605
606                if( isset( $this->jobs ) && count( $this->jobs ) > 0 )
607                {
608                        foreach( $this->jobs as $jobid=>$jobattrs )
609                        {
610                                $nodes  = count( $jobattrs[nodes] );
611                                $ppn    = (int) $jobattrs[ppn] ? $jobattrs[ppn] : 1;
612                                $mycpus = $nodes * $ppn;
613
614                                $cpus   = $cpus + $mycpus;
615                        }
616                }
617        }
618
619        function isJobmonRunning()
620        {
621                if (isset( $this->heartbeat['time'] ))
622                {
623                        return 1;
624                }
625                else
626                {
627                        return 0;
628                }
629        }
630
631        function makeHostname( $thostname, $tdomain=null )
632        {
633                // Should hostname be FQDN or short w/o domain
634                //
635                $nodes = &$this->nodes;
636
637                $domain_len     = 0 - strlen( $tdomain );
638       
639                if( $tdomain && $this->fqdn )
640                {
641                        if( substr( $thostname, $domain_len ) != $tdomain )
642                        {
643                                $thostname = $thostname . '.'.$tdomain;
644                        } 
645                }
646
647                return $thostname;
648        }
649
650        function startElement( $parser, $name, $attrs )
651        {
652                $jobs = $this->jobs;
653                $nodes = $this->nodes;
654
655                if ( $attrs[TN] )
656                {
657                        // Ignore dead metrics. Detect and mask failures.
658                        if ( $attrs[TN] > $attrs[TMAX] * 4 )
659                        {
660                                return;
661                        }
662                }
663
664                $jobid = null;
665
666                if( $name == 'CLUSTER' )
667                {
668                        $this->proc_cluster = $attrs[NAME];
669                }
670                else if( $name == 'HOST' and $this->proc_cluster == $this->clustername)
671                {
672                        $hostname = $attrs[NAME];
673
674                        // Assume to use FQDN if we find a '.' in the hostname
675                        //
676                        if( strpos( $hostname, '.' ) !== false )
677                        {
678                                if( !$this->fqdnFound )
679                                {
680                                        $this->fqdn             = 1;
681                                        $this->fqdnFound        = 1;
682                                }
683                        }
684                        else
685                        {
686                                if( !$this->fqdnFound )
687                                {
688                                        $this->fqdn             = 0;
689                                        $this->fqdnFound        = 1;
690                                }
691                        }
692
693                        $location = $attrs[LOCATION];
694
695                        if( !isset( $nodes[$hostname] ) )
696                        {
697                                $nodes[$hostname] = new NodeImage( $this->proc_cluster, $hostname );
698                        }
699                }
700                else if( $name == 'METRIC' and strstr( $attrs[NAME], 'MONARCH' ) and $this->proc_cluster == $this->clustername )
701                {
702                        if( strstr( $attrs[NAME], 'MONARCH-HEARTBEAT' ) )
703                        {
704                                $this->heartbeat['time'] = $attrs[VAL];
705                        }
706                        else if( strstr( $attrs[NAME], 'MONARCH-DOWN' ) )
707                        {
708                                $fields         = explode( ' ', $attrs[VAL] );
709
710                                $nodes_down     = array();
711                                $down_domain    = null;
712
713                                foreach( $fields as $f )
714                                {
715                                        $togavalues     = explode( '=', $f );
716
717                                        $toganame       = $togavalues[0];
718                                        $togavalue      = $togavalues[1];
719
720                                        if( $toganame == 'nodes' )
721                                        {
722                                                $mynodes = explode( ';', $togavalue );
723
724                                                foreach( $mynodes as $node )
725                                                {
726                                                        $nodes_down[] = $node;
727                                                }
728                                        }
729                                        else if( $toganame == 'domain' )
730                                        {
731                                                $down_domain = $togavalue;
732                                        }
733                                        else if( $toganame == 'reported' )
734                                        {
735                                                if( !isset( $this->down_nodes['heartbeat'] ) )
736                                                {
737                                                        $this->down_nodes[$togavalue]   = array( $nodes_down, $down_domain );
738                                                }
739                                        }
740                                }
741                                $down_nodes     = $nodes_down;
742
743                                foreach( $down_nodes as $node )
744                                {
745                                        $nodes_down[] = $this->makeHostname( $node, $down_domain );
746                                }
747                        }
748                        else if( strstr( $attrs[NAME], 'MONARCH-OFFLINE' ) )
749                        {
750                                $fields         = explode( ' ', $attrs[VAL] );
751
752                                $nodes_offline  = array();
753                                $offline_domain = null;
754
755                                foreach( $fields as $f )
756                                {
757                                        $togavalues     = explode( '=', $f );
758
759                                        $toganame       = $togavalues[0];
760                                        $togavalue      = $togavalues[1];
761
762                                        if( $toganame == 'nodes' )
763                                        {
764                                                $mynodes = explode( ';', $togavalue );
765
766                                                foreach( $mynodes as $node )
767                                                {
768                                                        $nodes_offline[] = $node;
769                                                }
770                                        }
771                                        else if( $toganame == 'domain' )
772                                        {
773                                                $offline_domain = $togavalue;
774                                        }
775                                        else if( $toganame == 'reported' )
776                                        {
777                                                if( !isset( $this->offline_nodes['heartbeat'] ) )
778                                                {
779                                                        $this->offline_nodes[$togavalue] = array( $nodes_offline, $offline_domain );
780                                                }
781                                        }
782                                }
783                                $offline_nodes  = $nodes_offline;
784
785                                foreach( $offline_nodes as $node )
786                                {
787                                        $nodes_offline[] = $this->makeHostname( $node, $offline_domain );
788                                }
789                        }
790                        else if( strstr( $attrs[NAME], 'MONARCH-JOB' ) )
791                        {
792                                sscanf( $attrs[NAME], 'MONARCH-JOB-%d-%d', $jobid, $monincr );
793
794                                if( !isset( $jobs[$jobid] ) )
795                                {
796                                        $jobs[$jobid] = array();
797                                }
798
799                                $fields = explode( ' ', $attrs[VAL] );
800
801                                foreach( $fields as $f )
802                                {
803                                        $togavalues = explode( '=', $f );
804
805                                        $toganame = $togavalues[0];
806                                        $togavalue = $togavalues[1];
807
808                                        if( $toganame == 'nodes' )
809                                        {
810                                                if( $jobs[$jobid][status] == 'R' )
811                                                {
812                                                        if( !isset( $jobs[$jobid][$toganame] ) )
813                                                        {
814                                                                $jobs[$jobid][$toganame] = array();
815                                                        }
816
817                                                        $mynodes = explode( ';', $togavalue );
818
819                                                        foreach( $mynodes as $node )
820                                                        {
821                                                                if( !in_array( $node, $jobs[$jobid][$toganame] ) )
822                                                                {
823                                                                        $jobs[$jobid][$toganame][] = $node;
824                                                                }
825                                                        }
826
827                                                }
828                                                else if( $jobs[$jobid][status] == 'Q' )
829                                                {
830                                                        $jobs[$jobid][$toganame] = $togavalue;
831                                                }
832                                        }
833                                        else
834                                        {
835                                                $jobs[$jobid][$toganame] = $togavalue;
836                                        }
837                                }
838
839                                if( isset( $jobs[$jobid][nodes] ) )
840                                {
841                                        $nr_nodes = count( $jobs[$jobid][nodes] );
842               
843                                        if( $jobs[$jobid][status] == 'R' )
844                                        {
845                                                if( isset( $jobs[$jobid][domain] ) )
846                                                {
847                                                        $domain         = $jobs[$jobid][domain];
848                                                }
849                                                $job_nodes      = array();
850
851                                                foreach( $jobs[$jobid][nodes] as $node )
852                                                {
853                                                        // Only add domain name to the hostname if Ganglia is doing that too
854                                                        //
855                                                        $host   = $this->makeHostname( $node, $domain );
856
857                                                        if( !isset( $nodes[$host] ) )
858                                                        {
859                                                                $my_node = new NodeImage( $this->proc_cluster, $host );
860                                                        }
861                                                        else
862                                                        {
863                                                                $my_node = $nodes[$host];
864                                                        }
865
866                                                        if( !$my_node->hasJob( $jobid ) )
867                                                        {
868                                                                if( isset( $jobs[$jobid][ppn] ) )
869                                                                {
870                                                                        $my_node->addJob( $jobid, ((int) $jobs[$jobid][ppn]) );
871                                                                }
872                                                                else
873                                                                {
874                                                                        $my_node->addJob( $jobid, 1 );
875                                                                }
876                                                        }
877
878                                                        $nodes[$host]   = $my_node;
879                                                        $job_nodes[]    = $host;
880                                                }
881                                                $jobs[$jobid][nodes]    = $job_nodes;
882                                        }
883                                }
884                        }
885                }
886                $this->jobs     = $jobs;
887                $this->nodes    = $nodes;
888        }
889
890        function stopElement( $parser, $name )
891        {
892                $nodes  = $this->nodes;
893
894                if( $name == "GANGLIA_XML" )
895                {
896                        if( sizeof( $this->down_nodes ) > 0 )
897                        {
898                                foreach( $this->down_nodes as $reported => $dnodes )
899                                {
900                                        if( $reported == $this->heartbeat['time'] )
901                                        {
902                                                $domain = $dnodes[1];
903
904                                                foreach( $dnodes[0] as $downhost )
905                                                {
906                                                        $downhost = $this->makeHostname( $downhost, $domain );
907
908                                                        if( isset( $nodes[$downhost] ) )
909                                                        {
910                                                                // OMG PHP4 is fking stupid!
911                                                                // $nodes[$downhost]->setDown( 1 ) won't work here..
912                                                                //
913                                                                $mynode = $nodes[$downhost];
914                                                                $mynode->setDown( 1 );
915                                                                $nodes[$downhost] = $mynode;
916                                                        }
917                                                }
918                                        }
919                                }
920                        }
921
922                        if( sizeof( $this->offline_nodes ) > 0 )
923                        {
924                                foreach( $this->offline_nodes as $reported => $onodes )
925                                {
926                                        if( $reported == $this->heartbeat['time'] )
927                                        {
928                                                $domain = $onodes[1];
929
930                                                foreach( $onodes[0] as $offlinehost )
931                                                {
932                                                        $offlinehost = $this->makeHostname( $offlinehost, $domain );
933
934                                                        if( isset( $nodes[$offlinehost] ) )
935                                                        {
936                                                                // OMG PHP4 is fking stupid!
937                                                                // $nodes[$offlinehost]->setDown( 1 ) won't work here..
938                                                                //
939                                                                $mynode = $nodes[$offlinehost];
940                                                                $mynode->setOffline( 1 );
941                                                                $nodes[$offlinehost] = $mynode;
942                                                        }
943                                                }
944                                        }
945                                }
946                        }
947                }
948
949                $this->nodes = $nodes;
950        }
951
952        function printInfo()
953        {
954                $jobs = &$this->jobs;
955
956                printf( "---jobs---\n" );
957
958                foreach( $jobs as $jobid => $job )
959                {
960                        printf( "job %s\n", $jobid );
961
962                        if( isset( $job[nodes] ) )
963                        {
964                                foreach( $job[nodes] as $node )
965                                {
966                                        $mynode = $this->nodes[$node];
967                                        $hostname = $mynode->getHostname();
968                                        $location = $mynode->getLocation();
969
970                                        printf( "\t- node %s\tlocation %s\n", $hostname, $location );
971                                }
972                        }
973                }
974
975                printf( "---nodes---\n" );
976
977                $nodes = &$this->nodes;
978
979                foreach( $nodes as $node )
980                {
981                        $hostname = $node->getHostname();
982                        $location = $node->getLocation();
983                        $jobs = implode( ' ', $node->getJobs() );
984                        printf( "* node %s\tlocation %s\tjobs %s\n", $hostname, $location, $jobs );
985                }
986        }
987
988        function getNodes()
989        {
990                return $this->nodes;
991        }
992
993        function getNode( $node )
994        {
995                $nodes = &$this->nodes;
996
997                if( isset( $nodes[$node] ) )
998                {
999                        return $nodes[$node];
1000                }
1001                else
1002                {
1003                        return NULL;
1004                }
1005        }
1006
1007        function getJobs()
1008        {
1009                return $this->jobs;
1010        }
1011
1012        function getJob( $job )
1013        {
1014                $jobs = &$this->jobs;
1015
1016                if( isset( $jobs[$job] ) )
1017                {
1018                        return $jobs[$job];
1019                }
1020                else
1021                {
1022                        return NULL;
1023                }
1024        }
1025
1026        function getHeartbeat()
1027        {
1028                return $this->heartbeat['time'];
1029        }
1030}
1031
1032class NodeImage
1033{
1034        var $image, $x, $y, $hostname, $jobs, $tasks, $showinfo;
1035
1036        function NodeImage( $cluster, $hostname )
1037        {
1038                global $SMALL_CLUSTERIMAGE_NODEWIDTH;
1039
1040                $this->jobs             = array();
1041                $this->tasks            = 0;
1042                $this->hostname         = $hostname;
1043                $this->cpus             = $this->determineCpus();
1044                $this->clustername      = $cluster;
1045                $this->showinfo         = 1;
1046                $this->size             = $SMALL_CLUSTERIMAGE_NODEWIDTH;
1047                $this->down             = 0;
1048                $this->offline          = 0;
1049        }
1050
1051        function addJob( $jobid, $cpus )
1052        {
1053                $jobs           = &$this->jobs;
1054                $jobs[]         = $jobid;
1055                $this->jobs     = $jobs;
1056
1057                $this->addTask( $cpus );
1058        }
1059
1060        function hasJob( $jobid )
1061        {
1062                $jobfound = 0;
1063
1064                if( count( $this->jobs ) > 0 )
1065                {
1066                        foreach( $this->jobs as $job )
1067                        {
1068                                if( $job == $jobid )
1069                                {
1070                                        $jobfound = 1;
1071                                }
1072                        }
1073                }
1074
1075                return $jobfound;
1076        }
1077
1078        function addTask( $cpus )
1079        {
1080                $this->tasks = $this->tasks + $cpus;
1081        }
1082        function setDown( $down )
1083        {
1084                $this->down = $down;
1085        }
1086        function isDown()
1087        {
1088                return $this->down;
1089        }
1090        function setOffline( $offline )
1091        {
1092                $this->offline = $offline;
1093        }
1094        function isOffline()
1095        {
1096                return $this->offline;
1097        }
1098        function setImage( $image )
1099        {
1100                $this->image = $image;
1101        }
1102        function setCoords( $x, $y )
1103        {
1104                $this->x = $x;
1105                $this->y = $y;
1106        }
1107        function getX()
1108        {
1109                return $this->x;
1110        }
1111        function getY()
1112        {
1113                return $this->y;
1114        }
1115
1116        function getImagemapArea()
1117        {
1118                $area_topleft           = $this->x . "," . $this->y;
1119                $area_bottomright       = ($this->x + $this->size) . "," . ($this->y + $this->size);
1120                $area_coords            = $area_topleft . "," . $area_bottomright;
1121
1122                $area_href              = "./?c=" . $this->clustername . "&h=" . $this->hostname;
1123
1124                $area_tooltip           = $this->hostname;
1125                $area_onclick           = "return ClusterImageSelectHost( '" . $this->hostname . "' )";
1126
1127                if( $this->down)
1128                {
1129                        $area_tooltip           = $area_tooltip . ": DOWN";
1130                }
1131                else if( $this->offline )
1132                {
1133                        $area_tooltip           = $area_tooltip . ": OFFLINE";
1134                }
1135
1136                $area_tooltip           = $area_tooltip . ": " . implode( " ", $this->jobs );
1137
1138                $tag_onclick            = "ONCLICK=\"" . $area_onclick . "\"";
1139                $tag_href               = "HREF=\"" . $area_href . "\"";
1140                $tag_coords             = "COORDS=\"" . $area_coords . "\"";
1141                $tag_tooltip1           = "ALT=\"" . $area_tooltip . "\"";
1142                $tag_tooltip2           = "TITLE=\"" . $area_tooltip . "\"";
1143
1144                return ("<AREA SHAPE=\"RECT\" " . $tag_coords . " " . $tag_onclick . " " . $tag_href . " " . $tag_tooltip1 . " " . $tag_tooltip2 . ">");
1145        }
1146
1147        function colorHex( $color )
1148        {
1149                $my_color = imageColorAllocate( $this->image, hexdec( substr( $color, 0, 2 )), hexdec( substr( $color, 2, 2 )), hexdec( substr( $color, 4, 2 )) );
1150
1151                return $my_color;
1152        }
1153
1154        function setLoad( $load )
1155        {
1156                $this->load = $load;
1157        }
1158
1159        function setHostname( $hostname )
1160        {
1161                $this->hostname = $hostname;
1162        }
1163
1164        function getHostname()
1165        {
1166                return $this->hostname;
1167        }
1168
1169        function getJobs()
1170        {
1171                return $this->jobs;
1172        }
1173
1174        function setShowinfo( $showinfo )
1175        {
1176                $this->showinfo = $showinfo;
1177        }
1178
1179        function drawSmall()
1180        {
1181                global $SMALL_CLUSTERIMAGE_NODEWIDTH;
1182
1183                $this->size     = $SMALL_CLUSTERIMAGE_NODEWIDTH;
1184
1185                $this->draw();
1186        }
1187
1188        function drawBig()
1189        {
1190                global $BIG_CLUSTERIMAGE_NODEWIDTH;
1191
1192                $this->size     = $BIG_CLUSTERIMAGE_NODEWIDTH;
1193
1194                $this->draw();
1195        }
1196
1197        function draw()
1198        {
1199                global $JOB_NODE_MARKING, $NODE_DOWN_MARKING, $NODE_OFFLINE_MARKING;
1200
1201                $black_color = imageColorAllocate( $this->image, 0, 0, 0 );
1202                $size = $this->size;
1203
1204                imageFilledRectangle( $this->image, $this->x, $this->y, $this->x+($size), $this->y+($size), $black_color );
1205
1206                if( $this->showinfo)
1207                {
1208                        $this->load = $this->determineLoad();
1209
1210                        if( !isset( $this->image ) or !isset( $this->x ) or !isset( $this->y ) )
1211                        {
1212                                printf( "aborting\n" );
1213                                printf( "x %d y %d load %f\n", $this->x, $this->y, $load );
1214                                return;
1215                        }
1216
1217                        // Convert Ganglias Hexadecimal load color to a Decimal one
1218                        //
1219                        $load = $this->determineLoad(); 
1220                        $usecolor = $this->colorHex( load_color($load) );
1221                        imageFilledRectangle( $this->image, $this->x+1, $this->y+1, $this->x+($size-1), $this->y+($size-1), $usecolor );
1222                        if( $this->down )
1223                        {
1224                                imageString( $this->image, 1, $this->x+(($size/2)-1), $this->y+(($size/2)-4), $NODE_DOWN_MARKING, $black_color );
1225                        }
1226                        else if( $this->offline )
1227                        {
1228                                imageString( $this->image, 1, $this->x+(($size/2)-1), $this->y+(($size/2)-4), $NODE_OFFLINE_MARKING, $black_color );
1229                        }
1230                        else if( count( $this->jobs ) > 0 )
1231                        {
1232                                imageString( $this->image, 1, $this->x+(($size/2)-1), $this->y+(($size/2)-4), $JOB_NODE_MARKING, $black_color );
1233                        }
1234                }
1235                else
1236                {
1237                        // White
1238                        $usecolor = imageColorAllocate( $this->image, 255, 255, 255 );
1239                        imageFilledRectangle( $this->image, $this->x+1, $this->y+1, $this->x+($size-1), $this->y+($size-1), $usecolor );
1240                }
1241        }
1242
1243        function determineCpus()
1244        {
1245                global $metrics;
1246
1247                $cpus = $metrics[$this->hostname][cpu_num][VAL];
1248
1249                if (!$cpus)
1250                {
1251                        $cpus=1;
1252                }
1253
1254                return $cpus;
1255        }
1256
1257        function determineLoad()
1258        {
1259                global $metrics;
1260
1261                $load_one       = $metrics[$this->hostname][load_one][VAL];
1262                $load           = ((float) $load_one)/$this->cpus;
1263
1264                return $load;
1265        }
1266}
1267
1268class ClusterImage
1269{
1270        var $dataget, $image, $clustername;
1271        var $filtername, $filters;
1272
1273        function ClusterImage( $data, $clustername )
1274        {
1275                $this->dataget          = new DataGatherer( $clustername );
1276                $this->data             = $data;
1277                $this->clustername      = $clustername;
1278                $this->filters          = array();
1279                $this->size             = 's';
1280                $this->width            = 0;
1281                $this->height           = 0;
1282                $this->output           = 1;
1283        }
1284
1285        function getWidth()
1286        {
1287                return $this->width;
1288        }
1289        function getHeight()
1290        {
1291                return $this->height;
1292        }
1293        function setSmall()
1294        {
1295                $this->size     = 's';
1296        }
1297        function setBig()
1298        {
1299                $this->size     = 'b';
1300        }
1301        function setNoimage()
1302        {
1303                $this->output   = 0;
1304        }
1305        function isSmall()
1306        {
1307                return ($this->size == 's');
1308        }
1309        function isBig()
1310        {
1311                return ($this->size == 'b');
1312        }
1313        function setFilter( $filtername, $filtervalue )
1314        {
1315                $this->filters[$filtername] = $filtervalue;
1316        }
1317
1318        function filterNodes( $jobs, $nodes )
1319        {
1320                $filtered_nodes = array();
1321
1322                foreach( $nodes as $node )
1323                {
1324                        $hostname = $node->getHostname();
1325
1326                        $addhost = 1;
1327
1328                        if( count( $this->filters ) > 0 )
1329                        {
1330                                $mynjobs = $node->getJobs();
1331
1332                                if( count( $mynjobs ) > 0 )
1333                                {
1334                                        foreach( $mynjobs as $myjob )
1335                                        {
1336                                                foreach( $this->filters as $filtername => $filtervalue )
1337                                                {
1338                                                        if( $filtername!=null && $filtername!='' )
1339                                                        {
1340                                                                if( $filtername == 'jobid' && !$node->hasJob( $filtervalue) )
1341                                                                {
1342                                                                        $addhost = 0;
1343                                                                }
1344                                                                if( $filtername == 'host' && $hostname != $filtervalue )
1345                                                                {
1346                                                                        $addhost = 0;
1347                                                                }
1348                                                                if( $filtername != 'jobid' && $filtername != 'host' ) 
1349                                                                {
1350                                                                        //if( $filtername == 'owner' )
1351                                                                        //{
1352                                                                        //      printf( "%s ?= %s\n", $jobs[$myjob][$filtername], $filtervalue );
1353                                                                        //}
1354                                                                        if( $jobs[$myjob][$filtername] == $filtervalue )
1355                                                                        {
1356                                                                                $addhost = 1;
1357                                                                                continue;
1358                                                                        }
1359                                                                        else if( $jobs[$myjob][$filtername] != $filtervalue )
1360                                                                        {
1361                                                                                $addhost = 0;
1362                                                                        //      printf( "vergeet host\n" );
1363                                                                        }
1364                                                                }
1365                                                        }
1366                                                }
1367                                        }
1368                                }
1369                                else
1370                                {
1371                                        $addhost = 0;
1372                                }
1373                        }
1374
1375                        if( $addhost )
1376                        {
1377                                $filtered_nodes[] = $hostname;
1378                        }
1379                }
1380
1381                return $filtered_nodes;
1382        }
1383
1384        function draw()
1385        {
1386                global $SMALL_CLUSTERIMAGE_MAXWIDTH, $SMALL_CLUSTERIMAGE_NODEWIDTH;
1387                global $BIG_CLUSTERIMAGE_MAXWIDTH, $BIG_CLUSTERIMAGE_NODEWIDTH;
1388                global $CLUSTER_CONFS, $confcluster, $SHOW_EMPTY_COLUMN, $SHOW_EMPTY_ROW;
1389
1390                global $SORTBY_HOSTNAME, $SORT_ORDER, $skan_str;
1391                global $x_first, $y_first;
1392
1393                foreach( $CLUSTER_CONFS as $confcluster => $conffile )
1394                {
1395                        if( strtolower( trim($this->clustername) ) == strtolower(trim($confcluster)) )
1396                        {
1397                                include_once $conffile;
1398                        }
1399                }
1400
1401                $mydatag = $this->dataget;
1402                $mydatag->parseXML( $this->data );
1403
1404                if( $this->isSmall() )
1405                {
1406                        $max_width      = $SMALL_CLUSTERIMAGE_MAXWIDTH;
1407                        $node_width     = $SMALL_CLUSTERIMAGE_NODEWIDTH;
1408                }
1409                else if( $this->isBig() )
1410                {
1411                        $max_width      = $BIG_CLUSTERIMAGE_MAXWIDTH;
1412                        $node_width     = $BIG_CLUSTERIMAGE_NODEWIDTH;
1413                }
1414
1415                $nodes          = $mydatag->getNodes();
1416                $nodes_hosts    = array_keys( $nodes );
1417
1418                $nodes_nr       = count( $nodes );
1419
1420                $nodes_size     = $nodes_nr*$node_width;
1421                $node_rows      = 0;
1422
1423                if( $nodes_size > $max_width )
1424                {
1425                        $nodes_per_row = ( (int) ($max_width/$node_width) );
1426                }
1427                else
1428                {
1429                        $nodes_per_row = $nodes_size;
1430                        $node_rows = 1;
1431                }
1432
1433                if( $nodes_per_row < $nodes_nr )
1434                {
1435                        $node_rows = ( (int) ($nodes_nr/$nodes_per_row) );
1436                        $node_rest = fmod( $nodes_nr, $nodes_per_row );
1437
1438                        if( $node_rest > 0 )
1439                        {
1440                                $node_rows++;
1441                        }
1442                }
1443
1444                $y_offset       = 0;
1445                $font           = 2;
1446                $fontwidth      = ImageFontWidth( $font );
1447                $fontheight     = ImageFontHeight( $font );
1448                $fontspaceing   = 2;
1449                $y_offset       = $fontheight + (2 * $fontspaceing);
1450
1451                $this->width    = $max_width;
1452                $this->height   = ($y_offset + (($node_rows*$node_width)+1) );
1453
1454                $jobs = $mydatag->getJobs();
1455                $filtered_nodes = $this->filterNodes( $jobs, $nodes );
1456
1457                if( $SORTBY_HOSTNAME != "" )
1458                {
1459                        $sorted         = array();
1460
1461                        $x_first        = 0;
1462                        $y_first        = 0;
1463
1464                        $skan_str       = $SORTBY_HOSTNAME;
1465
1466                        global $x_present, $y_present;
1467                        $x_present      = false;
1468                        $y_present      = false;
1469
1470                        // Should we scan by X, Y or both
1471                        //
1472                        if(strpos( $SORTBY_HOSTNAME, "{x}" ) != false )
1473                        {
1474                                $x_str          = "{x}";
1475                                $x_present      = true;
1476                        }
1477                        else if(strpos( $SORTBY_HOSTNAME, "{X}" ) != false )
1478                        {
1479                                $x_str          = "{X}";
1480                                $x_present      = true;
1481                        }
1482                        if(strpos( $SORTBY_HOSTNAME, "{y}" ) != false )
1483                        {
1484                                $y_str          = "{y}";
1485                                $y_present      = true;
1486                        }
1487                        else if(strpos( $SORTBY_HOSTNAME, "{Y}" ) != false )
1488                        {
1489                                $y_str          = "{Y}";
1490                                $y_present      = true;
1491                        }
1492
1493                        // If we should scan for both X and Y: see which one is first
1494                        //
1495                        if(( strpos( $SORTBY_HOSTNAME, $x_str ) < strpos( $SORTBY_HOSTNAME, $y_str ) ) && ( $x_present && $y_present ))
1496                        {
1497                                $x_first        = 1;
1498                        }
1499                        else if(( strpos( $SORTBY_HOSTNAME, $x_str ) > strpos( $SORTBY_HOSTNAME, $y_str ) ) && ( $x_present && $y_present ))
1500                        {
1501                                $y_first        = 1;
1502               
1503                        }
1504                        else if( $x_present )
1505                        {
1506                                $x_first        = 1;
1507                        }
1508                        else if( $y_present )
1509                        {
1510                                $y_first        = 1;
1511                        }
1512
1513                        // Now replace our {x} and {y} with %d for sscanf parsing
1514                        //
1515                        if(( $x_first ) && ( $x_present && $y_present ) )
1516                        {
1517                                $skan_str       = str_replace( $x_str, "%d", $skan_str );
1518                                $skan_str       = str_replace( $y_str, "%d", $skan_str );
1519                        } 
1520                        else if( $x_present)
1521                        {
1522                                $skan_str       = str_replace( $x_str, "%d", $skan_str );
1523                        }
1524                        else if( $y_present)
1525                        {
1526                                $skan_str       = str_replace( $y_str, "%d", $skan_str );
1527                        }
1528
1529                        $x_min          = null;
1530                        $x_max          = null;
1531                        $y_min          = null;
1532                        $y_max          = null;
1533
1534                        $x_columns      = array();
1535                        $y_rows         = array();
1536
1537                        // Now let's walk through all our nodes and see which one are valid for our scan pattern
1538                        //
1539                        foreach( $nodes as $hostname => $node )
1540                        {
1541                                $x      = null;
1542                                $y      = null;
1543
1544                                if( $x_present && $y_present )
1545                                {
1546                                        if( $x_first )
1547                                        {
1548                                                $n = sscanf( $hostname, $skan_str, $x, $y );
1549                                        }
1550                                        else if( $y_first )
1551                                        {
1552                                                $n = sscanf( $hostname, $skan_str, $y, $x );
1553                                        }
1554
1555                                        // Remove nodes that don't match
1556                                        //
1557                                        if( $n < 2 )
1558                                        {
1559                                                // This node hostname has no match for: {x} and {y}
1560                                                //
1561                                                unset( $nodes[$hostname] );
1562                                        }
1563                                }
1564                                else if( $x_present && !$y_present )
1565                                {
1566                                        $n = sscanf( $hostname, $skan_str, $x );
1567
1568                                        // Remove nodes that don't match
1569                                        //
1570                                        if( $n < 1 )
1571                                        {
1572                                                // This node hostname has no match for: {x}
1573                                                //
1574                                                unset( $nodes[$hostname] );
1575                                        }
1576                                        $y      = 1;
1577                                }
1578                                else if( $y_present && !$x_present )
1579                                {
1580                                        $n = sscanf( $hostname, $skan_str, $y );
1581
1582                                        // Remove nodes that don't match
1583                                        //
1584                                        if( $n < 1 )
1585                                        {
1586                                                // This node hostname has no match for: {y}
1587                                                //
1588                                                unset( $nodes[$hostname] );
1589                                        }
1590                                        $x      = 1;
1591                                }
1592
1593                                // Determine the lowest value of {x} that exists in all node hostnames
1594                                //
1595                                if( !$x_min && $x != null )
1596                                {
1597                                        $x_min  = $x;
1598                                }
1599                                else if( $x < $x_min && $x != null )
1600                                {
1601                                        $x_min  = $x;
1602                                }
1603
1604                                // Determine the highest value of {x} that exists in all node hostnames
1605                                //
1606                                if( !$x_max && $x != null )
1607                                {
1608                                        $x_max  = $x;
1609                                }
1610                                else if( $x > $x_max && $x != null )
1611                                {
1612                                        $x_max  = $x;
1613                                }
1614
1615                                // Determine the lowest value of {y} that exists in all node hostnames
1616                                //
1617                                if( !$y_min && $y != null )
1618                                {
1619                                        $y_min  = $y;
1620                                }
1621                                else if( $y < $y_min && $y != null )
1622                                {
1623                                        $y_min  = $y;
1624                                }
1625
1626                                // Determine the highest value of {y} that exists in all node hostnames
1627                                //
1628                                if( !$y_max && $y != null )
1629                                {
1630                                        $y_max  = $y;
1631                                }
1632                                else if( $y > $y_max && $y != null )
1633                                {
1634                                        $y_max  = $y;
1635                                }
1636
1637                                // Store which non-empty columns and rows we found
1638                                //
1639                                if( !in_array( $x, $x_columns ) )
1640                                {
1641                                        $x_columns[] = $x;
1642                                }
1643                                if( !in_array( $y, $y_rows ) )
1644                                {
1645                                        $y_rows[] = $y;
1646                                }
1647                        }
1648
1649                        // Sort all the nodes (alpha and numerically)
1650                        // 1: gb-r1n1, 2: gb-r1n2, 3: gb-r2n1, etc
1651                        //
1652                        $sorted_nodes   = usort( $nodes, "cmp" );
1653
1654                        //print_r( $x_columns ) ;
1655
1656                        $cur_node       = 0;
1657
1658                        $x_offset       = 0;
1659                        $y_offset       = 0;
1660                        $font           = 2;
1661                        $fontwidth      = ImageFontWidth( $font );
1662                        $fontheight     = ImageFontHeight( $font );
1663                        $fontspaceing   = 2;
1664
1665                        if( $this->isSmall() ) 
1666                        {
1667                                $y_offset       = $y_offset + (2 * $fontspaceing) + $fontheight;
1668                        }
1669
1670                        if( $this->isBig() ) 
1671                        {
1672                                $y_offset       = ($fontheight * (1 + strlen( $x_max) ) ) + ((2 + strlen( $x_max)) * $fontspaceing);
1673                                $x_offset       = ($fontwidth * (1 + strlen( $y_max) ) ) + ((2 + strlen( $y_max)) * $fontspaceing);
1674                        }
1675
1676                        $image_width    = $x_offset + ($node_width * ($x_max-$x_min+2));
1677
1678                        if( $this->isSmall() ) 
1679                        {
1680                                $image_width    = $max_width;
1681                        }
1682                        else if( $this->isBig() ) 
1683                        {
1684                                $image_width    = ($image_width < $max_width) ? $image_width : $max_width;
1685                        }
1686                        $image_height   = $y_offset + ($node_width * ($y_max-$y_min+2));
1687
1688                        $this->width    = $image_width;
1689                        $this->heigth   = $image_heigth;
1690
1691                        $image          = imageCreateTrueColor( $image_width, $image_height );
1692                        $colorwhite     = imageColorAllocate( $image, 255, 255, 255 );
1693
1694                        imageFill( $image, 0, 0, $colorwhite );
1695
1696                        if( $this->isSmall() )
1697                        {
1698                                // Draw a fancy little header text to explain what it is
1699                                //
1700                                $colorblue      = imageColorAllocate( $image, 0, 0, 255 );
1701
1702                                imageString( $image, $font, 2, 2, "Monarch Joblist - cluster: ".$this->clustername, $colorblue );
1703                        }
1704
1705                        if( $this->isBig() && ( isset( $SORT_XLABEL ) || isset( $SORT_YLABEL ) ) )
1706                        {
1707                                $colorblue      = imageColorAllocate( $image, 0, 0, 255 );
1708
1709                                if( isset( $SORT_XLABEL ) )
1710                                {
1711                                        // Print the {x} label: rack
1712                                        //
1713                                        imageString( $image, $font, $x_offset, $fontspaceing, $SORT_XLABEL, $colorblue );
1714                                }
1715
1716                                if( isset( $SORT_YLABEL ) )
1717                                {
1718                                        // Stupid php without imageStringDown function... we'll make one ourself
1719                                        //
1720
1721                                        // Print the {y} label: node
1722                                        //
1723                                        imageStringDown( $image, $font, $fontspaceing, $y_offset, $SORT_YLABEL, $colorblue );
1724                                }
1725                        }
1726
1727                        $previous_n     = 0;
1728                        $previous_m     = 0;
1729                        $x_empty_count  = 0;
1730                        $y_empty_count  = 0;
1731
1732                        // Let's start assigning x,y coordinates now
1733                        //
1734                        for( $n = $x_min; $n <= $x_max; $n++ )
1735                        {
1736                                for( $m = $y_min; $m <= $y_max; $m++ )
1737                                {
1738                                        if( $x_min > 0 )
1739                                        {
1740                                                $x      = $x_offset + ( ($n-$x_min) * $node_width ) - ($x_empty_count * $node_width);
1741                                        }
1742                                        if( $y_min > 0 )
1743                                        {
1744                                                $y      = $y_offset + ( ($m-$y_min) * $node_width ) - ($y_empty_count * $node_width);
1745                                        }
1746
1747                                        // Don't show empty rows/columns if option enabled
1748                                        //
1749                                        if( !in_array( $n, $x_columns ) && !$SHOW_EMPTY_COLUMN )
1750                                        {
1751                                                // Skip to next iteration: we don't want a empty column
1752                                                //
1753                                                if( $n > $previous_n )
1754                                                {
1755                                                        $previous_n = $n;
1756                                                        $x_empty_count++;
1757                                                }
1758                                                continue;
1759                                        }
1760                                        if( !in_array( $m, $y_rows ) && !$SHOW_EMPTY_ROW )
1761
1762                                        {
1763                                                // Skip to next iteration: we don't want a empty column
1764                                                //
1765                                                if( $m > $previous_m )
1766                                                {
1767                                                        $previous_m = $m;
1768                                                        $y_empty_count++;
1769                                                }
1770                                                continue;
1771                                        }
1772
1773                                        if( $this->isBig() ) 
1774                                        {
1775                                                // Draw y(node) column number header
1776                                                //
1777                                                if(( $n == $x_min ) && ( isset($SORT_YLABEL) ) )
1778                                                {
1779                                                        $mfontspacing   = 1;
1780
1781                                                        $ylabel_x       = $x - ( $fontwidth * strlen( $y_max ) ) - $mfontspacing;
1782                                                        $ylabel_y       = $y;
1783
1784                                                        imageString( $image, $font, $ylabel_x, $ylabel_y, strval( $m ), $colorblue );
1785
1786                                                        $xmin_hit[$n]   = true;
1787                                                }
1788
1789                                                // Draw x(rack) column number header
1790                                                //
1791                                                if(( $m == $y_min ) && ( isset($SORT_XLABEL) ) )
1792                                                {
1793                                                        $mfontspacing   = 2;
1794                                                        $xlabel_y       = $y - ( $fontheight * strlen( $x_max ) );
1795                                                        $xlabel_x       = $x + $mfontspacing; 
1796
1797                                                        imageStringDown( $image, $font, $xlabel_x, $xlabel_y, strval( $n ), $colorblue );
1798                                                }
1799                                        }
1800
1801                                        if( isset( $nodes[$cur_node] ) ) 
1802                                        {
1803                                                $host   = $nodes[$cur_node]->getHostname();
1804
1805                                                if( $x_present && $y_present )
1806                                                {
1807                                                        if( $x_first )
1808                                                        {
1809                                                                $nn = sscanf( $host, $skan_str, $rx, $ry );
1810                                                        }
1811                                                        else if( $y_first )
1812                                                        {
1813                                                                $nn = sscanf( $host, $skan_str, $ry, $rx );
1814                                                        }
1815                                                        if ( $nn < 2 )
1816                                                        {
1817                                                                //printf( "skipping node %s - y present & x present + <2 x,y matchs\n", $host);
1818                                                                continue;
1819                                                        }
1820                                                        if( intval( $rx ) > $n )
1821                                                        {
1822                                                                // If x(rack) is higher than current x, skip to next x(rack)
1823                                                                //
1824                                                                $m              = $y_max + 1;
1825
1826                                                                continue;
1827                                                        }
1828                                                        if( intval( $ry ) > $m )
1829                                                        {
1830                                                                // If y(node) is higher than current y, skip to next y(node)
1831                                                                //
1832                                                                continue;
1833                                                        }
1834                                                }
1835                                                else if( $x_present )
1836                                                {
1837                                                        $nn = sscanf( $host, $skan_str, $rx );
1838                                                }
1839                                                else if( $y_present )
1840                                                {
1841                                                        $nn = sscanf( $host, $skan_str, $ry );
1842                                                }
1843
1844                                                if( !in_array( $host, $filtered_nodes ) )
1845                                                {
1846                                                        // This node has been filtered out: we only want to see certain nodes
1847                                                        //
1848                                                        $nodes[$cur_node]->setShowinfo( 0 );
1849                                                }
1850
1851                                                $nodes[$cur_node]->setCoords( $x, $y );
1852                                                $nodes[$cur_node]->setImage( $image );
1853
1854                                                if( $this->isSmall() )
1855                                                {
1856                                                        $nodes[$cur_node]->drawSmall();
1857                                                }
1858                                                else if( $this->isBig() )
1859                                                {
1860                                                        $nodes[$cur_node]->drawBig();
1861                                                }
1862
1863                                                $cur_node++;
1864                                        }
1865                                }
1866                        }
1867
1868                }
1869                else
1870                {
1871                        if( $this->isSmall() )
1872                        {
1873                                $image          = imageCreateTrueColor( $max_width, ($y_offset + (($node_rows*$node_width)+1) ) );
1874                        }
1875                        else if( $this->isBig() )
1876                        {
1877                                $image_width    = ($node_width * $nodes_nr) + 2;
1878                                $image_width    = ($image_width < $max_width) ? $image_width : $max_width;
1879                                $image          = imageCreateTrueColor( $image_width, ($y_offset + (($node_rows*$node_width)+1) ) );
1880                        }
1881                        $colorwhite     = imageColorAllocate( $image, 255, 255, 255 );
1882
1883                        imageFill( $image, 0, 0, $colorwhite );
1884
1885                        if( $this->isSmall() )
1886                        {
1887                                $colorblue      = imageColorAllocate( $image, 0, 0, 255 );
1888
1889                                imageString( $image, $font, 2, 2, "Monarch Joblist - cluster: ".$this->clustername, $colorblue );
1890                        }
1891
1892                        for( $n = 0; $n < $node_rows; $n++ )
1893                        {
1894                                for( $m = 0; $m < $nodes_per_row; $m++ )
1895                                {
1896                                        $x = ($m * $node_width);
1897                                        $y = $y_offset + ($n * $node_width);
1898
1899                                        $cur_node = ($n * $nodes_per_row) + ($m);
1900                                        $host = $nodes_hosts[$cur_node];
1901
1902                                        if( isset( $nodes[$host] ) )
1903                                        {
1904                                                $nodes[$host]->setCoords( $x, $y );
1905                                                $nodes[$host]->setImage( $image );
1906
1907                                                if( !in_array( $host, $filtered_nodes ) )
1908                                                {
1909                                                        $nodes[$host]->setShowinfo( 0 );
1910                                                }
1911
1912                                                if( $this->isSmall() )
1913                                                {
1914                                                        $nodes[$host]->drawSmall();
1915                                                }
1916                                                else if( $this->isBig() )
1917                                                {
1918                                                        $nodes[$host]->drawBig();
1919                                                }
1920                                        }
1921                                }
1922                        }
1923                }
1924       
1925                $this->nodes    = &$nodes;
1926
1927                if ($this->output)
1928                {
1929                        header( 'Content-type: image/png' );
1930                        imagePNG( $image );
1931                        imageDestroy( $image );
1932                }
1933        }
1934
1935        function getImagemapArea()
1936        {
1937                $clusterimage_map       = "";
1938
1939                foreach( $this->nodes as $hostname => $node )
1940                {
1941                        $node_map               = $node->getImagemapArea();
1942                        $clusterimage_map       .= $node_map;
1943                }
1944
1945                return $clusterimage_map;
1946        }
1947}
1948
1949class EmptyImage
1950{
1951        function draw()
1952        {
1953                $image          = imageCreateTrueColor( 1, 1 );
1954                $colorwhite     = imageColorAllocate( $image, 255, 255, 255 );
1955                imageFill( $image, 0, 0, $colorwhite );                         
1956
1957                header( 'Content-type: image/png' );
1958                imagePNG( $image );
1959                imageDestroy( $image );
1960        }
1961}
1962
1963class HostImage
1964{
1965        var $data_gather, $cluster, $host, $node, $image;
1966        var $headerstrlen;
1967
1968        function HostImage( $data_gather, $cluster, $host )
1969        {
1970                $this->data_gather      = $data_gather;
1971                $this->cluster          = $cluster;
1972                $this->host             = $host;
1973                $this->y_offset         = 0;
1974                $this->font             = 2;
1975                $this->fontspaceing     = 2;
1976                $this->headerstrlen     = array();
1977
1978                $this->fontheight       = ImageFontHeight( $this->font );
1979                $this->fontwidth        = ImageFontWidth( $this->font );
1980
1981                $dg                     = &$this->data_gather;
1982                $this->node             = &$dg->getNode( $this->host );
1983                $n                      = &$this->node;
1984                $this->njobs            = $n->getJobs();
1985        }
1986
1987        function drawJobs()
1988        {
1989                $dg                     = &$this->data_gather;
1990                $colorblack             = imageColorAllocate( $this->image, 0, 0, 0 );
1991
1992                for( $n = 0; $n < count( $this->njobs ); $n++ )
1993                {
1994                        $jobid                  = $this->njobs[$n];
1995                        $jobinfo                = $dg->getJob( $jobid );
1996
1997                        $xoffset                = 5;
1998                        imageString( $this->image, $this->font, $xoffset, $this->y_offset, strval( $jobid ), $colorblack );
1999
2000                        foreach( $this->headerstrlen as $headername => $headerlen )
2001                        {
2002                                if( $headername == 'nodes' )
2003                                {
2004                                        $attrval        = strval( count( $jobinfo[nodes] ) );
2005                                }
2006                                else if( $headername == 'cpus' )
2007                                {
2008                                        if( !isset( $jobinfo[ppn] ) )
2009                                        {
2010                                                $jobinfo[ppn] = 1;
2011                                        }
2012
2013                                        $attrval        = strval( count( $jobinfo[nodes] ) * intval( $jobinfo[ppn] ) );
2014                                }
2015                                else if( $headername == 'runningtime' )
2016                                {
2017                                        $attrval        = makeTime( intval( $jobinfo[reported] ) - intval( $jobinfo[start_timestamp] ) );
2018                                }
2019                                else
2020                                {
2021                                        $attrval        = strval( $jobinfo[$headername] );
2022                                }
2023
2024                                imageString( $this->image, $this->font, $xoffset, $this->y_offset, $attrval, $colorblack );
2025               
2026                                $xoffset        = $xoffset + ($this->fontwidth * ( $headerlen + 1 ) );
2027                        }
2028                       
2029                        $this->newLineOffset();
2030                }
2031        }
2032
2033        function drawHeader()
2034        {
2035                $dg                     = &$this->data_gather;
2036
2037                for( $n = 0; $n < count( $this->njobs ); $n++ )
2038                {
2039                        $jobid                  = $this->njobs[$n];
2040                        $jobinfo                = $dg->getJob( $jobid );
2041
2042                        if( !isset( $this->headerstrlen[id] ) )
2043                        {
2044                                $this->headerstrlen[id] = strlen( strval( $jobid ) );
2045                        }
2046                        else if( strlen( strval( $jobid ) ) > $this->headerstrlen[id] )
2047                        {
2048                                $this->headerstrlen[id] = strlen( strval( $jobid ) );
2049                        }
2050
2051                        if( !isset( $this->headerstrlen[owner] ) )
2052                        {
2053                                $this->headerstrlen[owner]      = strlen( strval( $jobinfo[owner] ) );
2054                        }
2055                        else if( strlen( strval( $jobinfo[owner] ) ) > $this->headerstrlen[owner] )
2056                        {
2057                                $this->headerstrlen[owner]      = strlen( strval( $jobinfo[owner] ) );
2058                        }
2059
2060                        if( !isset( $this->headerstrlen[queue] ) )
2061                        {
2062                                $this->headerstrlen[queue]      = strlen( strval( $jobinfo[queue] ) );
2063                        }
2064                        else if( strlen( strval( $jobinfo[queue] ) ) > $this->headerstrlen[queue] )
2065                        {
2066                                $this->headerstrlen[queue]      = strlen( strval( $jobinfo[queue] ) );
2067                        }
2068
2069                        if( !isset( $jobinfo[ppn] ) )
2070                        {
2071                                $jobinfo[ppn] = 1;
2072                        }
2073
2074                        $cpus                   = count( $jobinfo[nodes] ) * intval( $jobinfo[ppn] );
2075
2076                        if( !isset( $this->headerstrlen[cpus] ) )
2077                        {
2078                                $this->headerstrlen[cpus]       = strlen( strval( $cpus ) );
2079                        }
2080                        else if( strlen( strval( $cpus ) ) > $this->headerstrlen[cpus] )
2081                        {
2082                                $this->headerstrlen[cpus]       = strlen( strval( $cpus ) );
2083                        }
2084
2085                        $nodes                  = count( $jobinfo[nodes] );
2086
2087                        if( !isset( $this->headerstrlen[nodes] ) )
2088                        {
2089                                $this->headerstrlen[nodes]      = strlen( strval( $nodes ) );
2090                        }
2091                        else if( strlen( strval( $nodes) ) > $this->headerstrlen[nodes] )
2092                        {
2093                                $this->headerstrlen[nodes]      = strlen( strval( $nodes ) );
2094                        }
2095
2096                        $runningtime            = makeTime( intval( $jobinfo[reported] ) - intval( $jobinfo[start_timestamp] ) );
2097
2098                        if( !isset( $this->headerstrlen[runningtime] ) )
2099                        {
2100                                $this->headerstrlen[runningtime]        = strlen( strval( $runningtime) );
2101                        }
2102                        else if( strlen( strval( $runningtime) ) > $this->headerstrlen[runningtime] )
2103                        {
2104                                $this->headerstrlen[runningtime]        = strlen( strval( $runningtime) );
2105                        }
2106
2107                        if( !isset( $this->headerstrlen[name] ) )
2108                        {
2109                                $this->headerstrlen[name]       = strlen( strval( $jobinfo[name] ) );
2110                        }
2111                        else if( strlen( strval( $jobinfo[name] ) ) > $this->headerstrlen[name] )
2112                        {
2113                                $this->headerstrlen[name]       = strlen( strval( $jobinfo[name] ) );
2114                        }
2115                }
2116
2117                $xoffset        = 5;
2118
2119                foreach( $this->headerstrlen as $headername => $headerlen )
2120                {
2121                        $colorgreen     = imageColorAllocate( $this->image, 0, 200, 0 );
2122
2123                        if( $headerlen < strlen( $headername ) )
2124                        {
2125                                $this->headerstrlen[$headername]        = strlen( $headername );
2126                        }
2127
2128                        imageString( $this->image, $this->font, $xoffset, $this->y_offset, ucfirst( $headername ), $colorgreen );
2129
2130                        $xoffset        = $xoffset + ($this->fontwidth * ( $this->headerstrlen[$headername] + 1 ) );
2131                }
2132                $this->newLineOffset();
2133        }
2134
2135        function newLineOffset()
2136        {
2137                $this->y_offset         = $this->y_offset + $this->fontheight + $this->fontspaceing;
2138        }
2139
2140        function draw()
2141        {
2142                $xlen           = 450;
2143                $ylen           = ( count( $this->njobs ) * ( $this->fontheight + $this->fontspaceing ) ) + (3 * $this->fontheight);
2144
2145                $this->image    = imageCreateTrueColor( $xlen, $ylen );
2146                $colorwhite     = imageColorAllocate( $this->image, 255, 255, 255 );
2147                imageFill( $this->image, 0, 0, $colorwhite );                         
2148
2149                $colorblue      = imageColorAllocate( $this->image, 0, 0, 255 );
2150
2151                imageString( $this->image, $this->font, 1, $this->y_offset, "Monarch Joblist - host: ".$this->host, $colorblue );
2152                $this->newLineOffset();
2153
2154                $this->drawHeader();
2155                $this->drawJobs();
2156
2157                header( 'Content-type: image/png' );
2158                imagePNG( $this->image );
2159                imageDestroy( $this->image );
2160        }
2161}
2162
2163function imageStringDown( &$image, $font, $x, $y, &$s, &$col )
2164{
2165        $fw     = imagefontwidth( $font);
2166        $fh     = imagefontheight( $font);
2167       
2168        $fontspacing = 0;
2169
2170        $fx     = $x;
2171        $fy     = $y;
2172
2173        for( $n=0; $n<strlen( $s ); $n++ )
2174        {
2175                $myc    = $s{$n};
2176
2177                imagestring( $image, $font, $fx, $fy, $myc, $col );
2178
2179                $fy     += ($fontspacing + $fh );
2180        }
2181}
2182
2183function array_rem( $val, &$arr )
2184{
2185        // Delete val from arr
2186        //
2187        $i      = array_search( $val, $arr );
2188
2189        if( $i == false ) return false;
2190
2191        $arr    = array_merge( array_slice( $arr, 0, $i ), array_slice( $arr, $i+1, count( $arr ) ) );
2192
2193        return true;
2194}
2195
2196function cmp( $a, $b ) 
2197{
2198        global $SORT_ORDER;
2199        global $skan_str;
2200        global $x_first, $y_first;
2201        global $x_present, $y_present;
2202
2203        $a_node         = $a;
2204        $b_node         = $b;
2205        $a              = $a_node->getHostname();
2206        $b              = $b_node->getHostname();
2207
2208        if( $a == $b ) return 0;
2209
2210        $a_x            = 0;
2211        $b_x            = 0;
2212        $a_y            = 0;
2213        $b_y            = 0;
2214
2215        if( $x_present && $y_present )
2216        {
2217                if( $x_first )
2218                {
2219                        $n = sscanf( $a, $skan_str, $a_x, $a_y );
2220                        $n = sscanf( $b, $skan_str, $b_x, $b_y );
2221                }
2222                else if( $y_first )
2223                {
2224                        $n = sscanf( $a, $skan_str, $a_y, $a_x );
2225                        $n = sscanf( $b, $skan_str, $b_y, $b_x );
2226                }
2227        } 
2228        else if( $x_present && !$y_present )
2229        {
2230                $n = sscanf( $a, $skan_str, $a_x );
2231                $n = sscanf( $b, $skan_str, $b_x );
2232        }
2233        else if( $y_present && !$x_present )
2234        {
2235                $n = sscanf( $a, $skan_str, $a_y );
2236                $n = sscanf( $b, $skan_str, $b_y );
2237        }
2238
2239        if ( $SORT_ORDER=="desc" )
2240        {
2241
2242                if( $x_present && $y_present )
2243                {
2244                        // 1  = a < b
2245                        // -1 = a > b
2246                        //
2247                        if ($a_x == $b_x)
2248                        {
2249                                if ($a_y < $b_y)
2250                                {
2251                                        return 1;
2252                                }
2253                                else if ($a_y > $b_y)
2254                                {
2255                                        return -1;
2256                                }
2257                        }
2258                        else if ($a_x < $b_x)
2259                        {
2260                                return 1;
2261                        }
2262                        else if ($a_x > $b_x)
2263                        {
2264                                return -1;
2265                        }
2266                } 
2267                else if( $x_present && !$y_present )
2268                {
2269                        if ($a_x < $b_x)
2270                        {
2271                                return 1;
2272                        }
2273                        else if ($a_x > $b_x)
2274                        {
2275                                return -1;
2276                        }
2277                }
2278                else if( $y_present && !$x_present )
2279                {
2280                        if ($a_y < $b_y)
2281                        {
2282                                return 1;
2283                        }
2284                        else if ($a_y > $b_y)
2285                        {
2286                                return -1;
2287                        }
2288                }
2289        }
2290        else if ( $SORT_ORDER == "asc" )
2291        {
2292
2293                if( $x_present && $y_present )
2294                {
2295                        // 1  = a > b
2296                        // -1 = a < b
2297                        //
2298                        if ($a_x == $b_x)
2299                        {
2300                                if ($a_y > $b_y)
2301                                {
2302                                        return 1;
2303                                }
2304                                else if ($a_y < $b_y)
2305                                {
2306                                        return -1;
2307                                }
2308                        }
2309                        else if ($a_x > $b_x)
2310                        {
2311                                return 1;
2312                        }
2313                        else if ($a_x < $b_x)
2314                        {
2315                                return -1;
2316                        }
2317                }
2318                else if( $x_present && !$y_present )
2319                {
2320                        if ($a_x > $b_x)
2321                        {
2322                                return 1;
2323                        }
2324                        else if ($a_x < $b_x)
2325                        {
2326                                return -1;
2327                        }
2328                }
2329                else if( $y_present && !$x_present )
2330                {
2331                        if ($a_y > $b_y)
2332                        {
2333                                return 1;
2334                        }
2335                        else if ($a_y < $b_y)
2336                        {
2337                                return -1;
2338                        }
2339                }
2340        }
2341}
2342
2343function timeToEpoch( $time )
2344{
2345        $time_fields    = explode( ':', $time );
2346
2347        if( count( $time_fields ) == 3 )
2348        {
2349                $hours          = $time_fields[0];
2350                $minutes        = $time_fields[1];
2351                $seconds        = $time_fields[2];
2352
2353        }
2354        else if( count( $time_fields ) == 2 )
2355        {
2356                $hours          = 0;
2357                $minutes        = $time_fields[0];
2358                $seconds        = $time_fields[1];
2359
2360        }
2361        else if( count( $time_fields ) == 1 )
2362        {
2363                $hours          = 0;
2364                $minutes        = 0;
2365                $seconds        = $time_fields[0];
2366        }
2367
2368        $myepoch        = intval( $seconds + (intval( $minutes * 60 )) + (intval( $hours * 3600 )) );
2369
2370        return $myepoch;
2371}
2372
2373function makeTime( $time )
2374{
2375        $days = intval( $time / 86400 );
2376        $time = ($days>0) ? $time % ($days * 86400) : $time;
2377
2378        $date_str = '';
2379        $day_str = '';
2380
2381        if( $days > 0 )
2382        {
2383                if( $days > 1 )
2384                {
2385                        $date_str .= $days . ' days';
2386                }
2387                else
2388                {
2389                        $date_str .= $days . ' day';
2390                }
2391        }
2392
2393        $hours = intval( $time / 3600 );
2394        $time = $hours ? $time % ($hours * 3600) : $time;
2395
2396        if( $hours > 0 )
2397        {
2398                if( $hours > 1 )
2399                {
2400                        $date_unit      = 'hours';
2401                }
2402                else
2403                {
2404                        $date_unit      = 'hour';
2405                }
2406
2407                if( $date_str != '' )
2408                {
2409                        $date_str .= ' ' . $hours . ' ' . $date_unit;
2410                }
2411                else
2412                {
2413                        $date_str .= $hours . ' ' . $date_unit;
2414                }
2415        }
2416
2417        $minutes = intval( $time / 60 );
2418        $seconds = $minutes ? $time % ($minutes * 60) : $time;
2419
2420        if( $minutes > 0 )
2421        {
2422                if( $minutes > 1 )
2423                {
2424                        $date_unit      = 'minutes';
2425                }
2426                else
2427                {
2428                        $date_unit      = 'minute';
2429                }
2430
2431                if( $date_str != '' )
2432                {
2433                        $date_str .= ' ' . $minutes . ' ' . $date_unit;
2434                }
2435                else
2436                {
2437                        $date_str .= $minutes . ' ' . $date_unit;
2438                }
2439        }
2440
2441        if( $seconds > 0 )
2442        {
2443                if( $seconds > 1 )
2444                {
2445                        $date_unit      = 'seconds';
2446                }
2447                else
2448                {
2449                        $date_unit      = 'second';
2450                }
2451
2452                if( $date_str != '' )
2453                {
2454                        $date_str .= ' ' . $seconds . ' ' . $date_unit;
2455                }
2456                else
2457                {
2458                        $date_str .= $seconds . ' ' . $date_unit;
2459                }
2460        }
2461
2462        return $date_str;
2463}
2464?>
Note: See TracBrowser for help on using the repository browser.