/* User-level DNS functions Copyright (C) 2007 Sergey Poznyakoff This program is free software; you can redistribute it and/or modify it under the terms of the GNU General Public License as published by the Free Software Foundation; either version 3, or (at your option) any later version. This program is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for more details. You should have received a copy of the GNU General Public License along with this program. If not, see . */ func hostname (string ipstr) returns string do catch * do return %ipstr done return primitive_hostname(%ipstr) done func resolve (string str; string domain) returns string do catch * do return "0" done if defined(domain) return primitive_resolve (%str, %domain) else return primitive_resolve (%str) fi done func hasmx (string str) returns string do catch * do return 0 done return primitive_hasmx(%str) done func ismx (string domain, string ipstr) returns number do catch * do return 0 done return primitive_ismx (%domain, %ipstr) done