nslookup.c

   1 /* vi: set sw=4 ts=4: */
   2 /*
   3  * Mini nslookup implementation for busybox
   4  *
   5  * Copyright (C) 2000 by Lineo, inc.
   6  * Written by John Beppu <beppu@lineo.com>
   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 2 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 GNU
  16  * 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, write to the Free Software
  20  * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
  21  *
  22  */
  23
  24 #include "internal.h"
  25 #include <ctype.h>
  26 #include <errno.h>
  27 #include <stdio.h>
  28 #include <string.h>
  29
  30 #include <netdb.h>
  31 #include <sys/socket.h>
  32 #include <sys/types.h>
  33 #include <netinet/in.h>
  34
  35 /*
  36  |  I'm only implementing non-interactive mode;
  37  |  I totally forgot nslookup even had an interactive mode.
  38  |
  39  |  [ TODO ]
  40  |  + find out how to use non-default name servers
  41  |  + find out how the real nslookup gets the default name server
  42  */
  43
  44 static const char nslookup_usage[] = "nslookup [HOST]\n"
  45 #ifndef BB_FEATURE_TRIVIAL_HELP
  46         "\nQueries the nameserver for the IP address of the given HOST\n"
  47 #endif
  48 ;
  49
  50
  51 /* I have to see how the real nslookup does this.
  52  * I could dig through /etc/resolv.conf, but is there a
  53  * better (programatic) way?
  54  */
  55 static void server_fprint(FILE * dst)
  56 {
  57         fprintf(dst, "Server:     %s\n", "default");
  58         fprintf(dst, "Address:    %s\n\n", "default");
  59 }
  60
  61 /* only works for IPv4 */
  62 static int addr_fprint(char *addr, FILE * dst)
  63 {
  64         u_int8_t split[4];
  65         u_int32_t ip;
  66         u_int32_t *x = (u_int32_t *) addr;
  67
  68         ip = ntohl(*x);
  69         split[0] = (ip & 0xff000000) >> 24;
  70         split[1] = (ip & 0x00ff0000) >> 16;
  71         split[2] = (ip & 0x0000ff00) >> 8;
  72         split[3] = (ip & 0x000000ff);
  73         fprintf(dst, "%d.%d.%d.%d", split[0], split[1], split[2], split[3]
  74                 );
  75         return 0;
  76 }
  77
  78 /* changes a c-string matching the perl regex \d+\.\d+\.\d+\.\d+
  79  * into a u_int32_t
  80  */
  81 static u_int32_t str_to_addr(const char *addr)
  82 {
  83         u_int32_t split[4];
  84         u_int32_t ip;
  85
  86         sscanf(addr, "%d.%d.%d.%d",
  87                    &split[0], &split[1], &split[2], &split[3]);
  88
  89         /* assuming sscanf worked */
  90         ip = (split[0] << 24) |
  91                 (split[1] << 16) | (split[2] << 8) | (split[3]);
  92
  93         return htonl(ip);
  94 }
  95
  96 /* takes the NULL-terminated array h_addr_list, and
  97  * prints its contents appropriately
  98  */
  99 static int addr_list_fprint(char **h_addr_list, FILE * dst)
 100 {
 101         int i, j;
 102         char *addr_string = (h_addr_list[1])
 103                 ? "Addresses: " : "Address:   ";
 104
 105         fprintf(dst, "%s ", addr_string);
 106         for (i = 0, j = 0; h_addr_list[i]; i++, j++) {
 107                 addr_fprint(h_addr_list[i], dst);
 108
 109                 /* real nslookup does this */
 110                 if (j == 4) {
 111                         if (h_addr_list[i + 1]) {
 112                                 fprintf(dst, "\n          ");
 113                         }
 114                         j = 0;
 115                 } else {
 116                         if (h_addr_list[i + 1]) {
 117                                 fprintf(dst, ", ");
 118                         }
 119                 }
 120
 121         }
 122         fprintf(dst, "\n");
 123         return 0;
 124 }
 125
 126 /* gethostbyaddr wrapper */
 127 static struct hostent *gethostbyaddr_wrapper(const char *address)
 128 {
 129         struct in_addr addr;
 130
 131         addr.s_addr = str_to_addr(address);
 132         return gethostbyaddr((char *) &addr, 4, AF_INET);       /* IPv4 only for now */
 133 }
 134
 135 /* print the results as nslookup would */
 136 static struct hostent *hostent_fprint(struct hostent *host, FILE * dst)
 137 {
 138         if (host) {
 139                 fprintf(dst, "Name:       %s\n", host->h_name);
 140                 addr_list_fprint(host->h_addr_list, dst);
 141         } else {
 142                 fprintf(dst, "*** Unknown host\n");
 143         }
 144         return host;
 145 }
 146
 147
 148 /* naive function to check whether char *s is an ip address */
 149 static int is_ip_address(const char *s)
 150 {
 151         while (*s) {
 152                 if ((isdigit(*s)) || (*s == '.')) {
 153                         s++;
 154                         continue;
 155                 }
 156                 return 0;
 157         }
 158         return 1;
 159 }
 160
 161 /* ________________________________________________________________________ */
 162 int nslookup_main(int argc, char **argv)
 163 {
 164         struct hostent *host;
 165
 166         if (argc < 2 || *argv[1]=='-') {
 167                 usage(nslookup_usage);
 168         }
 169
 170         server_fprint(stdout);
 171         if (is_ip_address(argv[1])) {
 172                 host = gethostbyaddr_wrapper(argv[1]);
 173         } else {
 174                 host = gethostbyname(argv[1]);
 175         }
 176         hostent_fprint(host, stdout);
 177         return( TRUE);
 178 }
 179
 180 /* $Id: nslookup.c,v 1.10 2000/06/19 17:25:40 andersen Exp $ */