home *** CD-ROM | disk | FTP | other *** search
/ Personal Computer World 2008 February / PCWFEB08.iso / Software / Resources / Developers / XAMPP 1.5.4 / Windows installer / xampp-win32-1.5.4-installer.exe / xampp / php / pear / OS / Guess.php
Encoding:
PHP Script  |  2005-12-02  |  11.0 KB  |  344 lines
  1. <?php
  2. /**
  3.  * The OS_Guess class
  4.  *
  5.  * PHP versions 4 and 5
  6.  *
  7.  * LICENSE: This source file is subject to version 3.0 of the PHP license
  8.  * that is available through the world-wide-web at the following URI:
  9.  * http://www.php.net/license/3_0.txt.  If you did not receive a copy of
  10.  * the PHP License and are unable to obtain it through the web, please
  11.  * send a note to license@php.net so we can mail you a copy immediately.
  12.  *
  13.  * @category   pear
  14.  * @package    PEAR
  15.  * @author     Stig Bakken <ssb@php.net>
  16.  * @author     Gregory Beaver <cellog@php.net>
  17.  * @copyright  1997-2005 The PHP Group
  18.  * @license    http://www.php.net/license/3_0.txt  PHP License 3.0
  19.  * @version    CVS: $Id: Guess.php,v 1.20 2005/10/26 19:33:03 cellog Exp $
  20.  * @link       http://pear.php.net/package/PEAR
  21.  * @since      File available since PEAR 0.1
  22.  */
  23.  
  24. // {{{ uname examples
  25.  
  26. // php_uname() without args returns the same as 'uname -a', or a PHP-custom
  27. // string for Windows.
  28. // PHP versions prior to 4.3 return the uname of the host where PHP was built,
  29. // as of 4.3 it returns the uname of the host running the PHP code.
  30. //
  31. // PC RedHat Linux 7.1:
  32. // Linux host.example.com 2.4.2-2 #1 Sun Apr 8 20:41:30 EDT 2001 i686 unknown
  33. //
  34. // PC Debian Potato:
  35. // Linux host 2.4.17 #2 SMP Tue Feb 12 15:10:04 CET 2002 i686 unknown
  36. //
  37. // PC FreeBSD 3.3:
  38. // FreeBSD host.example.com 3.3-STABLE FreeBSD 3.3-STABLE #0: Mon Feb 21 00:42:31 CET 2000     root@example.com:/usr/src/sys/compile/CONFIG  i386
  39. //
  40. // PC FreeBSD 4.3:
  41. // FreeBSD host.example.com 4.3-RELEASE FreeBSD 4.3-RELEASE #1: Mon Jun 25 11:19:43 EDT 2001     root@example.com:/usr/src/sys/compile/CONFIG  i386
  42. //
  43. // PC FreeBSD 4.5:
  44. // FreeBSD host.example.com 4.5-STABLE FreeBSD 4.5-STABLE #0: Wed Feb  6 23:59:23 CET 2002     root@example.com:/usr/src/sys/compile/CONFIG  i386
  45. //
  46. // PC FreeBSD 4.5 w/uname from GNU shellutils:
  47. // FreeBSD host.example.com 4.5-STABLE FreeBSD 4.5-STABLE #0: Wed Feb  i386 unknown
  48. //
  49. // HP 9000/712 HP-UX 10:
  50. // HP-UX iq B.10.10 A 9000/712 2008429113 two-user license
  51. //
  52. // HP 9000/712 HP-UX 10 w/uname from GNU shellutils:
  53. // HP-UX host B.10.10 A 9000/712 unknown
  54. //
  55. // IBM RS6000/550 AIX 4.3:
  56. // AIX host 3 4 000003531C00
  57. //
  58. // AIX 4.3 w/uname from GNU shellutils:
  59. // AIX host 3 4 000003531C00 unknown
  60. //
  61. // SGI Onyx IRIX 6.5 w/uname from GNU shellutils:
  62. // IRIX64 host 6.5 01091820 IP19 mips
  63. //
  64. // SGI Onyx IRIX 6.5:
  65. // IRIX64 host 6.5 01091820 IP19
  66. //
  67. // SparcStation 20 Solaris 8 w/uname from GNU shellutils:
  68. // SunOS host.example.com 5.8 Generic_108528-12 sun4m sparc
  69. //
  70. // SparcStation 20 Solaris 8:
  71. // SunOS host.example.com 5.8 Generic_108528-12 sun4m sparc SUNW,SPARCstation-20
  72. //
  73. // Mac OS X (Darwin)
  74. // Darwin home-eden.local 7.5.0 Darwin Kernel Version 7.5.0: Thu Aug  5 19:26:16 PDT 2004; root:xnu/xnu-517.7.21.obj~3/RELEASE_PPC  Power Macintosh
  75. //
  76. // Mac OS X early versions
  77. // 
  78.  
  79. // }}}
  80.  
  81. /* TODO:
  82.  * - define endianness, to allow matchSignature("bigend") etc.
  83.  */
  84.  
  85. /**
  86.  * Retrieves information about the current operating system
  87.  *
  88.  * This class uses php_uname() to grok information about the current OS
  89.  *
  90.  * @category   pear
  91.  * @package    PEAR
  92.  * @author     Stig Bakken <ssb@php.net>
  93.  * @author     Gregory Beaver <cellog@php.net>
  94.  * @copyright  1997-2005 The PHP Group
  95.  * @license    http://www.php.net/license/3_0.txt  PHP License 3.0
  96.  * @version    Release: 1.4.5
  97.  * @link       http://pear.php.net/package/PEAR
  98.  * @since      Class available since Release 0.1
  99.  */
  100. class OS_Guess
  101. {
  102.     var $sysname;
  103.     var $nodename;
  104.     var $cpu;
  105.     var $release;
  106.     var $extra;
  107.  
  108.     function OS_Guess($uname = null)
  109.     {
  110.         list($this->sysname,
  111.              $this->release,
  112.              $this->cpu,
  113.              $this->extra,
  114.              $this->nodename) = $this->parseSignature($uname);
  115.     }
  116.  
  117.     function parseSignature($uname = null)
  118.     {
  119.         static $sysmap = array(
  120.             'HP-UX' => 'hpux',
  121.             'IRIX64' => 'irix',
  122.         );
  123.         static $cpumap = array(
  124.             'i586' => 'i386',
  125.             'i686' => 'i386',
  126.             'ppc' => 'powerpc',
  127.         );
  128.         if ($uname === null) {
  129.             $uname = php_uname();
  130.         }
  131.         $parts = split('[[:space:]]+', trim($uname));
  132.         $n = count($parts);
  133.  
  134.         $release = $machine = $cpu = '';
  135.         $sysname = $parts[0];
  136.         $nodename = $parts[1];
  137.         $cpu = $parts[$n-1];
  138.         $extra = '';
  139.         if ($cpu == 'unknown') {
  140.             $cpu = $parts[$n-2];
  141.         }
  142.  
  143.         switch ($sysname) {
  144.             case 'AIX' :
  145.                 $release = "$parts[3].$parts[2]";
  146.                 break;
  147.             case 'Windows' :
  148.                 switch ($parts[1]) {
  149.                     case '95/98':
  150.                         $release = '9x';
  151.                         break;
  152.                     default:
  153.                         $release = $parts[1];
  154.                         break;
  155.                 }
  156.                 $cpu = 'i386';
  157.                 break;
  158.             case 'Linux' :
  159.                 $extra = $this->_detectGlibcVersion();
  160.                 // use only the first two digits from the kernel version
  161.                 $release = ereg_replace('^([[:digit:]]+\.[[:digit:]]+).*', '\1', $parts[2]);
  162.                 break;
  163.             case 'Mac' :
  164.                 $sysname = 'darwin';
  165.                 $nodename = $parts[2];
  166.                 $release = $parts[3];
  167.                 if ($cpu == 'Macintosh') {
  168.                     if ($parts[$n - 2] == 'Power') {
  169.                         $cpu = 'powerpc';
  170.                     }
  171.                 }
  172.                 break;
  173.             case 'Darwin' :
  174.                 if ($cpu == 'Macintosh') {
  175.                     if ($parts[$n - 2] == 'Power') {
  176.                         $cpu = 'powerpc';
  177.                     }
  178.                 }
  179.                 $release = ereg_replace('^([[:digit:]]+\.[[:digit:]]+).*', '\1', $parts[2]);
  180.                 break;
  181.             default:
  182.                 $release = ereg_replace('-.*', '', $parts[2]);
  183.                 break;
  184.         }
  185.  
  186.  
  187.         if (isset($sysmap[$sysname])) {
  188.             $sysname = $sysmap[$sysname];
  189.         } else {
  190.             $sysname = strtolower($sysname);
  191.         }
  192.         if (isset($cpumap[$cpu])) {
  193.             $cpu = $cpumap[$cpu];
  194.         }
  195.         return array($sysname, $release, $cpu, $extra, $nodename);
  196.     }
  197.  
  198.     function _detectGlibcVersion()
  199.     {
  200.         static $glibc = false;
  201.         if ($glibc !== false) {
  202.             return $glibc; // no need to run this multiple times
  203.         }
  204.         include_once "System.php";
  205.         if (!file_exists('/usr/bin/cpp') || !is_executable('/usr/bin/cpp')) {
  206.             // Use glibc's <features.h> header file to
  207.             // get major and minor version number:
  208.             if ($features_file = @fopen('/usr/include/features.h', 'rb') ) {
  209.                 while (!feof($features_file)) {
  210.                     $line = fgets($features_file, 8192);
  211.                     if (!$line || (strpos($line, '#define') === false)) {
  212.                         continue;
  213.                     }
  214.                     if (strpos($line, '__GLIBC__')) {
  215.                         // major version number #define __GLIBC__ version
  216.                         $line = preg_split('/\s+/', $line);
  217.                         $glibc_major = trim($line[2]);
  218.                         if (isset($glibc_minor)) {
  219.                             break;
  220.                         }
  221.                         continue;
  222.                     }
  223.                     if (strpos($line, '__GLIBC_MINOR__'))  {
  224.                         // got the minor version number
  225.                         // #define __GLIBC_MINOR__ version
  226.                         $line = preg_split('/\s+/', $line);
  227.                         $glibc_minor = trim($line[2]);
  228.                         if (isset($glibc_major)) {
  229.                             break;
  230.                         }
  231.                         continue;
  232.                     }
  233.                 }
  234.                 fclose($features_file);
  235.                 if (!isset($glibc_major) || !isset($glibc_minor)) {
  236.                     return $glibc = '';
  237.                 }
  238.                 return $glibc = 'glibc' . trim($glibc_major) . "." . trim($glibc_minor) ;
  239.             }
  240.             return $glibc = '';
  241.         }
  242.         $tmpfile = System::mktemp("glibctest");
  243.         $fp = fopen($tmpfile, "w");
  244.         fwrite($fp, "#include <features.h>\n__GLIBC__ __GLIBC_MINOR__\n");
  245.         fclose($fp);
  246.         $cpp = popen("/usr/bin/cpp $tmpfile", "r");
  247.         $major = $minor = 0;
  248.         while ($line = fgets($cpp, 1024)) {
  249.             if ($line{0} == '#' || trim($line) == '') {
  250.                 continue;
  251.             }
  252.             if (list($major, $minor) = explode(' ', trim($line))) {
  253.                 break;
  254.             }
  255.         }
  256.         pclose($cpp);
  257.         unlink($tmpfile);
  258.         if (!($major && $minor) && is_link('/lib/libc.so.6')) {
  259.             // Let's try reading the libc.so.6 symlink
  260.             if (ereg('^libc-([.*])\.so$', basename(readlink('/lib/libc.so.6')), $matches)) {
  261.                 list($major, $minor) = explode('.', $matches);
  262.             }
  263.         }
  264.         if (!($major && $minor)) {
  265.             return $glibc = '';
  266.         }
  267.         return $glibc = "glibc{$major}.{$minor}";
  268.     }
  269.  
  270.     function getSignature()
  271.     {
  272.         if (empty($this->extra)) {
  273.             return "{$this->sysname}-{$this->release}-{$this->cpu}";
  274.         }
  275.         return "{$this->sysname}-{$this->release}-{$this->cpu}-{$this->extra}";
  276.     }
  277.  
  278.     function getSysname()
  279.     {
  280.         return $this->sysname;
  281.     }
  282.  
  283.     function getNodename()
  284.     {
  285.         return $this->nodename;
  286.     }
  287.  
  288.     function getCpu()
  289.     {
  290.         return $this->cpu;
  291.     }
  292.  
  293.     function getRelease()
  294.     {
  295.         return $this->release;
  296.     }
  297.  
  298.     function getExtra()
  299.     {
  300.         return $this->extra;
  301.     }
  302.  
  303.     function matchSignature($match)
  304.     {
  305.         if (is_array($match)) {
  306.             $fragments = $match;
  307.         } else {
  308.             $fragments = explode('-', $match);
  309.         }
  310.         $n = count($fragments);
  311.         $matches = 0;
  312.         if ($n > 0) {
  313.             $matches += $this->_matchFragment($fragments[0], $this->sysname);
  314.         }
  315.         if ($n > 1) {
  316.             $matches += $this->_matchFragment($fragments[1], $this->release);
  317.         }
  318.         if ($n > 2) {
  319.             $matches += $this->_matchFragment($fragments[2], $this->cpu);
  320.         }
  321.         if ($n > 3) {
  322.             $matches += $this->_matchFragment($fragments[3], $this->extra);
  323.         }
  324.         return ($matches == $n);
  325.     }
  326.  
  327.     function _matchFragment($fragment, $value)
  328.     {
  329.         if (strcspn($fragment, '*?') < strlen($fragment)) {
  330.             $reg = '^' . str_replace(array('*', '?', '/'), array('.*', '.', '\\/'), $fragment) . '$';
  331.             return eregi($reg, $value);
  332.         }
  333.         return ($fragment == '*' || !strcasecmp($fragment, $value));
  334.     }
  335.  
  336. }
  337. /*
  338.  * Local Variables:
  339.  * indent-tabs-mode: nil
  340.  * c-basic-offset: 4
  341.  * End:
  342.  */
  343. ?>
  344.