openssh/canohost.c

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