From 0e4fbb2c1455d9ba97e9ac6e7c9601b7289ab312 Mon Sep 17 00:00:00 2001
From: Assar Westerlund <assar@sics.se>
Date: Tue, 8 Jul 1997 23:16:45 +0000
Subject: [PATCH] adapt addresses to new `HostAddresses'

git-svn-id: svn://svn.h5l.se/heimdal/trunk/heimdal@2047 ec53bebd-3082-4978-b11e-865c3cabbd6b
---
 lib/krb5/address.c | 32 +++++++++++++++++++++++++++++---
 1 file changed, 29 insertions(+), 3 deletions(-)

diff --git a/lib/krb5/address.c b/lib/krb5/address.c
index f0b5aff3b..79d342e10 100644
--- a/lib/krb5/address.c
+++ b/lib/krb5/address.c
@@ -2,6 +2,9 @@
 
 RCSID("$Id$");
 
+#if 0
+/* This is the supposedly MIT-api version */
+
 krb5_boolean
 krb5_address_search(krb5_context context,
 		    const krb5_address *addr,
@@ -14,6 +17,20 @@ krb5_address_search(krb5_context context,
       return TRUE;
   return FALSE;
 }
+#endif
+
+krb5_boolean
+krb5_address_search(krb5_context context,
+		    const krb5_address *addr,
+		    const krb5_addresses *addrlist)
+{
+    int i;
+
+    for (i = 0; i < addrlist->len; ++i)
+	if (krb5_address_compare (context, addr, addrlist->val[i]))
+	    return TRUE;
+    return FALSE;
+}
 
 krb5_boolean
 krb5_address_compare(krb5_context context,
@@ -34,10 +51,11 @@ krb5_address_order(krb5_context context,
 
 krb5_error_code
 krb5_copy_addresses(krb5_context context,
-		    krb5_address *const *inaddr,
-		    krb5_address ***outaddr)
+		    const krb5_addresses *inaddr,
+		    krb5_addresses *outaddr)
 {
-  abort ();
+    copy_HostAddresses(inaddr, outaddr);
+    return 0;
 }
 
 krb5_error_code
@@ -47,3 +65,11 @@ krb5_free_address(krb5_context context,
   krb5_data_free (&address->address);
   return 0;
 }
+
+krb5_error_code
+krb5_free_addresses(krb5_context context,
+		    krb5_addresses *addresses)
+{
+    free_HostAddresses(addresses);
+    return 0;
+}