0f4e83a18999053f547adf7a2c9129717f71833e
Bernd Wurst Ermögliche das Ändern eines...

Bernd Wurst authored 6 years ago

1) <?php
2) /*
3) This file belongs to the Webinterface of schokokeks.org Hosting
4) 
Hanno Böck Change license from CC0 to...

Hanno Böck authored 2 years ago

5) Written by schokokeks.org Hosting, namely
Bernd Wurst Ermögliche das Ändern eines...

Bernd Wurst authored 6 years ago

6)   Bernd Wurst <bernd@schokokeks.org>
7)   Hanno Böck <hanno@schokokeks.org>
8) 
Hanno Böck Change license from CC0 to...

Hanno Böck authored 2 years ago

9) This code is published under a 0BSD license.
Bernd Wurst Ermögliche das Ändern eines...

Bernd Wurst authored 6 years ago

10) 
11) 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.
12) */
13) 
14) require_once('inc/debug.php');
15) require_once('inc/icons.php');
16) 
17) require_once('class/domain.php');
18) require_once('domains.php');
19) 
Hanno Böck Codingstyle PSR12 + array s...

Hanno Böck authored 3 years ago

20) require_role([ROLE_CUSTOMER, ROLE_SYSTEMUSER]);
Bernd Wurst Ermögliche das Ändern eines...

Bernd Wurst authored 6 years ago

21) 
Hanno Fix coding style with php-c...

Hanno authored 6 years ago

22) $dom = null;
Bernd Wurst Alle Domain-Details auf ein...

Bernd Wurst authored 6 years ago

23) if (isset($_REQUEST['id'])) {
Hanno Fix coding style with php-c...

Hanno authored 6 years ago

24)     $dom = new Domain((int) $_REQUEST['id']);
Bernd Wurst Erste Vorbereitungen für Do...

Bernd Wurst authored 6 years ago

25)     $_SESSION['domains_detail_domainname'] = $dom->fqdn;
26) } elseif (isset($_SESSION['domains_detail_domainname'])) {
27)     $dom = new Domain($_SESSION['domains_detail_domainname']);
Bernd Wurst Alle Domain-Details auf ein...

Bernd Wurst authored 6 years ago

28) } else {
29)     system_failure("Keine Domain angegeben");
Bernd Wurst Ermögliche das Ändern eines...

Bernd Wurst authored 6 years ago

30) }
Bernd Wurst Alle Domain-Details auf ein...

Bernd Wurst authored 6 years ago

31) if (!$dom) {
32)     system_failure("Keine Domain gewählt!");
33) }
Bernd Wurst Blende Aktionen aus, wenn d...

Bernd Wurst authored 6 years ago

34) if (have_role(ROLE_CUSTOMER)) {
35)     $dom->ensure_customerdomain();
36) } else {
37)     $dom->ensure_userdomain();
38) }
Bernd Wurst Ermögliche das Ändern eines...

Bernd Wurst authored 6 years ago

39) 
40) title("Domain {$dom->fqdn}");
41) $section = 'domains_domains';
42) 
Bernd Wurst allow conversion of transfe...

Bernd Wurst authored 2 years ago

43) // Block gekündigte Domain in externe Domain umwandeln
44) 
45) if ($dom->status == 'transferout') {
46)     output('<h4>Domain wurde transferiert!</h4>');
47)     output('<p>Diese Domain wurde zu einem anderen Anbieter umgezogen. Die mit der Domain verbundenen Dienste werden noch für einige Tage weiterhin erbracht und anschließend gelöscht.</p>');
48)     output('<p>Wenn Sie diese Domain weiterhin über unsere Anlagen nutzen möchten, müssen Sie diese in eine externe Domain umwandeln.</p>');
Hanno Böck Spaces between string conca...

Hanno Böck authored 1 year ago

49)     $form = '<p><input type="hidden" name="domain" value="' . $dom->id . '"><input type="submit" name="submit" value="Die Domain ' . $dom->fqdn . ' in externe Domain umwandeln"></p>';
Bernd Wurst allow conversion of transfe...

Bernd Wurst authored 2 years ago

50)     output(html_form('domains_convertexternal', 'save', 'action=convertexternal', $form));
51) }
52) 
Bernd Wurst Alle Domain-Details auf ein...

Bernd Wurst authored 6 years ago

53) // Block zuständiger Useraccount
54) 
Bernd Wurst Domain-Nutzung mit Deeplink...

Bernd Wurst authored 6 years ago

55) $is_current_user = true;
Bernd Wurst show domain details to syst...

Bernd Wurst authored 5 years ago

56) $is_current_customer = false;
57) if (have_role(ROLE_CUSTOMER) && isset($_SESSION['customerinfo']['customerno']) && ($dom->kunde == $_SESSION['customerinfo']['customerno'])) {
58)     $is_current_customer = true;
59)     $useraccounts = list_useraccounts();
60)     if (count($useraccounts) > 1) {
61)         if ($dom->useraccount != $_SESSION['userinfo']['uid']) {
62)             $is_current_user = false;
63)         }
64)         // Mehrere User vorhanden
Hanno Böck Codingstyle PSR12 + array s...

Hanno Böck authored 3 years ago

65)         $options = [];
Bernd Wurst show domain details to syst...

Bernd Wurst authored 5 years ago

66)         foreach ($useraccounts as $u) {
67)             $options[$u['uid']] = $u['username'];
68)         }
69)         if (!array_key_exists($dom->useraccount, $options)) {
70)             $options[$dom->useraccount] = $dom->useraccount;
71)         }
72)         output('<h4>Zuständiges Benutzerkonto</h4>');
Hanno Böck Spaces between string conca...

Hanno Böck authored 1 year ago

73)         $form = '<p>Diese Domain nutzen im Benutzerkonto ' . html_select('domainuser', $options, $dom->useraccount) . ' <input type="submit" name="submit" value="Änderung speichern"></p>';
74)         output(html_form('update-user', 'update', 'action=chguser&id=' . $dom->id, $form));
Bernd Wurst show domain details to syst...

Bernd Wurst authored 5 years ago

75)     } elseif (!have_role(ROLE_SYSTEMUSER) || $dom->useraccount != $_SESSION['userinfo']['uid']) {
76)         // Kunde hat keine mehreren User, Domain ist trotzdem in einem anderen Useraccount
Bernd Wurst Domain-Nutzung mit Deeplink...

Bernd Wurst authored 6 years ago

77)         $is_current_user = false;
Bernd Wurst show domain details to syst...

Bernd Wurst authored 5 years ago

78)         output('<h4>Zuständiges Benutzerkonto</h4>');
Hanno Böck Spaces between string conca...

Hanno Böck authored 1 year ago

79)         output('<p>Diese Domain wird im Benutzerkonto mit der User-ID #' . $dom->useraccount . ' verwendet.</p>');
Bernd Wurst Domain-Nutzung mit Deeplink...

Bernd Wurst authored 6 years ago

80)     }
Bernd Wurst Ermögliche das Ändern eines...

Bernd Wurst authored 6 years ago

81) }
Bernd Wurst Alle Domain-Details auf ein...

Bernd Wurst authored 6 years ago

82) 
83) 
Bernd Wurst Domain-Nutzung mit Deeplink...

Bernd Wurst authored 6 years ago

84) // Block Nutzung
85) 
86) if ($is_current_user) {
87)     output("<h4>Aktuelle Nutzung dieser Domain</h4>");
Bernd Wurst Deeplinks als Flex-Tiles

Bernd Wurst authored 6 years ago

88)     output('<div class="tile-container">');
Bernd Wurst styling der Nutzungsangaben...

Bernd Wurst authored 6 years ago

89)     $everused = false;
90)     if (have_module('dns') && $dom->dns == 1) {
91)         $used = dns_in_use($dom->id);
Hanno Böck Spaces between string conca...

Hanno Böck authored 1 year ago

92)         output("<div class=\"tile usage " . ($used ? "used" : "unused") . "\"><p><strong>" . internal_link('../dns/dns_domain', "DNS-Server", 'dom=' . $dom->id) . "</strong></p><p>" . ($used ? "Manuelle DNS-Records vorhanden." : "DNS-Records möglich") . "</p></div>");
Bernd Wurst styling der Nutzungsangaben...

Bernd Wurst authored 6 years ago

93)         $everused = true;
Bernd Wurst Domain-Nutzung mit Deeplink...

Bernd Wurst authored 6 years ago

94)     }
Bernd Wurst Erster Entwurf nomail-Feature

Bernd Wurst authored 1 year ago

95)     if (have_module('email')) {
96)         if (($dom->mail == 'auto' || $dom->mail == 'manual') && $dom->provider != 'terions') {
Bernd Wurst Erzeuge Warnung wenn bei ei...

Bernd Wurst authored 5 years ago

97)             $mxresult = dns_get_record($dom->fqdn, DNS_MX);
98)             $found = false;
99)             foreach ($mxresult as $mx) {
100)                 if (substr_compare($mx['target'], config('masterdomain'), -strlen(config('masterdomain'))) === 0) {
101)                     $found = true;
102)                 }
103)             }
Hanno Böck Fix not operator (!) spaces

Hanno Böck authored 1 year ago

104)             if (!$found) {
Hanno Böck Spaces between string conca...

Hanno Böck authored 1 year ago

105)                 DEBUG('MX für ' . $dom->fqdn . ':');
Bernd Wurst Erzeuge Warnung wenn bei ei...

Bernd Wurst authored 5 years ago

106)                 DEBUG($mxresult);
107)                 warning('Bei dieser Domain ist der Mail-Empfang aktiviert, jedoch verweist das DNS-System scheinbar nicht auf unsere Anlagen. Wenn Sie keine E-Mails empfangen möchten, schalten Sie die Mail-Verarbeitung für diese Domain aus.');
108)             }
109)         }
Bernd Wurst Erster Entwurf nomail-Feature

Bernd Wurst authored 1 year ago

110)         $mailsetting = mail_setting($dom->id);
111) 
112)         if ($mailsetting == 'none') {
113)             output("<div class=\"tile usage unused\"><p><strong>" . internal_link('email', "E-Mail", "dom=" . $dom->id) . "</strong></p><p>E-Mail-Verarbeitung ausgeschaltet</p></div>");
114)         } elseif ($mailsetting == 'nomail') {
115)             output("<div class=\"tile usage unused\"><p><strong>" . internal_link('email', "E-Mail", "dom=" . $dom->id) . "</strong></p><p>E-Mail-Verarbeitung ausgeschaltet und <strong>unterbunden</strong></p></div>");
116)         } elseif ($mailsetting == 'manual') {
117)             $used = mail_in_use($dom->id);
118)             if ($used) {
119)                 $everused = true;
120)             }
121)             output("<div class=\"tile usage " . ($used ? "used" : "unused") . "\"><p><strong>" . internal_link('email', "E-Mail", "dom=" . $dom->id) . "</strong></p><p>Manuelle Mail-Konfiguration ist aktiv</p><p>" . internal_link('../email/imap', "Accounts verwalten") . "</p></div>");
122)         } elseif ($mailsetting == 'vmail') {
123)             $vmail = count_vmail($dom->id);
Bernd Wurst styling der Nutzungsangaben...

Bernd Wurst authored 6 years ago

124)             if ($vmail > 0) {
Bernd Wurst Erster Entwurf nomail-Feature

Bernd Wurst authored 1 year ago

125)                 $everused = true;
Hanno Böck Spaces between string conca...

Hanno Böck authored 1 year ago

126)                 output("<div class=\"tile usage used\"><p><strong>" . internal_link('email', "E-Mail", 'dom=' . $dom->id) . "</strong></p><p>E-Mail-Postfächer unter dieser Domain: <strong>{$vmail}</strong></p><p>" . internal_link('../email/vmail', "Postfächer verwalten", 'filter=' . $dom->fqdn) . "</p></div>");
Bernd Wurst styling der Nutzungsangaben...

Bernd Wurst authored 6 years ago

127)             } else {
Bernd Wurst Erster Entwurf nomail-Feature

Bernd Wurst authored 1 year ago

128)                 output("<div class=\"tile usage unused\"><p><strong>" . internal_link('email', "E-Mail", 'dom=' . $dom->id) . "</strong></p><p>Bisher keine E-Mail-Postfächer unter dieser Domain.</p><p>" . internal_link('../email/vmail', "Postfächer verwalten", "filter=" . $dom->fqdn) . "</p></div>");
Bernd Wurst styling der Nutzungsangaben...

Bernd Wurst authored 6 years ago

129)             }
Bernd Wurst Zeige Mail-Deeplink korrekt...

Bernd Wurst authored 6 years ago

130)         }
Bernd Wurst Domain-Nutzung mit Deeplink...

Bernd Wurst authored 6 years ago

131)     }
132)     if (have_module('mailman') && mailman_subdomains($dom->id)) {
Bernd Wurst Funktion zum Löschen einer...

Bernd Wurst authored 5 years ago

133)         use_module('mailman');
134)         include('mailman.php');
Bernd Wurst Deeplink von Domain zu Mail...

Bernd Wurst authored 6 years ago

135)         $mailmanhosts = mailman_subdomains($dom->id);
136)         $hostname = $dom->fqdn;
137)         if (count($mailmanhosts) == 1) {
Hanno Böck Spaces between string conca...

Hanno Böck authored 1 year ago

138)             $hostname = $mailmanhosts[0]['hostname'] . '.' . $dom->fqdn;
Bernd Wurst Deeplink von Domain zu Mail...

Bernd Wurst authored 6 years ago

139)         }
Bernd Wurst Funktion zum Löschen einer...

Bernd Wurst authored 5 years ago

140)         $lists = lists_on_domain($dom->id);
Bernd Wurst changed wording in domain d...

Bernd Wurst authored 5 years ago

141)         $msg = '<p>Diese Domain wird für Mailinglisten verwendet</p>';
Bernd Wurst Funktion zum Löschen einer...

Bernd Wurst authored 5 years ago

142)         if (count($lists) == 0) {
Hanno Böck Spaces between string conca...

Hanno Böck authored 1 year ago

143)             $msg = '<p>Für Mailinglisten eingerichtet aber keine Mailingliste mehr vorhanden.</p><p class="delete">' . internal_link('save', "Nicht mehr für Mailinglisten verwenden", "action=nomailman&domain=" . $dom->id) . '</p>';
Bernd Wurst Funktion zum Löschen einer...

Bernd Wurst authored 5 years ago

144)         }
Hanno Böck Spaces between string conca...

Hanno Böck authored 1 year ago

145)         output("<div class=\"tile usage used\"><p><strong>" . internal_link('../mailman/lists', "Mailinglisten", 'filter=' . $hostname) . "</strong></p>$msg</div>");
Bernd Wurst Domain-Nutzung mit Deeplink...

Bernd Wurst authored 6 years ago

146)         $used = true;
Bernd Wurst styling der Nutzungsangaben...

Bernd Wurst authored 6 years ago

147)         $everused = true;
Bernd Wurst Domain-Nutzung mit Deeplink...

Bernd Wurst authored 6 years ago

148)     }
Bernd Wurst styling der Nutzungsangaben...

Bernd Wurst authored 6 years ago

149)     if (have_module('vhosts')) {
150)         $used = web_in_use($dom->id);
Hanno Böck Spaces between string conca...

Hanno Böck authored 1 year ago

151)         output("<div class=\"tile usage " . ($used ? "used" : "unused") . "\"><p><strong>" . internal_link('../vhosts/vhosts', "Websites", 'filter=' . $dom->fqdn) . "</strong></p><p>" . ($used ? "Es gibt Website-Einstellungen für diese Domain" : "Bisher keine Website eingerichtet") . "</p></div>");
Bernd Wurst styling der Nutzungsangaben...

Bernd Wurst authored 6 years ago

152)         $everused = true;
Bernd Wurst Domain-Nutzung mit Deeplink...

Bernd Wurst authored 6 years ago

153)     }
Bernd Wurst styling der Nutzungsangaben...

Bernd Wurst authored 6 years ago

154)     if (have_module('jabber')) {
155)         if ($dom->jabber == 1) {
Hanno Böck Spaces between string conca...

Hanno Böck authored 1 year ago

156)             output("<div class=\"tile usage used\"><p><strong>" . internal_link('../jabber/accounts', "Jabber/XMPP") . "</strong></p><p>Diese Domain wird für Jabber verwendet</p></div>");
Bernd Wurst styling der Nutzungsangaben...

Bernd Wurst authored 6 years ago

157)         } else {
Hanno Böck Spaces between string conca...

Hanno Böck authored 1 year ago

158)             output("<div class=\"tile usage unused\"><p><strong>" . internal_link('../jabber/new_domain', "Jabber/XMPP") . "</strong></p><p>Diese Domain wird bisher nicht für Jabber verwendet</p></div>");
Bernd Wurst styling der Nutzungsangaben...

Bernd Wurst authored 6 years ago

159)         }
160)         $everused = true;
Bernd Wurst Domain-Nutzung mit Deeplink...

Bernd Wurst authored 6 years ago

161)     }
Bernd Wurst Deeplinks als Flex-Tiles

Bernd Wurst authored 6 years ago

162)     output('</div>');
Hanno Böck Fix not operator (!) spaces

Hanno Böck authored 1 year ago

163)     if (!$everused) {
Bernd Wurst styling der Nutzungsangaben...

Bernd Wurst authored 6 years ago

164)         output('<p><em>Keine Nutzung dieser Domain (die hier angezeigt wird)</em></p>');
165)     }
Bernd Wurst Domain-Nutzung mit Deeplink...

Bernd Wurst authored 6 years ago

166) }
167) 
Hanno Fix coding style with php-c...

Hanno authored 6 years ago

168) // Block Domain-Inhaber
Bernd Wurst Alle Domain-Details auf ein...

Bernd Wurst authored 6 years ago

169) 
Bernd Wurst show domain details to syst...

Bernd Wurst authored 5 years ago

170) if ($is_current_customer && config('http.net-apikey') && $dom->provider == 'terions' && ($dom->cancel_date === null || $dom->cancel_date > date('Y-m-d'))) {
Bernd Wurst Alle Domain-Details auf ein...

Bernd Wurst authored 6 years ago

171)     use_module('contacts');
172)     require_once('contacts.php');
Bernd Wurst Blende Aktionen aus, wenn d...

Bernd Wurst authored 6 years ago

173)     require_once('domainapi.php');
Bernd Wurst Alle Domain-Details auf ein...

Bernd Wurst authored 6 years ago

174) 
175)     output('<h4>Inhaberwechsel der Domain</h4>');
176)     output('<p>Legen Sie hier einen neuen Inhaber für diese Domain fest.</p>');
177) 
178)     if (isset($_REQUEST['id'])) {
179)         api_download_domain($_REQUEST['id']);
Bernd Wurst Erste Vorbereitungen für Do...

Bernd Wurst authored 6 years ago

180)         $_SESSION['domains_detail_domainname'] = $dom->fqdn;
181)         $_SESSION['domains_detail_owner'] = $dom->owner;
182)         $_SESSION['domains_detail_admin_c'] = $dom->admin_c;
Bernd Wurst Alle Domain-Details auf ein...

Bernd Wurst authored 6 years ago

183)     }
184)     if (!update_possible($dom->id)) {
185)         warning("Diese Domain verwendet eine unübliche Endung. Daher kann der Inhaber nicht auf diesem Weg verändert werden. Bitte kontaktieren Sie den Support.");
186)     } else {
Hanno Fix coding style with php-c...

Hanno authored 6 years ago

187)         if ($_SESSION['domains_detail_admin_c'] == $dom->admin_c &&
188)                 $_SESSION['domains_detail_owner'] != $dom->owner &&
Bernd Wurst Erste Vorbereitungen für Do...

Bernd Wurst authored 6 years ago

189)                 (!isset($_SESSION['domains_detail_detach']) || $_SESSION['domains_detail_detach'] == 0)) {
Hanno Fix coding style with php-c...

Hanno authored 6 years ago

190)             // Wenn der Owner geändert wurde, der Admin aber nicht und das detach-Flag
Bernd Wurst Alle Domain-Details auf ein...

Bernd Wurst authored 6 years ago

191)             // nicht gesetzt ist, dann wird der Admin gleich dem Owner gesetzt
Bernd Wurst Erste Vorbereitungen für Do...

Bernd Wurst authored 6 years ago

192)             $_SESSION['domains_detail_admin_c'] = $_SESSION['domains_detail_owner'];
Bernd Wurst Ermögliche das Ändern eines...

Bernd Wurst authored 6 years ago

193)         }
Bernd Wurst Alle Domain-Details auf ein...

Bernd Wurst authored 6 years ago

194) 
195)         if (isset($_GET['admin_c']) && $_GET['admin_c'] == 'none') {
Bernd Wurst Erste Vorbereitungen für Do...

Bernd Wurst authored 6 years ago

196)             $_SESSION['domains_detail_admin_c'] = $_SESSION['domains_detail_owner'];
197)             unset($_SESSION['domains_detail_detach']);
Bernd Wurst Ermögliche das Ändern eines...

Bernd Wurst authored 6 years ago

198)         }
199) 
Bernd Wurst Erste Vorbereitungen für Do...

Bernd Wurst authored 6 years ago

200)         $owner = get_contact($_SESSION['domains_detail_owner']);
201)         $admin_c = get_contact($_SESSION['domains_detail_admin_c']);
Bernd Wurst Alle Domain-Details auf ein...

Bernd Wurst authored 6 years ago

202)         $function = 'Inhaber';
203)         if ($owner['id'] == $admin_c['id']) {
204)             $function .= ' und Verwalter';
205)         }
206)         $cssclass = '';
207)         if ($owner['id'] != $dom->owner) {
208)             $cssclass = 'modified';
209)         }
Hanno Böck Spaces between string conca...

Hanno Böck authored 1 year ago

210)         output('<p><strong>' . $function . ':</strong></p>' . display_contact($owner, '', $cssclass));
Bernd Wurst Alle Domain-Details auf ein...

Bernd Wurst authored 6 years ago

211)         addnew('choose', 'Neuen Inhaber wählen', "type=owner");
212)         if ($owner['id'] != $admin_c['id']) {
213)             $cssclass = '';
214)             if ($admin_c['id'] != $dom->admin_c) {
215)                 $cssclass = 'modified';
Bernd Wurst Ermögliche das Ändern eines...

Bernd Wurst authored 6 years ago

216)             }
Hanno Böck Spaces between string conca...

Hanno Böck authored 1 year ago

217)             output('<p><strong>Verwalter:</strong></p>' . display_contact($admin_c, '', $cssclass));
Bernd Wurst Alle Domain-Details auf ein...

Bernd Wurst authored 6 years ago

218)             addnew('choose', 'Neuen Verwalter wählen', "type=admin_c");
Hanno Böck Spaces between string conca...

Hanno Böck authored 1 year ago

219)             output('<p class="delete">' . internal_link('', 'Keinen separaten Verwalter festlegen', 'admin_c=none') . '</p>');
Bernd Wurst Alle Domain-Details auf ein...

Bernd Wurst authored 6 years ago

220)         } else {
221)             addnew('choose', 'Einen separaten Verwalter wählen', "type=admin_c&detach=1");
Bernd Wurst Ermögliche das Ändern eines...

Bernd Wurst authored 6 years ago

222)         }
223) 
224) 
Bernd Wurst Alle Domain-Details auf ein...

Bernd Wurst authored 6 years ago

225)         if ($owner['id'] != $dom->owner || $admin_c['id'] != $dom->admin_c) {
226)             if (isset($_GET['error']) && $_GET['error'] == '1') {
227)                 input_error('Sie müssen der Übertragung explizit zustimmen!');
228)             }
229)             $form = '<p>Es sind Änderungen vorgenommen worden, die noch nicht gespeichert wurden</p>';
230)             $form .= '<p><input type="checkbox" name="accept" value="1" id="accept"><label for="accept"> Ich bestätige, dass ich die nachfolgenden Hinweise zur Kenntnis genommen habe.</p>
Hanno Böck Spaces between string conca...

Hanno Böck authored 1 year ago

231)                 <p>Mit Speichern dieser Änderungen führen Sie möglicherweise einen Inhaberwechsel bei der Domain ' . $dom->fqdn . ' aus. Inhaberwechsel sind bei einigen Domainendungen (z.B. com/net/org) zustimmungspflichtig vom alten und vom neuen Inhaber. Die Registrierungsstelle kann nach eigenem Ermessen diese Zustimmung per separater E-Mail einfordern. Wird diese Zustimmung nicht oder verspätet erteilt, kann eine Domain gesperrt werden. Dieser Vorgang wird nicht von ' . config('company_name') . ' kontrolliert.</p>
Bernd Wurst Alle Domain-Details auf ein...

Bernd Wurst authored 6 years ago

232)                 <p>Sie sind ferner darüber informiert, dass die Adresse des Domaininhabers öffentlich abrufbar ist.</p>';
233)             $form .= '<p><input type="submit" name="sumbit" value="Änderungen speichern und Domaininhaber ändern"></p>';
Hanno Böck Spaces between string conca...

Hanno Böck authored 1 year ago

234)             output(html_form('domains_update', 'update', "action=ownerchange&id=" . $dom->id, $form));
Hanno Fix coding style with php-c...

Hanno authored 6 years ago

235)         }
Bernd Wurst Ermögliche das Ändern eines...

Bernd Wurst authored 6 years ago

236)     }
237) }
Bernd Wurst Alle Domain-Details auf ein...

Bernd Wurst authored 6 years ago

238) 
239) // Block Externe Domain umziehen
240) 
Bernd Wurst show domain details to syst...

Bernd Wurst authored 5 years ago

241) if ($is_current_customer && config('http.net-apikey')) {
Bernd Wurst Blende Aktionen aus, wenn d...

Bernd Wurst authored 6 years ago

242)     if ($dom->status == 'prereg') {
243)         output('<h4>Domain-Registrierung abschließen</h4>
Hanno Böck Spaces between string conca...

Hanno Böck authored 1 year ago

244)                 <p>' . internal_link('domainreg', 'Domain registrieren', "domain={$dom->fqdn}") . '</p>');
Bernd Wurst Blende Aktionen aus, wenn d...

Bernd Wurst authored 6 years ago

245)     } elseif ($dom->status == 'pretransfer') {
Hanno Böck Spaces between string conca...

Hanno Böck authored 1 year ago

246)         output('<h4>Domain zu ' . config('company_name') . ' umziehen</h4>
247)                 <p>' . internal_link('domainreg', 'Umzugsautrag (ggf. nochmals) erteilen', "domain={$dom->fqdn}") . '</p>');
Bernd Wurst Blende Aktionen aus, wenn d...

Bernd Wurst authored 6 years ago

248)     } elseif ($dom->provider != 'terions') {
Hanno Böck Spaces between string conca...

Hanno Böck authored 1 year ago

249)         output('<h4>Domain zu ' . config('company_name') . ' umziehen</h4>
250)                 <p>' . internal_link('domainreg', 'Domain-Transfer starten', "domain={$dom->fqdn}") . '</p>');
Bernd Wurst Blende Aktionen aus, wenn d...

Bernd Wurst authored 6 years ago

251)     }
Bernd Wurst Alle Domain-Details auf ein...

Bernd Wurst authored 6 years ago

252) }
253) 
Bernd Wurst Transfer-Freigabe und Kündi...

Bernd Wurst authored 6 years ago

254) // Block Domain löschen/kündigen
255) 
256) $domain_in_use = mailman_subdomains($dom->id) || mail_in_use($dom->id) || web_in_use($dom->id) || $dom->jabber == 1;
Bernd Wurst show domain details to syst...

Bernd Wurst authored 5 years ago

257) if ($is_current_customer && !$domain_in_use && ($dom->status == 'prereg' || $dom->status == 'pretransfer' || $dom->status == 'transferfailed' || $dom->status == 'external')) {
Bernd Wurst Transfer-Freigabe und Kündi...

Bernd Wurst authored 6 years ago

258)     output('<h4>Domain wieder entfernen</h4>');
Hanno Böck Spaces between string conca...

Hanno Böck authored 1 year ago

259)     output('<p class="delete">' . internal_link('save', 'Die Domain ' . $dom->fqdn . ' entfernen', 'action=delete&domain=' . $dom->id) . '</p>');
Bernd Wurst show domain details to syst...

Bernd Wurst authored 5 years ago

260) } elseif ($is_current_customer && config('http.net-apikey') && $dom->provider == 'terions' && (!$dom->cancel_date || ($dom->cancel_date > date('Y-m-d')))) {
Bernd Wurst Blende Aktionen aus, wenn d...

Bernd Wurst authored 6 years ago

261)     require_once('domainapi.php');
Bernd Wurst Transfer-Freigabe und Kündi...

Bernd Wurst authored 6 years ago

262)     output('<h4>Domain kündigen</h4>');
263)     $info = api_download_domain($dom->id);
264)     if ($info['authInfo']) {
Hanno Böck Spaces between string conca...

Hanno Böck authored 1 year ago

265)         output('<p>Für die Domain <strong>' . $dom->fqdn . '</strong> ist der Umzug zu einem andren Anbieter möglich.</p>');
266)         output('<p>Das Auth-Info für die Domain <strong>' . $dom->fqdn . '</strong> lautet: <strong>' . $info['authInfo'] . '</strong></p>');
Bernd Wurst Transfer-Freigabe und Kündi...

Bernd Wurst authored 6 years ago

267)         output('<p>Wenden Sie sich an den Support, wenn Sie den Domainumzug wieder sperren möchten.</p>');
268)     } else {
269)         output('<p>Hier können Sie die Domain zum Umzug freigeben.</p>');
Hanno Böck Spaces between string conca...

Hanno Böck authored 1 year ago

270)         $form = '<p><input type="hidden" name="domain" value="' . $dom->id . '"><input type="submit" name="submit" value="Die Domain ' . $dom->fqdn . ' zum Umzug freigeben"></p>';
Bernd Wurst Transfer-Freigabe und Kündi...

Bernd Wurst authored 6 years ago

271)         output(html_form('domains_transfer', 'save', 'action=transfer', $form));
272)     }
Hanno Böck Spaces between string conca...

Hanno Böck authored 1 year ago

273)     output('<p>Die aktuelle Laufzeit der Domain dauert noch bis ' . $info['currentContractPeriodEnd'] . '</p>');
Bernd Wurst Transfer-Freigabe und Kündi...

Bernd Wurst authored 6 years ago

274)     if ($info['deletionDate']) {
Hanno Böck Spaces between string conca...

Hanno Böck authored 1 year ago

275)         output('<p>Es liegt aktuell eine Kündigung vor auf <strong>' . $info['deletionDate'] . '</strong></p><p>Um die Kündigung aufzuheben, wenden Sie sich bitte an den Support.</p>');
Bernd Wurst Transfer-Freigabe und Kündi...

Bernd Wurst authored 6 years ago

276)     } else {
Bernd Wurst change spelling in domains/...

Bernd Wurst authored 3 years ago

277)         output('<p>Die Laufzeit wird automatisch um ein weiteres Jahr verlängert, sofern Sie keine Kündigung auslösen oder die Domain vor diesem Datum zu einem anderen Anbieter umziehen.</p>');
Hanno Böck Spaces between string conca...

Hanno Böck authored 1 year ago

278)         output('<p class="delete">' . internal_link('save', 'Die Domain ' . $dom->fqdn . ' kündigen', 'action=cancel&domain=' . $dom->id) . '</p>');
Bernd Wurst Transfer-Freigabe und Kündi...

Bernd Wurst authored 6 years ago

279)     }
280) }
281) 
282) 
Bernd Wurst Alle Domain-Details auf ein...

Bernd Wurst authored 6 years ago

283) // Block Domain bestätigen
284) 
Bernd Wurst Erste Vorbereitungen für Do...

Bernd Wurst authored 6 years ago

285) if ($dom->mailserver_lock == 1 && $dom->status != 'prereg') {
Bernd Wurst Alle Domain-Details auf ein...

Bernd Wurst authored 6 years ago

286)     if (has_own_ns($dom->domainname, $dom->tld)) {
287)         unset_mailserver_lock($dom);
288)         success_msg("Die Domain {$dom->fqdn} wurde erfolgreich bestätigt und kann nun in vollem Umfang verwendet werden.");
289)         redirect("");
290)     }
291)     output('<h3>Mailserver-Sperre aktiv</h3>
Hanno Böck Spaces between string conca...

Hanno Böck authored 1 year ago

292)             <p>Bisher ist für diese Domain die Nutzung als Mail-Domain eingeschränkt, da wir noch keine Gewissheit haben, ob Sie der rechtmäßige Nutzer der Domain sind. Eine Domain, die für E-Mail-Aktivität genutzt werden soll, muss entweder die DNS-Server von ' . config('company_name') . ' verwenden oder die Inhaberschaft muss durch einen passend gesetzten DNS-Record nachgewiesen werden. Nachfolgend werden die Möglichkeiten im Detail vorgestellt.</p>');
Bernd Wurst Alle Domain-Details auf ein...

Bernd Wurst authored 6 years ago

293)     if (!$dom->secret) {
294)         create_domain_secret($dom);
295)     }
296) 
297)     $TXT = get_txt_record('_schokokeks', $dom->domainname, $dom->tld);
298)     if ($TXT == $dom->secret) {
299)         unset_mailserver_lock($dom);
300)         success_msg("Die Domain {$dom->fqdn} wurde erfolgreich bestätigt und kann nun in vollem Umfang verwendet werden.");
Bernd Wurst Lasse die API bestimmen was...

Bernd Wurst authored 6 years ago

301)         redirect("");
Bernd Wurst Alle Domain-Details auf ein...

Bernd Wurst authored 6 years ago

302)     }
303) 
304)     if ($dom->dns == 1 || have_module('dns')) {
Hanno Böck Spaces between string conca...

Hanno Böck authored 1 year ago

305)         output('<h4>DNS-Server von ' . config('company_name') . ' nutzen</h4>');
Bernd Wurst Alle Domain-Details auf ein...

Bernd Wurst authored 6 years ago

306)         output('<p>Wenn Sie die lokalen DNS-Server als zuständig einrichten, wird die Domain automatisch bestätigt.</p>');
307)         if ($dom->dns == 0) {
308)             output('<p>Bisher ist der lokale DNS-Server ausgeschaltet. Besuchen Sie die DNS-Einstellungen um dies zu ändern.</p>');
Hanno Böck Spaces between string conca...

Hanno Böck authored 1 year ago

309)             output('<p>' . internal_link('../dns/dns', 'DNS-Einstellungen aufrufen') . '</p>');
Bernd Wurst Alle Domain-Details auf ein...

Bernd Wurst authored 6 years ago

310)         } else {
311)             $own_ns = own_ns();
312)             asort($own_ns);
Hanno Böck Spaces between string conca...

Hanno Böck authored 1 year ago

313)             output('<p>Wenn Sie die DNS-Server von ' . config('company_name') . ' nutzen möchten, dann richten Sie bei Ihrem Domain-Registrar bitte folgende DNS-Server als zuständig für diese Domain ein:</p>
Bernd Wurst Alle Domain-Details auf ein...

Bernd Wurst authored 6 years ago

314)                     <ul>');
315)             foreach ($own_ns as $ns) {
Hanno Böck Spaces between string conca...

Hanno Böck authored 1 year ago

316)                 output('<li>' . $ns . '</li>');
Bernd Wurst Alle Domain-Details auf ein...

Bernd Wurst authored 6 years ago

317)             }
318)             output('</ul>');
319)             output('<p>Nachdem die Änderungen bei der Registrierungsstelle übernommen wurden (das kann mehrere Stunden dauern), reicht ein erneuter Aufruf dieser Seite um die Sperrung aufzuheben.</p>');
320)         }
321)     }
322)     output('<h4>Inhaberschaft bestätigen</h4>');
Hanno Böck Spaces between string conca...

Hanno Böck authored 1 year ago

323)     output('<p>Um eine extern registrierte Domain in vollem Umfang zu nutzen, ohne die lokalen DNS-Server als zuständig einzurichten, müssen Sie die Inhaberschaft bestätigen. Erst nach diesem Schritt können Sie diese Domain bei ' . config('company_name') . ' als Mail-Domain nutzen.</p>');
Hanno remove whitespace in empty...

Hanno authored 6 years ago

324) 
Hanno Böck Spaces between string conca...

Hanno Böck authored 1 year ago

325)     output('<p>Die Zeichenkette zur Bestätigung lautet <strong>' . $dom->secret . '</strong>.</p>');
326)     output('<p>Richten Sie bitte auf dem zuständigen DNS-Server einen DNS-Record vom Typ TXT unter dem Hostname <strong>_schokokeks.' . $dom->fqdn . '</strong> ein und hinterlegen Sie dort diese Zeichenkette als Inhalt:</p>
327)             <p><code>_schokokeks.' . $dom->fqdn . '.    IN TXT "' . $dom->secret . '"</code></p>
Bernd Wurst Alle Domain-Details auf ein...

Bernd Wurst authored 6 years ago

328)             <p>Beachten Sie, dass Aktualisierungen am DNS-Server i.d.R. mit einigen Minuten verzögerung abgerufen werden können.</p>');
Hanno Fix coding style with php-c...

Hanno authored 6 years ago

329)     #output('<p>Sie können diese entweder als DNS-Record vom Typ TXT unter dem Hostname <strong>_schokokeks.'.$dom->fqdn.'</strong> einrichten oder auf dem zuständigen Webserver eine Datei hinterlegen mit dem Code als Inhalt und der Abruf-URL <strong>http://'.$dom->fqdn.'/'.$dom->secret.'.txt</strong></p>');
Hanno Böck Spaces between string conca...

Hanno Böck authored 1 year ago

330)     output('<p>' . internal_link('', other_icon('refresh.png') . ' Diese Seite neu laden um den DNS-Record zu prüfen', "id={$dom->id}&ts=" . time()) . '</p>');
Bernd Wurst Alle Domain-Details auf ein...

Bernd Wurst authored 6 years ago

331)     output('<p>Nach erfolgreicher Überprüfung kann der DNS-Eintrag wieder entfernt werden.</p>');
332) }
333) 
334)