-/**
- * Return the IP addr of the client as a string
- **/
-char *client_addr(int fd)
-{
- struct sockaddr ss;
- int length = sizeof(ss);
- static char addr_buf[100];
- static int initialised;
-
- if (initialised) return addr_buf;
-
- initialised = 1;
-
- if (getpeername(fd, &ss, &length)) {
- exit_cleanup(RERR_SOCKETIO);
- }
-
- getnameinfo(&ss, length,
- addr_buf, sizeof(addr_buf), NULL, 0, NI_NUMERICHOST);
- return addr_buf;
-}
-
-
-/**
- * Return the DNS name of the client
- **/
-char *client_name(int fd)
-{
- struct sockaddr ss;
- int length = sizeof(ss);
- static char name_buf[100];
- static char port_buf[100];
- char *def = "UNKNOWN";
- static int initialised;
- struct addrinfo hints, *res, *res0;
- int error;
-
- if (initialised) return name_buf;
-
- initialised = 1;
-
- strcpy(name_buf,def);
-
- if (getpeername(fd, (struct sockaddr *)&ss, &length)) {
- exit_cleanup(RERR_SOCKETIO);
- }
-
-#ifdef INET6
- if (ss.ss_family == AF_INET6 &&
- IN6_IS_ADDR_V4MAPPED(&((struct sockaddr_in6 *)&ss)->sin6_addr)) {
- struct sockaddr_in6 sin6;
- struct sockaddr_in *sin;
-
- memcpy(&sin6, &ss, sizeof(sin6));
- sin = (struct sockaddr_in *)&ss;
- memset(sin, 0, sizeof(*sin));
- sin->sin_family = AF_INET;
- length = sizeof(struct sockaddr_in);
-#ifdef HAVE_SOCKADDR_LEN
- sin->sin_len = length;
-#endif
- sin->sin_port = sin6.sin6_port;
- memcpy(&sin->sin_addr, &sin6.sin6_addr.s6_addr[12],
- sizeof(sin->sin_addr));
- }
-#endif
-
- /* reverse lookup */
- if (getnameinfo((struct sockaddr *)&ss, length,
- name_buf, sizeof(name_buf), port_buf, sizeof(port_buf),
- NI_NAMEREQD | NI_NUMERICSERV) != 0) {
- strcpy(name_buf, def);
- rprintf(FERROR, "reverse name lookup failed\n");
- }
-
- /* forward lookup */
- memset(&hints, 0, sizeof(hints));
- hints.ai_family = PF_UNSPEC;
- hints.ai_flags = AI_CANONNAME;
- hints.ai_socktype = SOCK_STREAM;
- error = getaddrinfo(name_buf, port_buf, &hints, &res0);
- if (error) {
- strcpy(name_buf, def);
- rprintf(FERROR,
- RSYNC_NAME ": forward name lookup for %s failed: %s\n",
- port_buf,
- gai_strerror(error));
- return name_buf;
- }
-
- /* XXX sin6_flowinfo and other fields */
- for (res = res0; res; res = res->ai_next) {
- if (res->ai_family != ss.sa_family)
- continue;
- if (res->ai_addrlen != length)
- continue;
- if (memcmp(res->ai_addr, &ss, res->ai_addrlen) == 0)
- break;
- }
-
- /* TODO: Do a forward lookup as well to prevent spoofing */
-
- if (res == NULL) {
- strcpy(name_buf, def);
- rprintf(FERROR,
- "reverse name lookup mismatch - spoofed address?\n");
- }
-
- freeaddrinfo(res0);
- return name_buf;
-}
-
-/**
- * Convert a string to an IP address. The string can be a name or
- * dotted decimal number.
- *
- * Returns a pointer to a static in_addr struct -- if you call this
- * more than once then you should copy it.
- *
- * TODO: Use getaddrinfo() instead, or make this function call getnameinfo
- **/
-struct in_addr *ip_address(const char *str)
-{
- static struct in_addr ret;
- struct hostent *hp;
-
- if (!str) {
- rprintf (FERROR, "ip_address received NULL name\n");
- return NULL;
- }
-
- /* try as an IP address */
- if (inet_aton(str, &ret) != 0) {
- return &ret;
- }
-
- /* otherwise assume it's a network name of some sort and use
- gethostbyname */
- if ((hp = gethostbyname (str)) == 0) {
- rprintf(FERROR, "gethostbyname failed for \"%s\": unknown host?\n",str);
- return NULL;
- }
-
- if (hp->h_addr == NULL) {
- rprintf(FERROR, "gethostbyname: host address is invalid for host \"%s\"\n",str);
- return NULL;
- }
-
- if (hp->h_length > sizeof ret) {
- rprintf(FERROR, "gethostbyname: host address for \"%s\" is too large\n",
- str);
- return NULL;
- }
-
- if (hp->h_addrtype != AF_INET) {
- rprintf (FERROR, "gethostname: host address for \"%s\" is not IPv4\n",
- str);
- return NULL;
- }
-
- /* This is kind of difficult. The only field in ret is
- s_addr, which is the IP address as a 32-bit int. On
- UNICOS, s_addr is in fact a *bitfield* for reasons best
- know to Cray. This means we can't memcpy in to it. On the
- other hand, h_addr is a char*, so we can't just assign.
-
- Since there's meant to be only one field inside the in_addr
- structure we will try just copying over the top and see how
- that goes. */
- memcpy (&ret, hp->h_addr, hp->h_length);
-
- return &ret;
-}
-
-