3 +-----------------------------------------------------------------------+
4 | program/bin/quotaimg.php |
6 | This file is part of the RoundCube Webmail client |
7 | Copyright (C) 2005-2007, RoundCube Dev. - Switzerland |
8 | Licensed under the GNU GPL |
11 | Create a GIF image showing the mailbox quot as bar |
13 +-----------------------------------------------------------------------+
14 | Author: Brett Patterson <brett2@umbc.edu> |
15 +-----------------------------------------------------------------------+
21 $used = ((isset($_GET['u']) && !empty($_GET['u'])) || $_GET['u']=='0')?(int)$_GET['u']:'??';
22 $quota = ((isset($_GET['q']) && !empty($_GET['q'])) || $_GET['q']=='0')?(int)$_GET['q']:'??';
23 $width = empty($_GET['w']) ? 100 : (int)$_GET['w'];
24 $height = empty($_GET['h']) ? 14 : (int)$_GET['h'];
29 * Modify the following few elements to change the display of the image.
30 * Modifiable attributes are:
31 * bool border :: Defines whether you want to show a border around it?
32 * bool unknown :: Leave default; Defines whether quota is "unknown"
34 * int height :: Defines height of the image
35 * int width :: Defines width of the image
36 * int font :: Changes the font size & font used in the GD library.
37 * Available values are from 1 to 5.
38 * int padding :: Changes the offset (in pixels) from the top of the image
39 * to where the top of the text will be aligned. User
40 * greater than 0 to ensure text is off the border.
41 * array limit :: Holds the integer values of in an associative array as
42 * to what defines the upper and lower levels for quota
44 * High - Quota is nearing capacity.
45 * Mid - Quota is around the middle
46 * Low - Currently not used.
47 * array color :: An associative array of strings of comma separated
48 * values (R,G,B) for use in color creation. Define the
49 * RGB values you'd like to use. A list of colors (and
50 * their RGB values) can be found here:
51 * http://www.december.com/html/spec/colorcodes.html
55 * @param mixed $used The amount used, or ?? if unknown.
56 * @param mixed $total The total available, or ?? if unknown.
57 * @param int $width Width of the image.
58 * @param int $height Height of the image.
60 * @see rcube_imap::get_quota()
61 * @see iil_C_GetQuota()
63 * @todo Make colors a config option.
65 function genQuota($used, $total, $width, $height)
78 $color['fill']['high'] = '215, 13, 13'; // Near quota fill color
79 $color['fill']['mid'] = '126, 192, 238'; // Mid-area of quota fill color
80 $color['fill']['low'] = '147, 225, 100'; // Far from quota fill color
83 $color['bg']['OL'] = '215, 13, 13'; // Over limit bbackground
84 $color['bg']['Unknown'] = '238, 99, 99'; // Unknown background
85 $color['bg']['quota'] = '255, 255, 255'; // Normal quota background
88 $color['border'] = '0, 0, 0';
89 $color['text'] = '102, 102, 102';
92 /************************************
93 ***** DO NOT EDIT BELOW HERE *****
94 ***********************************/
96 // @todo: Set to "??" instead?
97 if (ereg("^[^0-9?]*$", $used) || ereg("^[^0-9?]*$", $total)) {
101 if (strpos($used, '?') !== false || strpos($total, '?') !== false
106 $im = imagecreate($width, $height);
109 list($r, $g, $b) = explode(',', $color['border']);
111 $borderc = imagecolorallocate($im, $r, $g, $b);
113 imageline($im, 0, 0, $width, 0, $borderc);
114 imageline($im, 0, $height-$border, 0, 0, $borderc);
115 imageline($im, $width-1, 0, $width-$border, $height, $borderc);
116 imageline($im, $width, $height-$border, 0, $height-$border, $borderc);
119 list($r, $g, $b) = explode(',', $color['text']);
120 $text = imagecolorallocate($im, $r, $g, $b);
123 list($r, $g, $b) = explode(',', $color['bg']['Unknown']);
124 $background = imagecolorallocate($im, $r, $g, $b);
125 imagefilledrectangle($im, 0, 0, $width, $height, $background);
128 $mid = floor(($width-(strlen($string)*imagefontwidth($font)))/2)+1;
129 imagestring($im, $font, $mid, $padding, $string, $text);
130 } else if ($used > $total) {
131 list($r, $g, $b) = explode(',', $color['bg']['OL']);
133 $background = imagecolorallocate($im, $r, $g, $b);
135 imagefilledrectangle($im, 0, 0, $width, $height, $background);
137 $string = 'Over Limit';
138 $mid = floor(($width-(strlen($string)*imagefontwidth($font)))/2)+1;
139 imagestring($im, $font, $mid, $padding, $string, $text);
141 list($r, $g, $b) = explode(',', $color['bg']['quota']);
143 $background = imagecolorallocate($im, $r, $b, $g);
145 imagefilledrectangle($im, 0, 0, $width, $height, $background);
147 $quota = ($used==0)?0:(round($used/$total, 2)*100);
149 if ($quota >= $limit['high']) {
150 list($r, $g, $b) = explode(',', $color['fill']['high']);
151 $fill = imagecolorallocate($im, $r, $g, $b);
152 } elseif($quota >= $limit['mid']) {
153 list($r, $g, $b) = explode(',', $color['fill']['mid']);
154 $fill = imagecolorallocate($im, $r, $g, $b);
156 // if($quota >= $limit['low'])
157 list($r, $g, $b) = explode(',', $color['fill']['low']);
158 $fill = imagecolorallocate($im, $r, $g, $b);
161 $quota_width = $quota / 100 * $width;
162 imagefilledrectangle($im, $border, 0, $quota, $height-2*$border, $fill);
164 $string = $quota . '%';
165 $mid = floor(($width-(strlen($string)*imagefontwidth($font)))/2)+1;
166 // Print percent in black
167 imagestring($im, $font, $mid, $padding, $string, $text);
170 header('Content-Type: image/gif');
172 // @todo is harcoding GMT necessary?
173 header('Expires: ' . gmdate('D, d M Y H:i:s', mktime()+86400) . ' GMT');
174 header('Cache-Control: ');
181 genQuota($used, $quota, $width, $height);