sa2sin
faddr->address->contents = (krb5_octet *) &sa2sin(sa)->sin_addr;
faddr->port = ntohs(sa2sin(sa)->sin_port);
sa2sin(addr)->sin_port = port;
sa2sin (a->ai_addr)->sin_port = htons(DEFAULT_KPASSWD_PORT);
he = res_gethostbyaddr((char*)(&sa2sin(addr)->sin_addr),
sizeof(sa2sin(addr)->sin_addr), AF_INET);
ptr = &sa2sin(aip->ai_addr)->sin_addr;
addr = (char *)&sa2sin(sa)->sin_addr;
port = (sa2sin(sa)->sin_port); /* network byte order */