Subversion Repositories ALCASAR

Rev

Rev 2770 | Rev 3037 | Go to most recent revision | Details | Compare with Previous | Last modification | View Log

Rev Author Line No. Line
2770 rexy 1
<?php
2
/**
3
 * Basic OS Class
4
 *
5
 * PHP version 5
6
 *
7
 * @category  PHP
8
 * @package   PSI OS class
9
 * @author    Michael Cramer <BigMichi1@users.sourceforge.net>
10
 * @copyright 2009 phpSysInfo
11
 * @license   http://opensource.org/licenses/gpl-2.0.php GNU General Public License version 2, or (at your option) any later version
12
 * @version   SVN: $Id: class.OS.inc.php 699 2012-09-15 11:57:13Z namiltd $
13
 * @link      http://phpsysinfo.sourceforge.net
14
 */
15
 /**
16
 * Basic OS functions for all OS classes
17
 *
18
 * @category  PHP
19
 * @package   PSI OS class
20
 * @author    Michael Cramer <BigMichi1@users.sourceforge.net>
21
 * @copyright 2009 phpSysInfo
22
 * @license   http://opensource.org/licenses/gpl-2.0.php GNU General Public License version 2, or (at your option) any later version
23
 * @version   Release: 3.0
24
 * @link      http://phpsysinfo.sourceforge.net
25
 */
26
abstract class OS implements PSI_Interface_OS
27
{
28
    /**
29
     * object for error handling
30
     *
31
     * @var PSI_Error
32
     */
33
    protected $error;
34
 
35
    /**
36
     * block name
37
     *
38
     * @var string
39
     */
40
    protected $blockname = false;
41
 
42
    /**
43
     * @var System
44
     */
45
    protected $sys;
46
 
47
    /**
48
     * build the global Error object
49
     */
50
    public function __construct($blockname = false)
51
    {
52
        $this->error = PSI_Error::singleton();
53
        $this->sys = new System();
54
        $this->blockname = $blockname;
55
    }
56
 
57
    /**
58
     * get os specific encoding
59
     *
60
     * @see PSI_Interface_OS::getEncoding()
61
     *
62
     * @return string
63
     */
64
    public function getEncoding()
65
    {
66
        return PSI_SYSTEM_CODEPAGE;
67
    }
68
 
69
    /**
70
     * get os specific language
71
     *
72
     * @see PSI_Interface_OS::getLanguage()
73
     *
74
     * @return string
75
     */
76
    public function getLanguage()
77
    {
78
        return PSI_SYSTEM_LANG;
79
    }
80
 
81
    /**
82
     * get block name
83
     *
84
     * @see PSI_Interface_OS::getBlockName()
85
     *
86
     * @return string
87
     */
88
    public function getBlockName()
89
    {
90
        return $this->blockname;
91
    }
92
 
93
    /**
94
     * Number of Users
95
     *
96
     * @return void
97
     */
98
    protected function _users()
99
    {
100
        if (CommonFunctions::executeProgram('who', '', $strBuf, PSI_DEBUG)) {
101
            if (strlen($strBuf) > 0) {
102
                $lines = preg_split('/\n/', $strBuf);
103
                $this->sys->setUsers(count($lines));
104
            }
105
        } elseif (CommonFunctions::executeProgram('uptime', '', $buf, PSI_DEBUG) && preg_match("/,\s+(\d+)\s+user[s]?,/", $buf, $ar_buf)) {
106
        //} elseif (CommonFunctions::executeProgram('uptime', '', $buf) && preg_match("/,\s+(\d+)\s+user[s]?,\s+load average[s]?:\s+(.*),\s+(.*),\s+(.*)$/", $buf, $ar_buf)) {
107
            $this->sys->setUsers($ar_buf[1]);
108
        } else {
109
            $processlist = glob('/proc/*/cmdline', GLOB_NOSORT);
110
            if (is_array($processlist) && (($total = count($processlist)) > 0)) {
111
                $count = 0;
112
                $buf = "";
113
                for ($i = 0; $i < $total; $i++) {
114
                    if (CommonFunctions::rfts($processlist[$i], $buf, 0, 4096, false)) {
115
                        $name = str_replace(chr(0), ' ', trim($buf));
116
                        if (preg_match("/^-/", $name)) {
117
                            $count++;
118
                        }
119
                    }
120
                }
121
                if ($count > 0) {
122
                    $this->sys->setUsers($count);
123
                }
124
            }
125
        }
126
    }
127
 
128
    /**
129
     * IP of the Host
130
     *
131
     * @return void
132
     */
133
    protected function _ip()
134
    {
2976 rexy 135
        if ((PSI_USE_VHOST === true) && !defined('PSI_EMU_HOSTNAME')) {
2770 rexy 136
           if ((CommonFunctions::readenv('SERVER_ADDR', $result) || CommonFunctions::readenv('LOCAL_ADDR', $result)) //is server address defined
2976 rexy 137
              && !strstr($result, '.') && strstr($result, ':')) { //is IPv6, quick version of preg_match('/\(([[0-9A-Fa-f\:]+)\)/', $result)
2770 rexy 138
                $dnsrec = dns_get_record($this->sys->getHostname(), DNS_AAAA);
139
                if (isset($dnsrec[0]['ipv6'])) { //is DNS IPv6 record
140
                    $this->sys->setIp($dnsrec[0]['ipv6']); //from DNS (avoid IPv6 NAT translation)
141
                } else {
142
                    $this->sys->setIp(preg_replace('/^::ffff:/i', '', $result)); //from SERVER_ADDR or LOCAL_ADDR
143
                }
144
            } else {
145
                $this->sys->setIp(gethostbyname($this->sys->getHostname())); //IPv4 only
146
            }
2976 rexy 147
        } elseif (((PSI_OS != 'WINNT') && !defined('PSI_EMU_HOSTNAME')) && (CommonFunctions::readenv('SERVER_ADDR', $result) || CommonFunctions::readenv('LOCAL_ADDR', $result))) {
148
            $this->sys->setIp(preg_replace('/^::ffff:/i', '', $result));
2770 rexy 149
        } else {
2976 rexy 150
            //$this->sys->setIp(gethostbyname($this->sys->getHostname()));
151
            $hn = $this->sys->getHostname();
152
            $ghbn = gethostbyname($hn);
153
            if (defined('PSI_EMU_HOSTNAME') && ($hn === $ghbn)) {
154
                $this->sys->setIp(PSI_EMU_HOSTNAME);
2770 rexy 155
            } else {
2976 rexy 156
                $this->sys->setIp($ghbn);
2770 rexy 157
            }
158
        }
159
    }
160
 
161
    /**
2976 rexy 162
     * MEM information from dmidecode
163
     *
164
     * @return void
165
     */
166
    protected function _dmimeminfo()
167
    {
168
        $banks = array();
169
        $buffer = '';
170
        if (defined('PSI_DMIDECODE_ACCESS') && (strtolower(PSI_DMIDECODE_ACCESS)=="data")) {
171
            CommonFunctions::rfts(PSI_APP_ROOT.'/data/dmidecode.txt', $buffer);
172
        } elseif (CommonFunctions::_findProgram('dmidecode')) {
173
            CommonFunctions::executeProgram('dmidecode', '-t 17', $buffer, PSI_DEBUG);
174
        }
175
        if (!empty($buffer)) {
176
            $banks = preg_split('/^(?=Handle\s)/m', $buffer, -1, PREG_SPLIT_NO_EMPTY);
177
            foreach ($banks as $bank) if (preg_match('/^Handle\s/', $bank)) {
178
                $lines = preg_split("/\n/", $bank, -1, PREG_SPLIT_NO_EMPTY);
179
                $mem = array();
180
                foreach ($lines as $line) if (preg_match('/^\s+([^:]+):(.+)/' ,$line, $params)) {
181
                    if (preg_match('/^0x([A-F\d]+)/', $params2 = trim($params[2]), $buff)) {
182
                        $mem[trim($params[1])] = trim($buff[1]);
183
                    } elseif ($params2 != '') {
184
                        $mem[trim($params[1])] = $params2;
185
                    }
186
                }
187
                if (isset($mem['Size']) && preg_match('/^(\d+)\s(M|G)B$/', $mem['Size'], $size) && ($size[1] > 0)) {
188
                    $dev = new HWDevice();
189
                    $name = '';
190
                    if (isset($mem['Part Number']) && !preg_match("/^PartNum\d+$/", $part = $mem['Part Number']) && ($part != 'None') && ($part != 'N/A') && ($part != 'Not Specified') && ($part != 'NOT AVAILABLE')) {
191
                        $name = $part;
192
                    }
193
                    if (isset($mem['Locator']) && (($dloc = $mem['Locator']) != 'None') && ($dloc != 'N/A') && ($dloc != 'Not Specified')) {
194
                        if ($name != '') {
195
                            $name .= ' - '.$dloc;
196
                        } else {
197
                            $name = $dloc;
198
                        }
199
                    }
200
                    if (isset($mem['Bank Locator']) && (($bank = $mem['Bank Locator']) != 'None') && ($bank != 'N/A') && ($bank != 'Not Specified')) {
201
                        if ($name != '') {
202
                            $name .= ' in '.$bank;
203
                        } else {
204
                            $name = 'Physical Memory in '.$bank;
205
                        }
206
                    }
207
                    if ($name != '') {
208
                        $dev->setName(trim($name));
209
                    } else {
210
                        $dev->setName('Physical Memory');
211
                    }
212
                    if (defined('PSI_SHOW_DEVICES_INFOS') && PSI_SHOW_DEVICES_INFOS) {
213
                        if (isset($mem['Manufacturer']) && !preg_match("/^([A-F\d]{4}|[A-F\d]{12}|[A-F\d]{16})$/", $manufacturer = $mem['Manufacturer']) && !preg_match("/^Manufacturer\d+$/", $manufacturer) && !preg_match("/^Mfg \d+$/", $manufacturer) && !preg_match("/^JEDEC ID:/", $manufacturer) && ($manufacturer != 'None') && ($manufacturer != 'N/A') && ($manufacturer != 'Not Specified') && ($manufacturer != 'UNKNOWN')) {
214
                            $dev->setManufacturer($manufacturer);
215
                        }
216
                        if ($size[2] == 'G') {
217
                            $dev->setCapacity($size[1]*1024*1024*1024);
218
                        } else {
219
                            $dev->setCapacity($size[1]*1024*1024);
220
                        }
221
                        $memtype = '';
222
                        if (isset($mem['Type']) && (($type = $mem['Type']) != 'None') && ($type != 'N/A') && ($type != 'Not Specified') && ($type != 'Other') && ($type != 'Unknown') && ($type != '<OUT OF SPEC>')) {
223
                            if (isset($mem['Speed']) && preg_match('/^(\d+)\s(MHz|MT\/s)/', $mem['Speed'], $speed) && ($speed[1] > 0) && (preg_match('/^(DDR\d*)(.*)/', $type, $dr) || preg_match('/^(SDR)AM(.*)/', $type, $dr))) {
224
                               if (isset($mem['Minimum Voltage']) && isset($mem['Total Width']) &&
225
                                  preg_match('/^([\d\.]+)\sV$/', $mem['Minimum Voltage'], $minv) && preg_match('/^([\d\.]+)\sV$/', $mem['Maximum Voltage'], $maxv) &&
226
                                  ($minv[1]  > 0) && ($maxv[1] >0) && ($minv[1] < $maxv[1])) {
227
                                    $lv = 'L';
228
                                } else {
229
                                    $lv = '';
230
                                }
231
                                if (isset($dr[2])) {
232
                                    $memtype = $dr[1].$lv.'-'.$speed[1].' '.$dr[2];
233
                                } else {
234
                                    $memtype = $dr[1].$lv.'-'.$speed[1];
235
                                }
236
                            } else {
237
                                $memtype = $type;
238
                            }
239
                        }
240
                        if (isset($mem['Form Factor']) && (($form = $mem['Form Factor']) != 'None') && ($form != 'N/A') && ($form != 'Not Specified') && ($form != 'Other') && ($form != 'Unknown') && !preg_match('/ '.$form.'$/', $memtype)) {
241
                            $memtype .= ' '.$form;
242
                        }
243
                        if (isset($mem['Data Width']) && isset($mem['Total Width']) &&
244
                           preg_match('/^(\d+)\sbits$/', $mem['Data Width'], $dataw) && preg_match('/^(\d+)\sbits$/', $mem['Total Width'], $totalw) &&
245
                           ($dataw[1]  > 0) && ($totalw[1] >0) && ($dataw[1] < $totalw[1])) {
246
                            $memtype .= ' ECC';
247
                        }
248
                        if (isset($mem['Type Detail']) && preg_match('/Registered/', $mem['Type Detail'])) {
249
                            $memtype .= ' REG';
250
                        }
251
                        if (($memtype = trim($memtype)) != '') {
252
                            $dev->setProduct($memtype);
253
                        }
254
                        if (isset($mem['Configured Clock Speed']) && preg_match('/^(\d+)\s(MHz|MT\/s)$/', $mem['Configured Clock Speed'], $clock) && ($clock[1] > 0)) {
255
                            $dev->setSpeed($clock[1]);
256
                        }
257
                        if (isset($mem['Configured Voltage']) && preg_match('/^([\d\.]+)\sV$/', $mem['Configured Voltage'], $voltage) && ($voltage[1] > 0)) {
258
                            $dev->setVoltage($voltage[1]);
259
                        }
260
                        if (defined('PSI_SHOW_DEVICES_SERIAL') && PSI_SHOW_DEVICES_SERIAL &&
261
                           isset($mem['Serial Number']) && !preg_match("/^SerNum\d+$/", $serial = $mem['Serial Number']) && ($serial != 'None') && ($serial != 'Not Specified')) {
262
                            $dev->setSerial($serial);
263
                        }
264
                    }
265
                    $this->sys->setMemDevices($dev);
266
                }
267
            }
268
        }
269
    }
270
 
271
    /**
2770 rexy 272
     * get the filled or unfilled (with default values) System object
273
     *
274
     * @see PSI_Interface_OS::getSys()
275
     *
276
     * @return System
277
     */
278
    final public function getSys()
279
    {
280
        $this->build();
281
        if (!$this->blockname || $this->blockname==='vitals') {
282
            $this->_ip();
283
        }
2976 rexy 284
        if ((!$this->blockname || $this->blockname==='hardware') && (PSI_OS != 'WINNT') && !defined('PSI_EMU_HOSTNAME')) {
285
            $this->_dmimeminfo();
286
        }
2770 rexy 287
 
288
        return $this->sys;
289
    }
290
}