[Emacs-diffs] feature/async-dns 51d728c 7/7: src/process.c Correctly convert AF_INET6 addresses

[Lars Ingebrigtsen]

branch: feature/async-dns
commit 51d728c8345416ab50a378a789dde645a7247499
Author: David Edmondson <address@hidden>
Commit: Lars Ingebrigtsen <address@hidden>

    src/process.c Correctly convert AF_INET6 addresses
    
    * src/process.c (conv_lisp_to_sockaddr): AF_INET6 addresses are
    converted to a list of 16 bit quantities by
    conv_sockaddr_to_lisp(). conv_lisp_to_sockaddr() should follow the
    same scheme rather than expecting a (longer) list of 8 bit
    quantities.
---
 src/process.c |    2 +-
 1 files changed, 1 insertions(+), 1 deletions(-)

diff --git a/src/process.c b/src/process.c
index 9653eba..497b069 100644
--- a/src/process.c
+++ b/src/process.c
@@ -2372,7 +2372,7 @@ conv_lisp_to_sockaddr (int family, Lisp_Object address, 
struct sockaddr *sa, int
        {
          struct sockaddr_in6 *sin6 = (struct sockaddr_in6 *) sa;
          uint16_t *ip6 = (uint16_t *)&sin6->sin6_addr;
-         len = sizeof (sin6->sin6_addr) + 1;
+         len = sizeof (sin6->sin6_addr) / 2 + 1;
          hostport = XINT (p->contents[--len]);
          sin6->sin6_port = htons (hostport);
          for (i = 0; i < len; i++)