b2eb0cbe585a5c167005b50c8804e861605fe0a2
bernd webinterface => /webinterface

bernd authored 17 years ago

1) <?php
2) 
3) require_once('inc/debug.php');
4) 
5) require_once('session/start.php');
6) 
bernd Domain-Klasse benutzen

bernd authored 16 years ago

7) require_once('class/domain.php');
bernd Bessere Darstellung des Dom...

bernd authored 14 years ago

8) require_once('domains.php');
bernd webinterface => /webinterface

bernd authored 17 years ago

9) 
10) require_role(array(ROLE_SYSTEMUSER, ROLE_CUSTOMER));
11) 
bernd * Initialisierung der Sessi...

bernd authored 16 years ago

12) if ($_SESSION['role'] & ROLE_CUSTOMER)
13)   $user_domains = get_domain_list($_SESSION['customerinfo']['customerno']);
14) else
15)   $user_domains = get_domain_list($_SESSION['userinfo']['customerno'], $_SESSION['userinfo']['uid']);
bernd webinterface => /webinterface

bernd authored 17 years ago

16) 
17) $title = "Domainüberblick";
18) 
19) output('<h3>Domains</h3>
20) <p>In Ihrem Account werden die folgenden Domains verwaltet:</p>
21) <table>
bernd Bessere Darstellung des Dom...

bernd authored 14 years ago

22) <tr><th>Domainname</th><th>Status</th><th>Funktionen</th></tr>
bernd webinterface => /webinterface

bernd authored 17 years ago

23) ');
24) foreach ($user_domains as $domain)
25) {
bernd Zeige Reg-Status der Domain...

bernd authored 15 years ago

26)   $regdate = $domain->reg_date;
27)   if ($domain->provider != 'terions')
28)     $regdate = '<em>Extern registriert</em>';
29)   elseif ($domain->reg_date == NULL)
30)     $regdate = '<em>Umzug bevorstehend</em>';
bernd Bessere Darstellung des Dom...

bernd authored 14 years ago

31)   else
32)     $regdate = 'Registriert seit '.$regdate;
33) 
34)   if ($domain->cancel_date) {
35)     $regdate .= '<br />Gekündigt zum '.$domain->cancel_date;
36)   }
37) 
38)   $features = array();
39)   if ($domain->dns == 1) {
bernd Wirkliche nutzung der Domai...

bernd authored 14 years ago

40)     if (dns_in_use($domain->id))
41)       $features[] = 'DNS';
bernd Bessere Darstellung des Dom...

bernd authored 14 years ago

42)     //if ($domain->autodns == 1)
43)     //  $features[] = 'AutoDNS';
44)   }
45)   $mailman = mailman_subdomains($domain->id);
bernd Wirkliche nutzung der Domai...

bernd authored 14 years ago

46)   if (mail_in_use($domain->id))
bernd Bessere Darstellung des Dom...

bernd authored 14 years ago

47)     $features[] = 'Mail';
48)   if ($mailman)
49)     $features[] = 'Mailinglisten';
bernd Wirkliche nutzung der Domai...

bernd authored 14 years ago

50)   if (web_in_use($domain->id))
bernd Bessere Darstellung des Dom...

bernd authored 14 years ago

51)     $features[] = 'Web';
52)   if ($domain->jabber == 1)
53)     $features[] = 'Jabber';
54) 
bernd Wirkliche nutzung der Domai...

bernd authored 14 years ago

55)   $features = implode(', ', $features);
56)   if (! $features)
57)     $features = '<em>unbenutzt</em>';
58)   output("  <tr><td>{$domain->fqdn}</td><td>{$regdate}</td><td>{$features}</td></tr>\n");