3bc44a70f540cbfd7cb5f2051872e09f01117b21
bernd neues VHosts-Modul (unbenut...

bernd authored 17 years ago

1) <?php
Bernd Wurst Added license tags for CC0,...

Bernd Wurst authored 12 years ago

2) /*
3) This file belongs to the Webinterface of schokokeks.org Hosting
4) 
Bernd Wurst Updated copyright notice (2...

Bernd Wurst authored 11 years ago

5) Written 2008-2013 by schokokeks.org Hosting, namely
Bernd Wurst Added license tags for CC0,...

Bernd Wurst authored 12 years ago

6)   Bernd Wurst <bernd@schokokeks.org>
7)   Hanno Böck <hanno@schokokeks.org>
8) 
9) To the extent possible under law, the author(s) have dedicated all copyright and related and neighboring rights to this software to the public domain worldwide. This software is distributed without any warranty.
10) 
11) You should have received a copy of the CC0 Public Domain Dedication along with this software. If not, see 
12) http://creativecommons.org/publicdomain/zero/1.0/
13) 
14) Nevertheless, in case you use a significant part of this code, we ask (but not require, see the license) that you keep the authors' names in place and return your changes to the public. We would be especially happy if you tell us what you're going to do with this code.
15) */
16) 
bernd neues VHosts-Modul (unbenut...

bernd authored 17 years ago

17) require_once('inc/debug.php');
18) require_once('inc/security.php');
bernd neue Bilder, mehr SSL-Zerti...

bernd authored 15 years ago

19) require_once('inc/icons.php');
bernd neues VHosts-Modul (unbenut...

bernd authored 17 years ago

20) 
21) require_once('vhosts.php');
22) 
bernd Benutze überall title() sta...

bernd authored 14 years ago

23) title("Subdomains");
bernd neues VHosts-Modul (unbenut...

bernd authored 17 years ago

24) $error = '';
25) 
26) require_role(ROLE_SYSTEMUSER);
27) 
bernd VHost-Löschen als icon

bernd authored 17 years ago

28) global $prefix;
bernd neues VHosts-Modul (unbenut...

bernd authored 17 years ago

29) 
bernd Benutze überall title() sta...

bernd authored 14 years ago

30) output("<p>Mit dieser Funktion legen Sie fest, welche Domains und Subdomains als Webserver-Ressource verfügbar sein sollen und welches Verzeichnis die Dateien enthalten soll.</p>
bernd Beta-Hinweis im vhost-modul

bernd authored 17 years ago

31) <p>Änderungen an Ihren Einstellungen werden im 5-Minuten-Takt auf dem Server übernommen.</p>
32) ");
bernd neues VHosts-Modul (unbenut...

bernd authored 17 years ago

33) 
bernd Bugfix: Funktion-Dopplung v...

bernd authored 17 years ago

34) 
bernd neues VHosts-Modul (unbenut...

bernd authored 17 years ago

35) $vhosts = list_vhosts();
Bernd Wurst Traffic-Statistik im Webint...

Bernd Wurst authored 11 years ago

36) $traffic_sum = 0;
bernd neues VHosts-Modul (unbenut...

bernd authored 17 years ago

37) 
38) if (count($vhosts) > 0)
39) {
Bernd Wurst Ermögliche das Auswählen de...

Bernd Wurst authored 11 years ago

40)   if (count($vhosts) > 10) {
41)     addnew('edit', 'Neue Domain bzw. Subdomain einrichten');
42)     addnew('../webapps/install', 'Neue Domain bzw. Subdomain mit vorinstallierter Web-Anwendung einrichten');
43)   }
Bernd Wurst Traffic-Statistik im Webint...

Bernd Wurst authored 11 years ago

44)   output("<table><tr><th>(Sub-)Domain</th><th></th><th>Zusätzliche Alias-Namen</th><th>Protokoll</th><th>SSL</th><th>Traffic<sup>*</sup></th><th>PHP</th><th>Lokaler Pfad<sup>**</sup></th></tr>\n");
bernd mod_php deprecated, zwang z...

bernd authored 15 years ago

45) 
46)   $even = True;
bernd Aliases editieren

bernd authored 17 years ago

47) 
bernd neues VHosts-Modul (unbenut...

bernd authored 17 years ago

48)   foreach ($vhosts as $vhost)
49)   {
bernd mod_php deprecated, zwang z...

bernd authored 15 years ago

50)     $even = ! $even;
bernd neues VHosts-Modul (unbenut...

bernd authored 17 years ago

51)     $fqdn = $vhost['fqdn'];
bernd mod_php deprecated, zwang z...

bernd authored 15 years ago

52)     $class = 'odd';
53)     if ($even) $class = 'even';
bernd neue Bilder, mehr SSL-Zerti...

bernd authored 15 years ago

54)     output("<tr class=\"{$class}\"><td>".internal_link('edit', $fqdn, "vhost={$vhost['id']}", 'title="Einstellungen bearbeiten"')."</td><td>".internal_link('save', icon_delete("»{$vhost['fqdn']}« löschen"), 'action=delete&vhost='.$vhost['id'] )."</td><td>");
bernd Weniger Datenbankzugriffe b...

bernd authored 14 years ago

55)     $aliases = get_all_aliases($vhost);
bernd mod_php deprecated, zwang z...

bernd authored 15 years ago

56)     $tmp = '';
57)     if (count($aliases) > 0)
bernd neues VHosts-Modul (unbenut...

bernd authored 17 years ago

58)     {
bernd mod_php deprecated, zwang z...

bernd authored 15 years ago

59)       foreach ($aliases as $alias)
60)       {
61)         $tmp .= $alias['fqdn'].'<br />';
62)       }
63)     } else {
64)       $tmp = '<em>- keine -</em>';
bernd neues VHosts-Modul (unbenut...

bernd authored 17 years ago

65)     }
bernd mod_php deprecated, zwang z...

bernd authored 15 years ago

66)     output(internal_link('aliases', $tmp, 'vhost='.$vhost['id'], 'title="Aliase verwalten"'));
bernd neues VHosts-Modul (unbenut...

bernd authored 17 years ago

67)     output('</td>');
Bernd Wurst Traffic-Statistik im Webint...

Bernd Wurst authored 11 years ago

68)     $logfiles = 'Kein Log';
bernd Logfile-Status in der vhost...

bernd authored 17 years ago

69)     if ($vhost['logtype'] == 'default')
Bernd Wurst Traffic-Statistik im Webint...

Bernd Wurst authored 11 years ago

70)       $logfiles = 'Zugriffe ';
bernd Logfile-Status in der vhost...

bernd authored 17 years ago

71)     elseif ($vhost['logtype'] == 'anonymous')
Bernd Wurst Traffic-Statistik im Webint...

Bernd Wurst authored 11 years ago

72)       $logfiles = 'Anonym';
bernd Logfile-Status in der vhost...

bernd authored 17 years ago

73)     if ($vhost['errorlog'] == 1)
74)     {
bernd mod_php deprecated, zwang z...

bernd authored 15 years ago

75)       if ($vhost['logtype'] == NULL)
Bernd Wurst Traffic-Statistik im Webint...

Bernd Wurst authored 11 years ago

76)         $logfiles = 'Fehler';
bernd Logfile-Status in der vhost...

bernd authored 17 years ago

77)       else
Bernd Wurst Traffic-Statistik im Webint...

Bernd Wurst authored 11 years ago

78)         $logfiles .= ' + Fehler';
bernd Logfile-Status in der vhost...

bernd authored 17 years ago

79)     }
bernd Webalizer/Statistik-Funktio...

bernd authored 14 years ago

80)     $stats = $vhost['stats'] ? internal_link("showstats", other_icon("chart_bar.png", "Statistiken anzeigen"), "vhost={$vhost['id']}").' ' : '';
81)     output("<td>{$stats}{$logfiles}</td>");
bernd Neue Zertifikatsverwaltung

bernd authored 15 years ago

82)   
83)     if ($vhost['ssl'] == 'http')
84)     {
bernd neue Bilder, mehr SSL-Zerti...

bernd authored 15 years ago

85)       output("<td>".icon_disabled('SSL ausgeschaltet')."</td>");
bernd Neue Zertifikatsverwaltung

bernd authored 15 years ago

86)     }
87)     elseif ($vhost['cert'])
88)     {
89)       output("<td><img src=\"{$prefix}images/secure.png\" style=\"height: 16px; width: 16px;\" alt=\"cert\" title=\"SSL mit eigenem Zertifikat\" /></td>");
90)     }
91)     else
92)     {
bernd neue Bilder, mehr SSL-Zerti...

bernd authored 15 years ago

93)       output("<td>".icon_enabled('SSL eingeschaltet')."</td>");
bernd Neue Zertifikatsverwaltung

bernd authored 15 years ago

94)     }
95) 
Bernd Wurst Traffic-Statistik im Webint...

Bernd Wurst authored 11 years ago

96)     $traffic = traffic_month($vhost['id']);
97)     $traffic_sum += (int) $traffic;
98)     $traffic_string = $traffic.' MB';
99)     if ($traffic > 1024) {
100)       $traffic_string = round($traffic / 1024, 2).' GB';
101)     }
102)     if ($traffic === NULL) {
103)       $traffic_string = '--';
104)     }
105)     output("<td style=\"text-align: right;\">{$traffic_string}</td>");
106) 
bernd VHosts-Modul mit neuem Layo...

bernd authored 17 years ago

107)     if ($vhost['is_webapp'] == 1) {
bernd mod_php deprecated, zwang z...

bernd authored 15 years ago

108)       output('<td colspan="2"><em><strong>Sonderanwendung:</strong> Vorinstallierte Webanwendung</em></td>');
bernd VHosts-Modul mit neuem Layo...

bernd authored 17 years ago

109)     }
110)     elseif ($vhost['is_dav'] == 1) {
bernd mod_php deprecated, zwang z...

bernd authored 15 years ago

111)       output('<td colspan="2"><em><strong>Sonderanwendung:</strong> WebDAV</em></td>');
bernd VHosts-Modul mit neuem Layo...

bernd authored 17 years ago

112)     }
113)     elseif ($vhost['is_svn'] == 1) {
bernd mod_php deprecated, zwang z...

bernd authored 15 years ago

114)       output('<td colspan="2"><em><strong>Sonderanwendung:</strong> Subversion-Server</em></td>');
bernd VHosts-Modul mit neuem Layo...

bernd authored 17 years ago

115)     }
116)     else {
117)       $php = $vhost['php'];
118)       switch ($php)
119)       {
120)         case NULL:
bernd neue Bilder, mehr SSL-Zerti...

bernd authored 15 years ago

121)           $php = icon_disabled('PHP ausgeschaltet');
bernd VHosts-Modul mit neuem Layo...

bernd authored 17 years ago

122)           break;
123)         case 'mod_php':
bernd neue Bilder, mehr SSL-Zerti...

bernd authored 15 years ago

124)           $php = icon_warning('[mod_php] Veraltet, bitte umstellen!').' Apache-Modul';
bernd VHosts-Modul mit neuem Layo...

bernd authored 17 years ago

125)           break;
126)         case 'fastcgi':
bernd Neue Icons für PHP 5.2 und 5.3

bernd authored 14 years ago

127)           $php = icon_enabled_warning('PHP in veralteter Version aktiviert');
bernd Vorbereitung für PHP 5.3

bernd authored 15 years ago

128)           break;
Hanno Böck übrige Änderungen für php55

Hanno Böck authored 11 years ago

129)         case 'php53':
130)           $php = icon_enabled_php53('PHP in Version 5.3 eingeschaltet');
131)           break;
Bernd Wurst prepare for experimental PH...

Bernd Wurst authored 12 years ago

132)         case 'php54':
Bernd Wurst PHP 5.4 ist nicht mehr expe...

Bernd Wurst authored 11 years ago

133)           $php = icon_enabled_php54('PHP in Version 5.4 eingeschaltet');
Bernd Wurst prepare for experimental PH...

Bernd Wurst authored 12 years ago

134)           break;
Hanno Böck übrige Änderungen für php55

Hanno Böck authored 11 years ago

135)         case 'php55':
136)           $php = icon_enabled_php55('PHP in Version 5.5 eingeschaltet');
bernd VHosts-Modul mit neuem Layo...

bernd authored 17 years ago

137)           break;
138)       }
139)       output("<td>{$php}</td>");
140)       if ($vhost['docroot_is_default'] == 1)
141)         output("<td><span style=\"color:#777;\">{$vhost['docroot']}</span></td>");
142)       else
143)         output("<td><strong>{$vhost['docroot']}</strong></td>");
144)     }
bernd mod_php deprecated, zwang z...

bernd authored 15 years ago

145)     output("</tr>\n");
bernd neues VHosts-Modul (unbenut...

bernd authored 17 years ago

146)   }
bernd VHosts anlegen geht auch we...

bernd authored 17 years ago

147)   output('</table>');
Bernd Wurst Traffic-Statistik im Webint...

Bernd Wurst authored 11 years ago

148)   if ($traffic_sum > 0) {
149)     $traffic_string = $traffic_sum.' MB';
150)     if ($traffic_sum > 1024) {
151)       $traffic_string = round($traffic_sum / 1024, 2).' GB';
152)     }
Bernd Wurst Typo

Bernd Wurst authored 11 years ago

153)     output('<p><strong>Traffic insgesamt: '.$traffic_string.'</strong> in den letzten 30 Tagen</p>');
Bernd Wurst Traffic-Statistik im Webint...

Bernd Wurst authored 11 years ago

154)   }
155)   output('<p style="font-size: 90%;"><sup>*</sup>)&#160;Dieser Wert stellt den Datenverkehr dieser Website für die letzten 30 Tage dar.</p>');
156)   output('<p style="font-size: 90%;"><sup>**</sup>)&#160;schwach geschriebene Pfadangaben bezeichnen die Standardeinstellung. Ist ein Pfad fett dargestellt, so haben Sie einen davon abweichenden Wert eingegeben.</p>');
bernd neues VHosts-Modul (unbenut...

bernd authored 17 years ago

157) }
bernd Deutlich machen wenn keine...

bernd authored 15 years ago

158) else // keine VHosts vorhanden
159) {
160)   output("<p><strong><em>Bisher haben Sie keine Domain bzw. Subdomain eingerichtet.</em></strong></p>");
161) }
bernd neues VHosts-Modul (unbenut...

bernd authored 17 years ago

162) 
bernd addnew() eingeführt

bernd authored 15 years ago

163) addnew('edit', 'Neue Domain bzw. Subdomain einrichten');
164) 
165) addnew('../webapps/install', 'Neue Domain bzw. Subdomain mit vorinstallierter Web-Anwendung einrichten');