From a216b194832af73163d962bede78859f0552b3c0 Mon Sep 17 00:00:00 2001
From: leitner <leitner>
Date: Wed, 20 Jan 2010 20:31:00 +0000
Subject: [PATCH] allow binding to a specific IP in tinyldap_standalone (via
 $IP env)

---
 tinyldap.c | 13 ++++++++++---
 1 file changed, 10 insertions(+), 3 deletions(-)

diff --git a/tinyldap.c b/tinyldap.c
index dc485a0..b208e6c 100644
--- a/tinyldap.c
+++ b/tinyldap.c
@@ -2363,9 +2363,16 @@ int main(int argc,char* argv[]) {
     buffer_putsflush(buffer_2,"socket failed!\n");
     exit(1);
   }
-  if (socket_bind6_reuse(sock,V6any,389,0)) {
-    buffer_putsflush(buffer_2,"bind failed!\n");
-    exit(1);
+  {
+    char ip[16];
+    char* IP=(char*)V6any;
+    char* x=getenv("IP");
+    if (x && !x[scan_ip6(x,ip)])
+      IP=ip;
+    if (socket_bind6_reuse(sock,IP,389,0)) {
+      buffer_putsflush(buffer_2,"bind failed!\n");
+      exit(1);
+    }
   }
   if (socket_listen(sock,32)) {
     buffer_putsflush(buffer_2,"listen failed!\n");