8a4acb54b452ad801825c59cc7aa542eae0f9f3f
Bernd Wurst Ermögliche das Hinzufügen e...

Bernd Wurst authored 6 years ago

1) <?php
2) /*
3) This file belongs to the Webinterface of schokokeks.org Hosting
4) 
5) Written 2008-2018 by schokokeks.org Hosting, namely
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) 
17) require_once('inc/security.php');
18) require_once('inc/icons.php');
19) require_once('inc/jquery.php');
20) javascript();
21) 
22) require_once('domainapi.php');
23) require_once('domains.php');
24) 
25) require_role(ROLE_CUSTOMER);
26) 
27) title("Domain hinzufügen");
28) $section='domains_domains';
29) 
30) output('<p>Mit dieser Funktion können Sie eine neue Domain bestellen oder eine bestehende, extern registrierte Domain verfügbar machen.</p>');
31) 
32) $form = '<p>Domainname: <input type="text" name="domain" size="50" /> <input type="submit" value="Verfügbarkeit prüfen" />';
33) 
34) output(html_form('adddomain_search', '', '', $form));
35) 
36) if (isset($_REQUEST['domain'])) {
Bernd Wurst hardening the domain input

Bernd Wurst authored 6 years ago

37)     $request = idn_to_utf8($_REQUEST['domain'], 0, INTL_IDNA_VARIANT_UTS46);
Bernd Wurst Bessere Prüfung der Domainn...

Bernd Wurst authored 6 years ago

38)     verify_input_general($request);
Bernd Wurst hardening the domain input

Bernd Wurst authored 6 years ago

39)     $punycode = idn_to_ascii($request, 0, INTL_IDNA_VARIANT_UTS46);
40)     if (!check_domain($punycode)) {
41)         warning("Ungültige Zeichen im Domainnamen!");
42)         redirect('');
43)     }
Bernd Wurst Bessere Prüfung der Domainn...

Bernd Wurst authored 6 years ago

44)     if (substr($request, 0, 4) == 'www.') {
45)         $request = str_replace('www.', '', $request);
46)     }
47)     if (strpos($request, ' ') !== false) {
Bernd Wurst Ermögliche das Hinzufügen e...

Bernd Wurst authored 6 years ago

48)         warning('Leerzeichen sind in Domainnamen nicht erlaubt.');
49)         redirect('');
50)     }
Bernd Wurst Bessere Prüfung der Domainn...

Bernd Wurst authored 6 years ago

51)     if (strpos($request, '.') === false) {
52)         warning('Das ist kein Domainname.');
53)         redirect('');
54)     }
Bernd Wurst Erkenne Domains die schon b...

Bernd Wurst authored 6 years ago

55)     $dom = new Domain();
Bernd Wurst Bessere Prüfung der Domainn...

Bernd Wurst authored 6 years ago

56)     if ($dom->loadByName($request) !== false) {
Bernd Wurst Erkenne Domains die schon b...

Bernd Wurst authored 6 years ago

57)         if ($dom->is_customerdomain()) {
58)             warning('Diese Domain ist bereits in Ihrem Kundenkonto eingetragen!');
59)         } else {
60)             warning('Diese Domain ist bei einem anderen Kunden von uns in Nutzung. Kontaktieren Sie den Support, wenn Sie eine Domain in ein anderes Kundenkonto übertragen möchten.');
61)         }
62)         redirect('');
63)     }
Bernd Wurst Bessere Prüfung der Domainn...

Bernd Wurst authored 6 years ago

64)     $avail = api_domain_available($request);
Bernd Wurst Domain-Transfer und -Regist...

Bernd Wurst authored 6 years ago

65)     if ($avail['status'] == 'available') {
Bernd Wurst Bessere Prüfung der Domainn...

Bernd Wurst authored 6 years ago

66)         output('<p class="domain-available">Die Domain '.filter_input_general($request).' ist verfügbar!</p>');
Bernd Wurst Ermögliche das Hinzufügen e...

Bernd Wurst authored 6 years ago

67)         # Neue Domain eintragen
Bernd Wurst Lasse die API bestimmen was...

Bernd Wurst authored 6 years ago

68)         $data = get_domain_offer($avail['domainSuffix']);
Bernd Wurst Ermögliche das Hinzufügen e...

Bernd Wurst authored 6 years ago

69)         if (!$data) {
70)             redirect('');
71)         }
72)         $form = '<p>Folgende Konditionen gelten bei Registrierung der Domain im nächsten Schritt:</p>
73)             <table>
Bernd Wurst Bessere Prüfung der Domainn...

Bernd Wurst authored 6 years ago

74)             <tr><td>Domainname:</td><td><strong>'.filter_input_general($request).'</strong></td></tr>
Bernd Wurst Domain-Transfer und -Regist...

Bernd Wurst authored 6 years ago

75)             <tr><td>Jahresgebühr:</td><td style="text-align: right;">'.$data['gebuehr'].' €</td></tr>';
76)         if ($data['setup']) {
77)             $form .= '<tr><td>Setup-Gebühr (einmalig):</td><td style="text-align: right;">'.$data['setup'].' €</td></tr>';
78)         }
Bernd Wurst Ermögliche das Hinzufügen e...

Bernd Wurst authored 6 years ago

79)         $form .='</table>';
80) 
81) 
Bernd Wurst Bessere Prüfung der Domainn...

Bernd Wurst authored 6 years ago

82)         $form .= '<p><input type="hidden" name="domain" value="'.filter_input_general($request).'">
Bernd Wurst Ermögliche das Hinzufügen e...

Bernd Wurst authored 6 years ago

83)             <input type="submit" name="submit" value="Ich möchte diese Domain registrieren"></p>';
84)         output(html_form('domains_register', 'domainreg', '', $form));
85)         output('<p>'.internal_link('domains', 'Zurück').'</p>');
Bernd Wurst Domain-Transfer und -Regist...

Bernd Wurst authored 6 years ago

86)     } elseif ($avail['status'] == 'registered' || $avail['status'] == 'alreadyRegistered') {
Bernd Wurst Bessere Prüfung der Domainn...

Bernd Wurst authored 6 years ago

87)         output('<p class="domain-unavailable">Die Domain '.filter_input_general($request).' ist bereits vergeben.</p>');
Bernd Wurst Ermögliche das Hinzufügen e...

Bernd Wurst authored 6 years ago

88) 
Bernd Wurst Domain-Transfer und -Regist...

Bernd Wurst authored 6 years ago

89)         output('<h3>Domain zu '.config('company_name').' umziehen</h3>');
90)         if ($avail['status'] == 'registered' && $avail['transferMethod'] != 'authInfo') {
91)             output('<p>Diese Domainendung kann nicht automatisiert übertragen werden. Bitte wenden Sie sich an den Support.</p>');
Bernd Wurst Ermögliche das Hinzufügen e...

Bernd Wurst authored 6 years ago

92)         } else {
Bernd Wurst Lasse die API bestimmen was...

Bernd Wurst authored 6 years ago

93)             $data = get_domain_offer($avail['domainSuffix']);
Bernd Wurst Domain-Transfer und -Regist...

Bernd Wurst authored 6 years ago

94) 
95)             if (! $data) {
96)                 // Die Include-Datei setzt eine passende Warning-Nachricht
97)                 output('<p>Eine Registrierung ist nicht automatisiert möglich. Bitte wenden Sie sich an den Support.');
98)             } else {
Bernd Wurst Ermögliche das Hinzufügen e...

Bernd Wurst authored 6 years ago

99) 
Bernd Wurst Domain-Transfer und -Regist...

Bernd Wurst authored 6 years ago

100)                 $form = '<p>Folgende Konditionen gelten beim Transfer der Domain im nächsten Schritt:</p>
101)                     <table>
Bernd Wurst Lasse die API bestimmen was...

Bernd Wurst authored 6 years ago

102)                     <tr><td>Domainname:</td><td><strong>'.filter_input_general($avail['domainNameUnicode']).'</strong></td></tr>
Bernd Wurst Domain-Transfer und -Regist...

Bernd Wurst authored 6 years ago

103)                     <tr><td>Jahresgebühr:</td><td style="text-align: right;">'.$data['gebuehr'].' €</td></tr>';
104)                 if ($data['setup']) {
105)                     $form .= '<tr><td>Setup-Gebühr (einmalig):</td><td style="text-align: right;">'.$data['setup'].' €</td></tr>';
106)                 }
107)                 $form .='</table>';
Bernd Wurst Ermögliche das Hinzufügen e...

Bernd Wurst authored 6 years ago

108) 
109) 
Bernd Wurst Lasse die API bestimmen was...

Bernd Wurst authored 6 years ago

110)                 $form .= '<p><input type="hidden" name="domain" value="'.filter_input_general($avail['domainNameUnicode']).'">
Bernd Wurst Domain-Transfer und -Regist...

Bernd Wurst authored 6 years ago

111)                     <input type="submit" name="submit" value="Ich möchte diese Domain zu '.config('company_name').' umziehen"></p>';
Bernd Wurst Ermögliche das Hinzufügen e...

Bernd Wurst authored 6 years ago

112) 
Bernd Wurst Domain-Transfer und -Regist...

Bernd Wurst authored 6 years ago

113)                 output(html_form('domains_transferin', 'domainreg', '', $form));
Bernd Wurst Ermögliche das Hinzufügen e...

Bernd Wurst authored 6 years ago

114) 
Bernd Wurst Domain-Transfer und -Regist...

Bernd Wurst authored 6 years ago

115)             }
Bernd Wurst Ermögliche das Hinzufügen e...

Bernd Wurst authored 6 years ago

116)         }
117)         output('<h3>Diese Domain als externe Domain nutzen</h3>');
118)         output('<p>Sie können diese Domain für Konfigurationen bei uns nutzen ohne einen Transfer vorzunehmen.</p>
Bernd Wurst Domain-Transfer und -Regist...

Bernd Wurst authored 6 years ago

119)                 <p><strong>Beachten Sie:</strong> Um diese Domain nutzen zu können, benötigen Sie bei Ihrem bisherigen Domainregistrar die Möglichkeit, DNS-Records anzulegen oder die zuständigen DNS-Server zu ändern. Sie können dann entweder unsere DNS-Server nutzen oder einzelne DNS-Records auf unsere Server einrichten.</p>');
Bernd Wurst Ermögliche das Hinzufügen e...

Bernd Wurst authored 6 years ago

120) 
121)         output('<p>Mit Betätigen des unten stehenden Knopfes bestätigen Sie, dass Sie entweder der Domaininhaber sind oder mit expliziter Zustimmung des Domaininhabers handeln.</p>');
Bernd Wurst Erkenne Domains die schon b...

Bernd Wurst authored 6 years ago

122)         $form = '
123)             <p class="buttonset" id="buttonset-external">
Bernd Wurst Ermögliche das Hinzufügen e...

Bernd Wurst authored 6 years ago

124)             <input type="radio" name="dns" id="option-dns-enable" value="enable" />
125)             <label for="option-dns-enable">Lokalen DNS-Server aktivieren</label>
126)             <input type="radio" name="dns" id="option-dns-disable" value="disable" checked="checked" />
127)             <label for="option-dns-disable">Weiterhin externen DNS verwenden</label>
Bernd Wurst Erkenne Domains die schon b...

Bernd Wurst authored 6 years ago

128)             </p>
129) 
130)             <p class="buttonset" id="buttonset-email">
131)             <input type="radio" name="email" id="option-email-enable" value="enable" checked="checked" />
132)             <label for="option-email-enable">E-Mail-Nutzung aktivieren</label>
133)             <input type="radio" name="email" id="option-email-disable" value="disable" />
134)             <label for="option-email-disable">Nicht für E-Mail nutzen</label>
Bernd Wurst Ermögliche das Hinzufügen e...

Bernd Wurst authored 6 years ago

135)             </p>';
136) 
Bernd Wurst Bessere Prüfung der Domainn...

Bernd Wurst authored 6 years ago

137)         $form .= '<p><input type="hidden" name="domain" value="'.filter_input_general($request).'">
Bernd Wurst Ermögliche das Hinzufügen e...

Bernd Wurst authored 6 years ago

138)             <input type="submit" name="submit" value="Diese Domain bei '.config('company_name').' verwenden"></p>';
139) 
140)         output(html_form('domains_external', 'useexternal', '', $form));
141)         output('</div>');
142) 
143)     } else {
Bernd Wurst Bessere Prüfung der Domainn...

Bernd Wurst authored 6 years ago

144)         output('<p class="domain-unavailable">Die Domain '.filter_input_general($request).' kann nicht registriert werden.</p>');
Bernd Wurst Ermögliche das Hinzufügen e...

Bernd Wurst authored 6 years ago

145) 
Bernd Wurst Domain-Transfer und -Regist...

Bernd Wurst authored 6 years ago

146)         switch ($avail['status']) {
Bernd Wurst Ermögliche das Hinzufügen e...

Bernd Wurst authored 6 years ago

147)             case 'nameContainsForbiddenCharacter':
148)                 output('<p>Der Domainname enthält unerlaubte Zeichen.</p>');
149)                 break;
Bernd Wurst Erkenne Domains die schon b...

Bernd Wurst authored 6 years ago

150)             case 'extensionDoesNotExist':
151)             case 'extensionCannotBeRegistered':