354c05a4ddd678c49bcbba458bffa7d13482139a
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 1 year 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 1 year 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 2 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 5 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 5 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 1 year 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 7 months 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 1 year 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 4 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 2 years ago

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

Bernd Wurst authored 4 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 7 months 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 4 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 4 years ago

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

Hanno Böck authored 7 months 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 7 months 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 styling der Nutzungsangaben...

Bernd Wurst authored 6 years ago

95)     if (have_module('email') && ($dom->mail != 'none')) {
Bernd Wurst Erzeuge Warnung wenn bei ei...

Bernd Wurst authored 5 years ago

96)         if ($dom->provider != 'terions') {
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 7 months ago

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

Hanno Böck authored 7 months 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 styling der Nutzungsangaben...

Bernd Wurst authored 6 years ago

110)         $used = mail_in_use($dom->id);
Bernd Wurst Zeige Mail-Deeplink korrekt...

Bernd Wurst authored 6 years ago

111)         $vmail = count_vmail($dom->id);
Bernd Wurst styling der Nutzungsangaben...

Bernd Wurst authored 6 years ago

112)         if ($used) {
113)             if ($vmail > 0) {
Hanno Böck Spaces between string conca...

Hanno Böck authored 7 months ago

114)                 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

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

Hanno Böck authored 7 months ago

116)                 output("<div class=\"tile usage 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>");
Bernd Wurst styling der Nutzungsangaben...

Bernd Wurst authored 6 years ago

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

Bernd Wurst authored 6 years ago

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

Hanno Böck authored 7 months ago

119)             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 Zeige Mail-Deeplink korrekt...

Bernd Wurst authored 6 years ago

120)         }
Bernd Wurst styling der Nutzungsangaben...

Bernd Wurst authored 6 years ago

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

Bernd Wurst authored 6 years ago

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

Bernd Wurst authored 4 years ago

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

Bernd Wurst authored 5 years ago

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

Hanno Böck authored 7 months ago

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

Bernd Wurst authored 5 years ago

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

Bernd Wurst authored 4 years ago

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

Bernd Wurst authored 4 years ago

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

Bernd Wurst authored 4 years ago

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

Hanno Böck authored 7 months ago

134)             $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 4 years ago

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

Hanno Böck authored 7 months ago

136)         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

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

Bernd Wurst authored 6 years ago

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

Bernd Wurst authored 6 years ago

139)     }
Bernd Wurst styling der Nutzungsangaben...

Bernd Wurst authored 6 years ago

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

Hanno Böck authored 7 months ago

142)         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

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

Bernd Wurst authored 6 years ago

144)     }
Bernd Wurst styling der Nutzungsangaben...

Bernd Wurst authored 6 years ago

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

Hanno Böck authored 7 months ago

147)             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

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

Hanno Böck authored 7 months ago

149)             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

150)         }
151)         $everused = true;
Bernd Wurst Domain-Nutzung mit Deeplink...

Bernd Wurst authored 6 years ago

152)     }
Bernd Wurst Deeplinks als Flex-Tiles

Bernd Wurst authored 6 years ago

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

Hanno Böck authored 7 months ago

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

Bernd Wurst authored 6 years ago

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

Bernd Wurst authored 6 years ago

157) }
158) 
Hanno Fix coding style with php-c...

Hanno authored 5 years ago

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

Bernd Wurst authored 6 years ago

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

Bernd Wurst authored 4 years ago

161) 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

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

Bernd Wurst authored 6 years ago

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

Bernd Wurst authored 6 years ago

165) 
166)     output('<h4>Inhaberwechsel der Domain</h4>');
167)     output('<p>Legen Sie hier einen neuen Inhaber für diese Domain fest.</p>');
168) 
169)     if (isset($_REQUEST['id'])) {
170)         api_download_domain($_REQUEST['id']);
Bernd Wurst Erste Vorbereitungen für Do...

Bernd Wurst authored 6 years ago

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

Bernd Wurst authored 6 years ago

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

Hanno authored 5 years ago

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

Bernd Wurst authored 6 years ago

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

Hanno authored 5 years ago

181)             // 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

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

Bernd Wurst authored 6 years ago

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

Bernd Wurst authored 6 years ago

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

Bernd Wurst authored 6 years ago

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

Bernd Wurst authored 6 years ago

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

Bernd Wurst authored 6 years ago

189)         }
190) 
Bernd Wurst Erste Vorbereitungen für Do...

Bernd Wurst authored 6 years ago

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

Bernd Wurst authored 6 years ago

193)         $function = 'Inhaber';
194)         if ($owner['id'] == $admin_c['id']) {
195)             $function .= ' und Verwalter';
196)         }
197)         $cssclass = '';
198)         if ($owner['id'] != $dom->owner) {
199)             $cssclass = 'modified';
200)         }
Hanno Böck Spaces between string conca...

Hanno Böck authored 7 months ago

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

Bernd Wurst authored 6 years ago

202)         addnew('choose', 'Neuen Inhaber wählen', "type=owner");
203)         if ($owner['id'] != $admin_c['id']) {
204)             $cssclass = '';
205)             if ($admin_c['id'] != $dom->admin_c) {
206)                 $cssclass = 'modified';
Bernd Wurst Ermögliche das Ändern eines...

Bernd Wurst authored 6 years ago

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

Hanno Böck authored 7 months ago

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

Bernd Wurst authored 6 years ago

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

Hanno Böck authored 7 months ago

210)             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

211)         } else {
212)             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

213)         }
214) 
215) 
Bernd Wurst Alle Domain-Details auf ein...

Bernd Wurst authored 6 years ago

216)         if ($owner['id'] != $dom->owner || $admin_c['id'] != $dom->admin_c) {
217)             if (isset($_GET['error']) && $_GET['error'] == '1') {
218)                 input_error('Sie müssen der Übertragung explizit zustimmen!');
219)             }
220)             $form = '<p>Es sind Änderungen vorgenommen worden, die noch nicht gespeichert wurden</p>';
221)             $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 7 months ago

222)                 <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

223)                 <p>Sie sind ferner darüber informiert, dass die Adresse des Domaininhabers öffentlich abrufbar ist.</p>';
224)             $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 7 months ago

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

Hanno authored 5 years ago

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

Bernd Wurst authored 6 years ago

227)     }
228) }
Bernd Wurst Alle Domain-Details auf ein...

Bernd Wurst authored 6 years ago

229) 
230) // Block Externe Domain umziehen
231) 
Bernd Wurst show domain details to syst...

Bernd Wurst authored 4 years ago

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

Bernd Wurst authored 6 years ago

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

Hanno Böck authored 7 months ago

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

Bernd Wurst authored 6 years ago

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

Hanno Böck authored 7 months ago

237)         output('<h4>Domain zu ' . config('company_name') . ' umziehen</h4>
238)                 <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

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

Hanno Böck authored 7 months ago

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

Bernd Wurst authored 6 years ago

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

Bernd Wurst authored 6 years ago

243) }
244) 
Bernd Wurst Transfer-Freigabe und Kündi...

Bernd Wurst authored 6 years ago

245) // Block Domain löschen/kündigen
246) 
247) $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 4 years ago

248) 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

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

Hanno Böck authored 7 months ago

250)     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 4 years ago

251) } 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

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

Bernd Wurst authored 6 years ago

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

Hanno Böck authored 7 months ago

256)         output('<p>Für die Domain <strong>' . $dom->fqdn . '</strong> ist der Umzug zu einem andren Anbieter möglich.</p>');
257)         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

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

Hanno Böck authored 7 months ago

261)         $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

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

Hanno Böck authored 7 months ago

264)     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

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

Hanno Böck authored 7 months ago

266)         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

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

Bernd Wurst authored 3 years ago

268)         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 7 months ago

269)         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

270)     }
271) }
272) 
273) 
Bernd Wurst Alle Domain-Details auf ein...

Bernd Wurst authored 6 years ago

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

Bernd Wurst authored 6 years ago

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

Bernd Wurst authored 6 years ago

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

Hanno Böck authored 7 months ago

283)             <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

284)     if (!$dom->secret) {
285)         create_domain_secret($dom);
286)     }
287) 
288)     $TXT = get_txt_record('_schokokeks', $dom->domainname, $dom->tld);
289)     if ($TXT == $dom->secret) {
290)         unset_mailserver_lock($dom);
291)         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

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

Bernd Wurst authored 6 years ago

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

Hanno Böck authored 7 months ago

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

Bernd Wurst authored 6 years ago

297)         output('<p>Wenn Sie die lokalen DNS-Server als zuständig einrichten, wird die Domain automatisch bestätigt.</p>');
298)         if ($dom->dns == 0) {
299)             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 7 months ago

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

Bernd Wurst authored 6 years ago

301)         } else {
302)             $own_ns = own_ns();
303)             asort($own_ns);
Hanno Böck Spaces between string conca...

Hanno Böck authored 7 months ago

304)             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

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

Hanno Böck authored 7 months ago

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

Bernd Wurst authored 6 years ago

308)             }
309)             output('</ul>');
310)             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>');
311)         }
312)     }
313)     output('<h4>Inhaberschaft bestätigen</h4>');
Hanno Böck Spaces between string conca...

Hanno Böck authored 7 months ago

314)     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 5 years ago

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

Hanno Böck authored 7 months ago

316)     output('<p>Die Zeichenkette zur Bestätigung lautet <strong>' . $dom->secret . '</strong>.</p>');
317)     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>
318)             <p><code>_schokokeks.' . $dom->fqdn . '.    IN TXT "' . $dom->secret . '"</code></p>
Bernd Wurst Alle Domain-Details auf ein...

Bernd Wurst authored 6 years ago

319)             <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 5 years ago

320)     #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 7 months ago

321)     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

322)     output('<p>Nach erfolgreicher Überprüfung kann der DNS-Eintrag wieder entfernt werden.</p>');
323) }
324) 
325)