From ce6df1eaab07d33544975ffe67a4b7a231cf795a Mon Sep 17 00:00:00 2001
From: Adam Dickmeiss <adam@indexdata.dk>
Date: Thu, 23 Mar 2006 12:07:12 +0000
Subject: [PATCH] WIN32 flock test

---
 util/tstflock.c |   54 +++++++++++++++++++++++++++++++++++++++++++++++++++---
 win/makefile    |   22 ++++++++++++++++++++--
 2 files changed, 71 insertions(+), 5 deletions(-)

diff --git a/util/tstflock.c b/util/tstflock.c
index 0d0be35..3da7f7a 100644
--- a/util/tstflock.c
+++ b/util/tstflock.c
@@ -2,21 +2,37 @@
  * Copyright (C) 1995-2005, Index Data ApS
  * See the file LICENSE for details.
  *
- * $Id: tstflock.c,v 1.1 2006-03-23 09:15:25 adam Exp $
+ * $Id: tstflock.c,v 1.2 2006-03-23 12:07:12 adam Exp $
  */
 
 #include <yaz/test.h>
 #if YAZ_POSIX_THREADS
 #include <pthread.h>
 #endif
+#ifdef WIN32
+#include <windows.h>
+#include <process.h>
+#endif
 
 #include <idzebra/flock.h>
+#if HAVE_UNISTD_H
 #include <unistd.h>
+#endif
 #include <string.h>
 
 static char seq[20];
 static char *seqp = seq;
 
+#define NUM_THREADS 2
+
+static void small_sleep()
+{
+#ifdef WIN32
+    Sleep(50);
+#else
+    sleep(1);
+#endif
+}
 void *run_func(void *arg)
 {
     int i;
@@ -26,7 +42,7 @@ void *run_func(void *arg)
         zebra_lock_w(lh);
      
         *seqp++ = 'L';
-        sleep(1);
+        small_sleep();
         *seqp++ = 'U';
         
         zebra_unlock(lh);
@@ -35,6 +51,37 @@ void *run_func(void *arg)
     return 0;
 }
 
+#ifdef WIN32
+DWORD WINAPI ThreadProc(void *p)
+{
+    run_func(p);
+    return 0;
+}
+
+static void tst1()
+{
+    HANDLE handles[NUM_THREADS];
+    DWORD dwThreadId[NUM_THREADS];
+    int i, id[NUM_THREADS];
+    
+    for (i = 0; i<NUM_THREADS; i++)
+    {
+        void *pData = &id[i];
+        handles[i] = CreateThread(
+            NULL,              // default security attributes
+            0,                 // use default stack size  
+            ThreadProc,        // thread function 
+            pData,             // argument to thread function 
+            0,                 // use default creation flags 
+            &dwThreadId[i]);      // returns the thread identifier 
+    }
+    WaitForMultipleObjects(NUM_THREADS, handles, TRUE, INFINITE);
+    /* join */
+    *seqp++ = '\0';
+}
+#endif
+
+#if YAZ_POSIX_THREADS
 static void tst1()
 {
     pthread_t child_thread[2];
@@ -46,12 +93,13 @@ static void tst1()
     pthread_join(child_thread[1], 0);
     *seqp++ = '\0';
 }
+#endif
 
 int main(int argc, char **argv)
 {
     YAZ_CHECK_INIT(argc, argv);
     tst1();
-
+    printf("seq=%s\n", seq);
 #if 0
     /* does not pass.. for bug 529 */
     YAZ_CHECK(strcmp(seq, "LULULULU") == 0);
diff --git a/win/makefile b/win/makefile
index 75c9b81..1a43b36 100644
--- a/win/makefile
+++ b/win/makefile
@@ -1,5 +1,5 @@
 # Zebra makefile for MS NMAKE
-# $Id: makefile,v 1.41 2006-02-23 14:43:13 adam Exp $
+# $Id: makefile,v 1.42 2006-03-23 12:07:13 adam Exp $
  
 ###########################################################
 ############### Parameters 
@@ -124,11 +124,13 @@ ZEBRA_RES=$(OBJDIR)\idzebra.res
 ZSERVER=$(BINDIR)\zebrasrv.exe
 ZINDEX=$(BINDIR)\zebraidx.exe
 APITEST=$(BINDIR)\apitest.exe
+TSTFLOCK=$(BINDIR)\tstflock.exe
 
 # shortcut names defined here
 zindex: $(ZINDEX)
 zserver: $(ZSERVER)
 apitest: $(APITEST)
+tstflock: $(TSTFLOCK)
 dll: $(DLL) 
 ###########################################################
 ############### Compiler and linker options 
@@ -319,6 +321,8 @@ ZEBRAIDX_OBJS= \
 	$(OBJDIR)\main.obj 
 APITEST_OBJS= \
 	$(OBJDIR)\apitest.obj
+TSTFLOCK_OBJS= \
+	$(OBJDIR)\tstflock.obj
 
 ZEBRALIB_OBJS= \
         $(MOD_ALVIS_OBJS) \
@@ -372,7 +376,7 @@ ZEBRALIB_OBJS= \
 	$(OBJDIR)\kcontrol.obj \
 	$(OBJDIR)\kinput.obj \
 	$(OBJDIR)\limit.obj \
-	$(OBJDIR)\lockutil.obj \
+	$(OBJDIR)\flock.obj \
 	$(OBJDIR)\lookgrep.obj \
 	$(OBJDIR)\lookup.obj \
 	$(OBJDIR)\lookupec.obj \
@@ -527,6 +531,20 @@ $(APITEST) : "$(BINDIR)" $(APITEST_OBJS) $(YAZLIBS)
 		$(APITEST_OBJS)
 <<
 
+$(TSTFLOCK) : "$(BINDIR)" $(TSTFLOCK_OBJS)  $(IMPLIB)
+	@echo Linking $(TSTFLOCK)
+	$(LINK) @<<
+		$(LNKOPT) 
+		$(TSTFLOCK_LINK_OPTIONS)
+		/out:$(TSTFLOCK) 
+		$(IMPLIB)
+		$(YAZLIBS)
+		$(BZIP2LIB)
+		$(LINK_LIBS) 
+		$(TSTFLOCK_OBJS) 
+<<
+
+
 $(DLL) $(IMPLIB): "$(BINDIR)" $(ZEBRALIB_OBJS)
 	@echo Linking the dll  $(DLL)
 	$(LINK) @<<
-- 
1.7.10.4