090d6ffa89bd4caa6e5ff5f2de4c0e6541cd42d3
bernd Stub für dns-Admin-Interface

bernd authored 16 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 Lizenzinfos in eigenes Modu...

Bernd Wurst authored 10 years ago

5) Written 2008-2014 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) */
bernd Stub für dns-Admin-Interface

bernd authored 16 years ago

16) 
17) require_once('inc/debug.php');
18) require_once('inc/base.php');
19) require_once('inc/security.php');
bernd Neue Autorecords-Tabelle

bernd authored 14 years ago

20) require_once('inc/error.php');
bernd Stub für dns-Admin-Interface

bernd authored 16 years ago

21) 
22) require_once('class/domain.php');
23) 
24) 
25) function get_dyndns_accounts() 
26) {
27)   $uid = (int) $_SESSION['userinfo']['uid'];
Bernd Wurst * Weitere Module auf prepar...

Bernd Wurst authored 10 years ago

28)   $result = db_query("SELECT * FROM dns.dyndns WHERE uid=?", array($uid));
bernd Stub für dns-Admin-Interface

bernd authored 16 years ago

29)   $list = array();
Bernd Wurst Umstellung auf PDO-Datenban...

Bernd Wurst authored 10 years ago

30)   while ($item = $result->fetch()) {
bernd Stub für dns-Admin-Interface

bernd authored 16 years ago

31)     array_push($list, $item);
32)   }
33)   DEBUG($list);
34)   return $list;
35) }
36) 
37) 
38) function get_dyndns_account($id) 
39) {
Bernd Wurst * Weitere Module auf prepar...

Bernd Wurst authored 10 years ago

40)   $args = array(":id" => (int) $id,
41)                 ":uid" => (int) $_SESSION['userinfo']['uid']);
42)   $result = db_query("SELECT * FROM dns.dyndns WHERE id=:id AND uid=:uid", $args);
Bernd Wurst Umstellung auf PDO-Datenban...

Bernd Wurst authored 10 years ago

43)   if ($result->rowCount() != 1) {
bernd Logger mit Logleveln

bernd authored 15 years ago

44)     logger(LOG_WARNING, "modules/dns/include/dnsinclude", "dyndns", "account »{$id}« invalid for uid »{$uid}«.");
bernd Stub für dns-Admin-Interface

bernd authored 16 years ago

45)     system_failure("Account ungültig");
46)   }
Bernd Wurst Umstellung auf PDO-Datenban...

Bernd Wurst authored 10 years ago

47)   $item = $result->fetch();
bernd Stub für dns-Admin-Interface

bernd authored 16 years ago

48)   DEBUG($item);
49)   return $item;
50) }
51) 
52) 
53) function create_dyndns_account($handle, $password_http, $sshkey)
54) {
55)   $uid = (int) $_SESSION['userinfo']['uid'];
bernd Warnings eliminiert und Plu...

bernd authored 15 years ago

56) 
57)   if ($password_http == '' && $sshkey == '')
58)     system_failure('Sie müssen entweder einen SSH-Key oder ein Passwort zum Web-Update eingeben.');  
59) 
Bernd Wurst * Weitere Module auf prepar...

Bernd Wurst authored 10 years ago

60)   $handle = filter_input_username($handle);
61)   $sshkey = filter_input_general($sshkey);
bernd Stub für dns-Admin-Interface

bernd authored 16 years ago

62) 
Bernd Wurst String 'NULL' eliminiert

Bernd Wurst authored 10 years ago

63)   $pwhash = NULL;
bernd Stub für dns-Admin-Interface

bernd authored 16 years ago

64)   if ($password_http)
Bernd Wurst String 'NULL' eliminiert

Bernd Wurst authored 10 years ago

65)     $pwhash = "{SHA}".base64_encode(sha1($password_http, true));
bernd Stub für dns-Admin-Interface

bernd authored 16 years ago

66) 
Bernd Wurst * Weitere Module auf prepar...

Bernd Wurst authored 10 years ago

67)   db_query("INSERT INTO dns.dyndns (uid, handle, password, sshkey) VALUES ".
68)            "(:uid, :handle, :pwhash, :sshkey)",
69)            array(":uid" => $uid, ":handle" => $handle, ":pwhash" => $pwhash, ":sshkey" => $sshkey));
Bernd Wurst Erzeuge DNS-Records der For...

Bernd Wurst authored 10 years ago

70)   $dyndns_id = db_insert_id();
71)   $masterdomain = new Domain(config('masterdomain'));
72)   db_query("INSERT INTO dns.custom_records (type, domain, hostname, dyndns, ttl) VALUES ".
73)            "('a', :dom, :hostname, :dyndns, 120)",
74)            array(":dom" => $masterdomain->id, ":hostname" => filter_input_hostname($handle).'.'.$_SESSION['userinfo']['username'], ":dyndns" => $dyndns_id));
bernd Logger mit Logleveln

bernd authored 15 years ago

75)   logger(LOG_INFO, "modules/dns/include/dnsinclude", "dyndns", "inserted account");
bernd Stub für dns-Admin-Interface

bernd authored 16 years ago

76) }
77) 
78) 
79) function edit_dyndns_account($id, $handle, $password_http, $sshkey)
80) {
81)   $id = (int) $id;
Bernd Wurst Ändere automatisch erzeugte...

Bernd Wurst authored 10 years ago

82)   $oldaccount = get_dyndns_account($id);
Bernd Wurst * Weitere Module auf prepar...

Bernd Wurst authored 10 years ago

83)   $handle = filter_input_username($handle);
84)   $sshkey = filter_input_general($sshkey);
Bernd Wurst Passwort bei DynDNS-Änderun...

Bernd Wurst authored 10 years ago

85)   if (chop($sshkey) == '') {
86)     $sshkey = NULL;
87)   }
bernd Stub für dns-Admin-Interface

bernd authored 16 years ago

88) 
Bernd Wurst Ändere automatisch erzeugte...

Bernd Wurst authored 10 years ago

89)   if ($oldaccount['handle'] != $handle) {
90)     $masterdomain = new Domain(config('masterdomain'));
91)     db_query("UPDATE dns.custom_records SET hostname=:newhostname WHERE ".
92)              "hostname=:oldhostname AND domain=:dom AND dyndns=:dyndns AND ip IS NULL",
93)              array(":dom" => $masterdomain->id, ":newhostname" => filter_input_hostname($handle).'.'.$_SESSION['userinfo']['username'],
94)                    ":oldhostname" => $oldaccount['handle'].'.'.$_SESSION['userinfo']['username'],  ":dyndns" => $id));
95) 
96)   }
97) 
Bernd Wurst Passwort bei DynDNS-Änderun...

Bernd Wurst authored 10 years ago

98)   $args = array(":handle" => $handle, ":sshkey" => $sshkey, ":id" => $id);
Bernd Wurst * Weitere Module auf prepar...

Bernd Wurst authored 10 years ago

99)   $pwhash = NULL;
Bernd Wurst Passwort bei DynDNS-Änderun...

Bernd Wurst authored 10 years ago

100)   if ($password_http && $password_http != '************') {
101)       $args[":pwhash"] = "{SHA}".base64_encode(sha1($password_http, true));
102)       db_query("UPDATE dns.dyndns SET handle=:handle, password=:pwhash, sshkey=:sshkey WHERE id=:id", $args);
103)   } else {
104)       db_query("UPDATE dns.dyndns SET handle=:handle, sshkey=:sshkey WHERE id=:id", $args);
bernd HTTP-Passwort ignorieren we...

bernd authored 15 years ago

105)   }
bernd Logger mit Logleveln

bernd authored 15 years ago

106)   logger(LOG_INFO, "modules/dns/include/dnsinclude", "dyndns", "edited account »{$id}«");
bernd Stub für dns-Admin-Interface

bernd authored 16 years ago

107) }
108) 
109) 
110) function delete_dyndns_account($id)
111) {
112)   $id = (int) $id;
113) 
Bernd Wurst * Weitere Module auf prepar...

Bernd Wurst authored 10 years ago

114)   db_query("DELETE FROM dns.dyndns WHERE id=?", array($id));
bernd Logger mit Logleveln

bernd authored 15 years ago

115)   logger(LOG_INFO, "modules/dns/include/dnsinclude", "dyndns", "deleted account »{$id}«");
bernd Stub für dns-Admin-Interface

bernd authored 16 years ago

116) }
117) 
118) 
119) function get_dyndns_records($id)
120) {
121)   $id = (int) $id;
Bernd Wurst * Weitere Module auf prepar...

Bernd Wurst authored 10 years ago

122)   $result = db_query("SELECT hostname, domain, type, ttl, lastchange, id FROM dns.custom_records WHERE dyndns=?", array($id));
bernd Stub für dns-Admin-Interface

bernd authored 16 years ago

123)   $data = array();
Bernd Wurst Umstellung auf PDO-Datenban...

Bernd Wurst authored 10 years ago

124)   while ($entry = $result->fetch()) {
bernd Stub für dns-Admin-Interface

bernd authored 16 years ago

125)     $dom = new Domain((int) $entry['domain']);
Bernd Wurst Erlaube auch die user_vhost...

Bernd Wurst authored 9 years ago

126)     if ($dom->fqdn != config('masterdomain') && $dom->fqdn != config('user_vhosts_domain')) {
Bernd Wurst Erzeuge DNS-Records der For...

Bernd Wurst authored 10 years ago

127)       $dom->ensure_userdomain();
128)     }
bernd Stub für dns-Admin-Interface

bernd authored 16 years ago

129)     $entry['fqdn'] = $entry['hostname'].'.'.$dom->fqdn;
130)     if (! $entry['hostname'])
131)       $entry['fqdn'] = $dom->fqdn;
132)     array_push($data, $entry);
133)   }
134)   DEBUG($data);
135)   return $data;
136) }
137) 
bernd SSHFP-Records (Thanks to Ma...

bernd authored 13 years ago

138) $valid_record_types = array('a', 'aaaa', 'mx', 'ns', 'spf', 'txt', 'cname', 'ptr', 'srv', 'raw', 'sshfp');
bernd some updates

bernd authored 16 years ago

139) 
140) 
141) function blank_dns_record($type)
142) { 
143)   global $valid_record_types;
144)   if (!in_array(strtolower($type), $valid_record_types))
145)     system_failure('invalid type: '.$type);
146)   $rec = array('hostname' => NULL,
147)                'domain' => 0,
148)                'type' => strtolower($type),
149)                'ttl' => 3600,
150)                'ip' => NULL,
151)                'dyndns' => NULL,
152)                'data' => NULL,
153)                'spec' => NULL);
154)   if (strtolower($type) == 'mx')
155)   {
bernd Mehr config-optionen und co...

bernd authored 15 years ago

156)     $rec['data'] = config('default_mx');
bernd some updates

bernd authored 16 years ago

157)     $rec['spec'] = '5';
158)   }
159)   return $rec;
160) }
161) 
162) function get_dns_record($id)
163) {
164)   $id = (int) $id;
Bernd Wurst * Weitere Module auf prepar...

Bernd Wurst authored 10 years ago

165)   $result = db_query("SELECT hostname, domain, type, ip, dyndns, spec, data, ttl FROM dns.custom_records WHERE id=?", array($id));
Bernd Wurst Umstellung auf PDO-Datenban...

Bernd Wurst authored 10 years ago

166)   if ($result->rowCount() != 1)
bernd some updates

bernd authored 16 years ago

167)     system_failure('illegal ID');
Bernd Wurst Umstellung auf PDO-Datenban...

Bernd Wurst authored 10 years ago

168)   $data = $result->fetch();
bernd add save function

bernd authored 16 years ago

169)   $dom = new Domain( (int) $data['domain']);
bernd DNS-Admin-Kram erfordert Us...

bernd authored 14 years ago

170)   $dom->ensure_userdomain();
bernd some updates

bernd authored 16 years ago

171)   DEBUG($data);
172)   return $data;
173) }
bernd Stub für dns-Admin-Interface

bernd authored 16 years ago

174) 
175) 
176) function get_domain_records($dom)
177) {
178)   $dom = (int) $dom;
Bernd Wurst * Weitere Module auf prepar...

Bernd Wurst authored 10 years ago

179)   $result = db_query("SELECT hostname, domain, type, ip, dyndns, spec, data, ttl, id FROM dns.custom_records WHERE domain=?", array($dom));
bernd Stub für dns-Admin-Interface

bernd authored 16 years ago

180)   $data = array();
Bernd Wurst Umstellung auf PDO-Datenban...

Bernd Wurst authored 10 years ago

181)   while ($entry = $result->fetch()) {
bernd Stub für dns-Admin-Interface

bernd authored 16 years ago

182)     $dom = new Domain((int) $entry['domain']);
bernd DNS-Admin-Kram erfordert Us...

bernd authored 14 years ago

183)     $dom->ensure_userdomain();
bernd Stub für dns-Admin-Interface

bernd authored 16 years ago

184)     $entry['fqdn'] = $entry['hostname'].'.'.$dom->fqdn;
185)     if (! $entry['hostname'])
186)       $entry['fqdn'] = $dom->fqdn;
187)     array_push($data, $entry);
188)   }
189)   DEBUG($data);
190)   return $data;
191) }
192) 
bernd some updates

bernd authored 16 years ago

193) function get_domain_auto_records($domainname)
194) {
Bernd Wurst * Weitere Module auf prepar...

Bernd Wurst authored 10 years ago

195)   $result = db_query("SELECT hostname, domain, CONCAT_WS('.', hostname, domain) AS fqdn, type, ip, spec, data, ttl FROM dns.tmp_autorecords WHERE domain=?", array($domainname));
bernd some updates

bernd authored 16 years ago

196)   $data = array();
Bernd Wurst Umstellung auf PDO-Datenban...

Bernd Wurst authored 10 years ago

197)   while ($entry = $result->fetch()) {
bernd some updates

bernd authored 16 years ago

198)     array_push($data, $entry);
199)   }
200)   DEBUG($data);
201)   return $data;
202) }
203) 
bernd Stub für dns-Admin-Interface

bernd authored 16 years ago

204) 
bernd SSHFP-Records (Thanks to Ma...

bernd authored 13 years ago

205) $implemented_record_types = array('a', 'aaaa', 'mx', 'spf', 'txt', 'cname', 'ptr', 'srv', 'ns', 'sshfp');
bernd add save function

bernd authored 16 years ago

206) 
207) function save_dns_record($id, $record)
208) {
209)   global $valid_record_types;
210)   global $implemented_record_types;
211)   $record['type'] = strtolower($record['type']);
212)   if (!in_array($record['type'], $valid_record_types))
213)     system_failure('invalid type: '.$record['type']);
214)   if (!in_array($record['type'], $implemented_record_types))
215)     system_failure('record type '.$record['type'].' not implemented at the moment.');
216)   $dom = new Domain( (int) $record['domain'] );
bernd DNS-Admin-Kram erfordert Us...

bernd authored 14 years ago

217)   $dom->ensure_userdomain();
bernd add save function

bernd authored 16 years ago

218)   if (! $dom->id)
219)     system_failure('invalid domain');
Bernd Wurst Setze leeren Hostname auf NULL

Bernd Wurst authored 10 years ago

220)   if ($record['hostname'] == '') {
221)     $record['hostname'] = NULL;
222)   }
bernd Erlaube * im Hostname

bernd authored 15 years ago

223)   verify_input_hostname($record['hostname'], true);
bernd add save function

bernd authored 16 years ago

224)   if ($record['ttl'] &&  (int) $record['ttl'] < 1)
225)     system_failure('Fehler bei TTL');
226)   switch ($record['type']) 
227)   {
228)     case 'a':
229)       if ($record['dyndns'])
230)       {
231)         get_dyndns_account( $record['dyndns'] );
Bernd Wurst * Weitere Module auf prepar...

Bernd Wurst authored 10 years ago

232)       	$record['ip'] = NULL;
bernd add save function

bernd authored 16 years ago

233)       }
234)       else
235)       {
236)         verify_input_ipv4($record['ip']);
Bernd Wurst * Weitere Module auf prepar...

Bernd Wurst authored 10 years ago

237)         $record['data'] = NULL;
238)         $record['spec'] = NULL;
bernd add save function

bernd authored 16 years ago

239)       }
240)       break;
241)     case 'aaaa':
Bernd Wurst * Weitere Module auf prepar...

Bernd Wurst authored 10 years ago

242)       $record['dyndns'] = NULL;
bernd DNs-record-Interface ist je...

bernd authored 15 years ago

243)       verify_input_ipv6($record['ip']);
Bernd Wurst * Weitere Module auf prepar...

Bernd Wurst authored 10 years ago

244)       $record['data'] = NULL;
245)       $record['spec'] = NULL;
bernd add save function

bernd authored 16 years ago

246)       break;
247)     case 'mx':
Bernd Wurst * Weitere Module auf prepar...

Bernd Wurst authored 10 years ago

248)       $record['dyndns'] = NULL;
bernd add save function

bernd authored 16 years ago

249)       $record['spec'] = (int) $record['spec'];
250)       if ($record['spec'] < 1)
251)         systen_failure("invalid priority");
252)       verify_input_hostname($record['data']);
253)       if (! $record['data'] )
254)         system_failure('MX hostname missing');
Bernd Wurst * Weitere Module auf prepar...

Bernd Wurst authored 10 years ago

255)       $record['ip'] = NULL;
bernd add save function

bernd authored 16 years ago

256)       break;
257)     case 'cname':
bernd DNs-record-Interface ist je...

bernd authored 15 years ago

258)     case 'ptr':
bernd Autodns ein- und ausschaltb...

bernd authored 15 years ago

259)     case 'ns':
Bernd Wurst * Weitere Module auf prepar...

Bernd Wurst authored 10 years ago

260)       $record['dyndns'] = NULL;
261)       $record['spec'] = NULL;
262)       $record['ip'] = NULL;
bernd add save function

bernd authored 16 years ago

263)       verify_input_hostname($record['data']);
264)       if (! $record['data'] )
bernd SPF und TXT records

bernd authored 15 years ago

265)         system_failure('destination host missing');
bernd add save function

bernd authored 16 years ago

266)       break;
267) 
bernd DNs-record-Interface ist je...

bernd authored 15 years ago

268)     case 'spf':
269)     case 'txt':
Bernd Wurst * Weitere Module auf prepar...

Bernd Wurst authored 10 years ago

270)       $record['dyndns'] = NULL;
271)       $record['spec'] = NULL;
272)       $record['ip'] = NULL;
bernd SPF und TXT records

bernd authored 15 years ago

273)       if (! $record['data'] )
274)         system_failure('text entry missing');
275)       break;
276) 
bernd SSHFP-Records (Thanks to Ma...

bernd authored 13 years ago

277)     case 'sshfp':
Bernd Wurst * Weitere Module auf prepar...

Bernd Wurst authored 10 years ago

278)       $record['dyndns'] = NULL;
bernd SSHFP-Records (Thanks to Ma...

bernd authored 13 years ago

279)       $record['spec'] = max( (int) $record['spec'], 1);
Bernd Wurst * Weitere Module auf prepar...

Bernd Wurst authored 10 years ago

280)       $record['ip'] = NULL;
bernd SSHFP-Records (Thanks to Ma...

bernd authored 13 years ago

281)       if (! $record['data'] )
282)         system_failure('text entry missing');
283)       break;
284) 
285) 
bernd add save function

bernd authored 16 years ago

286)     case 'srv':
287)       system_failure('not implemented yet');
288)     default:
289)       system_failure('Not implemented');
290)   }
291)   $id = (int) $id;
Bernd Wurst * Weitere Module auf prepar...

Bernd Wurst authored 10 years ago

292)   $args = array(":domain" => $dom->id,
293)                 ":hostname" => $record['hostname'],
294)                 ":type" => $record['type'],
295)                 ":ttl" => ($record['ttl'] == 0 ? NULL : (int) $record['ttl']),
296)                 ":ip" => $record['ip'],
297)                 ":dyndns" => $record['dyndns'],
298)                 ":data" => $record['data'],
299)                 ":spec" => $record['spec']);
300)   if ($id) {
301)     $args[":id"] = $id;
302)     db_query("UPDATE dns.custom_records SET hostname=:hostname, domain=:domain, type=:type, ttl=:ttl, ip=:ip, dyndns=:dyndns, data=:data, spec=:spec WHERE id=:id", $args);
303)   } else {
304)     db_query("INSERT INTO dns.custom_records (hostname, domain, type, ttl, ip, dyndns, data, spec) VALUES (:hostname, :domain, :type, :ttl, :ip, :dyndns, :data, :spec)", $args);
305)   }
bernd add save function

bernd authored 16 years ago

306) 
307) }
308) 
309) 
310) function delete_dns_record($id)
311) {
bernd DNs-record-Interface ist je...

bernd authored 15 years ago

312)   $id = (int) $id;
313)   // Diese Funktion prüft, ob der Eintrag einer eigenen Domain gehört
314)   $record = get_dns_record($id);
Bernd Wurst * Weitere Module auf prepar...

Bernd Wurst authored 10 years ago

315)   db_query("DELETE FROM dns.custom_records WHERE id=?", array($id));
bernd add save function

bernd authored 16 years ago

316) }
bernd Stub für dns-Admin-Interface

bernd authored 16 years ago

317) 
bernd Autodns ein- und ausschaltb...

bernd authored 15 years ago

318) 
319) function convert_from_autorecords($domainid)
320) {
321)   $dom = new Domain( (int) $domainid );
bernd DNS-Admin-Kram erfordert Us...

bernd authored 14 years ago

322)   $dom->ensure_userdomain();
bernd Autodns ein- und ausschaltb...

bernd authored 15 years ago

323)   $dom = $dom->id;
324) 
Bernd Wurst * Weitere Module auf prepar...

Bernd Wurst authored 10 years ago

325)   db_query("INSERT IGNORE INTO dns.custom_records SELECT r.id, r.lastchange, type, d.id, hostname, ip, NULL AS dyndns, data, spec, ttl FROM dns.v_tmptable_allrecords AS r INNER JOIN dns.v_domains AS d ON (d.name=r.domain) WHERE d.id=?", array($dom));
bernd Autodns ein- und ausschaltb...

bernd authored 15 years ago

326)   disable_autorecords($dom);
bernd Neue Autorecords-Tabelle

bernd authored 14 years ago

327)   db_query("UPDATE dns.dnsstatus SET status='outdated'");
328)   warning("Die automatischen Einträge werden in Kürze abgeschaltet, bitte haben Sie einen Moment Geduld.");
bernd Autodns ein- und ausschaltb...

bernd authored 15 years ago

329) }
330) 
331) 
332) function enable_autorecords($domainid)
333) {
334)   $dom = new Domain( (int) $domainid );
bernd DNS-Admin-Kram erfordert Us...

bernd authored 14 years ago

335)   $dom->ensure_userdomain();
bernd Autodns ein- und ausschaltb...

bernd authored 15 years ago

336)   $dom = $dom->id;
337) 
Bernd Wurst * Weitere Module auf prepar...

Bernd Wurst authored 10 years ago

338)   db_query("UPDATE kundendaten.domains SET autodns=1 WHERE id=?", array($dom));
bernd Neue Autorecords-Tabelle

bernd authored 14 years ago

339)   warning("Die automatischen Einträge werden in Kürze aktiviert, bitte haben Sie einen Moment Geduld.");
bernd Autodns ein- und ausschaltb...

bernd authored 15 years ago

340) }
341) 
342) function disable_autorecords($domainid)
343) {
344)   $dom = new Domain( (int) $domainid );
bernd DNS-Admin-Kram erfordert Us...

bernd authored 14 years ago

345)   $dom->ensure_userdomain();
bernd Autodns ein- und ausschaltb...

bernd authored 15 years ago

346)   $dom = $dom->id;
347) 
Bernd Wurst * Weitere Module auf prepar...

Bernd Wurst authored 10 years ago

348)   db_query("UPDATE kundendaten.domains SET autodns=0 WHERE id=?", array($dom));
bernd Autodns ein- und ausschaltb...

bernd authored 15 years ago

349) }
350) 
351) 
Bernd Wurst Warnung, wenn man bei einer...

Bernd Wurst authored 12 years ago

352) function domain_is_maildomain($domain)
353) {
354)   $domain = (int) $domain;
Bernd Wurst * Weitere Module auf prepar...

Bernd Wurst authored 10 years ago

355)   $result = db_query("SELECT mail FROM kundendaten.domains WHERE id=?", array($domain));
Bernd Wurst Umstellung auf PDO-Datenban...

Bernd Wurst authored 10 years ago

356)   $dom = $result->fetch();
Bernd Wurst Warnung, wenn man bei einer...

Bernd Wurst authored 12 years ago

357)   return ($dom['mail'] != 'none');
358) }
359) 
bernd Autodns ein- und ausschaltb...

bernd authored 15 years ago

360)