Subversion Repositories ALCASAR

Rev

Rev 325 | Rev 2770 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log

Rev 325 Rev 1764
Line 80... Line 80...
80
  // get our canonical hostname
80
  // get our canonical hostname
81
  function chostname () {
81
  function chostname () {
82
    $result = rfts( '/proc/sys/kernel/hostname', 1 );
82
    $result = rfts( '/proc/sys/kernel/hostname', 1 );
83
    if ( $result == "ERROR" ) {
83
    if ( $result == "ERROR" ) {
84
      $result = "N.A.";
84
      $result = "N.A.";
-
 
85
    }
85
    } else {
86
    //else {
86
      $result = gethostbyaddr( gethostbyname( trim( $result ) ) );
87
    //  $result = gethostbyaddr( gethostbyname( trim( $result ) ) );
87
    } 
88
    //} 
88
    return $result;
89
    return $result;
89
  } 
90
  } 
90
  // get the IP address of our canonical hostname
91
  // get the IP address of our canonical hostname
91
  function ip_addr () {
92
  function ip_addr () {
92
    if (!($result = getenv('SERVER_ADDR'))) {
93
    if (!($result = getenv('SERVER_ADDR'))) {