source: trunk/xgraph/jpgraph/jpgraph_radar.php @ 42

Last change on this file since 42 was 42, checked in by marrucho, 10 years ago
File size: 29.0 KB
Line 
1<?php
2/*=======================================================================
3 // File:        JPGRAPH_RADAR.PHP
4 // Description: Radar plot extension for JpGraph
5 // Created:     2001-02-04
6 // Ver:         $Id: jpgraph_radar.php 1783 2009-08-25 11:41:01Z ljp $
7 //
8 // Copyright (c) Asial Corporation. All rights reserved.
9 //========================================================================
10 */
11
12require_once('jpgraph_plotmark.inc.php');
13
14//===================================================
15// CLASS RadarLogTicks
16// Description: Logarithmic ticks
17//===================================================
18class RadarLogTicks extends Ticks {
19
20    function __construct() {
21            // Empty
22    }
23
24    function Stroke($aImg,&$grid,$aPos,$aAxisAngle,$aScale,&$aMajPos,&$aMajLabel) {
25        $start = $aScale->GetMinVal();
26        $limit = $aScale->GetMaxVal();
27        $nextMajor = 10*$start;
28        $step = $nextMajor / 10.0;
29        $count=1;
30
31        $ticklen_maj=5;
32        $dx_maj=round(sin($aAxisAngle)*$ticklen_maj);
33        $dy_maj=round(cos($aAxisAngle)*$ticklen_maj);
34        $ticklen_min=3;
35        $dx_min=round(sin($aAxisAngle)*$ticklen_min);
36        $dy_min=round(cos($aAxisAngle)*$ticklen_min);
37
38        $aMajPos=array();
39        $aMajLabel=array();
40
41        if( $this->supress_first ) {
42            $aMajLabel[] = '';
43        }
44        else {
45            $aMajLabel[]=$start;
46        }
47
48        $yr=$aScale->RelTranslate($start);
49        $xt=round($yr*cos($aAxisAngle))+$aScale->scale_abs[0];
50        $yt=$aPos-round($yr*sin($aAxisAngle));
51        $aMajPos[]=$xt+2*$dx_maj;
52        $aMajPos[]=$yt-$aImg->GetFontheight()/2;
53        $grid[]=$xt;
54        $grid[]=$yt;
55
56        $aImg->SetLineWeight($this->weight);
57
58        for($y=$start; $y<=$limit; $y+=$step,++$count  ) {
59            $yr=$aScale->RelTranslate($y);
60            $xt=round($yr*cos($aAxisAngle))+$aScale->scale_abs[0];
61            $yt=$aPos-round($yr*sin($aAxisAngle));
62            if( $count % 10 == 0 ) {
63                $grid[]=$xt;
64                $grid[]=$yt;
65                $aMajPos[]=$xt+2*$dx_maj;
66                $aMajPos[]=$yt-$aImg->GetFontheight()/2;
67                if( !$this->supress_tickmarks ) {
68                    if( $this->majcolor != '' ) {
69                        $aImg->PushColor($this->majcolor);
70                    }
71                    $aImg->Line($xt+$dx_maj,$yt+$dy_maj,$xt-$dx_maj,$yt-$dy_maj);
72                    if( $this->majcolor != '' ) {
73                        $aImg->PopColor();
74                    }
75                }
76                if( $this->label_formfunc != '' ) {
77                    $f=$this->label_formfunc;
78                    $l = call_user_func($f,$nextMajor);
79                }
80                else {
81                    $l = $nextMajor;
82                }
83
84                $aMajLabel[]=$l;
85                $nextMajor *= 10;
86                $step *= 10;
87                $count=1;
88            }
89            else {
90                if( !$this->supress_minor_tickmarks ) {
91                    if( $this->mincolor != '' ) {
92                        $aImg->PushColor($this->mincolor);
93                    }
94                    $aImg->Line($xt+$dx_min,$yt+$dy_min,$xt-$dx_min,$yt-$dy_min);
95                    if( $this->mincolor != '' ) {
96                        $aImg->PopColor();
97                    }
98                }
99            }
100        }
101    }
102}
103
104//===================================================
105// CLASS RadarLinear
106// Description: Linear ticks
107//===================================================
108class RadarLinearTicks extends Ticks {
109
110    private $minor_step=1, $major_step=2;
111    private $xlabel_offset=0,$xtick_offset=0;
112
113    function __construct() {
114        // Empty
115    }
116
117    // Return major step size in world coordinates
118    function GetMajor() {
119        return $this->major_step;
120    }
121
122    // Return minor step size in world coordinates
123    function GetMinor() {
124        return $this->minor_step;
125    }
126
127    // Set Minor and Major ticks (in world coordinates)
128    function Set($aMajStep,$aMinStep=false) {
129        if( $aMinStep==false ) {
130            $aMinStep=$aMajStep;
131        }
132
133        if( $aMajStep <= 0 || $aMinStep <= 0 ) {
134            JpGraphError::RaiseL(25064);
135            //JpGraphError::Raise(" Minor or major step size is 0. Check that you haven't got an accidental SetTextTicks(0) in your code. If this is not the case you might have stumbled upon a bug in JpGraph. Please report this and if possible include the data that caused the problem.");
136        }
137
138        $this->major_step=$aMajStep;
139        $this->minor_step=$aMinStep;
140        $this->is_set = true;
141    }
142
143    function Stroke($aImg,&$grid,$aPos,$aAxisAngle,$aScale,&$aMajPos,&$aMajLabel) {
144        // Prepare to draw linear ticks
145        $maj_step_abs = abs($aScale->scale_factor*$this->major_step);
146        $min_step_abs = abs($aScale->scale_factor*$this->minor_step);
147        $nbrmaj = round($aScale->world_abs_size/$maj_step_abs);
148        $nbrmin = round($aScale->world_abs_size/$min_step_abs);
149        $skip = round($nbrmin/$nbrmaj); // Don't draw minor on top of major
150
151        // Draw major ticks
152        $ticklen2=$this->major_abs_size;
153        $dx=round(sin($aAxisAngle)*$ticklen2);
154        $dy=round(cos($aAxisAngle)*$ticklen2);
155        $label=$aScale->scale[0]+$this->major_step;
156
157        $aImg->SetLineWeight($this->weight);
158
159        $aMajPos = array();
160        $aMajLabel = array();
161
162        for($i=1; $i<=$nbrmaj; ++$i) {
163            $xt=round($i*$maj_step_abs*cos($aAxisAngle))+$aScale->scale_abs[0];
164            $yt=$aPos-round($i*$maj_step_abs*sin($aAxisAngle));
165
166            if( $this->label_formfunc != '' ) {
167                $f=$this->label_formfunc;
168                $l = call_user_func($f,$label);
169            }
170            else {
171                $l = $label;
172            }
173
174            $aMajLabel[]=$l;
175            $label += $this->major_step;
176            $grid[]=$xt;
177            $grid[]=$yt;
178            $aMajPos[($i-1)*2]=$xt+2*$dx;
179            $aMajPos[($i-1)*2+1]=$yt-$aImg->GetFontheight()/2;
180            if( !$this->supress_tickmarks ) {
181                if( $this->majcolor != '' ) {
182                    $aImg->PushColor($this->majcolor);
183                }
184                $aImg->Line($xt+$dx,$yt+$dy,$xt-$dx,$yt-$dy);
185                if( $this->majcolor != '' ) {
186                    $aImg->PopColor();
187                }
188            }
189        }
190
191        // Draw minor ticks
192        $ticklen2=$this->minor_abs_size;
193        $dx=round(sin($aAxisAngle)*$ticklen2);
194        $dy=round(cos($aAxisAngle)*$ticklen2);
195        if( !$this->supress_tickmarks && !$this->supress_minor_tickmarks) {
196            if( $this->mincolor != '' ) {
197                $aImg->PushColor($this->mincolor);
198            }
199            for($i=1; $i<=$nbrmin; ++$i) {
200                if( ($i % $skip) == 0 ) {
201                    continue;
202                }
203                $xt=round($i*$min_step_abs*cos($aAxisAngle))+$aScale->scale_abs[0];
204                $yt=$aPos-round($i*$min_step_abs*sin($aAxisAngle));
205                $aImg->Line($xt+$dx,$yt+$dy,$xt-$dx,$yt-$dy);
206            }
207            if( $this->mincolor != '' ) {
208                $aImg->PopColor();
209            }
210        }
211    }
212}
213
214
215//===================================================
216// CLASS RadarAxis
217// Description: Implements axis for the radar graph
218//===================================================
219class RadarAxis extends AxisPrototype {
220    public $title=null;
221    private $title_color='navy';
222    private $len=0;
223
224    function __construct($img,$aScale,$color=array(0,0,0)) {
225        parent::__construct($img,$aScale,$color);
226        $this->len = $img->plotheight;
227        $this->title = new Text();
228        $this->title->SetFont(FF_FONT1,FS_BOLD);
229        $this->color = array(0,0,0);
230    }
231
232    // Stroke the axis
233    // $pos    = Vertical position of axis
234    // $aAxisAngle = Axis angle
235    // $grid   = Returns an array with positions used to draw the grid
236    // $lf   = Label flag, TRUE if the axis should have labels
237    function Stroke($pos,$aAxisAngle,&$grid,$title,$lf) {
238        $this->img->SetColor($this->color);
239
240        // Determine end points for the axis
241        $x=round($this->scale->world_abs_size*cos($aAxisAngle)+$this->scale->scale_abs[0]);
242        $y=round($pos-$this->scale->world_abs_size*sin($aAxisAngle));
243
244        // Draw axis
245        $this->img->SetColor($this->color);
246        $this->img->SetLineWeight($this->weight);
247        if( !$this->hide ) {
248            $this->img->Line($this->scale->scale_abs[0],$pos,$x,$y);
249        }
250
251        $this->scale->ticks->Stroke($this->img,$grid,$pos,$aAxisAngle,$this->scale,$majpos,$majlabel);
252        $ncolor=0;
253        if( isset($this->ticks_label_colors) ) {
254            $ncolor=count($this->ticks_label_colors);
255        }
256
257        // Draw labels
258        if( $lf && !$this->hide ) {
259            $this->img->SetFont($this->font_family,$this->font_style,$this->font_size);
260            $this->img->SetTextAlign('left','top');
261            $this->img->SetColor($this->label_color);
262
263            // majpos contains (x,y) coordinates for labels
264            if( ! $this->hide_labels ) {
265                $n = floor(count($majpos)/2);
266                for($i=0; $i < $n; ++$i) {
267                    // Set specific label color if specified
268                    if( $ncolor > 0 ) {
269                        $this->img->SetColor($this->ticks_label_colors[$i % $ncolor]);
270                    }
271
272                    if( $this->ticks_label != null && isset($this->ticks_label[$i]) ) {
273                        $this->img->StrokeText($majpos[$i*2],$majpos[$i*2+1],$this->ticks_label[$i]);
274                    }
275                    else {
276                        $this->img->StrokeText($majpos[$i*2],$majpos[$i*2+1],$majlabel[$i]);
277                    }
278                }
279            }
280        }
281        $this->_StrokeAxisTitle($pos,$aAxisAngle,$title);
282    }
283
284    function _StrokeAxisTitle($pos,$aAxisAngle,$title) {
285        $this->title->Set($title);
286        $marg=6+$this->title->margin;
287        $xt=round(($this->scale->world_abs_size+$marg)*cos($aAxisAngle)+$this->scale->scale_abs[0]);
288        $yt=round($pos-($this->scale->world_abs_size+$marg)*sin($aAxisAngle));
289
290        // Position the axis title.
291        // dx, dy is the offset from the top left corner of the bounding box that sorrounds the text
292        // that intersects with the extension of the corresponding axis. The code looks a little
293        // bit messy but this is really the only way of having a reasonable position of the
294        // axis titles.
295        if( $this->title->iWordwrap > 0 ) {
296            $title = wordwrap($title,$this->title->iWordwrap,"\n");
297        }
298
299        $h=$this->img->GetTextHeight($title)*1.2;
300        $w=$this->img->GetTextWidth($title)*1.2;
301
302        while( $aAxisAngle > 2*M_PI )
303            $aAxisAngle -= 2*M_PI;
304
305        // Around 3 a'clock
306        if( $aAxisAngle>=7*M_PI/4 || $aAxisAngle <= M_PI/4 ) $dx=-0.15; // Small trimming to make the dist to the axis more even
307
308        // Around 12 a'clock
309        if( $aAxisAngle>=M_PI/4 && $aAxisAngle <= 3*M_PI/4 ) $dx=($aAxisAngle-M_PI/4)*2/M_PI;
310
311        // Around 9 a'clock
312        if( $aAxisAngle>=3*M_PI/4 && $aAxisAngle <= 5*M_PI/4 ) $dx=1;
313
314        // Around 6 a'clock
315        if( $aAxisAngle>=5*M_PI/4 && $aAxisAngle <= 7*M_PI/4 ) $dx=(1-($aAxisAngle-M_PI*5/4)*2/M_PI);
316
317        if( $aAxisAngle>=7*M_PI/4 ) $dy=(($aAxisAngle-M_PI)-3*M_PI/4)*2/M_PI;
318        if( $aAxisAngle<=M_PI/12 ) $dy=(0.5-$aAxisAngle*2/M_PI);
319        if( $aAxisAngle<=M_PI/4 && $aAxisAngle > M_PI/12) $dy=(1-$aAxisAngle*2/M_PI);
320        if( $aAxisAngle>=M_PI/4 && $aAxisAngle <= 3*M_PI/4 ) $dy=1;
321        if( $aAxisAngle>=3*M_PI/4 && $aAxisAngle <= 5*M_PI/4 ) $dy=(1-($aAxisAngle-3*M_PI/4)*2/M_PI);
322        if( $aAxisAngle>=5*M_PI/4 && $aAxisAngle <= 7*M_PI/4 ) $dy=0;
323
324        if( !$this->hide ) {
325            $this->title->Stroke($this->img,$xt-$dx*$w,$yt-$dy*$h,$title);
326        }
327    }
328
329} // Class
330
331
332//===================================================
333// CLASS RadarGrid
334// Description: Draws grid for the radar graph
335//===================================================
336class RadarGrid { //extends Grid {
337    private $type='solid';
338    private $grid_color='#DDDDDD';
339    private $show=false, $weight=1;
340
341    function __construct() {
342        // Empty
343    }
344
345    function SetColor($aMajColor) {
346        $this->grid_color = $aMajColor;
347    }
348
349    function SetWeight($aWeight) {
350        $this->weight=$aWeight;
351    }
352
353    // Specify if grid should be dashed, dotted or solid
354    function SetLineStyle($aType) {
355        $this->type = $aType;
356    }
357
358    // Decide if both major and minor grid should be displayed
359    function Show($aShowMajor=true) {
360        $this->show=$aShowMajor;
361    }
362
363    function Stroke($img,$grid) {
364        if( !$this->show ) {
365            return;
366        }
367
368        $nbrticks = count($grid[0])/2;
369        $nbrpnts = count($grid);
370        $img->SetColor($this->grid_color);
371        $img->SetLineWeight($this->weight);
372
373        for($i=0; $i<$nbrticks; ++$i) {
374            for($j=0; $j<$nbrpnts; ++$j) {
375                $pnts[$j*2]=$grid[$j][$i*2];
376                $pnts[$j*2+1]=$grid[$j][$i*2+1];
377            }
378            for($k=0; $k<$nbrpnts; ++$k ){
379                $l=($k+1)%$nbrpnts;
380                if( $this->type == 'solid' )
381                    $img->Line($pnts[$k*2],$pnts[$k*2+1],$pnts[$l*2],$pnts[$l*2+1]);
382                elseif( $this->type == 'dotted' )
383                    $img->DashedLine($pnts[$k*2],$pnts[$k*2+1],$pnts[$l*2],$pnts[$l*2+1],1,6);
384                elseif( $this->type == 'dashed' )
385                    $img->DashedLine($pnts[$k*2],$pnts[$k*2+1],$pnts[$l*2],$pnts[$l*2+1],2,4);
386                elseif( $this->type == 'longdashed' )
387                    $img->DashedLine($pnts[$k*2],$pnts[$k*2+1],$pnts[$l*2],$pnts[$l*2+1],8,6);
388            }
389            $pnts=array();
390        }
391    }
392} // Class
393
394
395//===================================================
396// CLASS RadarPlot
397// Description: Plot a radarplot
398//===================================================
399class RadarPlot {
400    public $mark=null;
401    public $legend='';
402    public $legendcsimtarget='';
403    public $legendcsimalt='';
404    public $csimtargets=array(); // Array of targets for CSIM
405    public $csimareas="";   // Resultant CSIM area tags
406    public $csimalts=null;   // ALT:s for corresponding target
407    private $data=array();
408    private $fill=false, $fill_color=array(200,170,180);
409    private $color=array(0,0,0);
410    private $weight=1;
411    private $linestyle='solid';
412
413    //---------------
414    // CONSTRUCTOR
415    function __construct($data) {
416        $this->data = $data;
417        $this->mark = new PlotMark();
418    }
419
420    function Min() {
421        return Min($this->data);
422    }
423
424    function Max() {
425        return Max($this->data);
426    }
427
428    function SetLegend($legend) {
429        $this->legend=$legend;
430    }
431
432    function SetLineStyle($aStyle) {
433        $this->linestyle=$aStyle;
434    }
435
436    function SetLineWeight($w) {
437        $this->weight=$w;
438    }
439
440    function SetFillColor($aColor) {
441        $this->fill_color = $aColor;
442        $this->fill = true;
443    }
444
445    function SetFill($f=true) {
446        $this->fill = $f;
447    }
448
449    function SetColor($aColor,$aFillColor=false) {
450        $this->color = $aColor;
451        if( $aFillColor ) {
452            $this->SetFillColor($aFillColor);
453            $this->fill = true;
454        }
455    }
456
457    // Set href targets for CSIM
458    function SetCSIMTargets($aTargets,$aAlts=null) {
459        $this->csimtargets=$aTargets;
460        $this->csimalts=$aAlts;
461    }
462
463    // Get all created areas
464    function GetCSIMareas() {
465        return $this->csimareas;
466    }
467
468    function Stroke($img, $pos, $scale, $startangle) {
469        $nbrpnts = count($this->data);
470        $astep=2*M_PI/$nbrpnts;
471        $a=$startangle;
472
473        for($i=0; $i<$nbrpnts; ++$i) {
474
475            // Rotate each non null point to the correct axis-angle
476            $cs=$scale->RelTranslate($this->data[$i]);
477            $x=round($cs*cos($a)+$scale->scale_abs[0]);
478            $y=round($pos-$cs*sin($a));
479
480            $pnts[$i*2]=$x;
481            $pnts[$i*2+1]=$y;
482
483            // If the next point is null then we draw this polygon segment
484            // to the center, skip the next and draw the next segment from
485            // the center up to the point on the axis with the first non-null
486            // value and continues from that point. Some additoinal logic is necessary
487            // to handle the boundary conditions
488            if( $i < $nbrpnts-1 ) {
489                if( is_null($this->data[$i+1]) ) {
490                    $cs = 0;
491                    $x=round($cs*cos($a)+$scale->scale_abs[0]);
492                    $y=round($pos-$cs*sin($a));
493                    $pnts[$i*2]=$x;
494                    $pnts[$i*2+1]=$y;
495                    $a += $astep;
496                }
497            }
498
499            $a += $astep;
500        }
501
502        if( $this->fill ) {
503            $img->SetColor($this->fill_color);
504            $img->FilledPolygon($pnts);
505        }
506
507        $img->SetLineWeight($this->weight);
508        $img->SetColor($this->color);
509        $img->SetLineStyle($this->linestyle);
510        $pnts[] = $pnts[0];
511        $pnts[] = $pnts[1];
512        $img->Polygon($pnts);
513        $img->SetLineStyle('solid'); // Reset line style to default
514
515        // Add plotmarks on top
516        if( $this->mark->show ) {
517                        for($i=0; $i < $nbrpnts; ++$i) {
518                    if( isset($this->csimtargets[$i]) ) {
519                        $this->mark->SetCSIMTarget($this->csimtargets[$i]);
520                        $this->mark->SetCSIMAlt($this->csimalts[$i]);
521                        $this->mark->SetCSIMAltVal($pnts[$i*2], $pnts[$i*2+1]);
522                        $this->mark->Stroke($img, $pnts[$i*2], $pnts[$i*2+1]);
523                        $this->csimareas .= $this->mark->GetCSIMAreas();
524                    }
525                    else {
526                                        $this->mark->Stroke($img,$pnts[$i*2],$pnts[$i*2+1]);
527                    }
528            }
529        }
530
531    }
532
533    function GetCount() {
534        return count($this->data);
535    }
536
537    function Legend($graph) {
538        if( $this->legend == '' ) {
539            return;
540        }
541        if( $this->fill ) {
542            $graph->legend->Add($this->legend,$this->fill_color,$this->mark);
543        } else {
544            $graph->legend->Add($this->legend,$this->color,$this->mark);
545        }
546    }
547
548} // Class
549
550//===================================================
551// CLASS RadarGraph
552// Description: Main container for a radar graph
553//===================================================
554class RadarGraph extends Graph {
555    public $grid,$axis=null;
556    private $posx,$posy;
557    private $len;
558    private $axis_title=null;
559
560    function __construct($width=300,$height=200,$cachedName="",$timeout=0,$inline=1) {
561        parent::__construct($width,$height,$cachedName,$timeout,$inline);
562        $this->posx = $width/2;
563        $this->posy = $height/2;
564        $this->len = min($width,$height)*0.35;
565        $this->SetColor(array(255,255,255));
566        $this->SetTickDensity(TICKD_NORMAL);
567        $this->SetScale('lin');
568        $this->SetGridDepth(DEPTH_FRONT);
569    }
570
571    function HideTickMarks($aFlag=true) {
572        $this->axis->scale->ticks->SupressTickMarks($aFlag);
573    }
574
575    function ShowMinorTickmarks($aFlag=true) {
576        $this->yscale->ticks->SupressMinorTickMarks(!$aFlag);
577    }
578
579    function SetScale($axtype,$ymin=1,$ymax=1,$dummy1=null,$dumy2=null) {
580        if( $axtype != 'lin' && $axtype != 'log' ) {
581            JpGraphError::RaiseL(18003,$axtype);
582            //("Illegal scale for radarplot ($axtype). Must be \"lin\" or \"log\"");
583        }
584        if( $axtype == 'lin' ) {
585            $this->yscale = new LinearScale($ymin,$ymax);
586            $this->yscale->ticks = new RadarLinearTicks();
587            $this->yscale->ticks->SupressMinorTickMarks();
588        }
589        elseif( $axtype == 'log' ) {
590            $this->yscale = new LogScale($ymin,$ymax);
591            $this->yscale->ticks = new RadarLogTicks();
592        }
593
594        $this->axis = new RadarAxis($this->img,$this->yscale);
595        $this->grid = new RadarGrid();
596    }
597
598    function SetSize($aSize) {
599        if( $aSize < 0.1 || $aSize>1 ) {
600            JpGraphError::RaiseL(18004,$aSize);
601            //("Radar Plot size must be between 0.1 and 1. (Your value=$s)");
602        }
603        $this->len=min($this->img->width,$this->img->height)*$aSize/2;
604    }
605
606    function SetPlotSize($aSize) {
607        $this->SetSize($aSize);
608    }
609
610    function SetTickDensity($densy=TICKD_NORMAL,$dummy1=null) {
611        $this->ytick_factor=25;
612        switch( $densy ) {
613            case TICKD_DENSE:
614                $this->ytick_factor=12;
615                break;
616            case TICKD_NORMAL:
617                $this->ytick_factor=25;
618                break;
619            case TICKD_SPARSE:
620                $this->ytick_factor=40;
621                break;
622            case TICKD_VERYSPARSE:
623                $this->ytick_factor=70;
624                break;
625            default:
626                JpGraphError::RaiseL(18005,$densy);
627                //("RadarPlot Unsupported Tick density: $densy");
628        }
629    }
630
631    function SetPos($px,$py=0.5) {
632        $this->SetCenter($px,$py);
633    }
634
635    function SetCenter($px,$py=0.5) {
636        if( $px >= 0 && $px <= 1 ) {
637                $this->posx = $this->img->width*$px;
638        }
639        else {
640                $this->posx = $px;
641        }
642        if( $py >= 0 && $py <= 1 ) {
643                $this->posy = $this->img->height*$py;
644        }
645        else {
646                $this->posy = $py;
647        }
648    }
649
650    function SetColor($aColor) {
651        $this->SetMarginColor($aColor);
652    }
653
654    function SetTitles($aTitleArray) {
655        $this->axis_title = $aTitleArray;
656    }
657
658    function Add($aPlot) {
659        if( $aPlot == null ) {
660            JpGraphError::RaiseL(25010);//("Graph::Add() You tried to add a null plot to the graph.");
661        }
662        if( is_array($aPlot) && count($aPlot) > 0 ) {
663            $cl = $aPlot[0];
664        }
665        else {
666            $cl = $aPlot;
667        }
668
669        if( $cl instanceof Text ) $this->AddText($aPlot);
670        elseif( class_exists('IconPlot',false) && ($cl instanceof IconPlot) ) $this->AddIcon($aPlot);
671        else {
672            $this->plots[] = $aPlot;
673        }
674    }
675
676    function GetPlotsYMinMax($aPlots) {
677        $min=$aPlots[0]->Min();
678        $max=$aPlots[0]->Max();
679        foreach( $this->plots as $p ) {
680            $max=max($max,$p->Max());
681            $min=min($min,$p->Min());
682        }
683        if( $min < 0 ) {
684            JpGraphError::RaiseL(18006,$min);
685            //("Minimum data $min (Radar plots should only be used when all data points > 0)");
686        }
687        return array($min,$max);
688    }
689
690    function StrokeIcons() {
691        if( $this->iIcons != null ) {
692                $n = count($this->iIcons);
693                for( $i=0; $i < $n; ++$i ) {
694                $this->iIcons[$i]->Stroke($this->img);
695                }
696        }
697    }
698
699        function StrokeTexts() {
700        if( $this->texts != null ) {
701                        $n = count($this->texts);
702            for( $i=0; $i < $n; ++$i ) {
703                $this->texts[$i]->Stroke($this->img);
704            }
705        }
706    }
707
708    // Stroke the Radar graph
709    function Stroke($aStrokeFileName='') {
710
711        // If the filename is the predefined value = '_csim_special_'
712        // we assume that the call to stroke only needs to do enough
713        // to correctly generate the CSIM maps.
714        // We use this variable to skip things we don't strictly need
715        // to do to generate the image map to improve performance
716        // a best we can. Therefor you will see a lot of tests !$_csim in the
717        // code below.
718        $_csim = ( $aStrokeFileName === _CSIM_SPECIALFILE );
719
720        // We need to know if we have stroked the plot in the
721        // GetCSIMareas. Otherwise the CSIM hasn't been generated
722        // and in the case of GetCSIM called before stroke to generate
723        // CSIM without storing an image to disk GetCSIM must call Stroke.
724        $this->iHasStroked = true;
725
726        $n = count($this->plots);
727        // Set Y-scale
728
729        if( !$this->yscale->IsSpecified() && count($this->plots) > 0 ) {
730            list($min,$max) = $this->GetPlotsYMinMax($this->plots);
731            $this->yscale->AutoScale($this->img,0,$max,$this->len/$this->ytick_factor);
732        }
733        elseif( $this->yscale->IsSpecified() &&
734                ( $this->yscale->auto_ticks || !$this->yscale->ticks->IsSpecified()) ) {
735
736            // The tick calculation will use the user suplied min/max values to determine
737            // the ticks. If auto_ticks is false the exact user specifed min and max
738            // values will be used for the scale.
739            // If auto_ticks is true then the scale might be slightly adjusted
740            // so that the min and max values falls on an even major step.
741            $min = $this->yscale->scale[0];
742            $max = $this->yscale->scale[1];
743            $this->yscale->AutoScale($this->img,$min,$max,
744                                     $this->len/$this->ytick_factor,
745                                     $this->yscale->auto_ticks);
746        }
747
748        // Set start position end length of scale (in absolute pixels)
749        $this->yscale->SetConstants($this->posx,$this->len);
750
751        // We need as many axis as there are data points
752        $nbrpnts=$this->plots[0]->GetCount();
753
754        // If we have no titles just number the axis 1,2,3,...
755        if( $this->axis_title==null ) {
756            for($i=0; $i < $nbrpnts; ++$i ) {
757                $this->axis_title[$i] = $i+1;
758            }
759        }
760        elseif( count($this->axis_title) < $nbrpnts) {
761            JpGraphError::RaiseL(18007);
762            // ("Number of titles does not match number of points in plot.");
763        }
764        for( $i=0; $i < $n; ++$i ) {
765            if( $nbrpnts != $this->plots[$i]->GetCount() ) {
766                JpGraphError::RaiseL(18008);
767                //("Each radar plot must have the same number of data points.");
768            }
769        }
770
771        if( !$_csim ) {
772                if( $this->background_image != '' ) {
773                $this->StrokeFrameBackground();
774                }
775                else {
776                $this->StrokeFrame();
777                $this->StrokeBackgroundGrad();
778                }
779        }
780        $astep=2*M_PI/$nbrpnts;
781
782                if( !$_csim ) {
783                if( $this->iIconDepth == DEPTH_BACK ) {
784                        $this->StrokeIcons();
785                }
786
787
788                // Prepare legends
789            for($i=0; $i < $n; ++$i) {
790                    $this->plots[$i]->Legend($this);
791                }
792            $this->legend->Stroke($this->img);
793                $this->footer->Stroke($this->img);
794                }
795
796                if( !$_csim ) {
797                if( $this->grid_depth == DEPTH_BACK ) {
798                    // Draw axis and grid
799                    for( $i=0,$a=M_PI/2; $i < $nbrpnts; ++$i, $a += $astep ) {
800                        $this->axis->Stroke($this->posy,$a,$grid[$i],$this->axis_title[$i],$i==0);
801                    }
802                $this->grid->Stroke($this->img,$grid);
803                }
804            if( $this->iIconDepth == DEPTH_BACK ) {
805                $this->StrokeIcons();
806            }
807
808                }
809
810        // Plot points
811        $a=M_PI/2;
812        for($i=0; $i < $n; ++$i ) {
813            $this->plots[$i]->Stroke($this->img, $this->posy, $this->yscale, $a);
814        }
815
816        if( !$_csim ) {
817            if( $this->grid_depth != DEPTH_BACK ) {
818                // Draw axis and grid
819                for( $i=0,$a=M_PI/2; $i < $nbrpnts; ++$i, $a += $astep ) {
820                   $this->axis->Stroke($this->posy,$a,$grid[$i],$this->axis_title[$i],$i==0);
821                }
822                $this->grid->Stroke($this->img,$grid);
823            }
824
825                $this->StrokeTitles();
826                $this->StrokeTexts();
827                if( $this->iIconDepth == DEPTH_FRONT ) {
828                        $this->StrokeIcons();
829                }
830                }
831
832        // Should we do any final image transformation
833        if( $this->iImgTrans && !$_csim ) {
834            if( !class_exists('ImgTrans',false) ) {
835                require_once('jpgraph_imgtrans.php');
836            }
837
838            $tform = new ImgTrans($this->img->img);
839            $this->img->img = $tform->Skew3D($this->iImgTransHorizon,$this->iImgTransSkewDist,
840            $this->iImgTransDirection,$this->iImgTransHighQ,
841            $this->iImgTransMinSize,$this->iImgTransFillColor,
842            $this->iImgTransBorder);
843        }
844
845                if( !$_csim ) {
846                // If the filename is given as the special "__handle"
847                // then the image handler is returned and the image is NOT
848                // streamed back
849                if( $aStrokeFileName == _IMG_HANDLER ) {
850                    return $this->img->img;
851                }
852                else {
853                    // Finally stream the generated picture
854                    $this->cache->PutAndStream($this->img,$this->cache_name,$this->inline,$aStrokeFileName);
855                }
856                }
857    }
858} // Class
859
860/* EOF */
861?>
Note: See TracBrowser for help on using the repository browser.