|
1
|
1 |
<? |
|
|
2 |
|
|
47
|
3 |
/* PowerAdmin, a friendly web-based admin tool for PowerDNS. |
|
|
4 |
* See <https://rejo.zenger.nl/poweradmin> for more details. |
|
|
5 |
* |
|
|
6 |
* Copyright 2007, 2008 Rejo Zenger <rejo@zenger.nl> |
|
|
7 |
* |
|
|
8 |
* This program is free software: you can redistribute it and/or modify |
|
|
9 |
* it under the terms of the GNU General Public License as published by |
|
|
10 |
* the Free Software Foundation, either version 3 of the License, or |
|
|
11 |
* (at your option) any later version. |
|
|
12 |
* |
|
|
13 |
* This program is distributed in the hope that it will be useful, |
|
|
14 |
* but WITHOUT ANY WARRANTY; without even the implied warranty of |
|
|
15 |
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the |
|
|
16 |
* GNU General Public License for more details. |
|
|
17 |
* |
|
|
18 |
* You should have received a copy of the GNU General Public License |
|
|
19 |
* along with this program. If not, see <http://www.gnu.org/licenses/>. |
|
|
20 |
*/ |
|
1
|
21 |
|
|
|
22 |
function update_soa_serial($domain_id) |
|
|
23 |
{ |
|
|
24 |
global $db; |
|
|
25 |
/* |
|
|
26 |
* THIS CODE ISNT TESTED THROUGH MUCH YET! |
|
|
27 |
* !!!!!!! BETACODE !!!!!!!!!! |
|
|
28 |
* Code committed by DeViCeD, Thanks a lot! |
|
|
29 |
* Heavily hax0red by Trancer/azurazu |
|
|
30 |
* |
|
|
31 |
* First we have to check, wheather current searial number |
|
|
32 |
* was already updated on the other nameservers. |
|
|
33 |
* If field 'notified_serial' is NULL, then I guess domain is |
|
|
34 |
* NATIVE and we don't have any secondary nameservers for this domain. |
|
|
35 |
* NOTICE: Serial number *will* be RFC1912 compilant after update |
|
|
36 |
* NOTICE: This function will allow only 100 DNS zone transfers ;-) |
|
|
37 |
* YYYYMMDDnn |
|
|
38 |
*/ |
|
|
39 |
|
|
|
40 |
$sqlq = "SELECT `notified_serial` FROM `domains` WHERE `id` = '".$domain_id."'"; |
|
8
|
41 |
$notified_serial = $db->queryOne($sqlq); |
|
1
|
42 |
|
|
|
43 |
$sqlq = "SELECT `content` FROM `records` WHERE `type` = 'SOA' AND `domain_id` = '".$domain_id."'"; |
|
8
|
44 |
$content = $db->queryOne($sqlq); |
|
1
|
45 |
$need_to_update = false; |
|
|
46 |
|
|
|
47 |
// Getting the serial field. |
|
|
48 |
$soa = explode(" ", $content); |
|
|
49 |
|
|
|
50 |
if(empty($notified_serial)) |
|
|
51 |
{ |
|
|
52 |
// Ok native replication, so we have to update. |
|
|
53 |
$need_to_update = true; |
|
|
54 |
} |
|
|
55 |
elseif($notified_serial >= $soa[2]) |
|
|
56 |
{ |
|
|
57 |
$need_to_update = true; |
|
|
58 |
} |
|
|
59 |
elseif(strlen($soa[2]) != 10) |
|
|
60 |
{ |
|
|
61 |
$need_to_update = true; |
|
|
62 |
} |
|
|
63 |
else |
|
|
64 |
{ |
|
|
65 |
$need_to_update = false; |
|
|
66 |
} |
|
|
67 |
if($need_to_update) |
|
|
68 |
{ |
|
|
69 |
// Ok so we have to update it seems. |
|
|
70 |
$current_serial = $soa[2]; |
|
|
71 |
|
|
|
72 |
/* |
|
|
73 |
* What we need here (for RFC1912) is YEAR, MONTH and DAY |
|
|
74 |
* so let's get it ... |
|
|
75 |
*/ |
|
|
76 |
$new_serial = date('Ymd'); // we will add revision number later |
|
|
77 |
|
|
|
78 |
if(strncmp($new_serial, $current_serial, 8) === 0) |
|
|
79 |
{ |
|
|
80 |
/* |
|
|
81 |
* Ok, so we already made updates tonight |
|
|
82 |
* let's just increase the revision number |
|
|
83 |
*/ |
|
|
84 |
$revision_number = (int) substr($current_serial, -2); |
|
|
85 |
if ($revision_number == 99) return false; // ok, we cannot update anymore tonight |
|
|
86 |
++$revision_number; |
|
|
87 |
// here it is ... same date, new revision |
|
|
88 |
$new_serial .= str_pad($revision_number, 2, "0", STR_PAD_LEFT); |
|
|
89 |
} |
|
|
90 |
else |
|
|
91 |
{ |
|
|
92 |
/* |
|
|
93 |
* Current serial is not RFC1912 compilant, so let's make a new one |
|
|
94 |
*/ |
|
|
95 |
$new_serial .= '00'; |
|
|
96 |
} |
|
|
97 |
$soa[2] = $new_serial; // change serial in SOA array |
|
|
98 |
$new_soa = ""; |
|
|
99 |
// build new soa and update SQL after that |
|
|
100 |
for ($i = 0; $i < count($soa); $i++) |
|
|
101 |
{ |
|
|
102 |
$new_soa .= $soa[$i] . " "; |
|
|
103 |
} |
|
|
104 |
$sqlq = "UPDATE `records` SET `content` = '".$new_soa."' WHERE `domain_id` = '".$domain_id."' AND `type` = 'SOA' LIMIT 1"; |
|
|
105 |
$db->Query($sqlq); |
|
|
106 |
return true; |
|
|
107 |
} |
|
|
108 |
} |
|
|
109 |
|
|
|
110 |
/* |
|
|
111 |
* Edit a record. |
|
|
112 |
* This function validates it if correct it inserts it into the database. |
|
|
113 |
* return values: true if succesful. |
|
|
114 |
*/ |
|
|
115 |
function edit_record($recordid, $zoneid, $name, $type, $content, $ttl, $prio) |
|
|
116 |
{ |
|
|
117 |
global $db; |
|
|
118 |
if($content == "") |
|
|
119 |
{ |
|
|
120 |
error(ERR_RECORD_EMPTY_CONTENT); |
|
|
121 |
} |
|
|
122 |
// Edits the given record (validates specific stuff first) |
|
|
123 |
if (!xs(recid_to_domid($recordid))) |
|
|
124 |
{ |
|
|
125 |
error(ERR_RECORD_ACCESS_DENIED); |
|
|
126 |
} |
|
|
127 |
if (is_numeric($zoneid)) |
|
|
128 |
{ |
|
19
|
129 |
validate_input($zoneid, $type, $content, $name, $prio, $ttl); |
|
1
|
130 |
$change = time(); |
|
|
131 |
$db->query("UPDATE records set name='$name', type='$type', content='$content', ttl='$ttl', prio='$prio', change_date='$change' WHERE id=$recordid"); |
|
|
132 |
|
|
|
133 |
/* |
|
|
134 |
* Added by DeViCeD - Update SOA Serial number |
|
|
135 |
* There should be more checks |
|
|
136 |
*/ |
|
|
137 |
if ($type != 'SOA') |
|
|
138 |
{ |
|
|
139 |
update_soa_serial($zoneid); |
|
|
140 |
} |
|
|
141 |
return true; |
|
|
142 |
} |
|
|
143 |
else |
|
|
144 |
{ |
|
|
145 |
error(sprintf(ERR_INV_ARGC, "edit_record", "no zoneid given")); |
|
|
146 |
} |
|
|
147 |
|
|
|
148 |
} |
|
|
149 |
|
|
|
150 |
|
|
|
151 |
/* |
|
|
152 |
* Adds a record. |
|
|
153 |
* This function validates it if correct it inserts it into the database. |
|
|
154 |
* return values: true if succesful. |
|
|
155 |
*/ |
|
|
156 |
function add_record($zoneid, $name, $type, $content, $ttl, $prio) |
|
|
157 |
{ |
|
|
158 |
|
|
|
159 |
global $db; |
|
|
160 |
if (!xs($zoneid)) |
|
|
161 |
{ |
|
|
162 |
error(ERR_RECORD_ACCESS_DENIED); |
|
|
163 |
} |
|
|
164 |
if (is_numeric($zoneid)) |
|
|
165 |
{ |
|
8
|
166 |
// Check the user input. |
|
|
167 |
validate_input($zoneid, $type, $content, $name, $prio, $ttl); |
|
1
|
168 |
|
|
8
|
169 |
// Generate new timestamp for the daemon |
|
1
|
170 |
$change = time(); |
|
8
|
171 |
|
|
1
|
172 |
// Execute query. |
|
8
|
173 |
$db->query("INSERT INTO records (domain_id, name, type, content, ttl, prio, change_date) VALUES ($zoneid, '$name', '$type', '$content', $ttl, '$prio', $change)"); |
|
1
|
174 |
if ($type != 'SOA') |
|
|
175 |
{ |
|
|
176 |
update_soa_serial($zoneid); |
|
|
177 |
} |
|
|
178 |
return true; |
|
|
179 |
} |
|
|
180 |
else |
|
|
181 |
{ |
|
|
182 |
error(sprintf(ERR_INV_ARG, "add_record")); |
|
|
183 |
} |
|
|
184 |
} |
|
|
185 |
|
|
|
186 |
|
|
13
|
187 |
function add_supermaster($master_ip, $ns_name, $account) |
|
|
188 |
{ |
|
|
189 |
global $db; |
|
|
190 |
if (!is_valid_ip($master_ip) && !is_valid_ip6($master_ip)) |
|
|
191 |
{ |
|
|
192 |
error(sprintf(ERR_INV_ARGC, "add_supermaster", "No or no valid ipv4 or ipv6 address given.")); |
|
|
193 |
} |
|
|
194 |
if (!is_valid_hostname($ns_name)) |
|
|
195 |
{ |
|
|
196 |
error(ERR_DNS_HOSTNAME); |
|
|
197 |
} |
|
|
198 |
if (!validate_account($account)) |
|
|
199 |
{ |
|
|
200 |
error(sprintf(ERR_INV_ARGC, "add_supermaster", "given account name is invalid (alpha chars only)")); |
|
|
201 |
} |
|
|
202 |
if (supermaster_exists($master_ip)) |
|
|
203 |
{ |
|
|
204 |
error(sprintf(ERR_INV_ARGC, "add_supermaster", "supermaster already exists")); |
|
|
205 |
} |
|
|
206 |
else |
|
|
207 |
{ |
|
|
208 |
$db->query("INSERT INTO supermasters VALUES ('$master_ip', '$ns_name', '$account')"); |
|
|
209 |
return true; |
|
|
210 |
} |
|
|
211 |
} |
|
|
212 |
|
|
|
213 |
function delete_supermaster($master_ip) |
|
|
214 |
{ |
|
|
215 |
global $db; |
|
|
216 |
if (!level(5)) |
|
|
217 |
{ |
|
|
218 |
error(ERR_LEVEL_5); |
|
|
219 |
} |
|
|
220 |
if (is_valid_ip($master_ip) || is_valid_ip6($master_ip)) |
|
|
221 |
{ |
|
|
222 |
$db->query("DELETE FROM supermasters WHERE ip = '$master_ip'"); |
|
|
223 |
return true; |
|
|
224 |
} |
|
|
225 |
else |
|
|
226 |
{ |
|
|
227 |
error(sprintf(ERR_INV_ARGC, "delete_supermaster", "No or no valid ipv4 or ipv6 address given.")); |
|
|
228 |
} |
|
|
229 |
} |
|
|
230 |
|
|
|
231 |
function get_supermaster_info_from_ip($master_ip) |
|
|
232 |
{ |
|
|
233 |
global $db; |
|
|
234 |
if (!level(5)) |
|
|
235 |
{ |
|
|
236 |
error(ERR_LEVEL_5); |
|
|
237 |
} |
|
|
238 |
if (is_valid_ip($master_ip) || is_valid_ip6($master_ip)) |
|
|
239 |
{ |
|
|
240 |
$result = $db->queryRow("SELECT ip,nameserver,account FROM supermasters WHERE ip = '$master_ip'"); |
|
|
241 |
|
|
|
242 |
$ret = array( |
|
|
243 |
"master_ip" => $result["ip"], |
|
|
244 |
"ns_name" => $result["nameserver"], |
|
|
245 |
"account" => $result["account"] |
|
|
246 |
); |
|
|
247 |
|
|
|
248 |
return $ret; |
|
|
249 |
} |
|
|
250 |
else |
|
|
251 |
{ |
|
|
252 |
error(sprintf(ERR_INV_ARGC, "get_supermaster_info_from_ip", "No or no valid ipv4 or ipv6 address given.")); |
|
|
253 |
} |
|
|
254 |
} |
|
|
255 |
|
|
|
256 |
|
|
1
|
257 |
/* |
|
|
258 |
* Delete a record by a given id. |
|
|
259 |
* return values: true, this function is always succesful. |
|
|
260 |
*/ |
|
|
261 |
function delete_record($id) |
|
|
262 |
{ |
|
|
263 |
global $db; |
|
|
264 |
|
|
|
265 |
// Check if the user has access. |
|
|
266 |
if (!xs(recid_to_domid($id))) |
|
|
267 |
{ |
|
|
268 |
error(ERR_RECORD_ACCESS_DENIED); |
|
|
269 |
} |
|
|
270 |
|
|
|
271 |
// Retrieve the type of record to see if we can actually remove it. |
|
|
272 |
$recordtype = get_recordtype_from_id($id); |
|
|
273 |
|
|
|
274 |
// If the record type is NS and the user tries to delete it while ALLOW_NS_EDIT is set to 0 |
|
|
275 |
// OR |
|
|
276 |
// check if the name of the record isnt the domain name (if so it should delete all records) |
|
|
277 |
// OR |
|
|
278 |
// check if we are dealing with a SOA field (same story as NS) |
|
|
279 |
if (($recordtype == "NS" && $GLOBALS["ALLOW_NS_EDIT"] != 1 && (get_name_from_record_id($id) == get_domain_name_from_id(recid_to_domid($id)))) || ($recordtype == "SOA" && $GLOBALS["ALLOW_SOA_EDIT"] != 1)) |
|
|
280 |
{ |
|
|
281 |
error(sprintf(ERR_RECORD_DELETE_TYPE_DENIED, $recordtype)); |
|
|
282 |
|
|
|
283 |
} |
|
|
284 |
if (is_numeric($id)) |
|
|
285 |
{ |
|
|
286 |
$did = recid_to_domid($id); |
|
|
287 |
$db->query('DELETE FROM records WHERE id=' . $id . ' LIMIT 1'); |
|
|
288 |
if ($type != 'SOA') |
|
|
289 |
{ |
|
|
290 |
update_soa_serial($did); |
|
|
291 |
} |
|
|
292 |
// $id doesnt exist in database anymore so its deleted or just not there which means "true" |
|
|
293 |
return true; |
|
|
294 |
} |
|
|
295 |
else |
|
|
296 |
{ |
|
|
297 |
error(sprintf(ERR_INV_ARG, "delete_record")); |
|
|
298 |
} |
|
|
299 |
} |
|
|
300 |
|
|
|
301 |
|
|
|
302 |
/* |
|
|
303 |
* Add a domain to the database. |
|
|
304 |
* A domain is name obligatory, so is an owner. |
|
|
305 |
* return values: true when succesful. |
|
|
306 |
* Empty means templates dont have to be applied. |
|
|
307 |
* -------------------------------------------------------------------------- |
|
|
308 |
* This functions eats a template and by that it inserts various records. |
|
|
309 |
* first we start checking if something in an arpa record |
|
|
310 |
* remember to request nextID's from the database to be able to insert record. |
|
|
311 |
* if anything is invalid the function will error |
|
|
312 |
*/ |
|
13
|
313 |
function add_domain($domain, $owner, $webip, $mailip, $empty, $type, $slave_master) |
|
1
|
314 |
{ |
|
|
315 |
|
|
|
316 |
global $db; |
|
|
317 |
|
|
|
318 |
if (!level(5)) |
|
|
319 |
{ |
|
|
320 |
error(ERR_LEVEL_5); |
|
|
321 |
} |
|
|
322 |
|
|
|
323 |
// If domain, owner and mailip are given |
|
|
324 |
// OR |
|
|
325 |
// empty is given and owner and domain |
|
|
326 |
// OR |
|
|
327 |
// the domain is an arpa record and owner is given |
|
13
|
328 |
// OR |
|
|
329 |
// the type is slave, domain, owner and slave_master are given |
|
1
|
330 |
// THAN |
|
|
331 |
// Continue this function |
|
13
|
332 |
if (($domain && $owner && $webip && $mailip) || ($empty && $owner && $domain) || (eregi('in-addr.arpa', $domain) && $owner) || $type=="SLAVE" && $domain && $owner && $slave_master) |
|
1
|
333 |
{ |
|
8
|
334 |
// First insert zone into domain table |
|
|
335 |
$db->query("INSERT INTO domains (name, type) VALUES ('$domain', '$type')"); |
|
1
|
336 |
|
|
8
|
337 |
// Determine id of insert zone (in other words, find domain_id) |
|
|
338 |
$iddomain = $db->lastInsertId('domains', 'id'); |
|
|
339 |
if (PEAR::isError($iddomain)) { |
|
|
340 |
die($id->getMessage()); |
|
|
341 |
} |
|
1
|
342 |
|
|
8
|
343 |
// Second, insert into zones tables |
|
|
344 |
$db->query("INSERT INTO zones (domain_id, owner) VALUES ('$iddomain', $owner)"); |
|
1
|
345 |
|
|
13
|
346 |
if ($type == "SLAVE") |
|
1
|
347 |
{ |
|
13
|
348 |
$db->query("UPDATE domains SET master = '$slave_master' WHERE id = '$iddomain';"); |
|
|
349 |
|
|
|
350 |
// Done |
|
|
351 |
return true; |
|
|
352 |
} |
|
|
353 |
else |
|
|
354 |
{ |
|
|
355 |
// Generate new timestamp. We need this one anyhow. |
|
|
356 |
$now = time(); |
|
1
|
357 |
|
|
13
|
358 |
if ($empty && $iddomain) |
|
|
359 |
{ |
|
|
360 |
// If we come into this if statement we dont want to apply templates. |
|
|
361 |
// Retrieve configuration settings. |
|
|
362 |
$ns1 = $GLOBALS["NS1"]; |
|
|
363 |
$hm = $GLOBALS["HOSTMASTER"]; |
|
|
364 |
$ttl = $GLOBALS["DEFAULT_TTL"]; |
|
1
|
365 |
|
|
13
|
366 |
// Build and execute query |
|
|
367 |
$sql = "INSERT INTO records (domain_id, name, content, type, ttl, prio, change_date) VALUES ('$iddomain', '$domain', '$ns1 $hm 1', 'SOA', $ttl, '', '$now')"; |
|
|
368 |
$db->query($sql); |
|
1
|
369 |
|
|
13
|
370 |
// Done |
|
|
371 |
return true; |
|
|
372 |
} |
|
|
373 |
elseif ($iddomain) |
|
1
|
374 |
{ |
|
13
|
375 |
// If we are here we want to apply templates. |
|
|
376 |
global $template; |
|
|
377 |
|
|
|
378 |
// Iterate over the template and apply it for each field. |
|
|
379 |
foreach ($template as $r) |
|
1
|
380 |
{ |
|
13
|
381 |
// Same type of if statement as previous. |
|
|
382 |
if ((eregi('in-addr.arpa', $domain) && ($r["type"] == "NS" || $r["type"] == "SOA")) || (!eregi('in-addr.arpa', $domain))) |
|
1
|
383 |
{ |
|
13
|
384 |
// Parse the template. |
|
|
385 |
$name = parse_template_value($r["name"], $domain, $webip, $mailip); |
|
|
386 |
$type = $r["type"]; |
|
|
387 |
$content = parse_template_value($r["content"], $domain, $webip, $mailip); |
|
|
388 |
$ttl = $r["ttl"]; |
|
|
389 |
$prio = $r["prio"]; |
|
1
|
390 |
|
|
13
|
391 |
// If no ttl is given, use the default. |
|
|
392 |
if (!$ttl) |
|
|
393 |
{ |
|
|
394 |
$ttl = $GLOBALS["DEFAULT_TTL"]; |
|
|
395 |
} |
|
|
396 |
|
|
|
397 |
$sql = "INSERT INTO records (domain_id, name, content, type, ttl, prio, change_date) VALUES ('$iddomain', '$name','$content','$type','$ttl','$prio','$now')"; |
|
|
398 |
$db->query($sql); |
|
|
399 |
} |
|
1
|
400 |
} |
|
13
|
401 |
// All done. |
|
|
402 |
return true; |
|
|
403 |
} |
|
|
404 |
else |
|
|
405 |
{ |
|
|
406 |
error(sprintf(ERR_INV_ARGC, "add_domain", "could not create zone")); |
|
|
407 |
} |
|
|
408 |
} |
|
1
|
409 |
} |
|
|
410 |
else |
|
|
411 |
{ |
|
|
412 |
error(sprintf(ERR_INV_ARG, "add_domain")); |
|
|
413 |
} |
|
|
414 |
} |
|
|
415 |
|
|
|
416 |
|
|
|
417 |
/* |
|
|
418 |
* Deletes a domain by a given id. |
|
|
419 |
* Function always succeeds. If the field is not found in the database, thats what we want anyway. |
|
|
420 |
*/ |
|
|
421 |
function delete_domain($id) |
|
|
422 |
{ |
|
|
423 |
global $db; |
|
|
424 |
|
|
|
425 |
if (!level(5)) |
|
|
426 |
{ |
|
|
427 |
error(ERR_LEVEL_5); |
|
|
428 |
} |
|
|
429 |
|
|
|
430 |
// See if the ID is numeric. |
|
|
431 |
if (is_numeric($id)) |
|
|
432 |
{ |
|
|
433 |
$db->query("DELETE FROM zones WHERE domain_id=$id"); |
|
|
434 |
$db->query("DELETE FROM domains WHERE id=$id"); |
|
|
435 |
$db->query("DELETE FROM records WHERE domain_id=$id"); |
|
|
436 |
// Nothing in the database. If the delete deleted 0 records it means the id is just not there. |
|
|
437 |
// therefore the is no need to check the affectedRows values. |
|
|
438 |
return true; |
|
|
439 |
} |
|
|
440 |
else |
|
|
441 |
{ |
|
|
442 |
error(sprintf(ERR_INV_ARGC, "delete_domain", "id must be a number")); |
|
|
443 |
} |
|
|
444 |
} |
|
|
445 |
|
|
|
446 |
|
|
|
447 |
/* |
|
|
448 |
* Gets the id of the domain by a given record id. |
|
|
449 |
* return values: the domain id that was requested. |
|
|
450 |
*/ |
|
|
451 |
function recid_to_domid($id) |
|
|
452 |
{ |
|
|
453 |
global $db; |
|
|
454 |
if (is_numeric($id)) |
|
|
455 |
{ |
|
|
456 |
$result = $db->query("SELECT domain_id FROM records WHERE id=$id"); |
|
|
457 |
$r = $result->fetchRow(); |
|
|
458 |
return $r["domain_id"]; |
|
|
459 |
} |
|
|
460 |
else |
|
|
461 |
{ |
|
|
462 |
error(sprintf(ERR_INV_ARGC, "recid_to_domid", "id must be a number")); |
|
|
463 |
} |
|
|
464 |
} |
|
|
465 |
|
|
|
466 |
|
|
|
467 |
/* |
|
|
468 |
* Sorts a zone by records. |
|
|
469 |
* return values: the sorted zone. |
|
|
470 |
*/ |
|
|
471 |
function sort_zone($records) |
|
|
472 |
{ |
|
|
473 |
$ar_so = array(); |
|
|
474 |
$ar_ns = array(); |
|
|
475 |
$ar_mx = array(); |
|
|
476 |
$ar_mb = array(); |
|
|
477 |
$ar_ur = array(); |
|
|
478 |
$ar_ov = array(); |
|
|
479 |
foreach ($records as $c) |
|
|
480 |
{ |
|
|
481 |
switch(strtoupper($c['type'])) |
|
|
482 |
{ |
|
|
483 |
case "SOA": |
|
|
484 |
$ar_so[] = $c; |
|
|
485 |
break; |
|
|
486 |
case "NS": |
|
|
487 |
$ar_ns[] = $c; |
|
|
488 |
break; |
|
|
489 |
case "MX": |
|
|
490 |
$ar_mx[] = $c; |
|
|
491 |
break; |
|
|
492 |
case "MBOXFW": |
|
|
493 |
$ar_mb[] = $c; |
|
|
494 |
break; |
|
|
495 |
case "URL": |
|
|
496 |
$ar_ur[] = $c; |
|
|
497 |
break; |
|
|
498 |
default: |
|
|
499 |
$ar_ov[] = $c; |
|
|
500 |
break; |
|
|
501 |
} |
|
|
502 |
} |
|
|
503 |
|
|
|
504 |
$res = array_merge($ar_so, $ar_ns, $ar_mx, $ar_mb, $ar_ur, $ar_ov); |
|
|
505 |
|
|
|
506 |
if (count($records) == count($res)) |
|
|
507 |
{ |
|
|
508 |
$records = $res; |
|
|
509 |
} |
|
|
510 |
else |
|
|
511 |
{ |
|
|
512 |
error(sprintf(ERR_INV_ARGC, "sort_zone", "records sorting failed!")); |
|
|
513 |
} |
|
|
514 |
return $records; |
|
|
515 |
} |
|
|
516 |
|
|
|
517 |
|
|
|
518 |
/* |
|
|
519 |
* Change owner of a domain. |
|
|
520 |
* Function should actually be in users.inc.php. But its more of a record modification than a user modification |
|
|
521 |
* return values: true when succesful. |
|
|
522 |
*/ |
|
|
523 |
function add_owner($domain, $newowner) |
|
|
524 |
{ |
|
|
525 |
global $db; |
|
|
526 |
|
|
|
527 |
if (!level(5)) |
|
|
528 |
{ |
|
|
529 |
error(ERR_LEVEL_5); |
|
|
530 |
} |
|
|
531 |
|
|
|
532 |
if (is_numeric($domain) && is_numeric($newowner) && is_valid_user($newowner)) |
|
|
533 |
{ |
|
8
|
534 |
if($db->queryOne("SELECT COUNT(id) FROM zones WHERE owner=$newowner AND domain_id=$domain") == 0) |
|
1
|
535 |
{ |
|
8
|
536 |
$db->query("INSERT INTO zones (domain_id, owner) VALUES($domain, $newowner)"); |
|
1
|
537 |
} |
|
|
538 |
return true; |
|
|
539 |
} |
|
|
540 |
else |
|
|
541 |
{ |
|
|
542 |
error(sprintf(ERR_INV_ARGC, "change_owner", "$domain / $newowner")); |
|
|
543 |
} |
|
|
544 |
} |
|
|
545 |
|
|
|
546 |
|
|
|
547 |
function delete_owner($domain, $owner) |
|
|
548 |
{ |
|
|
549 |
global $db; |
|
8
|
550 |
if($db->queryOne("SELECT COUNT(id) FROM zones WHERE owner=$owner AND domain_id=$domain") != 0) |
|
1
|
551 |
{ |
|
|
552 |
$db->query("DELETE FROM zones WHERE owner=$owner AND domain_id=$domain"); |
|
|
553 |
} |
|
|
554 |
return true; |
|
|
555 |
} |
|
|
556 |
|
|
|
557 |
/* |
|
|
558 |
* Retrieves all supported dns record types |
|
|
559 |
* This function might be deprecated. |
|
|
560 |
* return values: array of types in string form. |
|
|
561 |
*/ |
|
|
562 |
function get_record_types() |
|
|
563 |
{ |
|
|
564 |
global $rtypes; |
|
|
565 |
return $rtypes; |
|
|
566 |
} |
|
|
567 |
|
|
|
568 |
|
|
|
569 |
/* |
|
|
570 |
* Retrieve all records by a given type and domain id. |
|
|
571 |
* Example: get all records that are of type A from domain id 1 |
|
|
572 |
* return values: a DB class result object |
|
|
573 |
*/ |
|
|
574 |
function get_records_by_type_from_domid($type, $recid) |
|
|
575 |
{ |
|
|
576 |
global $rtypes; |
|
|
577 |
global $db; |
|
|
578 |
|
|
|
579 |
// Does this type exist? |
|
|
580 |
if(!in_array(strtoupper($type), $rtypes)) |
|
|
581 |
{ |
|
|
582 |
error(sprintf(ERR_INV_ARGC, "get_records_from_type", "this is not a supported record")); |
|
|
583 |
} |
|
|
584 |
|
|
|
585 |
// Get the domain id. |
|
|
586 |
$domid = recid_to_domid($recid); |
|
|
587 |
|
|
|
588 |
$result = $db->query("select id, type from records where domain_id=$recid and type='$type'"); |
|
|
589 |
return $result; |
|
|
590 |
} |
|
|
591 |
|
|
|
592 |
|
|
|
593 |
/* |
|
|
594 |
* Retrieves the type of a record from a given id. |
|
|
595 |
* return values: the type of the record (one of the records types in $rtypes assumable). |
|
|
596 |
*/ |
|
|
597 |
function get_recordtype_from_id($id) |
|
|
598 |
{ |
|
|
599 |
global $db; |
|
|
600 |
if (is_numeric($id)) |
|
|
601 |
{ |
|
|
602 |
$result = $db->query("SELECT type FROM records WHERE id=$id"); |
|
|
603 |
$r = $result->fetchRow(); |
|
|
604 |
return $r["type"]; |
|
|
605 |
} |
|
|
606 |
else |
|
|
607 |
{ |
|
|
608 |
error(sprintf(ERR_INV_ARG, "get_recordtype_from_id")); |
|
|
609 |
} |
|
|
610 |
} |
|
|
611 |
|
|
|
612 |
|
|
|
613 |
/* |
|
|
614 |
* Retrieves the name (e.g. bla.test.com) of a record by a given id. |
|
|
615 |
* return values: the name associated with the id. |
|
|
616 |
*/ |
|
|
617 |
function get_name_from_record_id($id) |
|
|
618 |
{ |
|
|
619 |
global $db; |
|
|
620 |
if (is_numeric($id)) |
|
|
621 |
{ |
|
|
622 |
$result = $db->query("SELECT name FROM records WHERE id=$id"); |
|
|
623 |
$r = $result->fetchRow(); |
|
|
624 |
return $r["name"]; |
|
|
625 |
} |
|
|
626 |
else |
|
|
627 |
{ |
|
|
628 |
error(sprintf(ERR_INV_ARG, "get_name_from_record_id")); |
|
|
629 |
} |
|
|
630 |
} |
|
|
631 |
|
|
|
632 |
|
|
|
633 |
/* |
|
|
634 |
* Get all the domains from a database of which the user is the owner. |
|
|
635 |
* return values: an array with the id of the domain and its name. |
|
|
636 |
*/ |
|
|
637 |
function get_domains_from_userid($id) |
|
|
638 |
{ |
|
|
639 |
global $db; |
|
|
640 |
if (is_numeric($id)) |
|
|
641 |
{ |
|
|
642 |
$result = $db->query("SELECT domains.id AS domain_id, domains.name AS name FROM domains LEFT JOIN zones ON domains.id=zones.domain_id WHERE owner=$id"); |
|
|
643 |
|
|
|
644 |
$ret = array(); |
|
|
645 |
|
|
|
646 |
// Put all the information in a big array. |
|
|
647 |
while ($r = $result->fetchRow()) |
|
|
648 |
{ |
|
|
649 |
$ret[] = array( |
|
|
650 |
"id" => $r["domain_id"], |
|
|
651 |
"name" => $r["name"] |
|
|
652 |
); |
|
|
653 |
} |
|
|
654 |
return $ret; |
|
|
655 |
} |
|
|
656 |
else |
|
|
657 |
{ |
|
|
658 |
error(sprintf(ERR_INV_ARGC, "get_domains_from_userid", "This is not a valid userid: $id")); |
|
|
659 |
} |
|
|
660 |
} |
|
|
661 |
|
|
|
662 |
|
|
|
663 |
/* |
|
|
664 |
* Get domain name from a given id |
|
|
665 |
* return values: the name of the domain associated with the id. |
|
|
666 |
*/ |
|
|
667 |
function get_domain_name_from_id($id) |
|
|
668 |
{ |
|
|
669 |
global $db; |
|
|
670 |
if (!xs($id)) |
|
|
671 |
{ |
|
|
672 |
error(ERR_RECORD_ACCESS_DENIED); |
|
|
673 |
} |
|
|
674 |
if (is_numeric($id)) |
|
|
675 |
{ |
|
|
676 |
$result = $db->query("SELECT name FROM domains WHERE id=$id"); |
|
|
677 |
if ($result->numRows() == 1) |
|
|
678 |
{ |
|
|
679 |
$r = $result->fetchRow(); |
|
|
680 |
return $r["name"]; |
|
|
681 |
} |
|
|
682 |
else |
|
|
683 |
{ |
|
|
684 |
error(sprintf(ERR_INV_ARGC, "get_domain_name_from_id", "more than one domain found?! whaaa! BAD! BAD! Contact admin!")); |
|
|
685 |
} |
|
|
686 |
} |
|
|
687 |
else |
|
|
688 |
{ |
|
|
689 |
error(sprintf(ERR_INV_ARGC, "get_domain_name_from_id", "Not a valid domainid: $id")); |
|
|
690 |
} |
|
|
691 |
} |
|
|
692 |
|
|
|
693 |
|
|
|
694 |
/* |
|
|
695 |
* Get information about a domain name from a given domain id. |
|
|
696 |
* the function looks up the domainname, the owner of the domain and the number of records in it. |
|
|
697 |
* return values: an array containing the information. |
|
|
698 |
*/ |
|
|
699 |
function get_domain_info_from_id($id) |
|
|
700 |
{ |
|
|
701 |
global $db; |
|
|
702 |
if (!xs($id)) |
|
|
703 |
{ |
|
|
704 |
error(ERR_RECORD_ACCESS_DENIED); |
|
|
705 |
} |
|
|
706 |
if (is_numeric($id)) |
|
|
707 |
{ |
|
|
708 |
|
|
|
709 |
if ($_SESSION[$id."_ispartial"] == 1) { |
|
|
710 |
|
|
13
|
711 |
$sqlq = "SELECT |
|
|
712 |
domains.type AS type, |
|
|
713 |
domains.name AS name, |
|
1
|
714 |
users.fullname AS owner, |
|
|
715 |
count(record_owners.id) AS aantal |
|
|
716 |
FROM domains, users, record_owners, records |
|
|
717 |
|
|
|
718 |
WHERE record_owners.user_id = ".$_SESSION["userid"]." |
|
|
719 |
AND record_owners.record_id = records.id |
|
|
720 |
AND records.domain_id = ".$id." |
|
|
721 |
|
|
|
722 |
GROUP BY name, owner, users.fullname |
|
|
723 |
ORDER BY name"; |
|
|
724 |
|
|
8
|
725 |
$result = $db->queryRow($sqlq); |
|
1
|
726 |
|
|
|
727 |
$ret = array( |
|
|
728 |
"name" => $result["name"], |
|
|
729 |
"ownerid" => $_SESSION["userid"], |
|
|
730 |
"owner" => $result["owner"], |
|
13
|
731 |
"type" => $result["type"], |
|
1
|
732 |
"numrec" => $result["aantal"] |
|
|
733 |
); |
|
|
734 |
|
|
|
735 |
return $ret; |
|
|
736 |
|
|
|
737 |
} else{ |
|
|
738 |
|
|
|
739 |
// Query that retrieves the information we need. |
|
13
|
740 |
$sqlq = "SELECT |
|
|
741 |
domains.type AS type, |
|
|
742 |
domains.name AS name, |
|
1
|
743 |
min(zones.owner) AS ownerid, |
|
|
744 |
users.fullname AS owner, |
|
|
745 |
count(records.domain_id) AS aantal |
|
|
746 |
FROM domains |
|
|
747 |
LEFT JOIN records ON domains.id=records.domain_id |
|
|
748 |
LEFT JOIN zones ON domains.id=zones.domain_id |
|
|
749 |
LEFT JOIN users ON zones.owner=users.id |
|
|
750 |
WHERE domains.id=$id |
|
|
751 |
GROUP BY name, owner, users.fullname |
|
|
752 |
ORDER BY zones.id"; |
|
|
753 |
|
|
|
754 |
// Put the first occurence in an array and return it. |
|
8
|
755 |
$result = $db->queryRow($sqlq); |
|
1
|
756 |
|
|
8
|
757 |
//$result["ownerid"] = ($result["ownerid"] == NULL) ? $db->queryOne("select min(id) from users where users.level=10") : $result["ownerid"]; |
|
1
|
758 |
|
|
|
759 |
$ret = array( |
|
|
760 |
"name" => $result["name"], |
|
|
761 |
"ownerid" => $result["ownerid"], |
|
|
762 |
"owner" => $result["owner"], |
|
13
|
763 |
"type" => $result["type"], |
|
1
|
764 |
"numrec" => $result["aantal"] |
|
|
765 |
); |
|
|
766 |
return $ret; |
|
|
767 |
} |
|
|
768 |
|
|
|
769 |
} |
|
|
770 |
else |
|
|
771 |
{ |
|
|
772 |
error(sprintf(ERR_INV_ARGC, "get_domain_num_records_from_id", "This is not a valid domainid: $id")); |
|
|
773 |
} |
|
|
774 |
} |
|
|
775 |
|
|
|
776 |
|
|
|
777 |
/* |
|
|
778 |
* Check if a domain is already existing. |
|
|
779 |
* return values: true if existing, false if it doesnt exist. |
|
|
780 |
*/ |
|
|
781 |
function domain_exists($domain) |
|
|
782 |
{ |
|
|
783 |
global $db; |
|
|
784 |
|
|
|
785 |
if (!level(5)) |
|
|
786 |
{ |
|
|
787 |
error(ERR_LEVEL_5); |
|
|
788 |
} |
|
|
789 |
if (is_valid_domain($domain)) |
|
|
790 |
{ |
|
|
791 |
$result = $db->query("SELECT id FROM domains WHERE name='$domain'"); |
|
|
792 |
if ($result->numRows() == 0) |
|
|
793 |
{ |
|
|
794 |
return false; |
|
|
795 |
} |
|
|
796 |
elseif ($result->numRows() >= 1) |
|
|
797 |
{ |
|
|
798 |
return true; |
|
|
799 |
} |
|
|
800 |
} |
|
|
801 |
else |
|
|
802 |
{ |
|
|
803 |
error(ERR_DOMAIN_INVALID); |
|
|
804 |
} |
|
|
805 |
} |
|
|
806 |
|
|
13
|
807 |
function get_supermasters() |
|
|
808 |
{ |
|
|
809 |
global $db; |
|
|
810 |
$result = $db->query("SELECT ip, nameserver, account FROM supermasters"); |
|
|
811 |
$ret = array(); |
|
|
812 |
|
|
|
813 |
if($result->numRows() == 0) |
|
|
814 |
{ |
|
|
815 |
return -1; |
|
|
816 |
} |
|
|
817 |
else |
|
|
818 |
{ |
|
|
819 |
while ($r = $result->fetchRow()) |
|
|
820 |
{ |
|
|
821 |
$ret[] = array( |
|
|
822 |
"master_ip" => $r["ip"], |
|
|
823 |
"ns_name" => $r["nameserver"], |
|
|
824 |
"account" => $r["account"], |
|
|
825 |
); |
|
|
826 |
} |
|
36
|
827 |
return $ret; |
|
13
|
828 |
} |
|
|
829 |
} |
|
|
830 |
|
|
|
831 |
function supermaster_exists($master_ip) |
|
|
832 |
{ |
|
|
833 |
global $db; |
|
|
834 |
if (!level(5)) |
|
|
835 |
{ |
|
|
836 |
error(ERR_LEVEL_5); |
|
|
837 |
} |
|
|
838 |
if (is_valid_ip($master_ip) || is_valid_ip6($master_ip)) |
|
|
839 |
{ |
|
|
840 |
$result = $db->query("SELECT ip FROM supermasters WHERE ip = '$master_ip'"); |
|
|
841 |
if ($result->numRows() == 0) |
|
|
842 |
{ |
|
|
843 |
return false; |
|
|
844 |
} |
|
|
845 |
elseif ($result->numRows() >= 1) |
|
|
846 |
{ |
|
|
847 |
return true; |
|
|
848 |
} |
|
|
849 |
} |
|
|
850 |
else |
|
|
851 |
{ |
|
|
852 |
error(sprintf(ERR_INV_ARGC, "supermaster_exists", "No or no valid IPv4 or IPv6 address given.")); |
|
|
853 |
} |
|
|
854 |
} |
|
|
855 |
|
|
1
|
856 |
|
|
|
857 |
/* |
|
13
|
858 |
* Get all domains from the database |
|
1
|
859 |
* This function gets all the domains from the database unless a user id is below 5. |
|
|
860 |
* if a user id is below 5 this function will only retrieve records for that user. |
|
|
861 |
* return values: the array of domains or -1 if nothing is found. |
|
|
862 |
*/ |
|
|
863 |
function get_domains($userid=true,$letterstart=all,$rowstart=0,$rowamount=999999) |
|
|
864 |
{ |
|
|
865 |
global $db; |
|
|
866 |
if((!level(5) || !$userid) && !level(10) && !level(5)) |
|
|
867 |
{ |
|
|
868 |
$add = " AND zones.owner=".$_SESSION["userid"]; |
|
|
869 |
} |
|
|
870 |
else |
|
|
871 |
{ |
|
|
872 |
$add = ""; |
|
|
873 |
} |
|
|
874 |
|
|
|
875 |
$sqlq = "SELECT domains.id AS domain_id, |
|
|
876 |
min(zones.owner) AS owner, |
|
|
877 |
count(DISTINCT records.id) AS aantal, |
|
|
878 |
domains.name AS domainname |
|
|
879 |
FROM domains |
|
|
880 |
LEFT JOIN zones ON domains.id=zones.domain_id |
|
|
881 |
LEFT JOIN records ON records.domain_id=domains.id |
|
|
882 |
WHERE 1 $add "; |
|
|
883 |
if ($letterstart!=all && $letterstart!=1) { |
|
21
|
884 |
$sqlq.=" AND substring(domains.name,1,1) REGEXP '^".$letterstart."' "; |
|
1
|
885 |
} elseif ($letterstart==1) { |
|
21
|
886 |
$sqlq.=" AND substring(domains.name,1,1) REGEXP '^[[:digit:]]'"; |
|
1
|
887 |
} |
|
|
888 |
$sqlq.=" GROUP BY domainname, domain_id |
|
|
889 |
ORDER BY domainname |
|
|
890 |
LIMIT $rowstart,$rowamount"; |
|
|
891 |
|
|
|
892 |
$result = $db->query($sqlq); |
|
21
|
893 |
$result2 = $db->query($sqlq); |
|
|
894 |
|
|
|
895 |
$numrows = $result2->numRows(); |
|
|
896 |
$i=1; |
|
|
897 |
if ($numrows > 0) { |
|
|
898 |
$andnot=" AND NOT domains.id IN ("; |
|
|
899 |
while($r = $result2->fetchRow()) { |
|
|
900 |
$andnot.=$r["domain_id"]; |
|
|
901 |
if ($i < $numrows) { |
|
|
902 |
$andnot.=","; |
|
|
903 |
$i++; |
|
|
904 |
} |
|
|
905 |
} |
|
|
906 |
$andnot.=")"; |
|
|
907 |
} |
|
|
908 |
else |
|
|
909 |
{ |
|
|
910 |
$andnot=""; |
|
1
|
911 |
} |
|
|
912 |
|
|
21
|
913 |
if ($letterstart!=all && $letterstart!=1) { |
|
1
|
914 |
|
|
21
|
915 |
$sqlq = "SELECT domains.id AS domain_id, |
|
|
916 |
count(DISTINCT record_owners.record_id) AS aantal, |
|
|
917 |
domains.name AS domainname |
|
|
918 |
FROM domains, record_owners,records, zones |
|
|
919 |
WHERE record_owners.user_id = '".$_SESSION["userid"]."' |
|
|
920 |
AND (records.id = record_owners.record_id |
|
|
921 |
AND domains.id = records.domain_id) |
|
|
922 |
$andnot |
|
|
923 |
AND domains.name LIKE '".$letterstart."%' |
|
|
924 |
AND (zones.domain_id != records.domain_id AND zones.owner!='".$_SESSION["userid"]."') |
|
|
925 |
GROUP BY domainname, domain_id |
|
|
926 |
ORDER BY domainname"; |
|
1
|
927 |
|
|
21
|
928 |
$result_extra = $db->query($sqlq); |
|
1
|
929 |
|
|
21
|
930 |
} else { |
|
1
|
931 |
|
|
21
|
932 |
$sqlq = "SELECT domains.id AS domain_id, |
|
|
933 |
count(DISTINCT record_owners.record_id) AS aantal, |
|
|
934 |
domains.name AS domainname |
|
|
935 |
FROM domains, record_owners,records, zones |
|
|
936 |
WHERE record_owners.user_id = '".$_SESSION["userid"]."' |
|
|
937 |
AND (records.id = record_owners.record_id |
|
|
938 |
AND domains.id = records.domain_id) |
|
|
939 |
$andnot |
|
|
940 |
AND substring(domains.name,1,1) REGEXP '^[[:digit:]]' |
|
|
941 |
AND (zones.domain_id != records.domain_id AND zones.owner!='".$_SESSION["userid"]."') |
|
|
942 |
GROUP BY domainname, domain_id |
|
|
943 |
ORDER BY domainname"; |
|
1
|
944 |
|
|
21
|
945 |
$result_extra[$i] = $db->query($sqlq); |
|
|
946 |
|
|
1
|
947 |
} |
|
|
948 |
|
|
|
949 |
while($r = $result->fetchRow()) |
|
|
950 |
{ |
|
8
|
951 |
$r["owner"] = ($r["owner"] == NULL) ? $db->queryOne("select min(id) from users where users.level=10") : $r["owner"]; |
|
1
|
952 |
$ret[$r["domainname"]] = array( |
|
|
953 |
"name" => $r["domainname"], |
|
|
954 |
"id" => $r["domain_id"], |
|
|
955 |
"owner" => $r["owner"], |
|
|
956 |
"numrec" => $r["aantal"] |
|
|
957 |
); |
|
|
958 |
} |
|
|
959 |
|
|
|
960 |
|
|
21
|
961 |
if ($letterstart!=all && $letterstart!=1) { |
|
1
|
962 |
|
|
21
|
963 |
while($r = $result_extra->fetchRow()) |
|
|
964 |
{ |
|
|
965 |
$ret[$r["domainname"]] = array( |
|
|
966 |
"name" => $r["domainname"]."*", |
|
|
967 |
"id" => $r["domain_id"], |
|
|
968 |
"owner" => $_SESSION["userid"], |
|
|
969 |
"numrec" => $r["aantal"] |
|
|
970 |
); |
|
|
971 |
$_SESSION["partial_".$r["domainname"]] = 1; |
|
|
972 |
} |
|
1
|
973 |
|
|
21
|
974 |
} else { |
|
1
|
975 |
|
|
21
|
976 |
foreach ($result_extra as $result_e) { |
|
|
977 |
while($r = $result_e->fetchRow()) |
|
|
978 |
{ |
|
|
979 |
$ret[$r["domainname"]] = array( |
|
|
980 |
"name" => $r["domainname"]."*", |
|
|
981 |
"id" => $r["domain_id"], |
|
|
982 |
"owner" => $_SESSION["userid"], |
|
|
983 |
"numrec" => $r["aantal"] |
|
|
984 |
); |
|
|
985 |
$_SESSION["partial_".$r["domainname"]] = 1; |
|
|
986 |
} |
|
|
987 |
} |
|
|
988 |
|
|
1
|
989 |
} |
|
|
990 |
|
|
21
|
991 |
if (empty($ret)) { |
|
|
992 |
return -1; |
|
|
993 |
} else { |
|
|
994 |
sort($ret); |
|
|
995 |
return $ret; |
|
|
996 |
} |
|
1
|
997 |
|
|
|
998 |
} |
|
|
999 |
|
|
|
1000 |
|
|
|
1001 |
/* |
|
30
|
1002 |
* zone_count |
|
|
1003 |
* Does a select query to count how many zones we have in the database |
|
|
1004 |
* |
|
|
1005 |
* @todo: see whether or not it is possible to add the records |
|
|
1006 |
* @param $userid integer The userid of the current user |
|
|
1007 |
* @return integer the number of zones |
|
|
1008 |
*/ |
|
|
1009 |
|
|
|
1010 |
function zone_count($userid=true, $letterstart=all) { |
|
|
1011 |
global $db; |
|
|
1012 |
if((!level(5) || !$userid) && !level(10) && !level(5)) |
|
|
1013 |
{ |
|
37
|
1014 |
// First select the zones for which we have ownership on one or more records. |
|
|
1015 |
$query = 'SELECT records.domain_id FROM records, record_owners WHERE user_id = '.$_SESSION['userid'].' AND records.id = record_owners.record_id'; |
|
|
1016 |
$result = $db->query($query); |
|
|
1017 |
$zones = array(); |
|
|
1018 |
if (!PEAR::isError($result)) { |
|
|
1019 |
$zones = $result->fetchCol(); |
|
|
1020 |
} |
|
|
1021 |
|
|
|
1022 |
$add = " AND (zones.owner=".$_SESSION["userid"]; |
|
|
1023 |
if (count($zones) > 0) { |
|
|
1024 |
$add .= ' OR zones.domain_id IN ('.implode(',', $zones).') '; |
|
|
1025 |
|
|
|
1026 |
} |
|
|
1027 |
$add .= ')'; |
|
30
|
1028 |
} |
|
|
1029 |
else |
|
|
1030 |
{ |
|
|
1031 |
$add = ""; |
|
|
1032 |
} |
|
|
1033 |
|
|
|
1034 |
if ($letterstart!=all && $letterstart!=1) { |
|
|
1035 |
$add .=" AND domains.name LIKE '".$letterstart."%' "; |
|
|
1036 |
} elseif ($letterstart==1) { |
|
|
1037 |
$add .=" AND substring(domains.name,1,1) REGEXP '^[[:digit:]]'"; |
|
|
1038 |
} |
|
|
1039 |
|
|
40
|
1040 |
if (level(5)) |
|
|
1041 |
{ |
|
|
1042 |
$query = 'SELECT count(distinct domains.id) as zone_count FROM domains WHERE 1 '.$add; |
|
|
1043 |
} |
|
|
1044 |
else |
|
|
1045 |
{ |
|
|
1046 |
$query = 'SELECT count(distinct zones.domain_id) as zone_count FROM zones, domains WHERE zones.domain_id = domains.id '.$add; |
|
|
1047 |
} |
|
30
|
1048 |
$numRows = $db->queryOne($query); |
|
|
1049 |
return $numRows; |
|
|
1050 |
} |
|
|
1051 |
|
|
|
1052 |
/* |
|
1
|
1053 |
* Get a record from an id. |
|
|
1054 |
* Retrieve all fields of the record and send it back to the function caller. |
|
|
1055 |
* return values: the array with information, or -1 is nothing is found. |
|
|
1056 |
*/ |
|
|
1057 |
function get_record_from_id($id) |
|
|
1058 |
{ |
|
|
1059 |
global $db; |
|
|
1060 |
if (is_numeric($id)) |
|
|
1061 |
{ |
|
|
1062 |
$result = $db->query("SELECT id, domain_id, name, type, content, ttl, prio, change_date FROM records WHERE id=$id"); |
|
|
1063 |
if($result->numRows() == 0) |
|
|
1064 |
{ |
|
|
1065 |
return -1; |
|
|
1066 |
} |
|
|
1067 |
elseif ($result->numRows() == 1) |
|
|
1068 |
{ |
|
|
1069 |
$r = $result->fetchRow(); |
|
|
1070 |
$ret = array( |
|
|
1071 |
"id" => $r["id"], |
|
|
1072 |
"domain_id" => $r["domain_id"], |
|
|
1073 |
"name" => $r["name"], |
|
|
1074 |
"type" => $r["type"], |
|
|
1075 |
"content" => $r["content"], |
|
|
1076 |
"ttl" => $r["ttl"], |
|
|
1077 |
"prio" => $r["prio"], |
|
|
1078 |
"change_date" => $r["change_date"] |
|
|
1079 |
); |
|
|
1080 |
return $ret; |
|
|
1081 |
} |
|
|
1082 |
else |
|
|
1083 |
{ |
|
|
1084 |
error(sprintf(ERR_INV_ARGC, "get_record_from_id", "More than one row returned! This is bad!")); |
|
|
1085 |
} |
|
|
1086 |
} |
|
|
1087 |
else |
|
|
1088 |
{ |
|
|
1089 |
error(sprintf(ERR_INV_ARG, "get_record_from_id")); |
|
|
1090 |
} |
|
|
1091 |
} |
|
|
1092 |
|
|
|
1093 |
|
|
|
1094 |
/* |
|
|
1095 |
* Get all records from a domain id. |
|
|
1096 |
* Retrieve all fields of the records and send it back to the function caller. |
|
|
1097 |
* return values: the array with information, or -1 is nothing is found. |
|
|
1098 |
*/ |
|
|
1099 |
function get_records_from_domain_id($id,$rowstart=0,$rowamount=999999) |
|
|
1100 |
{ |
|
|
1101 |
global $db; |
|
|
1102 |
if (is_numeric($id)) |
|
|
1103 |
{ |
|
|
1104 |
if ($_SESSION[$id."_ispartial"] == 1) { |
|
|
1105 |
|
|
|
1106 |
$result = $db->query("SELECT record_owners.record_id as id |
|
|
1107 |
FROM record_owners,domains,records |
|
|
1108 |
WHERE record_owners.user_id = ".$_SESSION["userid"]." |
|
|
1109 |
AND record_owners.record_id = records.id |
|
|
1110 |
AND records.domain_id = ".$id." |
|
|
1111 |
GROUP bY record_owners.record_id |
|
|
1112 |
LIMIT $rowstart,$rowamount"); |
|
|
1113 |
|
|
|
1114 |
$ret = array(); |
|
|
1115 |
if($result->numRows() == 0) |
|
|
1116 |
{ |
|
|
1117 |
return -1; |
|
|
1118 |
} |
|
|
1119 |
else |
|
|
1120 |
{ |
|
|
1121 |
$ret[] = array(); |
|
|
1122 |
$retcount = 0; |
|
|
1123 |
while($r = $result->fetchRow()) |
|
|
1124 |
{ |
|
|
1125 |
// Call get_record_from_id for each row. |
|
|
1126 |
$ret[$retcount] = get_record_from_id($r["id"]); |
|
|
1127 |
$retcount++; |
|
|
1128 |
} |
|
|
1129 |
return $ret; |
|
|
1130 |
} |
|
|
1131 |
|
|
|
1132 |
} else { |
|
|
1133 |
|
|
|
1134 |
$result = $db->query("SELECT id FROM records WHERE domain_id=$id LIMIT $rowstart,$rowamount"); |
|
|
1135 |
$ret = array(); |
|
|
1136 |
if($result->numRows() == 0) |
|
|
1137 |
{ |
|
|
1138 |
return -1; |
|
|
1139 |
} |
|
|
1140 |
else |
|
|
1141 |
{ |
|
|
1142 |
$ret[] = array(); |
|
|
1143 |
$retcount = 0; |
|
|
1144 |
while($r = $result->fetchRow()) |
|
|
1145 |
{ |
|
|
1146 |
// Call get_record_from_id for each row. |
|
|
1147 |
$ret[$retcount] = get_record_from_id($r["id"]); |
|
|
1148 |
$retcount++; |
|
|
1149 |
} |
|
|
1150 |
return $ret; |
|
|
1151 |
} |
|
|
1152 |
|
|
|
1153 |
} |
|
|
1154 |
} |
|
|
1155 |
else |
|
|
1156 |
{ |
|
|
1157 |
error(sprintf(ERR_INV_ARG, "get_records_from_domain_id")); |
|
|
1158 |
} |
|
|
1159 |
} |
|
|
1160 |
|
|
|
1161 |
|
|
|
1162 |
function get_users_from_domain_id($id) |
|
|
1163 |
{ |
|
|
1164 |
global $db; |
|
8
|
1165 |
$result = $db->queryCol("SELECT owner FROM zones WHERE domain_id=$id"); |
|
1
|
1166 |
$ret = array(); |
|
|
1167 |
foreach($result as $uid) |
|
|
1168 |
{ |
|
8
|
1169 |
$fullname = $db->queryOne("SELECT fullname FROM users WHERE id=$uid"); |
|
1
|
1170 |
$ret[] = array( |
|
|
1171 |
"id" => $uid, |
|
|
1172 |
"fullname" => $fullname |
|
|
1173 |
); |
|
|
1174 |
} |
|
|
1175 |
return $ret; |
|
|
1176 |
} |
|
|
1177 |
|
|
|
1178 |
function search_record($question) |
|
|
1179 |
{ |
|
|
1180 |
global $db; |
|
|
1181 |
$question = trim($question); |
|
|
1182 |
if (empty($question)) |
|
|
1183 |
{ |
|
|
1184 |
$S_INPUT_TYPE = -1; |
|
|
1185 |
} |
|
|
1186 |
|
|
|
1187 |
/* now for some input-type searching */ |
|
|
1188 |
if (is_valid_ip($question) || is_valid_ip6($question)) |
|
|
1189 |
{ |
|
|
1190 |
$S_INPUT_TYPE = 0; |
|
|
1191 |
} |
|
|
1192 |
elseif(is_valid_domain($question) || |
|
|
1193 |
is_valid_hostname($question) || |
|
|
1194 |
is_valid_mboxfw($question)) // I guess this one can appear in records table too (content?!) |
|
|
1195 |
{ |
|
|
1196 |
$S_INPUT_TYPE = 1; |
|
|
1197 |
} |
|
|
1198 |
else |
|
|
1199 |
{ |
|
|
1200 |
$S_INPUT_TYPE = -1; |
|
|
1201 |
} |
|
|
1202 |
switch($S_INPUT_TYPE) |
|
|
1203 |
{ |
|
|
1204 |
case '0': |
|
|
1205 |
$sqlq = "SELECT * FROM `records` WHERE `content` = '".$question."' ORDER BY `type` DESC"; |
|
|
1206 |
$result = $db->query($sqlq); |
|
|
1207 |
$ret_r = array(); |
|
|
1208 |
while ($r = $result->fetchRow()) |
|
|
1209 |
{ |
|
|
1210 |
if(xs($r['domain_id'])) |
|
|
1211 |
{ |
|
|
1212 |
$ret_r[] = array( |
|
|
1213 |
'id' => $r['id'], |
|
|
1214 |
'domain_id' => $r['domain_id'], |
|
|
1215 |
'name' => $r['name'], |
|
|
1216 |
'type' => $r['type'], |
|
|
1217 |
'content' => $r['content'], |
|
|
1218 |
'ttl' => $r['ttl'], |
|
|
1219 |
'prio' => $r['prio'], |
|
|
1220 |
'change_date' => $r['change_date'] |
|
|
1221 |
); |
|
|
1222 |
} |
|
|
1223 |
} |
|
|
1224 |
break; |
|
|
1225 |
|
|
|
1226 |
case '1' : |
|
5
|
1227 |
$sqlq = "SELECT `domains`.*, count(`records`.`id`) AS `numrec`, `zones`.`owner`, `records`.`domain_id` |
|
1
|
1228 |
FROM `domains`, `records`, `zones` |
|
|
1229 |
WHERE `domains`.`id` = `records`.`domain_id` |
|
|
1230 |
AND `zones`.`domain_id` = `domains`.`id` |
|
|
1231 |
AND `domains`.`name` = '".$question."' |
|
|
1232 |
GROUP BY (`domains`.`id`)"; |
|
|
1233 |
|
|
|
1234 |
$result = $db->query($sqlq); |
|
|
1235 |
$ret_d = array(); |
|
|
1236 |
while ($r = $result->fetchRow()) |
|
|
1237 |
{ |
|
|
1238 |
if(xs($r['domain_id'])) |
|
|
1239 |
{ |
|
|
1240 |
$ret_d[] = array( |
|
|
1241 |
'id' => $r['id'], |
|
|
1242 |
'name' => $r['name'], |
|
|
1243 |
'numrec' => $r['numrec'], |
|
|
1244 |
'owner' => $r['owner'] |
|
|
1245 |
); |
|
|
1246 |
} |
|
|
1247 |
} |
|
|
1248 |
|
|
|
1249 |
$sqlq = "SELECT * FROM `records` WHERE `name` = '".$question."' OR `content` = '".$question."' ORDER BY `type` DESC"; |
|
|
1250 |
$result = $db->query($sqlq); |
|
|
1251 |
while ($r = $result->fetchRow()) |
|
|
1252 |
{ |
|
|
1253 |
if(xs($r['domain_id'])) |
|
|
1254 |
{ |
|
|
1255 |
$ret_r[] = array( |
|
|
1256 |
'id' => $r['id'], |
|
|
1257 |
'domain_id' => $r['domain_id'], |
|
|
1258 |
'name' => $r['name'], |
|
|
1259 |
'type' => $r['type'], |
|
|
1260 |
'content' => $r['content'], |
|
|
1261 |
'ttl' => $r['ttl'], |
|
|
1262 |
'prio' => $r['prio'], |
|
|
1263 |
); |
|
|
1264 |
} |
|
|
1265 |
} |
|
|
1266 |
break; |
|
|
1267 |
} |
|
|
1268 |
if($S_INPUT_TYPE == 1) |
|
|
1269 |
{ |
|
|
1270 |
return array('domains' => $ret_d, 'records' => $ret_r); |
|
|
1271 |
} |
|
|
1272 |
return array('records' => $ret_r); |
|
|
1273 |
} |
|
|
1274 |
|
|
|
1275 |
function get_domain_type($id) |
|
|
1276 |
{ |
|
|
1277 |
global $db; |
|
13
|
1278 |
if (is_numeric($id)) |
|
1
|
1279 |
{ |
|
13
|
1280 |
$type = $db->queryOne("SELECT `type` FROM `domains` WHERE `id` = '".$id."'"); |
|
|
1281 |
if($type == "") |
|
|
1282 |
{ |
|
|
1283 |
$type = "NATIVE"; |
|
|
1284 |
} |
|
|
1285 |
return $type; |
|
|
1286 |
} |
|
|
1287 |
else |
|
|
1288 |
{ |
|
|
1289 |
error(sprintf(ERR_INV_ARG, "get_record_from_id", "no or no valid zoneid given")); |
|
|
1290 |
} |
|
|
1291 |
} |
|
|
1292 |
|
|
|
1293 |
function get_domain_slave_master($id) |
|
|
1294 |
{ |
|
|
1295 |
global $db; |
|
|
1296 |
if (is_numeric($id)) |
|
|
1297 |
{ |
|
|
1298 |
$slave_master = $db->queryOne("SELECT `master` FROM `domains` WHERE `type` = 'SLAVE' and `id` = '".$id."'"); |
|
|
1299 |
return $slave_master; |
|
|
1300 |
} |
|
|
1301 |
else |
|
|
1302 |
{ |
|
|
1303 |
error(sprintf(ERR_INV_ARG, "get_domain_slave_master", "no or no valid zoneid given")); |
|
|
1304 |
} |
|
1
|
1305 |
} |
|
|
1306 |
|
|
|
1307 |
function change_domain_type($type, $id) |
|
|
1308 |
{ |
|
13
|
1309 |
global $db; |
|
|
1310 |
unset($add); |
|
|
1311 |
if (is_numeric($id)) |
|
|
1312 |
{ |
|
|
1313 |
// It is not really neccesary to clear the master field if a |
|
|
1314 |
// zone is not of the type "slave" as powerdns will ignore that |
|
|
1315 |
// fiedl, but it is cleaner anyway. |
|
|
1316 |
if ($type != "SLAVE") |
|
|
1317 |
{ |
|
|
1318 |
$add = ", master=''"; |
|
|
1319 |
} |
|
|
1320 |
$result = $db->query("UPDATE `domains` SET `type` = '" .$type. "'".$add." WHERE `id` = '".$id."'"); |
|
|
1321 |
} |
|
|
1322 |
else |
|
|
1323 |
{ |
|
|
1324 |
error(sprintf(ERR_INV_ARG, "change_domain_type", "no or no valid zoneid given")); |
|
|
1325 |
} |
|
|
1326 |
} |
|
|
1327 |
|
|
|
1328 |
function change_domain_slave_master($id, $slave_master) |
|
|
1329 |
{ |
|
|
1330 |
global $db; |
|
|
1331 |
if (is_numeric($id)) |
|
|
1332 |
{ |
|
|
1333 |
if (is_valid_ip($slave_master) || is_valid_ip6($slave_master)) |
|
|
1334 |
{ |
|
|
1335 |
$result = $db->query("UPDATE `domains` SET `master` = '" .$slave_master. "' WHERE `id` = '".$id."'"); |
|
|
1336 |
} |
|
|
1337 |
else |
|
|
1338 |
{ |
|
|
1339 |
error(sprintf(ERR_INV_ARGC, "change_domain_slave_master", "This is not a valid IPv4 or IPv6 address: $slave_master")); |
|
|
1340 |
} |
|
|
1341 |
} |
|
|
1342 |
else |
|
|
1343 |
{ |
|
|
1344 |
error(sprintf(ERR_INV_ARG, "change_domain_type", "no or no valid zoneid given")); |
|
|
1345 |
} |
|
|
1346 |
} |
|
|
1347 |
|
|
|
1348 |
|
|
|
1349 |
function validate_account($account) |
|
|
1350 |
{ |
|
|
1351 |
|
|
|
1352 |
if(preg_match("/^[A-Z0-9._-]+$/i",$account)) |
|
|
1353 |
{ |
|
|
1354 |
return true; |
|
|
1355 |
} |
|
|
1356 |
else |
|
|
1357 |
{ |
|
|
1358 |
return false; |
|
|
1359 |
} |
|
1
|
1360 |
} |
|
|
1361 |
?> |