1 files changed, 0 insertions, 107 deletions
diff --git a/src/lib/krb5/os/send524.c b/src/lib/krb5/os/send524.c
deleted file mode 100644
index 1792b4930..000000000
--- a/src/lib/krb5/os/send524.c
+++ /dev/null
@@ -1,107 +0,0 @@
-/*
- * Copyright 1990,1991,1997 by the Massachusetts Institute of Technology.
- * All Rights Reserved.
- *
- * Export of this software from the United States of America may
- *   require a specific license from the United States Government.
- *   It is the responsibility of any person or organization contemplating
- *   export to obtain such a license before exporting.
- * 
- * WITHIN THAT CONSTRAINT, permission to use, copy, modify, and
- * distribute this software and its documentation for any purpose and
- * without fee is hereby granted, provided that the above copyright
- * notice appear in all copies and that both that copyright notice and
- * this permission notice appear in supporting documentation, and that
- * the name of M.I.T. not be used in advertising or publicity pertaining
- * to distribution of the software without specific, written prior
- * permission.  Furthermore if you modify this software you must label
- * your software as modified software and not distribute it in such a
- * fashion that it might be confused with the original M.I.T. software.
- * M.I.T. makes no representations about the suitability of
- * this software for any purpose.  It is provided "as is" without express
- * or implied warranty.
- *
- * Send a packet to a service and await a reply, using an exponential
- * backoff retry algorithm.  This is based on krb5_sendto_kdc.
- */
-
-/* Grab socket stuff.  This might want to go away later. */
-#include "fake-addrinfo.h" /* for custom addrinfo if needed */
-#include "k5-int.h"
-
-#ifndef _WIN32
-#include <unistd.h>
-#include <sys/time.h>
-#endif
-
-#include <stdlib.h>
-#include <string.h>
-
-#include "os-proto.h"
-
-/*
- * krb524_sendto_kdc:
- *
- * A slightly modified version of krb5_sendto_kdc.
- *
- * send the formatted request 'message' to a KDC for realm 'realm' and
- * return the response (if any) in 'reply'.
- *
- * If the message is sent and a response is received, 0 is returned,
- * otherwise an error code is returned.
- *
- * The storage for 'reply' is allocated and should be freed by the caller
- * when finished.
- */
-
-krb5_error_code
-krb5int_524_sendto_kdc (context, message, realm, reply, addr, addrlen)
-    krb5_context context;
-    const krb5_data * message;
-    const krb5_data * realm;
-    krb5_data * reply;
-    struct sockaddr *addr;
-    socklen_t *addrlen;
-{
-#if defined(KRB5_KRB4_COMPAT) || defined(_WIN32) /* yuck! */
-    int i;
-    struct addrlist al = ADDRLIST_INIT;
-    struct servent *serv;
-    krb5_error_code retval;
-    int port;
-
-    /*
-     * find KDC location(s) for realm
-     */
-
-    serv = getservbyname(KRB524_SERVICE, "udp");
-    port = serv ? serv->s_port : htons (KRB524_PORT);
-
-    retval = krb5int_locate_server(context, realm, &al, locate_service_krb524,
-				   SOCK_DGRAM, PF_INET);
-    if (retval == KRB5_REALM_CANT_RESOLVE || retval == KRB5_REALM_UNKNOWN) {
-	/* Fallback heuristic: Assume krb524 port on every KDC might
-	   work.  */
-	retval = krb5_locate_kdc(context, realm, &al, 0, SOCK_DGRAM, PF_INET);
-	/*
-	 * Bash the ports numbers.
-	 */
-	if (retval == 0)
-	    for (i = 0; i < al.naddrs; i++) {
-		al.addrs[i].ai->ai_socktype = SOCK_DGRAM;
-		if (al.addrs[i].ai->ai_family == AF_INET)
-		    sa2sin (al.addrs[i].ai->ai_addr)->sin_port = port;
-	    }
-    }
-    if (retval)
-	return retval;
-    if (al.naddrs == 0)
-	return KRB5_REALM_UNKNOWN;
-
-    retval = krb5int_sendto (context, message, &al, NULL, reply, addr, addrlen, NULL, 0, NULL, NULL, NULL);
-    krb5int_free_addrlist (&al);
-    return retval;
-#else
-    return KRB524_KRB4_DISABLED;
-#endif
-}