Merge of Steve Brown's patch
[squirrelmail.git] / themes / darkness.php
CommitLineData
2824cc54 1<?php
4b4abf93 2
c4309fbd 3/**
c4309fbd 4 * Theme Name: 'Darkness'
5 * Like black?
4b4abf93 6 *
7 * @author Tyler Akins
47ccfad4 8 * @copyright &copy; 2001-2006 The SquirrelMail Project Team
4b4abf93 9 * @license http://opensource.org/licenses/gpl-license.php GNU Public License
10 * @version $Id$
c4309fbd 11 * @package squirrelmail
12 * @subpackage themes
13 */
43fdb2a4 14
c4309fbd 15/**
16 * Load up the usual suspects.. */
a6bc3f3f 17require_once(SM_PATH . 'functions/strings.php');
43fdb2a4 18
8c933a32 19 // Note: The text distance is actually pre-squared
20 // Background range is from 24-64, all three colors are the same
21 // Text range is from 196 to 255
22 $BackgroundTargetDistance = 12;
23 $BackgroundAdjust = 1;
24 $TextTargetDistance = 65536;
25 $TextAdjust = 0.95;
2824cc54 26
27function IsUnique($Distance, $r, $g, $b, $usedArray)
28{
29 foreach ($usedArray as $data) {
30 $a = abs($data[0] - $r);
31 $b = abs($data[1] - $g);
32 $c = abs($data[2] - $b);
33 $newDistance = $a * $a + $b * $b + $c * $c;
34 if ($newDistance < $Distance)
35 return false;
36 }
37 return true;
38}
39
40
41// Extra spiffy page fade if left frame
42// Always tremble background
43// This might make people go insane. Yes! *Victory dance!*
44function Darkness_HeaderPlugin() {
8d8da447 45 global $PHP_SELF;
eb548244 46
1681f4d9 47 if (substr($PHP_SELF, -18) == '/src/left_main.php') {
673f9350 48 echo '<meta http-equiv="Page-Enter" content="' .
04fa3c41 49 'blendTrans(Duration=2.0)" />' . "\n";
2824cc54 50 }
eb548244 51
52?><script language="javascript">
2824cc54 53darkness_color = 0;
54darkness_dir = +1;
eb548244 55darkness_hex = new Array('0', '1', '2', '3', '4', '5', '6', '7', '8', '9',
56 'a', 'b', 'c', 'd', 'e', 'f');
2824cc54 57function DarknessTremble() {
58 if (darkness_color >= 32 || darkness_color <= 0)
59 darkness_dir = - darkness_dir;
60 darkness_color += darkness_dir;
61 if (darkness_color < 0)
62 darkness_color = 0;
63 bigDigit = Math.floor(darkness_color / 16);
64 littleDigit = darkness_color - (bigDigit * 16);
65 Color = darkness_hex[bigDigit] + darkness_hex[littleDigit];
1681f4d9 66 document.bgColor='#' + Color + Color + Color;
67 setTimeout('DarknessTremble()', 5000);
2824cc54 68}
1681f4d9 69setTimeout('DarknessTremble()', 10000);
2824cc54 70</script>
6fd95361 71<?php
2824cc54 72}
73
74global $squirrelmail_plugin_hooks;
75$squirrelmail_plugin_hooks['generic_header']['theme_darkness'] =
76 'Darkness_HeaderPlugin';
77
78 /** seed the random number generator **/
79 sq_mt_randomize();
80
1681f4d9 81 $color[3] = '#000000';
82 $color[4] = '#000000';
8c933a32 83 $used = array(0);
84 $targetDistance = $BackgroundTargetDistance;
2824cc54 85 $Left = array(0, 5, 9, 10, 12);
86 while (count($Left) > 0) {
87 // Some background colors
8c933a32 88 $r = mt_rand(24,64);
89 $unique = true;
90 foreach ($used as $col) {
91 if (abs($r - $col) < $targetDistance)
eb548244 92 $unique = false;
8c933a32 93 }
94 if ($unique) {
2824cc54 95 $i = array_shift($Left);
1681f4d9 96 $color[$i] = sprintf('#%02X%02X%02X',$r,$r, $r);
eb548244 97 $used[] = $r;
98 $targetDistance = $BackgroundTargetDistance;
2824cc54 99 } else {
8c933a32 100 $targetDistance -= $BackgroundAdjust;
2824cc54 101 }
102 }
eb548244 103
2824cc54 104 // Set the error color to some shade of red
105 $r = mt_rand(196, 255);
106 $g = mt_rand(144, ($r * .8));
1681f4d9 107 $color[2] = sprintf('#%02X%02X%02X', $r, $g, $g);
2824cc54 108 $used = array(array($r, $g, $g));
eb548244 109
2824cc54 110 // Set normal text colors
111 $cmin = 196;
112 $cmax = 255;
113 foreach (array(6, 8) as $i) {
114 /** generate random color **/
115 $r = mt_rand($cmin,$cmax);
116 $g = mt_rand($cmin,$cmax);
117 $b = mt_rand($cmin,$cmax);
1681f4d9 118 $color[$i] = sprintf('#%02X%02X%02X',$r,$g,$b);
2824cc54 119 $used[] = array($r, $g, $b);
120 }
eb548244 121
ecf5c1bd 122 $Left = array(1, 7, 11, 13, 14, 15);
8c933a32 123 $targetDistance = $TextTargetDistance;
2824cc54 124 while (count($Left) > 0) {
125 // Text colors -- Try to keep the colors distinct
126 $cmin = 196;
127 $cmax = 255;
eb548244 128
2824cc54 129 /** generate random color **/
130 $r = mt_rand($cmin,$cmax);
131 $g = mt_rand($cmin,$cmax);
132 $b = mt_rand($cmin,$cmax);
133
134 if (IsUnique($targetDistance, $r, $g, $b, $used)) {
135 $i = array_shift($Left);
1681f4d9 136 $color[$i] = sprintf('#%02X%02X%02X',$r,$g,$b);
eb548244 137 $used[] = array($r, $g, $b);
138 $targetDistance = $TextTargetDistance;
2824cc54 139 } else {
8c933a32 140 $targetDistance *= $TextAdjust;
2824cc54 141 }
142 }
143
144
145/** Reference from doc/themes.txt
146
147b 0: Title Bar at the top of the page header
148f 1: <not currently used>
149f 2: Error messages, usually red
150b 3: Left folder list background color
151b 4: Normal background color
152b 5: Header of the message index [From, Date, Subject]
153f 6: Normal text on the left folder list
154f 7: Links in the right frame, Folders with subfolders in left frame
155f 8: Normal text [usually black]
156b 9: Darker version of #0
157b 10: Darker version of #9
158f 11: Special folders color [Inbox, Trash, Sent]
159b 12: Alternate color for message list [alters between 4 and this one]
1681f4d9 160f 13: Color for single-quoted text ('> text') when reading (default: #800000)
2824cc54 161f 14: Color for text with more than one quote (default: #FF0000)
162
163**/
164
6fd95361 165?>