c4902e404c9603d25633f643a4d37e16e370d3e5
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) 
Bernd Wurst Zeige DNS-Records eine Doma...

Bernd Wurst authored 8 years ago

38) function get_dyndns_account($id, $ignore=true) 
bernd Stub für dns-Admin-Interface

bernd authored 16 years ago

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 Wurst Zeige DNS-Records eine Doma...

Bernd Wurst authored 8 years ago

44)     if ($ignore) {
45)       return NULL;
46)     } 
47)     logger(LOG_WARNING, "modules/dns/include/dnsinclude", "dyndns", "account »{$id}« invalid for uid »{$_SESSION['userinfo']['uid']}«.");
bernd Stub für dns-Admin-Interface

bernd authored 16 years ago

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

Bernd Wurst authored 10 years ago

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

bernd authored 16 years ago

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

bernd authored 15 years ago

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

Bernd Wurst authored 10 years ago

63)   $handle = filter_input_username($handle);
64)   $sshkey = filter_input_general($sshkey);
Bernd Wurst Erzeuge nicht einen DynDNS-...

Bernd Wurst authored 8 years ago

65)   if (strlen($sshkey) == 0) {
66)     $sshkey = NULL;
67)   }
bernd Stub für dns-Admin-Interface

bernd authored 16 years ago

68) 
Bernd Wurst String 'NULL' eliminiert

Bernd Wurst authored 10 years ago

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

bernd authored 16 years ago

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

Bernd Wurst authored 10 years ago

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

bernd authored 16 years ago

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

Bernd Wurst authored 10 years ago

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

Bernd Wurst authored 10 years ago

76)   $dyndns_id = db_insert_id();
Bernd Wurst Erzeuge nicht einen DynDNS-...

Bernd Wurst authored 8 years ago

77)   //$masterdomain = new Domain(config('masterdomain'));
78)   //db_query("INSERT INTO dns.custom_records (type, domain, hostname, dyndns, ttl) VALUES ".
79)   //         "('a', :dom, :hostname, :dyndns, 120)",
80)   //         array(":dom" => $masterdomain->id, ":hostname" => filter_input_hostname($handle).'.'.$_SESSION['userinfo']['username'], ":dyndns" => $dyndns_id));
81)   logger(LOG_INFO, "modules/dns/include/dnsinclude", "dyndns", "inserted account {$dyndns_id}");
82)   return $dyndns_id;
bernd Stub für dns-Admin-Interface

bernd authored 16 years ago

83) }
84) 
85) 
86) function edit_dyndns_account($id, $handle, $password_http, $sshkey)
87) {
88)   $id = (int) $id;
Bernd Wurst Ändere automatisch erzeugte...

Bernd Wurst authored 10 years ago

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

Bernd Wurst authored 10 years ago

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

Bernd Wurst authored 10 years ago

92)   if (chop($sshkey) == '') {
93)     $sshkey = NULL;
94)   }
bernd Stub für dns-Admin-Interface

bernd authored 16 years ago

95) 
Bernd Wurst Ändere automatisch erzeugte...

Bernd Wurst authored 10 years ago

96)   if ($oldaccount['handle'] != $handle) {
97)     $masterdomain = new Domain(config('masterdomain'));
98)     db_query("UPDATE dns.custom_records SET hostname=:newhostname WHERE ".
99)              "hostname=:oldhostname AND domain=:dom AND dyndns=:dyndns AND ip IS NULL",
100)              array(":dom" => $masterdomain->id, ":newhostname" => filter_input_hostname($handle).'.'.$_SESSION['userinfo']['username'],
101)                    ":oldhostname" => $oldaccount['handle'].'.'.$_SESSION['userinfo']['username'],  ":dyndns" => $id));
102) 
103)   }
104) 
Bernd Wurst Passwort bei DynDNS-Änderun...

Bernd Wurst authored 10 years ago

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

Bernd Wurst authored 10 years ago

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

Bernd Wurst authored 10 years ago

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

bernd authored 15 years ago

112)   }
bernd Logger mit Logleveln

bernd authored 15 years ago

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

bernd authored 16 years ago

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

Bernd Wurst authored 10 years ago

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

bernd authored 15 years ago

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

bernd authored 16 years ago

123) }
124) 
125) 
126) function get_dyndns_records($id)
127) {
128)   $id = (int) $id;
Bernd Wurst * Weitere Module auf prepar...

Bernd Wurst authored 10 years ago

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

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

Bernd Wurst authored 10 years ago

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

bernd authored 16 years ago

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

Bernd Wurst authored 9 years ago

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

Bernd Wurst authored 10 years ago

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

bernd authored 16 years ago

136)     $entry['fqdn'] = $entry['hostname'].'.'.$dom->fqdn;
137)     if (! $entry['hostname'])
138)       $entry['fqdn'] = $dom->fqdn;
139)     array_push($data, $entry);
140)   }
141)   DEBUG($data);
142)   return $data;
143) }
144) 
bernd SSHFP-Records (Thanks to Ma...

bernd authored 13 years ago

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

bernd authored 16 years ago

146) 
147) 
148) function blank_dns_record($type)
149) { 
150)   global $valid_record_types;
151)   if (!in_array(strtolower($type), $valid_record_types))
152)     system_failure('invalid type: '.$type);
153)   $rec = array('hostname' => NULL,
154)                'domain' => 0,
155)                'type' => strtolower($type),
156)                'ttl' => 3600,
157)                'ip' => NULL,
158)                'dyndns' => NULL,
159)                'data' => NULL,
160)                'spec' => NULL);
161)   if (strtolower($type) == 'mx')
162)   {
bernd Mehr config-optionen und co...

bernd authored 15 years ago

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

bernd authored 16 years ago

164)     $rec['spec'] = '5';
165)   }
166)   return $rec;
167) }
168) 
169) function get_dns_record($id)
170) {
171)   $id = (int) $id;
Bernd Wurst * Weitere Module auf prepar...

Bernd Wurst authored 10 years ago

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

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

bernd authored 16 years ago

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

Bernd Wurst authored 10 years ago

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

bernd authored 16 years ago

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

bernd authored 14 years ago

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

bernd authored 16 years ago

178)   DEBUG($data);
179)   return $data;
180) }
bernd Stub für dns-Admin-Interface

bernd authored 16 years ago

181) 
182) 
183) function get_domain_records($dom)
184) {
185)   $dom = (int) $dom;
Bernd Wurst * Weitere Module auf prepar...

Bernd Wurst authored 10 years ago

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

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

Bernd Wurst authored 10 years ago

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

bernd authored 16 years ago

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

bernd authored 14 years ago

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

bernd authored 16 years ago

191)     $entry['fqdn'] = $entry['hostname'].'.'.$dom->fqdn;
192)     if (! $entry['hostname'])
193)       $entry['fqdn'] = $dom->fqdn;
194)     array_push($data, $entry);
195)   }
196)   DEBUG($data);
197)   return $data;
198) }
199) 
bernd some updates

bernd authored 16 years ago

200) function get_domain_auto_records($domainname)
201) {
Bernd Wurst * Weitere Module auf prepar...

Bernd Wurst authored 10 years ago

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

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

Bernd Wurst authored 10 years ago

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

bernd authored 16 years ago

205)     array_push($data, $entry);
206)   }
207)   DEBUG($data);
208)   return $data;
209) }
210) 
bernd Stub für dns-Admin-Interface

bernd authored 16 years ago

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

bernd authored 13 years ago

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

bernd authored 16 years ago

213) 
214) function save_dns_record($id, $record)
215) {
216)   global $valid_record_types;
217)   global $implemented_record_types;
218)   $record['type'] = strtolower($record['type']);
219)   if (!in_array($record['type'], $valid_record_types))
220)     system_failure('invalid type: '.$record['type']);
221)   if (!in_array($record['type'], $implemented_record_types))
222)     system_failure('record type '.$record['type'].' not implemented at the moment.');
223)   $dom = new Domain( (int) $record['domain'] );
bernd DNS-Admin-Kram erfordert Us...

bernd authored 14 years ago

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

bernd authored 16 years ago

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

Bernd Wurst authored 10 years ago

227)   if ($record['hostname'] == '') {
228)     $record['hostname'] = NULL;
229)   }
bernd Erlaube * im Hostname

bernd authored 15 years ago

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

bernd authored 16 years ago

231)   if ($record['ttl'] &&  (int) $record['ttl'] < 1)
232)     system_failure('Fehler bei TTL');
233)   switch ($record['type']) 
234)   {
235)     case 'a':
236)       if ($record['dyndns'])
237)       {
238)         get_dyndns_account( $record['dyndns'] );
Bernd Wurst * Weitere Module auf prepar...

Bernd Wurst authored 10 years ago

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

bernd authored 16 years ago

240)       }
241)       else
242)       {
243)         verify_input_ipv4($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)       }
247)       break;
248)     case 'aaaa':
Bernd Wurst * Weitere Module auf prepar...

Bernd Wurst authored 10 years ago

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

bernd authored 15 years ago

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

Bernd Wurst authored 10 years ago

251)       $record['data'] = NULL;
252)       $record['spec'] = NULL;
bernd add save function

bernd authored 16 years ago

253)       break;
254)     case 'mx':
Bernd Wurst * Weitere Module auf prepar...

Bernd Wurst authored 10 years ago

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

bernd authored 16 years ago

256)       $record['spec'] = (int) $record['spec'];
257)       if ($record['spec'] < 1)
258)         systen_failure("invalid priority");
259)       verify_input_hostname($record['data']);
260)       if (! $record['data'] )
261)         system_failure('MX hostname missing');
Bernd Wurst * Weitere Module auf prepar...

Bernd Wurst authored 10 years ago

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

bernd authored 16 years ago

263)       break;
264)     case 'cname':
bernd DNs-record-Interface ist je...

bernd authored 15 years ago

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

bernd authored 15 years ago

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

Bernd Wurst authored 10 years ago

267)       $record['dyndns'] = NULL;
268)       $record['spec'] = NULL;
269)       $record['ip'] = NULL;
bernd add save function

bernd authored 16 years ago

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

bernd authored 15 years ago

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

bernd authored 16 years ago

273)       break;
274) 
bernd DNs-record-Interface ist je...

bernd authored 15 years ago

275)     case 'spf':
276)     case 'txt':
Bernd Wurst * Weitere Module auf prepar...

Bernd Wurst authored 10 years ago

277)       $record['dyndns'] = NULL;
278)       $record['spec'] = NULL;
279)       $record['ip'] = NULL;
bernd SPF und TXT records

bernd authored 15 years ago

280)       if (! $record['data'] )
281)         system_failure('text entry missing');
282)       break;
283) 
bernd SSHFP-Records (Thanks to Ma...

bernd authored 13 years ago

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

Bernd Wurst authored 10 years ago

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

bernd authored 13 years ago

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

Bernd Wurst authored 10 years ago

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

bernd authored 13 years ago

288)       if (! $record['data'] )
289)         system_failure('text entry missing');
290)       break;
291) 
292) 
bernd add save function

bernd authored 16 years ago

293)     case 'srv':
294)       system_failure('not implemented yet');
295)     default:
296)       system_failure('Not implemented');
297)   }
298)   $id = (int) $id;
Bernd Wurst * Weitere Module auf prepar...

Bernd Wurst authored 10 years ago

299)   $args = array(":domain" => $dom->id,
300)                 ":hostname" => $record['hostname'],
301)                 ":type" => $record['type'],
302)                 ":ttl" => ($record['ttl'] == 0 ? NULL : (int) $record['ttl']),
303)                 ":ip" => $record['ip'],
304)                 ":dyndns" => $record['dyndns'],
305)                 ":data" => $record['data'],
306)                 ":spec" => $record['spec']);
307)   if ($id) {
308)     $args[":id"] = $id;
309)     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);
310)   } else {
311)     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);
312)   }
bernd add save function

bernd authored 16 years ago

313) 
314) }
315) 
316) 
317) function delete_dns_record($id)
318) {
bernd DNs-record-Interface ist je...

bernd authored 15 years ago

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

Bernd Wurst authored 10 years ago

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

bernd authored 16 years ago

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

bernd authored 16 years ago

324) 
bernd Autodns ein- und ausschaltb...

bernd authored 15 years ago

325) 
326) function convert_from_autorecords($domainid)
327) {
328)   $dom = new Domain( (int) $domainid );
bernd DNS-Admin-Kram erfordert Us...

bernd authored 14 years ago

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

bernd authored 15 years ago

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

Bernd Wurst authored 10 years ago

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

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

bernd authored 14 years ago

334)   db_query("UPDATE dns.dnsstatus SET status='outdated'");
335)   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

336) }
337) 
338) 
339) function enable_autorecords($domainid)
340) {
341)   $dom = new Domain( (int) $domainid );
bernd DNS-Admin-Kram erfordert Us...

bernd authored 14 years ago

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

bernd authored 15 years ago

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

Bernd Wurst authored 10 years ago

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

bernd authored 14 years ago

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

347) }
348) 
349) function disable_autorecords($domainid)
350) {
351)   $dom = new Domain( (int) $domainid );
bernd DNS-Admin-Kram erfordert Us...

bernd authored 14 years ago

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

bernd authored 15 years ago

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

Bernd Wurst authored 10 years ago

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

bernd authored 15 years ago

356) }
357) 
358) 
Bernd Wurst Warnung, wenn man bei einer...

Bernd Wurst authored 12 years ago

359) function domain_is_maildomain($domain)
360) {
361)   $domain = (int) $domain;
Bernd Wurst * Weitere Module auf prepar...

Bernd Wurst authored 10 years ago

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

Bernd Wurst authored 10 years ago

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

Bernd Wurst authored 12 years ago

364)   return ($dom['mail'] != 'none');
365) }
366) 
bernd Autodns ein- und ausschaltb...

bernd authored 15 years ago

367)