Subversion Repositories personal-webbase

Rev

Rev 9 | Only display areas with differences | Regard whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 9 Rev 14
1
<?php
1
<?php
2
 
2
 
3
if (!defined('IBLEGAL')) die('Kann nicht ohne Personal WebBase ausgef&uuml;hrt werden.');
3
if (!defined('WBLEGAL')) die('Kann nicht ohne Personal WebBase ausgef&uuml;hrt werden.');
4
 
4
 
5
function inetconn_ok()
5
function inetconn_ok()
6
{
6
{
7
  global $konfiguration;
7
  global $konfiguration;
8
 
8
 
9
  // Ergebnis für Scriptlaufzeit zwischenspeichern aufgrund von Performancegründen
9
  // Ergebnis für Scriptlaufzeit zwischenspeichern aufgrund von Performancegründen
10
  if (defined('inet_conn_result'))
10
  if (defined('inet_conn_result'))
11
  {
11
  {
12
    return inet_conn_result;
12
    return inet_conn_result;
13
  }
13
  }
14
  else
14
  else
15
  {
15
  {
16
    $r = fsockopen($konfiguration['core_inetconn']['internet-check-url'], $konfiguration['core_inetconn']['internet-check-port'], $errno, $errstr, 5);
16
    $r = fsockopen($konfiguration['core_inetconn']['internet-check-url'], $konfiguration['core_inetconn']['internet-check-port'], $errno, $errstr, 5);
17
    define('inet_conn_result', $r);
17
    define('inet_conn_result', $r);
18
    return $r;
18
    return $r;
19
  }
19
  }
20
}
20
}
21
 
21
 
22
?>
22
?>
23
 
23