Context Navigation

source: extensions/whois_online/online.php @ 5593

Last change on this file since 5593 was 3695, checked in by vdigital, 15 years ago

Minor release: 2009-07-28 2.0.j

Minor changes in Config management
Additionnal flags (Ireland, Armenia, Estonia, Kazakhstan, Belarus,
Andorra, Turkey, Albania, Bosnia and Herzegovina, Azerbaijan, Iceland, European Union,
Israel, Morocco, New Caledonia and some other revised)
Search Engine trapping

Property svn:eol-style set to LF
Property svn:keywords set to Author Date Id Revision

File size: 22.7 KB

Line
1	<?php
2
3	if (!defined('PHPWG_ROOT_PATH')) die('Hacking attempt!');
4	global $conf, $conf_whois, $prefixeTable;
5	include_once(WHOIS_ONLINE_PATH.'include/wo_functions.inc.php');
6	/* Secure Config */
7	if (!isset($conf_whois['Active'])) $conf_whois = whois_online_conf();
8
9	function whois_online_conf()
10	{
11	global $conf;
12	$default = array(
13	'Active' => true,
14	'Delete level' => 20,
15	'Radar limit' => 25,
16	'Webmasters' => 2, // Normal
17	'Administrators' => 2,
18	'Obsolete limit' => 20,
19	'Default display' => true,
20	'Add to Plugins menu' => false,
21	'Add icon to History' => true,
22	'Keep data' => true,
23	'Search id' => 0,
24	'Users' => Array('max' => 0, 'When' => date('Y-m-d'), 'count' => 0),
25	);
26	$conf_whois = array_merge($default, unserialize($conf['Whois Online']));
27	if ((!isset($conf_whois['Version'])) or $conf_whois['Version'] != WHOIS_ONLINE_VER
28	or $conf['Whois Online'] != serialize($conf_whois)) {
29	$conf_whois['Version'] = WHOIS_ONLINE_VER;
30	$conf['Whois Online'] = serialize($conf_whois);
31	pwg_query('REPLACE INTO ' . CONFIG_TABLE . " (param,value,comment)
32	VALUES ('Whois Online','". $conf['Whois Online'] ."','Whois Online configuration');");
33	}
34	return $conf_whois;
35	}
36
37	define('ONLINE_LEVEL', (100+$conf_whois['Delete level'])/100);
38	define('ONLINE_LIMIT', $conf_whois['Obsolete limit']);
39
40	/* Admin menus are always available */
41	add_event_handler('get_admin_plugin_menu_links', 'whois_add_icon' );
42	/* On Active */
43	if ($conf_whois['Active']) {
44	$conf['Whois Online Update'] = true;
45	add_event_handler('loc_begin_picture', 'whois_online_management');
46	add_event_handler('loc_begin_index', 'whois_online_management');
47	add_event_handler('register_user', 'whois_online_register');
48	if ($conf_whois['Default display'] or (defined('IN_ADMIN') and IN_ADMIN)) add_event_handler('loc_begin_page_tail', 'whois_default_display' );
49	}
50
51
52
53
54	// Assume the Default display on pages
55	function whois_default_display() {
56	global $template;
57	$template->set_filenames(array( 'Whois_display' => dirname(__FILE__).'/default.tpl'));
58	$template->pparse('Whois_display');
59	}
60
61	// Add admin links
62	function whois_add_icon($menu) {
63	global $conf_whois, $lang;
64	if ($conf_whois['Add icon to History'])
65	$lang['History'] .= '</a> <a class="external" href="' . get_admin_plugin_menu_link(WHOIS_ONLINE_PATH.'config.php') . '">
66	<img class="button" src="' . WHOIS_ONLINE_PATH . 'icons/Whois_tuner.gif" alt="Whois Online configuration" title="Whois Online configuration" /></a>';
67	if ($conf_whois['Add to Plugins menu']) array_push($menu, array(
68	'NAME' => 'Whois Online',
69	'URL' => get_admin_plugin_menu_link(WHOIS_ONLINE_PATH.'config.php'),
70	));
71	return $menu;
72	}
73
74	// Template function
75	function Whois_most($text, $count, $when, $format) {
76	return sprintf(l10n($text),$count,date(l10n($format),$when));
77	}
78
79	// New member
80	function whois_online_register($who) {
81	global $conf, $conf_whois;
82	$conf_whois['Users']['count'] = $who['id'];
83	$conf['Whois Online'] = serialize($conf_whois);
84	pwg_query('REPLACE INTO ' . CONFIG_TABLE . " (param,value,comment)
85	VALUES ('Whois Online','". $conf['Whois Online'] ."','Whois Online configuration');");
86	return;
87	}
88
89	function whois_country($trace, $bypass = false) {
90	if (!isset($trace['country'])) {
91	pwg_query('ALTER TABLE ' . WHOIS_ONLINE_TABLE . ' ADD `country` VARCHAR( 256 ) NOT NULL AFTER `lang` ;');
92	$trace['country']='';
93	}
94	$c = array();
95	if ($trace['country']!='') $c = @unserialize(htmlspecialchars_decode($trace['country']));
96	if (isset($c['Code']) and $c['Code']!='' and $c['Code']!='__') return $c;
97	if ($bypass and isset($c['Code']) and $c['Code']=='__') return $c;
98	$f = @fopen ('http://api.hostip.info/get_html.php?ip=' . $trace['IP'], 'r');
99	if ($f === FALSE) return Array('Code' => '__', 'Name' => l10n('Unknown country'), 'City' => 'N/A',);
100	$result='';
101	while ($l = fgets ($f, 1024)) $result .= $l;
102	fclose ($f);
103	$tokens = split ("[:\n]", $result);
104	$c = array ('Name' => $tokens[1], 'City' => $tokens[3]);
105	if (strpos ($c['Name'], '?') === FALSE) {
106	$tokens = split ("[\(\)]", $c['Name']);
107	$c['Code'] = isset($tokens[1]) ? $tokens[1]:'__';
108	$c['Name'] = ucwords ( strtolower( ereg_replace
109	(' \([^\)]+)', '', $c['Name'])));
110	}
111	else $c = Array('Code' => '__', 'Name' => l10n('Unknown country'), 'City' => 'N/A',);
112	if ($c['Code'] == 'Private Address') {
113	$c['Name'] = l10n('Private Address');
114	$c['City'] = l10n('N/A');
115	$c['Code'] = '__';
116	}
117	$new = htmlspecialchars(serialize($c),ENT_QUOTES,'UTF-8');
118	if ($new == $trace['country']) return $c;
119	pwg_query('UPDATE ' . WHOIS_ONLINE_TABLE . '
120	SET `country` = \'' . $new . '\'
121	WHERE `session_id` = \'' . $trace['session_id'] . '\';');
122	return $c;
123	}
124
125	function whois_flag($trace, &$step, $limit = 10) {
126	$flag = WHOIS_ONLINE_PATH . 'flags/' . $trace['Country']['Code'] . '.jpg';
127	if (file_exists($flag)) return $flag;
128	if ( $step > $limit ) return WHOIS_ONLINE_PATH . 'flags/__.jpg';
129	$f = fopen ('http://api.hostip.info/flag.php?ip=' . $trace['IP'], 'r');
130	$result='';
131	while ($l = fgets ($f, 1024)) $result .= $l;
132	fclose ($f);
133	$f = fopen($flag,"w+");
134	fputs($f,$result);
135	fclose($f);
136	return $flag;
137	}
138
139	// Read all data
140	function whois_online_get_data($order='') {
141	$remove = "''"; // Nothing to remove ( = an empty session_id)
142	$ctr = 0; $Online[0] = '';
143	$result = pwg_query('SELECT * FROM ' . WHOIS_ONLINE_TABLE . $order . ';');
144	while($row=mysql_fetch_array($result)) {
145	$row['delay'] = (int) time() - $row['last_access'];
146	$row['elm_ids'] = explode(' ', $row['last_elm_ids']);
147	$row['cat_ids'] = explode(' ', $row['last_cat_ids']);
148	$row['tag_ids'] = explode(' ', $row['last_tag_ids']);
149	$row['sch_ids'] = explode(' ', $row['last_sch_ids']);
150	$row['dates'] = explode(' ', $row['last_dates']);
151	$ctr++;
152	if ( $row['IP'] != 'global' and $row['permanent'] == 'false'
153	and $row['delay'] > (float)( 60 * 60 * 24 * 3 )) $remove .= ", '" . $row['session_id'] . "'";
154	elseif ($row['IP'] == 'global') $Online[0] = $row;
155	else $Online[] = $row;
156	}
157	// Out of 7 visits: Reduce registered visits for 3 days without access
158	if ($remove != "''" and $ctr > (count($Online) * ONLINE_LEVEL)
159	and ($ctr-count($Online)) > ONLINE_LIMIT and ($Online[0]['pag_hits']%7)==0) {
160	pwg_query('DELETE FROM ' . WHOIS_ONLINE_TABLE . ' WHERE `session_id` IN ('. $remove .')
161	AND `permanent` = \'false\' AND `IP` <> \'global\';');
162	if (($Online[0]['pag_hits']%13)==0) @pwg_query('OPTIMIZE TABLE ' . WHOIS_ONLINE_TABLE . ';');
163	}
164	return $Online;
165	}
166
167	// Update global and update/create current session_id
168	function whois_online_update(&$global, &$dedicated, &$gtrace)
169	{
170	global $lang_info;
171	// Rewrite the global record
172	if ( $gtrace == 2 ) {
173	$query = 'REPLACE INTO ' . WHOIS_ONLINE_TABLE . ' (`IP`, `hidden_IP`, `session_id`,`user_id`,`username`,`lang`,
174	`permanent`,`last_access`,`last_elm_ids`, `last_cat_ids`, `last_tag_ids`, `last_sch_ids`,
175	`first_access_date`, `last_dates`, `elm_hits`, `pag_hits`)
176	VALUES (\'global\', \'true\',\'global\', 0, \''. $global['username'] .'\', \'--\', \'true\', \''
177	. time() .'\', \''
178	. implode(' ',$global['elm_ids']) . '\', \''
179	. implode(' ',$global['cat_ids']) . '\', \''
180	. implode(' ',$global['tag_ids']) . '\', \''
181	. implode(' ',$global['sch_ids']) . '\', \''
182	. $global['first_access_date'] . '\', \'\', \''
183	. $global['elm_hits'] . '\', \'' . $global['pag_hits'] . '\');';
184	pwg_query($query);
185	}
186	// Write or Rewrite the dedicated record
187	$query = 'REPLACE INTO ' . WHOIS_ONLINE_TABLE . ' (`IP`, `hidden_IP`, `session_id`,`user_id`,`username`,`lang`, `user_agent`,
188	`any_previous`, `same_previous`, `permanent`,`last_access`,`last_elm_ids`, `last_cat_ids`, `last_tag_ids`, `last_sch_ids`,
189	`first_access_date`, `last_dates`, `elm_hits`, `pag_hits`)
190	VALUES (\''. $dedicated['IP'] .'\', \''
191	. $dedicated['hidden_IP'] .'\', \''. $dedicated['session_id'] .'\', \''
192	. $dedicated['user_id'] .'\', \''. $dedicated['username'] .'\', \''
193	. substr($lang_info['code'],0,2) .'\', \''
194	. $dedicated['user_agent'] .'\', \''
195	. $dedicated['any_previous'] .'\', \''
196	. $dedicated['same_previous'] .'\', \''
197	. $dedicated['permanent'] . '\', \''. time() .'\', \''
198	. implode(' ',$dedicated['elm_ids']) . '\', \''
199	. implode(' ',$dedicated['cat_ids']) . '\', \''
200	. implode(' ',$dedicated['tag_ids']) . '\', \''
201	. implode(' ',$dedicated['sch_ids']) . '\', \''
202	. $dedicated['first_access_date'] . '\', \''
203	. implode(' ',$dedicated['dates']) . '\', \''
204	. $dedicated['elm_hits'] . '\', \''
205	. $dedicated['pag_hits'] . '\');';
206	pwg_query($query);
207	}
208
209	// Data tracking
210	// Parameters:
211	// - Array of Ids
212	// - New ID
213	// - Array of dates
214	// => Add the ID if needed, Add Today if needed
215	function whois_online_track(&$key, $id, &$date) {
216	if ($id != '') array_unshift($key, $id);
217	$key = array_unique($key);
218	if (count($key)>10) array_pop($key);
219	array_unshift($date, date('Y-m-d'));
220	$date = array_unique($date);
221	if (count($date)>5) array_pop($date);
222	return;
223	}
224
225	// Antiaspi delay conversion in seconds
226	// delay in "HH:ii:ss" or "d :HH:ii:ss"
227	// return delay in seconds
228	function whois_online_duration($date_string)
229	{
230	list($s, $i, $H, $d, $more) =
231	array_merge(array_reverse(
232	explode(" ",str_ireplace(':',' ', $date_string))),
233	array(0,0,0,0,0));
234	$t = time();
235	return strtotime(sprintf("+%s days %s hours %s minutes %s seconds",
236	$d, $H, $i, $s), $t) - $t;
237	}
238
239	/*
240	Main process: Analyze, set new values and prepare displayed values.
241
242	Update on parameter...
243	*/
244	function whois_online_management()
245	{
246	global $user, $conf, $conf_whois, $template, $page, $lang, $lang_info;
247	load_language('plugin.lang', WHOIS_ONLINE_PATH);
248	srand((float)time());
249
250	pwg_debug('********* start Online_management *********');
251	if (!isset($conf_whois['Active'])) $conf_whois = whois_online_conf();
252
253	$online = whois_online_get_data();
254
255	$global = $online[0];
256	unset($online[0]);
257	$sid = session_id();
258
259	// Step 1 - Find the User and/or IP/session_id
260	foreach ($online as $key => $record) {
261	// 1st case: Same IP and same member (Proxy guests are viewed as one)
262	if ($record['IP'] == $_SERVER['REMOTE_ADDR']
263	and $record['username'] == $user['username'] ) {
264	$visit = $record;
265	$v = $key;
266	break;
267	}
268	// 2nd case: Same session and user (No doubt)
269	if ($record['session_id'] == $sid
270	and $record['username'] == $user['username'] ) {
271	$visit = $record; // Maybe a guest
272	if (!is_a_guest()) $visit['hidden_IP'] = 'true'; // Maybe Proxy or hidden IP
273	//$visit['IP'] = $_SERVER['REMOTE_ADDR'];
274	$v = $key;
275	break;
276	}
277	// 3rd and last case: Same user_id
278	if ($record['user_id'] == $user['id'] and !is_a_guest()) { // new IP and new session
279	$visit = $record;
280	$visit['hidden_IP'] = 'true'; /* Or Generic user or the user is using several connections */
281	//$visit['IP'] = $_SERVER['REMOTE_ADDR'];
282	$v = $key;
283	break;
284	}
285	}
286
287	// Step 2 - Assume a new comer
288	if ( !isset($visit) ) {
289	$visit = Array(
290	'IP' => $_SERVER['REMOTE_ADDR'], // First known IP (Is that one true?)
291	'hidden_IP' => 'false', // supposed a fixed IP
292	'session_id' => $sid,
293	'user_id' => $user['id'],
294	'username' => $user['username'],
295	'delay' => 0,
296	'lang' => substr($lang_info['code'],0,2),
297	'permanent' => 'false', // False: delete after 72 Hours / True: delete after 90 days
298	'last_access' => time(), // Last access by this user
299	'elm_ids' => array_fill(0, 10, 0), // 10 last minutes + Last reference minute
300	'cat_ids' => array_fill(0, 12, 0), // 12 ranges (of 5 minutes) + ref
301	'tag_ids' => array_fill(0, 24, 0), // 24 hours + ref
302	'sch_ids' => array_fill(0, 14, 0), // 14 days + ref
303	'date' => date('Y-m-d'), // Futur usage
304	'elm_hits' => 0, 'pag_hits' => 0, // elements hits and pages hits by this user
305	'first_access_date' => date('Y-m-d'), // First access by this user
306	'dates' => Array(), // 5 last access dates
307	);
308	$online[] = $visit;
309	$v = count($online);
310	}
311
312	// Step 3 - Monitor this access
313	$base = script_basename();
314	// Picture page
315	if (isset($page['image_id']) and $base == 'picture') {
316	whois_online_track($visit['elm_ids'], $page['image_id'],$visit['dates']);
317	if (isset($page['tags']))
318	whois_online_track($visit['tag_ids'], $page['image_id'],$visit['dates']);
319	if (isset($page['search']))
320	whois_online_track($visit['sch_ids'], $page['image_id'],$visit['dates']);
321	$visit['elm_hits']++;
322	$global['elm_hits']++;
323	}
324	// Category page
325	if (isset($page['category']['id']) and $base == 'index')
326	whois_online_track($visit['cat_ids'], $page['category']['id'],$visit['dates']);
327	// Page index
328	if (!isset($page['category']['id']) and !isset($page['image_id']))
329	whois_online_track($visit['cat_ids'], '' ,$visit['dates']);
330	$visit['pag_hits']++;
331	$global['pag_hits']++;
332
333	// Step 4 - Identify current range
334	$current = floor(time() / 60); // minutes for Unix time origin
335	$minute = $current % 10; // (0-9) current minute
336	$five = floor($current / 5); // (0-11) last 5 minutes range
337	$hour = floor($current / 60); // (0-11) last hours
338	$day = floor($current / 1440); // (0-13) last days
339	if (isset($global['elm_ids'][10])) $old = $global['elm_ids'][10]; // previous minute (last one, or maybe 60 minutes ago or more).
340	else $old = $current; /* Only the first time or prevent wrong changes */
341
342	// Step 5 - Hits by range
343	if ($current != $old) {
344	$global['elm_ids'][11] = $global['elm_ids'][$minute];
345	$raz = min($current-$old, 10);
346	// 5.1 - $global['elm_ids'] ( hits by minute range )
347	for ($i=0;$i<$raz;$i++) {
348	$global['elm_ids'][($minute+10-$i)%10] = 0;
349	}
350	// 5.2 - $global['cat_ids'] ( hits by 5 minutes range )
351	if (isset($global['cat_ids'][12])) $oldfive = $global['cat_ids'][12];
352	else $oldfive = floor($old / 5);
353	$raz = min($five - $oldfive, 12);
354	for ($i=0;$i<$raz;$i++) {
355	$global['cat_ids'][($five+12-$i)%12] = 0; // Reset in backside
356	}
357	// 5.3 - $global['tag_ids'] (hits by hours )
358	if (count($global['tag_ids'])<25) $global['tag_ids'] = array_fill(0, 24, 0);
359	if (isset($global['tag_ids'][24])) $oldhour = $global['tag_ids'][24];
360	else $oldhour = floor($old / 60);
361	$raz = min($hour - $oldhour, 24);
362	for ($i=0;$i<$raz;$i++) {
363	$global['tag_ids'][($hour+24-$i)%24] = 0; // Reset in backside
364	}
365	// 5.4 - $global['sch_ids'] ( hits by days )
366	if (isset($global['sch_ids'][14])) $oldday = $global['sch_ids'][14];
367	else $oldday = floor($old / 1440);
368	$raz = min($day - $oldday, 14);
369	for ($i=0;$i<$raz;$i++) {
370	$global['sch_ids'][($day+14-$i)%14] = 0; // Reset in backside
371	}
372	}
373	$global['elm_ids'][$minute]++;
374	$global['cat_ids'][$five%12]++;
375	$global['tag_ids'][$hour%12]++;
376	$global['sch_ids'][$day%14]++;
377	// !!! WARNING !!! WARNING !!! WARNING !!! WARNING !!!
378	$global['elm_ids'][10] = $current; // reference minute has changed
379	$global['cat_ids'][12] = $five;
380	$global['tag_ids'][24] = $hour;
381	$global['sch_ids'][14] = $day;
382	// !!! WARNING !!! WARNING !!! WARNING !!! WARNING !!!
383
384	// 5.5 - Add in previous
385	if (!isset($global['any_previous'])) {
386	pwg_query('ALTER TABLE ' . WHOIS_ONLINE_TABLE .
387	' ADD `same_previous` VARCHAR( 256 ) NOT NULL DEFAULT \'\' AFTER `country`;');
388	pwg_query('ALTER TABLE ' . WHOIS_ONLINE_TABLE .
389	' ADD `any_previous` VARCHAR( 256 ) NOT NULL DEFAULT \'\' AFTER `country`;');
390	pwg_query('ALTER TABLE ' . WHOIS_ONLINE_TABLE .
391	' ADD `user_agent` VARCHAR( 160 ) NOT NULL DEFAULT \'\' AFTER `country`;');
392	}
393
394	$antiaspi = array(
395	'diff' => '20 pages in 00:00:10' , // Banned for 20 access in 10 seconds or less
396	'same' => '15 pages in 00:00:30' , // Banned for 15 access on the same page in 30 seconds or less
397	'banned during' => '23:59:59' , // Banned time hh:mm:ss or any valid MySQL datetime expression 'YYYY-MM-DD HH:MM:SS'
398	'only guest' => true , // True, registred members won't be banned
399	'only picture' => false , // True, Check only on picture pages
400	'allowed ip' => array() // Allowed IP array (Bots, or your fixed IP)
401	);
402	if (isset($conf['antiaspi'])) $antiaspi = array_merge($antiaspi, $conf['antiaspi']);
403
404	// For AntiAspi follow ANY PREVIOUS access
405	$access = '0:';
406	list($max_any, $maxtext) = explode(' pages in ', $antiaspi['diff']);
407	$maxtime = whois_online_duration($maxtext);
408	$prev='';
409	$previous = (isset($visit['any_previous'])) ? explode(' ', $visit['any_previous']):Array();
410	foreach ($previous as $v) {
411	$old = explode(':', $v);
412	$old[0] += $visit['delay'];
413	if ($old[0]<$maxtime) $prev .= $old[0].': ';
414	}
415	$prev = $access . ' ' . $prev;
416	$prev = substr($prev, 0, -2);
417	$visit['any_previous'] = $prev;
418	// For AntiAspi follow ANY SAME PICTURE access
419	$access = '0:';
420	$same_elem = (isset($page['image_id'])) ? $page['image_id']:'0';
421	list($max_same, $maxtext) = explode(' pages in ', $antiaspi['same']);
422	$maxtime = whois_online_duration($maxtext);
423	$access .= $same_elem . ':';
424	$prev='';
425	$previous = (isset($visit['same_previous'])) ? explode(' ', $visit['same_previous']):Array();
426	foreach ($previous as $v) {
427	$old = explode(':', $v);
428	$old[0] += $visit['delay'];
429	if ($old[0]<$maxtime and $old[1]==$same_elem) $prev .= $old[0].':'.$old[1].': ';
430	}
431	$prev = $access . ' ' . $prev;
432	$prev = substr($prev, 0, -2);
433	$visit['same_previous'] = $prev;
434
435	// Check limits of $visit['any_previous'] and $visit['same_previous']
436	// by 256 characters
437	// by $max_any and by $max_same
438	while (strlen($visit['any_previous'])>256) {
439	$previous = explode(' ',$visit['any_previous']);
440	$oldest = array_pop($previous);
441	$visit['any_previous'] = implode(' ', $previous);
442	}
443	$ctr_any = count(explode(' ',$visit['any_previous']));
444	while (strlen($visit['same_previous'])>256) {
445	$previous = explode(' ',$visit['same_previous']);
446	$oldest = array_pop($previous);
447	$visit['same_previous'] = implode(' ', $previous);
448	}
449	$ctr_same = count(explode(' ',$visit['same_previous']));
450
451	$visit['user_agent'] = $_SERVER['HTTP_USER_AGENT'];
452	$Vip =& $visit['IP'];
453	$visit['Allowed_SE'] = false;
454	if (!empty($antiaspi['allowed ip']))
455	{
456	$allowed_ips = str_replace(array('.', '%'), array('\.', '.*?'), $antiaspi['allowed ip']);
457	foreach ($allowed_ips as $ip)
458	{
459	if (preg_match("#" . $ip . "#", $Vip)) { $visit['Allowed_SE'] = true; break; }
460	}
461	}
462
463	// Step 6 - Update (on Conf_Update and trace) and send trace to determine global tracing or not
464	$dtrace = 0;
465	if ($user['status'] == 'admin') $dtrace += $conf_whois['Administrators'];
466	elseif ($user['status'] == 'webmaster') $dtrace += $conf_whois['Webmasters'];
467	else $dtrace = 2;
468	if ($conf['Whois Online Update'] and $dtrace > 0) whois_online_update($global, $visit, $dtrace);
469
470	// Step 7 - Find your recent visits (These image_ids are presumely authorized)
471	$my_ids = $visit['elm_ids'];
472	sort($my_ids);
473	unset($my_ids[0]);
474	$url_visited = (count($my_ids)>0) ? make_index_url(array('list' => $my_ids)).'&review':'';
475
476	// Step 8 - Guest count and Member list
477	$h24 = 0; $h1 = 0; $guest = 0;
478	$list = array();
479	$elm = array(); $excl = array(); // Get images_ids from all and from the current visitor
480	foreach ($online as $k => $monit)
481	{
482	if ($user['id']==$monit['user_id']) $excl = $monit['elm_ids'];
483	else $elm = array_merge($elm, $monit['elm_ids']);
484	if ($monit['delay'] <= (24*3600)) $h24++;
485	if ($monit['delay'] <= 3600) $h1++;
486	// Less than 5 minutes: users are considered as still online...
487	if ($monit['delay'] <= 300) {
488	if ($monit['user_id'] == $conf['guest_id']) $guest++;
489	else $list[] = $monit['username'];
490	}
491	}
492	// The first (and current) access are not recorded in $online
493	// As visitor you are not expecting your access to be already counted: Ok that the case
494	// but you are expecting to see you as a member in the member list if you are: and there it is
495	if ($visit['user_id'] != $conf['guest_id'] ) $list[] = $visit['username'];
496	$list = array_unique($list);
497
498	if (count($list) > $conf_whois['Users']['max']) {
499	$conf_whois['Users']['max'] = count($list);
500	$conf_whois['Users']['When'] = time();
501	$conf['Whois Online'] = serialize($conf_whois);
502	pwg_query('REPLACE INTO ' . CONFIG_TABLE . " (param,value,comment)
503	VALUES ('Whois Online','". $conf['Whois Online'] ."','Whois Online configuration');");
504	}
505
506	// Step 9 - Review pictures viewed by others (all images except yours)
507	$elm = array_diff( array_unique($elm), $excl );
508	shuffle($elm);
509	$elm = array_slice($elm,0,($conf['top_number']+50));
510	sort($elm);
511	array_shift($elm);
512	$elm[] = 0; // Check if authorized pictures
513	$query = 'SELECT DISTINCT(image_id)
514	FROM '.IMAGE_CATEGORY_TABLE.'
515	INNER JOIN '.IMAGES_TABLE.' ON id = image_id
516	WHERE image_id IN ('.implode(',', $elm ).')
517	'.get_sql_condition_FandF(
518	array(
519	'forbidden_categories' => 'category_id',
520	'visible_categories' => 'category_id',
521	'visible_images' => 'id'
522	), "\n AND") . ';';
523	$ids = array_from_query($query, 'image_id');
524	shuffle($ids);
525	$ids = array_slice($ids, 0, $conf['top_number']); // Keep some
526	$url_someothers = (isset($ids[0])) ? make_index_url(array('list' => $ids)).'&others':'';
527
528	// Random page title change
529	$url_type = pwg_get_session_var('whois_url_type', ''); /* previous review or others */
530	$list_ids = pwg_get_session_var('whois_list_ids', ''); /* previous list/xx,yy,zz, ... */
531	$list_section = (isset($page['section']) and $page['section'] == 'list') ? true:false;
532	$same_ids = (isset($page['list']) and $page['list'] == $list_ids) ? true:false;
533	if ($list_section and isset($_GET['review'])) {
534	$url_type = 'Whois_review';
535	$same_ids = true;
536	}
537	if ($list_section and isset($_GET['others'])) {
538	$url_type = 'Whois_others';
539	$same_ids = true;
540	}
541	if ($list_section and $same_ids and isset($page['list'])) $list_ids = $page['list'];
542	else $url_type = ''; // Not the same list
543	pwg_set_session_var('whois_list_ids', $list_ids);
544	pwg_set_session_var('whois_url_type', $url_type);
545	if ($url_type != '' and $list_section)
546	$page['title'] = '<a href="'.duplicate_index_url(array('start'=>0)).'">'
547	.l10n($url_type).'</a>';
548
549
550	// Step 10 - Prepare data to display
551	$yesterday = ($day+13) % 14;
552	$template->assign('Whois', array(
553	'Total' => $global['pag_hits'],
554	'Image' => $global['elm_hits'],
555	'Other' => ($global['pag_hits']-$global['elm_hits']),
556	'Current_minute' => $global['elm_ids'][$minute],
557	'Previous_minute' => $global['elm_ids'][($minute+9) % 10],
558	'Current_5mins' => $global['elm_ids'][$minute]
559	+ $global['elm_ids'][($minute+9) % 10]
560	+ $global['elm_ids'][($minute+8) % 10]
561	+ $global['elm_ids'][($minute+7) % 10]
562	+ $global['elm_ids'][($minute+6) % 10],
563	'Current_10mins' => array_sum(array_slice($global['elm_ids'],0,10)),
564	'Current_hour' => array_sum(array_slice($global['cat_ids'],0,12)),
565	'Current_24h' => array_sum(array_slice($global['tag_ids'],0,24)),
566	'Yesterday' => $global['sch_ids'][$yesterday],
567	'Users_Last_day' => $h24,
568	'Users_Last_hour' => $h1,
569	'Guests' => $guest,
570	'Online' => $list,
571	'Review_url' => $url_someothers,
572	'Their_ids' => $ids,
573	'Seen_url' => $url_visited,
574	'My_ids' => $my_ids,
575	'Slideshow' => isset($_GET['slideshow']) ? true:false,
576	));
577	$template->assign('Online', $global );
578
579	pwg_debug('end Online_management');
580	}
581	?>

Note: See TracBrowser for help on using the repository browser.

Download in other formats: