canohost.c

   1 /* $OpenBSD: canohost.c,v 1.58 2006/07/22 20:48:22 stevesk Exp $ */
   2 /*
   3  * Author: Tatu Ylonen <ylo@cs.hut.fi>
   4  * Copyright (c) 1995 Tatu Ylonen <ylo@cs.hut.fi>, Espoo, Finland
   5  *                    All rights reserved
   6  * Functions for returning the canonical host name of the remote site.
   7  *
   8  * As far as I am concerned, the code I have written for this software
   9  * can be used freely for any purpose.  Any derived versions of this
  10  * software must be clearly marked as such, and if the derived work is
  11  * incompatible with the protocol description in the RFC file, it must be
  12  * called by a name other than "ssh" or "Secure Shell".
  13  */
  14
  15 #include "includes.h"
  16
  17 #include <sys/types.h>
  18 #include <sys/socket.h>
  19
  20 #include <netinet/in.h>
  21
  22 #include <ctype.h>
  23 #include <errno.h>
  24 #if defined(HAVE_NETDB_H)
  25 # include <netdb.h>
  26 #endif
  27 #include <string.h>
  28
  29 #include "packet.h"
  30 #include "xmalloc.h"
  31 #include "log.h"
  32 #include "canohost.h"
  33
  34 static void check_ip_options(int, char *);
  35
  36 /*
  37  * Return the canonical name of the host at the other end of the socket. The
  38  * caller should free the returned string with xfree.
  39  */
  40
  41 static char *
  42 get_remote_hostname(int sock, int use_dns)
  43 {
  44         struct sockaddr_storage from;
  45         int i;
  46         socklen_t fromlen;
  47         struct addrinfo hints, *ai, *aitop;
  48         char name[NI_MAXHOST], ntop[NI_MAXHOST], ntop2[NI_MAXHOST];
  49
  50         /* Get IP address of client. */
  51         fromlen = sizeof(from);
  52         memset(&from, 0, sizeof(from));
  53         if (getpeername(sock, (struct sockaddr *)&from, &fromlen) < 0) {
  54                 debug("getpeername failed: %.100s", strerror(errno));
  55                 cleanup_exit(255);
  56         }
  57
  58         if (from.ss_family == AF_INET)
  59                 check_ip_options(sock, ntop);
  60
  61         ipv64_normalise_mapped(&from, &fromlen);
  62
  63         if (from.ss_family == AF_INET6)
  64                 fromlen = sizeof(struct sockaddr_in6);
  65
  66         if (getnameinfo((struct sockaddr *)&from, fromlen, ntop, sizeof(ntop),
  67             NULL, 0, NI_NUMERICHOST) != 0)
  68                 fatal("get_remote_hostname: getnameinfo NI_NUMERICHOST failed");
  69
  70         if (!use_dns)
  71                 return xstrdup(ntop);
  72
  73         debug3("Trying to reverse map address %.100s.", ntop);
  74         /* Map the IP address to a host name. */
  75         if (getnameinfo((struct sockaddr *)&from, fromlen, name, sizeof(name),
  76             NULL, 0, NI_NAMEREQD) != 0) {
  77                 /* Host name not found.  Use ip address. */
  78                 return xstrdup(ntop);
  79         }
  80
  81         /*
  82          * if reverse lookup result looks like a numeric hostname,
  83          * someone is trying to trick us by PTR record like following:
  84          *      1.1.1.10.in-addr.arpa.  IN PTR  2.3.4.5
  85          */
  86         memset(&hints, 0, sizeof(hints));
  87         hints.ai_socktype = SOCK_DGRAM; /*dummy*/
  88         hints.ai_flags = AI_NUMERICHOST;
  89         if (getaddrinfo(name, "0", &hints, &ai) == 0) {
  90                 logit("Nasty PTR record \"%s\" is set up for %s, ignoring",
  91                     name, ntop);
  92                 freeaddrinfo(ai);
  93                 return xstrdup(ntop);
  94         }
  95
  96         /*
  97          * Convert it to all lowercase (which is expected by the rest
  98          * of this software).
  99          */
 100         for (i = 0; name[i]; i++)
 101                 if (isupper(name[i]))
 102                         name[i] = (char)tolower(name[i]);
 103         /*
 104          * Map it back to an IP address and check that the given
 105          * address actually is an address of this host.  This is
 106          * necessary because anyone with access to a name server can
 107          * define arbitrary names for an IP address. Mapping from
 108          * name to IP address can be trusted better (but can still be
 109          * fooled if the intruder has access to the name server of
 110          * the domain).
 111          */
 112         memset(&hints, 0, sizeof(hints));
 113         hints.ai_family = from.ss_family;
 114         hints.ai_socktype = SOCK_STREAM;
 115         if (getaddrinfo(name, NULL, &hints, &aitop) != 0) {
 116                 logit("reverse mapping checking getaddrinfo for %.700s "
 117                     "[%s] failed - POSSIBLE BREAK-IN ATTEMPT!", name, ntop);
 118                 return xstrdup(ntop);
 119         }
 120         /* Look for the address from the list of addresses. */
 121         for (ai = aitop; ai; ai = ai->ai_next) {
 122                 if (getnameinfo(ai->ai_addr, ai->ai_addrlen, ntop2,
 123                     sizeof(ntop2), NULL, 0, NI_NUMERICHOST) == 0 &&
 124                     (strcmp(ntop, ntop2) == 0))
 125                                 break;
 126         }
 127         freeaddrinfo(aitop);
 128         /* If we reached the end of the list, the address was not there. */
 129         if (!ai) {
 130                 /* Address not found for the host name. */
 131                 logit("Address %.100s maps to %.600s, but this does not "
 132                     "map back to the address - POSSIBLE BREAK-IN ATTEMPT!",
 133                     ntop, name);
 134                 return xstrdup(ntop);
 135         }
 136         return xstrdup(name);
 137 }
 138
 139 /*
 140  * If IP options are supported, make sure there are none (log and
 141  * disconnect them if any are found).  Basically we are worried about
 142  * source routing; it can be used to pretend you are somebody
 143  * (ip-address) you are not. That itself may be "almost acceptable"
 144  * under certain circumstances, but rhosts autentication is useless
 145  * if source routing is accepted. Notice also that if we just dropped
 146  * source routing here, the other side could use IP spoofing to do
 147  * rest of the interaction and could still bypass security.  So we
 148  * exit here if we detect any IP options.
 149  */
 150 /* IPv4 only */
 151 static void
 152 check_ip_options(int sock, char *ipaddr)
 153 {
 154 #ifdef IP_OPTIONS
 155         u_char options[200];
 156         char text[sizeof(options) * 3 + 1];
 157         socklen_t option_size;
 158         u_int i;
 159         int ipproto;
 160         struct protoent *ip;
 161
 162         if ((ip = getprotobyname("ip")) != NULL)
 163                 ipproto = ip->p_proto;
 164         else
 165                 ipproto = IPPROTO_IP;
 166         option_size = sizeof(options);
 167         if (getsockopt(sock, ipproto, IP_OPTIONS, options,
 168             &option_size) >= 0 && option_size != 0) {
 169                 text[0] = '\0';
 170                 for (i = 0; i < option_size; i++)
 171                         snprintf(text + i*3, sizeof(text) - i*3,
 172                             " %2.2x", options[i]);
 173                 fatal("Connection from %.100s with IP options:%.800s",
 174                     ipaddr, text);
 175         }
 176 #endif /* IP_OPTIONS */
 177 }
 178
 179 void
 180 ipv64_normalise_mapped(struct sockaddr_storage *addr, socklen_t *len)
 181 {
 182         struct sockaddr_in6 *a6 = (struct sockaddr_in6 *)addr;
 183         struct sockaddr_in *a4 = (struct sockaddr_in *)addr;
 184         struct in_addr inaddr;
 185         u_int16_t port;
 186
 187         if (addr->ss_family != AF_INET6 ||
 188             !IN6_IS_ADDR_V4MAPPED(&a6->sin6_addr))
 189                 return;
 190
 191         debug3("Normalising mapped IPv4 in IPv6 address");
 192
 193         memcpy(&inaddr, ((char *)&a6->sin6_addr) + 12, sizeof(inaddr));
 194         port = a6->sin6_port;
 195
 196         memset(addr, 0, sizeof(*a4));
 197
 198         a4->sin_family = AF_INET;
 199         *len = sizeof(*a4);
 200         memcpy(&a4->sin_addr, &inaddr, sizeof(inaddr));
 201         a4->sin_port = port;
 202 }
 203
 204 /*
 205  * Return the canonical name of the host in the other side of the current
 206  * connection.  The host name is cached, so it is efficient to call this
 207  * several times.
 208  */
 209
 210 const char *
 211 get_canonical_hostname(int use_dns)
 212 {
 213         char *host;
 214         static char *canonical_host_name = NULL;
 215         static char *remote_ip = NULL;
 216
 217         /* Check if we have previously retrieved name with same option. */
 218         if (use_dns && canonical_host_name != NULL)
 219                 return canonical_host_name;
 220         if (!use_dns && remote_ip != NULL)
 221                 return remote_ip;
 222
 223         /* Get the real hostname if socket; otherwise return UNKNOWN. */
 224         if (packet_connection_is_on_socket())
 225                 host = get_remote_hostname(packet_get_connection_in(), use_dns);
 226         else
 227                 host = "UNKNOWN";
 228
 229         if (use_dns)
 230                 canonical_host_name = host;
 231         else
 232                 remote_ip = host;
 233         return host;
 234 }
 235
 236 /*
 237  * Returns the local/remote IP-address/hostname of socket as a string.
 238  * The returned string must be freed.
 239  */
 240 static char *
 241 get_socket_address(int sock, int remote, int flags)
 242 {
 243         struct sockaddr_storage addr;
 244         socklen_t addrlen;
 245         char ntop[NI_MAXHOST];
 246         int r;
 247
 248         /* Get IP address of client. */
 249         addrlen = sizeof(addr);
 250         memset(&addr, 0, sizeof(addr));
 251
 252         if (remote) {
 253                 if (getpeername(sock, (struct sockaddr *)&addr, &addrlen)
 254                     < 0)
 255                         return NULL;
 256         } else {
 257                 if (getsockname(sock, (struct sockaddr *)&addr, &addrlen)
 258                     < 0)
 259                         return NULL;
 260         }
 261
 262         /* Work around Linux IPv6 weirdness */
 263         if (addr.ss_family == AF_INET6)
 264                 addrlen = sizeof(struct sockaddr_in6);
 265
 266         ipv64_normalise_mapped(&addr, &addrlen);
 267
 268         /* Get the address in ascii. */
 269         if ((r = getnameinfo((struct sockaddr *)&addr, addrlen, ntop,
 270             sizeof(ntop), NULL, 0, flags)) != 0) {
 271                 error("get_socket_address: getnameinfo %d failed: %s", flags,
 272                     r == EAI_SYSTEM ? strerror(errno) : gai_strerror(r));
 273                 return NULL;
 274         }
 275         return xstrdup(ntop);
 276 }
 277
 278 char *
 279 get_peer_ipaddr(int sock)
 280 {
 281         char *p;
 282
 283         if ((p = get_socket_address(sock, 1, NI_NUMERICHOST)) != NULL)
 284                 return p;
 285         return xstrdup("UNKNOWN");
 286 }
 287
 288 char *
 289 get_local_ipaddr(int sock)
 290 {
 291         char *p;
 292
 293         if ((p = get_socket_address(sock, 0, NI_NUMERICHOST)) != NULL)
 294                 return p;
 295         return xstrdup("UNKNOWN");
 296 }
 297
 298 char *
 299 get_local_name(int sock)
 300 {
 301         return get_socket_address(sock, 0, NI_NAMEREQD);
 302 }
 303
 304 /*
 305  * Returns the IP-address of the remote host as a string.  The returned
 306  * string must not be freed.
 307  */
 308
 309 const char *
 310 get_remote_ipaddr(void)
 311 {
 312         static char *canonical_host_ip = NULL;
 313
 314         /* Check whether we have cached the ipaddr. */
 315         if (canonical_host_ip == NULL) {
 316                 if (packet_connection_is_on_socket()) {
 317                         canonical_host_ip =
 318                             get_peer_ipaddr(packet_get_connection_in());
 319                         if (canonical_host_ip == NULL)
 320                                 cleanup_exit(255);
 321                 } else {
 322                         /* If not on socket, return UNKNOWN. */
 323                         canonical_host_ip = xstrdup("UNKNOWN");
 324                 }
 325         }
 326         return canonical_host_ip;
 327 }
 328
 329 const char *
 330 get_remote_name_or_ip(u_int utmp_len, int use_dns)
 331 {
 332         static const char *remote = "";
 333         if (utmp_len > 0)
 334                 remote = get_canonical_hostname(use_dns);
 335         if (utmp_len == 0 || strlen(remote) > utmp_len)
 336                 remote = get_remote_ipaddr();
 337         return remote;
 338 }
 339
 340 /* Returns the local/remote port for the socket. */
 341
 342 static int
 343 get_sock_port(int sock, int local)
 344 {
 345         struct sockaddr_storage from;
 346         socklen_t fromlen;
 347         char strport[NI_MAXSERV];
 348         int r;
 349
 350         /* Get IP address of client. */
 351         fromlen = sizeof(from);
 352         memset(&from, 0, sizeof(from));
 353         if (local) {
 354                 if (getsockname(sock, (struct sockaddr *)&from, &fromlen) < 0) {
 355                         error("getsockname failed: %.100s", strerror(errno));
 356                         return 0;
 357                 }
 358         } else {
 359                 if (getpeername(sock, (struct sockaddr *)&from, &fromlen) < 0) {
 360                         debug("getpeername failed: %.100s", strerror(errno));
 361                         return -1;
 362                 }
 363         }
 364
 365         /* Work around Linux IPv6 weirdness */
 366         if (from.ss_family == AF_INET6)
 367                 fromlen = sizeof(struct sockaddr_in6);
 368
 369         /* Return port number. */
 370         if ((r = getnameinfo((struct sockaddr *)&from, fromlen, NULL, 0,
 371             strport, sizeof(strport), NI_NUMERICSERV)) != 0)
 372                 fatal("get_sock_port: getnameinfo NI_NUMERICSERV failed: %s",
 373                     r == EAI_SYSTEM ? strerror(errno) : gai_strerror(r));
 374         return atoi(strport);
 375 }
 376
 377 /* Returns remote/local port number for the current connection. */
 378
 379 static int
 380 get_port(int local)
 381 {
 382         /*
 383          * If the connection is not a socket, return 65535.  This is
 384          * intentionally chosen to be an unprivileged port number.
 385          */
 386         if (!packet_connection_is_on_socket())
 387                 return 65535;
 388
 389         /* Get socket and return the port number. */
 390         return get_sock_port(packet_get_connection_in(), local);
 391 }
 392
 393 int
 394 get_peer_port(int sock)
 395 {
 396         return get_sock_port(sock, 0);
 397 }
 398
 399 int
 400 get_remote_port(void)
 401 {
 402         static int port = -1;
 403
 404         /* Cache to avoid getpeername() on a dead connection */
 405         if (port == -1)
 406                 port = get_port(0);
 407
 408         return port;
 409 }
 410
 411 int
 412 get_local_port(void)
 413 {
 414         return get_port(1);
 415 }