webinterface.git

1) <?php

2) /*
3) This file belongs to the Webinterface of schokokeks.org Hosting
4) 

5) Written by schokokeks.org Hosting, namely

6)   Bernd Wurst <bernd@schokokeks.org>
7)   Hanno Böck <hanno@schokokeks.org>
8) 

9) This code is published under a 0BSD license.

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) 

16) 

17) function mailman_subdomains($domain)
18) {

19)     if (! in_array('mailman', config('modules'))) {

20)         return [];

21)     }
22)     $domain = (int) $domain;

23)     $result = db_query("SELECT id, hostname FROM mail.mailman_domains WHERE domain=?", [$domain]);
24)     $ret = [];

25)     while ($line = $result->fetch()) {
26)         $ret[] = $line;
27)     }
28)     return $ret;

29) }
30) 

31) function dns_in_use($domain)
32) {

33)     if (! in_array('dns', config('modules'))) {
34)         return false;
35)     }
36)     $domain = (int) $domain;

37)     $result = db_query("SELECT id FROM dns.custom_records WHERE domain=?", [$domain]);

38)     return ($result->rowCount() > 0);

39) }
40) 
41) 
42) function mail_in_use($domain)
43) {

44)     if (! in_array('email', config('modules'))) {
45)         return false;
46)     }
47)     $domain = (int) $domain;

48)     $result = db_query("SELECT mail FROM kundendaten.domains WHERE id=?", [$domain]);

49)     if ($result->rowCount() < 1) {
50)         system_failure("Domain not found");
51)     }
52)     $d = $result->fetch();
53)     if ($d['mail'] == 'none') {
54)         return false;
55)     } // manually disabled

56)     $result = db_query("SELECT id FROM mail.virtual_mail_domains WHERE domain=?", [$domain]);

57)     if ($result->rowCount() < 1) {
58)         return true;
59)     } // .courier

60)     $result = db_query("SELECT acc.id FROM mail.vmail_accounts acc LEFT JOIN mail.virtual_mail_domains dom ON (acc.domain=dom.id) WHERE dom.domain=?", [$domain]);

61)     return ($result->rowCount() > 0);

62) }
63) 

64) function count_vmail($domain)
65) {

66)     $domain = (int) $domain;

67)     $result = db_query("SELECT acc.id FROM mail.vmail_accounts acc LEFT JOIN mail.virtual_mail_domains dom ON (acc.domain=dom.id) WHERE dom.domain=?", [$domain]);

68)     return $result->rowCount();
69) }
70) 

71) function web_in_use($domain)
72) {

73)     if (! in_array('vhosts', config('modules'))) {
74)         return false;
75)     }

76) 

77)     $domain = (int) $domain;

78) 

79)     $result = db_query("SELECT id FROM kundendaten.domains WHERE id=? AND webserver=1", [$domain]);

80)     if ($result->rowCount() < 1) {
81)         return false;
82)     }

83) 

84)     $result = db_query("SELECT id FROM vhosts.vhost WHERE domain=?", [$domain]);
85)     $result2 = db_query("SELECT id FROM vhosts.alias WHERE domain=?", [$domain]);

86)     return ($result->rowCount() > 0 || $result2->rowCount() > 0);

87) }

88) 

89) function domain_ownerchange($fqdn, $owner, $admin_c)

90) {
91)     $cid = (int) $_SESSION['customerinfo']['customerno'];

92)     $dom = new Domain($fqdn);

93)     db_query("UPDATE kundendaten.domains SET owner=?, admin_c=? WHERE id=? AND kunde=?", [$owner, $admin_c, $dom->id, $cid]);

94)     if (update_possible($dom->id)) {

95)         require_once('domainapi.php');

96)         DEBUG("Rufe Domain-API auf!");
97)         api_upload_domain($dom->fqdn);

98)     }

99) }
100) 

101) 

102) function update_possible($domain)
103) {

104)     $dom = new Domain((int) $domain);
105)     if ($dom->provider != 'terions' || $dom->billing=='external') {
106)         // Domain nicht über uns verwaltet

107)         DEBUG("Domain nicht über uns verwaltet!");

108)         return false;
109)     }

110)     $result = db_query("SELECT aenderung_eigentuemer, ruecksprache FROM misc.domainpreise WHERE tld=?", [$dom->tld]);

111)     if ($result->rowCount() < 1) {
112)         // Endung nicht bei uns in der Liste erfasst

113)         DEBUG("Endung nicht in der Preisliste!");

114)         return false;
115)     }
116)     $data = $result->fetch();

117)     if ($data['aenderung_eigentuemer'] != null || $data['ruecksprache'] == 'Y') {

118)         DEBUG("Endung hat Eigenheiten (ruecksprache=Y)");

119)         // Endung mit speziellen Eigenheiten
120)         return false;
121)     }

122)     DEBUG("Änderungen sollten möglich sein: {$dom->fqdn}");

123)     return true;
124) }
125) 

126) function unset_mailserver_lock($dom)
127) {

128)     $id = $dom->id;

129)     db_query("UPDATE kundendaten.domains SET secret=NULL, mailserver_lock=0 WHERE id=?", [$id]);

130) }
131) 

132) function create_domain_secret($dom)
133) {

134)     $id = $dom->id;
135)     $secret = md5(random_string(20));

136)     db_query("UPDATE kundendaten.domains SET secret=? WHERE id=?", [$secret, $id]);

137)     $dom->secret = $secret;
138)     return $secret;
139) }
140) 

141) 

142) function get_auth_dns($domainname, $tld)
143) {
144)     $domain=idn_to_ascii($domainname.".".$tld, 0, INTL_IDNA_VARIANT_UTS46);

145) 

146)     $resp = shell_exec('dig @a.root-servers.net. +noall +authority -t ns '.$tld.'.');
147)     $line = explode("\n", $resp, 2)[0];
148)     $NS = preg_replace("/^.*\\sIN\\s+NS\\s+(\\S+)$/", '\1', $line);

149) 

150)     $resp = shell_exec('dig @'.$NS.' -t ns '.$domain.'.');
151)     $lines = explode("\n", $resp);

152) 

153)     $NS = null;
154)     $NS_IP = null;
155)     $sec = null;
156)     foreach ($lines as $l) {
157)         if (preg_match("/;; AUTHORITY SECTION:.*/", $l)) {
158)             $sec = 'auth';
159)         } elseif (preg_match("/;; ADDITIONAL SECTION:.*/", $l)) {
160)             $sec = 'add';
161)         }
162)         if ($sec == 'auth' && preg_match("/^.*\\sIN\\s+NS\\s+\\S+$/", $l)) {
163)             $NS = preg_replace("/^.*\\sIN\\s+NS\\s+(\\S+)\\.$/", '\1', $l);
164)         }
165)         if ($sec == 'add' && $NS && preg_match("/^.*\\sIN\\s+A\\s+\\S+$/", $l)) {
166)             $NS_IP = preg_replace("/^.*\\sIN\\s+A\\s+(\\S+)$/", '\1', $l);
167)         }
168)     }

169)     return ["$NS" => $NS_IP];

170) }
171) 

172) 

173) function own_ns()
174) {

175)     $auth = dns_get_record(config('masterdomain'), DNS_NS);

176)     $own_ns = [];

177)     foreach ($auth as $ns) {
178)         $own_ns[] = $ns['target'];
179)     }
180) 

181)     return $own_ns;

182) }
183) 
184) 
185) 
186) 

187) function has_own_ns($domainname, $tld)
188) {

189)     $nsdata = get_auth_dns($domainname, $tld);
190)     $NS = null;
191)     foreach ($nsdata as $host => $ip) {
192)         $NS=$host;
193)     }
194)     if (in_array($NS, own_ns())) {
195)         DEBUG('Domain hat unsere DNS-Server!');
196)         return true;
197)     }
198)     return false;

199) }
200) 

201) 

202) function get_txt_record($hostname, $domainname, $tld)
203) {
204)     $domain=idn_to_ascii($domainname.".".$tld, 0, INTL_IDNA_VARIANT_UTS46);
205)     $nsdata = get_auth_dns($domainname, $tld);
206)     $NS = null;
207)     foreach ($nsdata as $host => $ip) {
208)         $NS = $host;
209)         if ($ip) {
210)             $NS = $ip;
211)         }
212)     }
213)     DEBUG('dig @'.$NS.' +short -t txt '.$hostname.'.'.$domain.'.');
214)     $resp = shell_exec('dig @'.$NS.' +short -t txt '.$hostname.'.'.$domain.'.');
215)     $TXT = trim($resp, "\n \"");
216)     DEBUG($TXT);
217)     return $TXT;

218) }
219) 
220) 

221) function list_useraccounts()
222) {

223)     $customerno = (int) $_SESSION['customerinfo']['customerno'];

224)     $result = db_query("SELECT uid,username,name FROM system.useraccounts WHERE kunde=?", [$customerno]);
225)     $ret = [];

226)     while ($item = $result->fetch()) {
227)         $ret[] = $item;
228)     }
229)     DEBUG($ret);
230)     return $ret;

231) }
232) 
233) 

234) function change_user($domain, $uid)

235) {
236)     $domain = new Domain($domain);
237)     $domain->ensure_customerdomain();

238)     $targetuser = null;

239)     $useraccounts = list_useraccounts();
240)     foreach ($useraccounts as $u) {
241)         if ($u['uid'] == $uid) {
242)             $targetuser = $u['uid'];
243)             break;
244)         }
245)     }
246)     if (! $targetuser) {
247)         system_failure("Ungültiger Useraccount!");
248)     }

249)     db_query("UPDATE kundendaten.domains SET useraccount=? WHERE id=?", [$targetuser, $domain->id]);

250) }
251) 

252) 

253) function get_domain_offer($tld)

254) {

255)     $tld = filter_input_hostname($tld);
256)     $cid = (int) $_SESSION['customerinfo']['customerno'];

257) 

258)     $data = ["tld" => $tld];

259) 

260)     $result = db_query("SELECT tld, gebuehr, `interval`, setup FROM misc.domainpreise_kunde WHERE kunde=:cid AND tld=:tld AND ruecksprache='N'", [":cid" => $cid, ":tld" => $tld]);

261)     if ($result->rowCount() != 1) {

262)         $result = db_query("SELECT tld, gebuehr, `interval`, setup FROM misc.domainpreise WHERE tld=:tld AND ruecksprache='N'", [":tld" => $tld]);

263)     }
264)     if ($result->rowCount() != 1) {
265)         return false;
266)     }
267)     $temp = $result->fetch();
268)     $data["gebuehr"] = $temp["gebuehr"];
269)     $data["interval"] = $temp["interval"];
270)     $data["setup"] = ($temp["setup"] ? $temp["setup"] : 0.0);

271) 

272)     return $data;

273) }
274) 

275) function set_domain_pretransfer($domain)
276) {
277)     $cid = (int) $_SESSION['customerinfo']['customerno'];
278)     $uid = (int) $_SESSION['userinfo']['uid'];
279)     $domain = (int) $domain;

280)     db_query(
281)         "UPDATE kundendaten.domains SET status='pretransfer', dns=1 WHERE id=? AND kunde=?",

282)         [$domain, $cid]

283)     );

284) }
285) 

286) 

287) 
288) function set_domain_prereg($domain)

289) {
290)     $cid = (int) $_SESSION['customerinfo']['customerno'];
291)     $uid = (int) $_SESSION['userinfo']['uid'];

292)     $domain = (int) $domain;

293)     db_query(
294)         "UPDATE kundendaten.domains SET status='prereg', dns=1 WHERE id=? AND kunde=?",

295)         [$domain, $cid]

296)     );

297) }
298) 
299) 
300) function insert_domain_external($domain, $dns = false, $mail = true)

301) {
302)     $cid = (int) $_SESSION['customerinfo']['customerno'];

303)     $uid = (int) $_SESSION['userinfo']['uid'];

304)     require_once("domainapi.php");
305)     $info = api_domain_available($domain);

306)     if (in_array($info['status'], ['nameContainsForbiddenCharacter', 'suffixDoesNotExist'])) {

307)         system_failure("Diese Domain scheint ungültig zu sein!");

308)     }

309)     $tld = $info['domainSuffix'];
310)     $domainname = str_replace(".$tld", "", $info['domainNameUnicode']);

311)     logger(LOG_WARNING, 'modules/domains/include/domains', 'domains', 'Inserting external domain '.$info['domainNameUnicode']." DNS:{$dns} / Mail:{$mail}");

312) 

313)     db_query("INSERT INTO kundendaten.domains (status, kunde, useraccount, domainname, tld, billing, provider, dns, mail, mailserver_lock) VALUES 

314)         ('external', ?, ?, ?, ?, 'external', 'other', 0, ?, 1)", [$cid, $uid, $domainname, $tld, ($mail ? 'auto' : 'none')]);

315)     $id = db_insert_id();
316)     if ($dns) {

317)         db_query("UPDATE kundendaten.domains SET dns=1 WHERE id=?", [$id]);

318)     }

319)     if ($mail) {
320)         $vmailserver = (int) $_SESSION['userinfo']['server'];

321)         db_query("INSERT INTO mail.virtual_mail_domains (domain, server) VALUES (?, ?)", [$id, $vmailserver]);

322)     }

323)     return $id;
324) }
325) 

326) 
327) function convert_domain_to_external($domain)
328) {

329)     db_query(
330)         "UPDATE kundendaten.domains SET status='external', billing='external', provider='other', kuendigungsdatum=NULL, registrierungsdatum=NULL, betrag=NULL WHERE id=? AND status='transferout' AND abgerechnet_bis >= kuendigungsdatum",
331)         [$domain,]
332)     );

333) }
334) 

335) function delete_domain($id)
336) {
337)     $cid = (int) $_SESSION['customerinfo']['customerno'];

338)     logger(LOG_WARNING, 'modules/domains/include/domains', 'domains', 'Deleting domain '.$id);

339)     db_query("DELETE FROM kundendaten.domains WHERE id=? AND kunde=?", [$id, $cid]);