Project

General

Profile

Download (1.92 KB) Statistics
| Branch: | Tag: | Revision:
1 5e589685 smos
#!/usr/local/bin/php -f
2
<?php
3
4 dc3e3acb smos
ini_set("max_execution_time", "0");
5
6 5e589685 smos
if(empty($argv[1])) {
7
	echo "No modem device given \n";
8
	exit(0);
9
}
10
11
/* Huawei example */
12
$device = "/dev/{$argv[1]}";
13
$statfile = "/tmp/3gstats.{$argv[2]}";
14 5aa68a55 Renato Botelho
/* mode is a comma separated value, thus submode is born */
15 d535507a smos
$header = "#seconds,rssi,mode,submode,upstream,downstream,sentbytes,receivedbyts,bwupstream,bwdownstream,simstate,service\n";
16 5e589685 smos
17
$i = 0;
18
19
$record = array();
20
$handle = fopen($device, "r");
21 73ce6909 smos
if(! $handle) {
22
	echo "Can not open modem stats device\n";
23
	exit(1);
24
}
25 99f95f7d smos
26 7efe5ac5 smos
$record['time'] = 0;
27 99f95f7d smos
$record['rssi'] = 0;
28
$record['mode'] = "0,0";
29 7efe5ac5 smos
$record['upstream'] = 0;
30
$record['downstream'] = 0;
31
$record['sent'] = 0;
32
$record['received'] = 0;
33
$record['bwupstream'] = 0;
34
$record['bwdownstream'] = 0;
35 d535507a smos
$record['simstate'] = 0;
36
$record['service'] = 0;
37 99f95f7d smos
38 7d61beba Phil Davis
while (true) {
39 5e589685 smos
	$string = "";
40
	$string = fgets($handle, 256);
41
42
	$elements = array();
43 f99f51a9 Ermal LUÇI
	$elements = explode(':', $string);
44 5e589685 smos
	$elements[0] = trim($elements[0]);
45
	$elements[1] = trim($elements[1]);
46
47 7d61beba Phil Davis
	switch ($elements[0]) {
48 7efe5ac5 smos
		case "^MODE":
49
			$record['mode'] = $elements[1];
50
			break;
51 d535507a smos
		case "^SRVST":
52
			$record['service'] = $elements[1];
53
			break;
54
		case "^SIMST":
55
			$record['simstate'] = $elements[1];
56
			break;
57 5e589685 smos
		case "^RSSI":
58
			$record['rssi'] = $elements[1];
59
			break;
60
		case "^DSFLOWRPT":
61
			$items = array();
62 f99f51a9 Ermal LUÇI
			$items = explode(',', $elements[1]);
63 5e589685 smos
			$record['time'] = hexdec($items[0]);
64 b45d6db6 smos
			$record['upstream'] = round((floatval(hexdec($items[1])) * 8) /1024);
65
			$record['downstream'] = round((floatval(hexdec($items[2])) * 8) /1024);
66 5e589685 smos
			$record['sent'] = hexdec($items[3]);
67
			$record['received'] = hexdec($items[4]);
68 b45d6db6 smos
			$record['bwupstream'] = round((floatval(hexdec($items[5])) * 8) /1024);
69
			$record['bwdownstream'] = round((floatval(hexdec($items[6])) * 8) /1024);
70 5e589685 smos
			break;
71
	}
72
73 7d61beba Phil Davis
	if ($i > 10) {
74 d535507a smos
		$csv = $header;
75
		$csv .= implode(",", $record);
76
		$csv .= "\n";
77 5e589685 smos
		file_put_contents($statfile, $csv);
78
		$i = 0;
79
	}
80
	$i++;
81
}
82
fclose($handle);
83
?>