fix
[oweals/gnunet.git] / src / util / disk.c
index 80558ea0ecead6bae5218f82fa83fbc50efcf00c..12f985791baaf3e63749707e77bcd899f2ef5620 100644 (file)
 #include "gnunet_disk_lib.h"
 #include "gnunet_scheduler_lib.h"
 #include "gnunet_strings_lib.h"
+#include "gnunet_crypto_lib.h"
 #include "disk.h"
 
+#define LOG(kind,...) GNUNET_log_from (kind, "util", __VA_ARGS__)
+
+#define LOG_STRERROR(kind,syscall) GNUNET_log_from_strerror (kind, "util", syscall)
+
+#define LOG_STRERROR_FILE(kind,syscall,filename) GNUNET_log_from_strerror_file (kind, "util", syscall, filename)
+
+#define DEBUG_NPIPE GNUNET_EXTRA_LOGGING
+
+#define DEBUG_PIPE GNUNET_EXTRA_LOGGING
 
 /**
  * Block size for IO for copying files.
 #include <sys/statvfs.h>
 #else
 #ifdef MINGW
-#define        _IFMT           0170000 /* type of file */
-#define        _IFLNK          0120000 /* symbolic link */
+#ifndef PIPE_BUF
+#define PIPE_BUF        512
+ULONG PipeSerialNumber;
+#endif
+#define        _IFMT           0170000 /* type of file */
+#define        _IFLNK          0120000 /* symbolic link */
 #define  S_ISLNK(m)    (((m)&_IFMT) == _IFLNK)
 #else
 #error PORT-ME: need to port statfs (how much space is left on the drive?)
@@ -101,7 +115,8 @@ struct GetFileSizeData
 };
 
 
-int translate_unix_perms(enum GNUNET_DISK_AccessPermissions perm)
+int
+translate_unix_perms (enum GNUNET_DISK_AccessPermissions perm)
 {
   int mode;
 
@@ -130,7 +145,7 @@ int translate_unix_perms(enum GNUNET_DISK_AccessPermissions perm)
 
 
 /**
- * Iterate over all files in the given directory and 
+ * Iterate over all files in the given directory and
  * accumulate their size.
  *
  * @param cls closure of type "struct GetFileSizeData"
@@ -141,6 +156,7 @@ static int
 getSizeRec (void *cls, const char *fn)
 {
   struct GetFileSizeData *gfsd = cls;
+
 #ifdef HAVE_STAT64
   struct stat64 buf;
 #else
@@ -150,24 +166,23 @@ getSizeRec (void *cls, const char *fn)
 #ifdef HAVE_STAT64
   if (0 != STAT64 (fn, &buf))
     {
-      GNUNET_log_strerror_file (GNUNET_ERROR_TYPE_WARNING, "stat64", fn);
+      LOG_STRERROR_FILE (GNUNET_ERROR_TYPE_WARNING, "stat64", fn);
       return GNUNET_SYSERR;
     }
 #else
   if (0 != STAT (fn, &buf))
     {
-      GNUNET_log_strerror_file (GNUNET_ERROR_TYPE_WARNING, "stat", fn);
+      LOG_STRERROR_FILE (GNUNET_ERROR_TYPE_WARNING, "stat", fn);
       return GNUNET_SYSERR;
     }
 #endif
   if ((!S_ISLNK (buf.st_mode)) || (gfsd->include_sym_links == GNUNET_YES))
     gfsd->total += buf.st_size;
-  if ((S_ISDIR (buf.st_mode)) &&
-      (0 == ACCESS (fn, X_OK)) &&
+  if ((S_ISDIR (buf.st_mode)) && (0 == ACCESS (fn, X_OK)) &&
       ((!S_ISLNK (buf.st_mode)) || (gfsd->include_sym_links == GNUNET_YES)))
     {
       if (GNUNET_SYSERR == GNUNET_DISK_directory_scan (fn, &getSizeRec, gfsd))
-        return GNUNET_SYSERR;
+       return GNUNET_SYSERR;
     }
   return GNUNET_OK;
 }
@@ -200,7 +215,7 @@ GNUNET_DISK_handle_invalid (const struct GNUNET_DISK_FileHandle *h)
  */
 off_t
 GNUNET_DISK_file_seek (const struct GNUNET_DISK_FileHandle * h, off_t offset,
-                       enum GNUNET_DISK_Seek whence)
+                      enum GNUNET_DISK_Seek whence)
 {
   if (h == NULL)
     {
@@ -210,6 +225,7 @@ GNUNET_DISK_file_seek (const struct GNUNET_DISK_FileHandle * h, off_t offset,
 
 #ifdef MINGW
   DWORD ret;
+
   static DWORD t[] = {[GNUNET_DISK_SEEK_SET] = FILE_BEGIN,
     [GNUNET_DISK_SEEK_CUR] = FILE_CURRENT,[GNUNET_DISK_SEEK_END] = FILE_END
   };
@@ -244,8 +260,8 @@ GNUNET_DISK_file_seek (const struct GNUNET_DISK_FileHandle * h, off_t offset,
  * @return GNUNET_SYSERR on error, GNUNET_OK on success
  */
 int
-GNUNET_DISK_file_size (const char *filename,
-                       uint64_t * size, int includeSymLinks)
+GNUNET_DISK_file_size (const char *filename, uint64_t * size,
+                      int includeSymLinks)
 {
   struct GetFileSizeData gfsd;
   int ret;
@@ -275,8 +291,8 @@ GNUNET_DISK_file_size (const char *filename,
  * @return GNUNET_OK on success
  */
 int
-GNUNET_DISK_file_get_identifiers (const char *filename,
-                                  uint64_t * dev, uint64_t * ino)
+GNUNET_DISK_file_get_identifiers (const char *filename, uint64_t * dev,
+                                 uint64_t * ino)
 {
 #if LINUX
   struct stat sbuf;
@@ -292,28 +308,28 @@ GNUNET_DISK_file_get_identifiers (const char *filename,
   struct stat sbuf;
   struct statfs fbuf;
 
-  if ( (0 == stat (filename, &sbuf)) &&
-       (0 == statfs (filename, &fbuf) ) )
+  if ((0 == stat (filename, &sbuf)) && (0 == statfs (filename, &fbuf)))
     {
-      *dev = ((uint64_t) fbuf.f_fsid.val[0]) << 32 || ((uint64_t) fbuf.f_fsid.val[1]);
+      *dev = ((uint64_t) fbuf.f_fsid.val[0]) << 32 ||
+       ((uint64_t) fbuf.f_fsid.val[1]);
       *ino = (uint64_t) sbuf.st_ino;
       return GNUNET_OK;
-    }  
+    }
 #elif WINDOWS
   // FIXME NILS: test this
   struct GNUNET_DISK_FileHandle *fh;
   BY_HANDLE_FILE_INFORMATION info;
   int succ;
 
-  fh = GNUNET_DISK_file_open(filename, GNUNET_DISK_OPEN_READ, 0);
+  fh = GNUNET_DISK_file_open (filename, GNUNET_DISK_OPEN_READ, 0);
   if (fh == NULL)
     return GNUNET_SYSERR;
-  succ = GetFileInformationByHandle(fh->h, &info);
-  GNUNET_DISK_file_close(fh);
+  succ = GetFileInformationByHandle (fh->h, &info);
+  GNUNET_DISK_file_close (fh);
   if (succ)
     {
       *dev = info.dwVolumeSerialNumber;
-      *ino = ((info.nFileIndexHigh << sizeof(DWORD)) | info.nFileIndexLow);
+      *ino = ((info.nFileIndexHigh << sizeof (DWORD)) | info.nFileIndexLow);
       return GNUNET_OK;
     }
   else
@@ -329,7 +345,7 @@ GNUNET_DISK_file_get_identifiers (const char *filename,
  * an absolute path, the current 'TMPDIR' will be prepended.  In any case,
  * 6 random characters will be appended to the name to create a unique
  * filename.
- * 
+ *
  * @param t component to use for the name;
  *        does NOT contain "XXXXXX" or "/tmp/".
  * @return NULL on error, otherwise name of fresh
@@ -343,8 +359,11 @@ GNUNET_DISK_mktemp (const char *t)
   char *tmpl;
   char *fn;
 
-  if ( (t[0] != '/') &&
-       (t[0] != '\\') )
+  if ((t[0] != '/') && (t[0] != '\\')
+#if WINDOWS
+      && !(isalpha ((int) t[0]) && (t[0] != '\0') && (t[1] == ':'))
+#endif
+    )
     {
       tmpdir = getenv ("TMPDIR");
       tmpdir = tmpdir ? tmpdir : "/tmp";
@@ -369,12 +388,12 @@ GNUNET_DISK_mktemp (const char *t)
   fd = mkstemp (fn);
   if (fd == -1)
     {
-      GNUNET_log_strerror_file (GNUNET_ERROR_TYPE_ERROR, "mkstemp", fn);
+      LOG_STRERROR_FILE (GNUNET_ERROR_TYPE_ERROR, "mkstemp", fn);
       GNUNET_free (fn);
       return NULL;
     }
   if (0 != CLOSE (fd))
-    GNUNET_log_strerror_file (GNUNET_ERROR_TYPE_WARNING, "close", fn);
+    LOG_STRERROR_FILE (GNUNET_ERROR_TYPE_WARNING, "close", fn);
   return fn;
 }
 
@@ -394,7 +413,7 @@ GNUNET_DISK_get_blocks_available (const char *part)
 
   if (0 != statvfs (part, &buf))
     {
-      GNUNET_log_strerror_file (GNUNET_ERROR_TYPE_WARNING, "statfs", part);
+      LOG_STRERROR_FILE (GNUNET_ERROR_TYPE_WARNING, "statfs", part);
       return -1;
     }
   return buf.f_bavail;
@@ -412,18 +431,19 @@ GNUNET_DISK_get_blocks_available (const char *part)
   szDrive[3] = 0;
   if (!GetDiskFreeSpace (szDrive, &dwDummy, &dwDummy, &dwBlocks, &dwDummy))
     {
-      GNUNET_log (GNUNET_ERROR_TYPE_WARNING,
-                  _("`%s' failed for drive `%s': %u\n"),
-                  "GetDiskFreeSpace", szDrive, GetLastError ());
+      LOG (GNUNET_ERROR_TYPE_WARNING,
+          _("`%s' failed for drive `%s': %u\n"), "GetDiskFreeSpace",
+          szDrive, GetLastError ());
 
       return -1;
     }
   return dwBlocks;
 #else
   struct statfs s;
+
   if (0 != statfs (part, &s))
     {
-      GNUNET_log_strerror_file (GNUNET_ERROR_TYPE_WARNING, "statfs", part);
+      LOG_STRERROR_FILE (GNUNET_ERROR_TYPE_WARNING, "statfs", part);
       return -1;
     }
   return s.f_bavail;
@@ -451,17 +471,17 @@ GNUNET_DISK_directory_test (const char *fil)
   if (ret != 0)
     {
       if (errno != ENOENT)
-        {
-          GNUNET_log_strerror_file (GNUNET_ERROR_TYPE_WARNING, "stat", fil);
-          return GNUNET_SYSERR;
-        }
+       {
+         LOG_STRERROR_FILE (GNUNET_ERROR_TYPE_WARNING, "stat", fil);
+         return GNUNET_SYSERR;
+       }
       return GNUNET_NO;
     }
   if (!S_ISDIR (filestat.st_mode))
     return GNUNET_NO;
   if (ACCESS (fil, R_OK | X_OK) < 0)
     {
-      GNUNET_log_strerror_file (GNUNET_ERROR_TYPE_WARNING, "access", fil);
+      LOG_STRERROR_FILE (GNUNET_ERROR_TYPE_WARNING, "access", fil);
       return GNUNET_SYSERR;
     }
   return GNUNET_YES;
@@ -490,11 +510,11 @@ GNUNET_DISK_file_test (const char *fil)
   if (ret != 0)
     {
       if (errno != ENOENT)
-        {
-          GNUNET_log_strerror_file (GNUNET_ERROR_TYPE_WARNING, "stat", rdir);
-          GNUNET_free (rdir);
-          return GNUNET_SYSERR;
-        }
+       {
+         LOG_STRERROR_FILE (GNUNET_ERROR_TYPE_WARNING, "stat", rdir);
+         GNUNET_free (rdir);
+         return GNUNET_SYSERR;
+       }
       GNUNET_free (rdir);
       return GNUNET_NO;
     }
@@ -505,7 +525,7 @@ GNUNET_DISK_file_test (const char *fil)
     }
   if (ACCESS (rdir, R_OK) < 0)
     {
-      GNUNET_log_strerror_file (GNUNET_ERROR_TYPE_WARNING, "access", rdir);
+      LOG_STRERROR_FILE (GNUNET_ERROR_TYPE_WARNING, "access", rdir);
       GNUNET_free (rdir);
       return GNUNET_SYSERR;
     }
@@ -533,55 +553,54 @@ GNUNET_DISK_directory_create (const char *dir)
 
   len = strlen (rdir);
 #ifndef MINGW
-  pos = 1;                      /* skip heading '/' */
+  pos = 1;                     /* skip heading '/' */
 #else
   /* Local or Network path? */
   if (strncmp (rdir, "\\\\", 2) == 0)
     {
       pos = 2;
       while (rdir[pos])
-        {
-          if (rdir[pos] == '\\')
-            {
-              pos++;
-              break;
-            }
-          pos++;
-        }
+       {
+         if (rdir[pos] == '\\')
+           {
+             pos++;
+             break;
+           }
+         pos++;
+       }
     }
   else
     {
-      pos = 3;                  /* strlen("C:\\") */
+      pos = 3;                 /* strlen("C:\\") */
     }
 #endif
   while (pos <= len)
     {
       if ((rdir[pos] == DIR_SEPARATOR) || (pos == len))
-        {
-          rdir[pos] = '\0';
-          ret = GNUNET_DISK_directory_test (rdir);
-          if (ret == GNUNET_SYSERR)
-            {
-              GNUNET_free (rdir);
-              return GNUNET_SYSERR;
-            }
-          if (ret == GNUNET_NO)
-            {
+       {
+         rdir[pos] = '\0';
+         ret = GNUNET_DISK_directory_test (rdir);
+         if (ret == GNUNET_SYSERR)
+           {
+             GNUNET_free (rdir);
+             return GNUNET_SYSERR;
+           }
+         if (ret == GNUNET_NO)
+           {
 #ifndef MINGW
-              ret = mkdir (rdir, S_IRUSR | S_IWUSR | S_IXUSR | S_IRGRP | S_IXGRP | S_IROTH | S_IXOTH);  /* 755 */
+             ret = mkdir (rdir, S_IRUSR | S_IWUSR | S_IXUSR | S_IRGRP | S_IXGRP | S_IROTH | S_IXOTH);  /* 755 */
 #else
-              ret = mkdir (rdir);
+             ret = mkdir (rdir);
 #endif
-              if ((ret != 0) && (errno != EEXIST))
-                {
-                  GNUNET_log_strerror_file (GNUNET_ERROR_TYPE_ERROR, "mkdir",
-                                            rdir);
-                  GNUNET_free (rdir);
-                  return GNUNET_SYSERR;
-                }
-            }
-          rdir[pos] = DIR_SEPARATOR;
-        }
+             if ((ret != 0) && (errno != EEXIST))
+               {
+                 LOG_STRERROR_FILE (GNUNET_ERROR_TYPE_ERROR, "mkdir", rdir);
+                 GNUNET_free (rdir);
+                 return GNUNET_SYSERR;
+               }
+           }
+         rdir[pos] = DIR_SEPARATOR;
+       }
       pos++;
     }
   GNUNET_free (rdir);
@@ -630,7 +649,7 @@ GNUNET_DISK_directory_create_for_file (const char *filename)
  */
 ssize_t
 GNUNET_DISK_file_read (const struct GNUNET_DISK_FileHandle * h, void *result,
-                       size_t len)
+                      size_t len)
 {
   if (h == NULL)
     {
@@ -641,10 +660,25 @@ GNUNET_DISK_file_read (const struct GNUNET_DISK_FileHandle * h, void *result,
 #ifdef MINGW
   DWORD bytesRead;
 
-  if (!ReadFile (h->h, result, len, &bytesRead, NULL))
+  if (h->type != GNUNET_PIPE)
     {
-      SetErrnoFromWinError (GetLastError ());
-      return GNUNET_SYSERR;
+      if (!ReadFile (h->h, result, len, &bytesRead, NULL))
+       {
+         SetErrnoFromWinError (GetLastError ());
+         return GNUNET_SYSERR;
+       }
+    }
+  else
+    {
+      if (!ReadFile (h->h, result, len, NULL, h->oOverlapRead))
+       {
+         if (GetLastError () != ERROR_IO_PENDING)
+           {
+             SetErrnoFromWinError (GetLastError ());
+             return GNUNET_SYSERR;
+           }
+       }
+      GetOverlappedResult (h->h, h->oOverlapRead, &bytesRead, TRUE);
     }
   return bytesRead;
 #else
@@ -667,8 +701,8 @@ GNUNET_DISK_fn_read (const char *fn, void *result, size_t len)
   struct GNUNET_DISK_FileHandle *fh;
   ssize_t ret;
 
-  fh = GNUNET_DISK_file_open (fn, GNUNET_DISK_OPEN_READ,
-                              GNUNET_DISK_PERM_NONE);
+  fh =
+    GNUNET_DISK_file_open (fn, GNUNET_DISK_OPEN_READ, GNUNET_DISK_PERM_NONE);
   if (!fh)
     return GNUNET_SYSERR;
   ret = GNUNET_DISK_file_read (fh, result, len);
@@ -687,7 +721,7 @@ GNUNET_DISK_fn_read (const char *fn, void *result, size_t len)
  */
 ssize_t
 GNUNET_DISK_file_write (const struct GNUNET_DISK_FileHandle * h,
-                        const void *buffer, size_t n)
+                       const void *buffer, size_t n)
 {
   if (h == NULL)
     {
@@ -698,10 +732,34 @@ GNUNET_DISK_file_write (const struct GNUNET_DISK_FileHandle * h,
 #ifdef MINGW
   DWORD bytesWritten;
 
-  if (!WriteFile (h->h, buffer, n, &bytesWritten, NULL))
+  if (h->type != GNUNET_PIPE)
     {
-      SetErrnoFromWinError (GetLastError ());
-      return GNUNET_SYSERR;
+      if (!WriteFile (h->h, buffer, n, &bytesWritten, NULL))
+       {
+         SetErrnoFromWinError (GetLastError ());
+         return GNUNET_SYSERR;
+       }
+    }
+  else
+    {
+#if DEBUG_PIPE
+      LOG (GNUNET_ERROR_TYPE_DEBUG, "It is a pipe trying to write\n");
+#endif
+      if (!WriteFile (h->h, buffer, n, NULL, h->oOverlapWrite))
+       {
+         if (GetLastError () != ERROR_IO_PENDING)
+           {
+             SetErrnoFromWinError (GetLastError ());
+#if DEBUG_PIPE
+             LOG (GNUNET_ERROR_TYPE_DEBUG, "Error writing to pipe\n");
+#endif
+             return GNUNET_SYSERR;
+           }
+       }
+#if DEBUG_PIPE
+      LOG (GNUNET_ERROR_TYPE_DEBUG, "Will get overlapped result\n");
+#endif
+      GetOverlappedResult (h->h, h->oOverlapWrite, &bytesWritten, TRUE);
     }
   return bytesWritten;
 #else
@@ -716,20 +774,20 @@ GNUNET_DISK_file_write (const struct GNUNET_DISK_FileHandle * h,
  * @param fn file name
  * @param buffer the data to write
  * @param n number of bytes to write
- * @param mode file permissions 
+ * @param mode file permissions
  * @return number of bytes written on success, GNUNET_SYSERR on error
  */
 ssize_t
-GNUNET_DISK_fn_write (const char *fn, const void *buffer,
-                      size_t n, enum GNUNET_DISK_AccessPermissions mode)
+GNUNET_DISK_fn_write (const char *fn, const void *buffer, size_t n,
+                     enum GNUNET_DISK_AccessPermissions mode)
 {
   struct GNUNET_DISK_FileHandle *fh;
   ssize_t ret;
 
   fh = GNUNET_DISK_file_open (fn,
-                              GNUNET_DISK_OPEN_WRITE
-                              | GNUNET_DISK_OPEN_TRUNCATE
-                              | GNUNET_DISK_OPEN_CREATE, mode);
+                             GNUNET_DISK_OPEN_WRITE |
+                             GNUNET_DISK_OPEN_TRUNCATE |
+                             GNUNET_DISK_OPEN_CREATE, mode);
   if (!fh)
     return GNUNET_SYSERR;
   ret = GNUNET_DISK_file_write (fh, buffer, n);
@@ -737,8 +795,9 @@ GNUNET_DISK_fn_write (const char *fn, const void *buffer,
   return ret;
 }
 
+
 /**
- * Scan a directory for files. 
+ * Scan a directory for files.
  *
  * @param dirName the name of the directory
  * @param callback the method to call for each file,
@@ -749,8 +808,8 @@ GNUNET_DISK_fn_write (const char *fn, const void *buffer,
  */
 int
 GNUNET_DISK_directory_scan (const char *dirName,
-                            GNUNET_FileNameCallback callback,
-                            void *callback_cls)
+                           GNUNET_FileNameCallback callback,
+                           void *callback_cls)
 {
   DIR *dinfo;
   struct dirent *finfo;
@@ -769,14 +828,14 @@ GNUNET_DISK_directory_scan (const char *dirName,
     dname[strlen (dname) - 1] = '\0';
   if (0 != STAT (dname, &istat))
     {
-      GNUNET_log_strerror_file (GNUNET_ERROR_TYPE_WARNING, "stat", dname);
+      LOG_STRERROR_FILE (GNUNET_ERROR_TYPE_WARNING, "stat", dname);
       GNUNET_free (dname);
       return GNUNET_SYSERR;
     }
   if (!S_ISDIR (istat.st_mode))
     {
-      GNUNET_log (GNUNET_ERROR_TYPE_WARNING,
-                  _("Expected `%s' to be a directory!\n"), dirName);
+      LOG (GNUNET_ERROR_TYPE_WARNING,
+          _("Expected `%s' to be a directory!\n"), dirName);
       GNUNET_free (dname);
       return GNUNET_SYSERR;
     }
@@ -784,9 +843,9 @@ GNUNET_DISK_directory_scan (const char *dirName,
   dinfo = OPENDIR (dname);
   if ((errno == EACCES) || (dinfo == NULL))
     {
-      GNUNET_log_strerror_file (GNUNET_ERROR_TYPE_WARNING, "opendir", dname);
+      LOG_STRERROR_FILE (GNUNET_ERROR_TYPE_WARNING, "opendir", dname);
       if (dinfo != NULL)
-        closedir (dinfo);
+       closedir (dinfo);
       GNUNET_free (dname);
       return GNUNET_SYSERR;
     }
@@ -796,34 +855,31 @@ GNUNET_DISK_directory_scan (const char *dirName,
   while ((finfo = readdir (dinfo)) != NULL)
     {
       if ((0 == strcmp (finfo->d_name, ".")) ||
-          (0 == strcmp (finfo->d_name, "..")))
-        continue;
+         (0 == strcmp (finfo->d_name, "..")))
+       continue;
       if (callback != NULL)
-        {
-          if (name_len < strlen (finfo->d_name))
-            {
-              GNUNET_free (name);
-              name_len = strlen (finfo->d_name);
-              n_size = strlen (dname) + name_len + 2;
-              name = GNUNET_malloc (n_size);
-            }
-          /* dname can end in "/" only if dname == "/";
-             if dname does not end in "/", we need to add
-             a "/" (otherwise, we must not!) */
-          GNUNET_snprintf (name,
-                           n_size,
-                           "%s%s%s",
-                           dname,
-                           (strcmp (dname, DIR_SEPARATOR_STR) ==
-                            0) ? "" : DIR_SEPARATOR_STR, finfo->d_name);
-          if (GNUNET_OK != callback (callback_cls, name))
-            {
-              closedir (dinfo);
-              GNUNET_free (name);
-              GNUNET_free (dname);
-              return GNUNET_SYSERR;
-            }
-        }
+       {
+         if (name_len < strlen (finfo->d_name))
+           {
+             GNUNET_free (name);
+             name_len = strlen (finfo->d_name);
+             n_size = strlen (dname) + name_len + 2;
+             name = GNUNET_malloc (n_size);
+           }
+         /* dname can end in "/" only if dname == "/";
+          * if dname does not end in "/", we need to add
+          * a "/" (otherwise, we must not!) */
+         GNUNET_snprintf (name, n_size, "%s%s%s", dname,
+                          (strcmp (dname, DIR_SEPARATOR_STR) ==
+                           0) ? "" : DIR_SEPARATOR_STR, finfo->d_name);
+         if (GNUNET_OK != callback (callback_cls, name))
+           {
+             closedir (dinfo);
+             GNUNET_free (name);
+             GNUNET_free (dname);
+             return GNUNET_SYSERR;
+           }
+       }
       count++;
     }
   closedir (dinfo);
@@ -877,7 +933,7 @@ struct GNUNET_DISK_DirectoryIterator
  */
 static void
 directory_iterator_task (void *cls,
-                         const struct GNUNET_SCHEDULER_TaskContext *tc)
+                        const struct GNUNET_SCHEDULER_TaskContext *tc)
 {
   struct GNUNET_DISK_DirectoryIterator *iter = cls;
   char *name;
@@ -903,7 +959,7 @@ directory_iterator_task (void *cls,
  */
 int
 GNUNET_DISK_directory_iterator_next (struct GNUNET_DISK_DirectoryIterator
-                                     *iter, int can)
+                                    *iter, int can)
 {
   struct dirent *finfo;
 
@@ -918,11 +974,10 @@ GNUNET_DISK_directory_iterator_next (struct GNUNET_DISK_DirectoryIterator
   while (NULL != (finfo = readdir (iter->directory)))
     {
       if ((0 == strcmp (finfo->d_name, ".")) ||
-          (0 == strcmp (finfo->d_name, "..")))
-        continue;
-      GNUNET_asprintf (&iter->next_name,
-                       "%s%s%s",
-                       iter->dirname, DIR_SEPARATOR_STR, finfo->d_name);
+         (0 == strcmp (finfo->d_name, "..")))
+       continue;
+      GNUNET_asprintf (&iter->next_name, "%s%s%s", iter->dirname,
+                      DIR_SEPARATOR_STR, finfo->d_name);
       break;
     }
   if (finfo == NULL)
@@ -931,7 +986,7 @@ GNUNET_DISK_directory_iterator_next (struct GNUNET_DISK_DirectoryIterator
       return GNUNET_NO;
     }
   GNUNET_SCHEDULER_add_with_priority (iter->priority,
-                                      &directory_iterator_task, iter);
+                                     &directory_iterator_task, iter);
   return GNUNET_YES;
 }
 
@@ -949,9 +1004,9 @@ GNUNET_DISK_directory_iterator_next (struct GNUNET_DISK_DirectoryIterator
  */
 void
 GNUNET_DISK_directory_iterator_start (enum GNUNET_SCHEDULER_Priority prio,
-                                      const char *dirName,
-                                      GNUNET_DISK_DirectoryIteratorCallback
-                                      callback, void *callback_cls)
+                                     const char *dirName,
+                                     GNUNET_DISK_DirectoryIteratorCallback
+                                     callback, void *callback_cls)
 {
   struct GNUNET_DISK_DirectoryIterator *di;
 
@@ -1001,16 +1056,17 @@ GNUNET_DISK_directory_remove (const char *fileName)
   struct stat istat;
 
   if (0 != LSTAT (fileName, &istat))
-    return GNUNET_NO;           /* file may not exist... */
+    return GNUNET_NO;          /* file may not exist... */
+  CHMOD (fileName, S_IWUSR | S_IRUSR | S_IXUSR);
   if (UNLINK (fileName) == 0)
     return GNUNET_OK;
   if ((errno != EISDIR) &&
       /* EISDIR is not sufficient in all cases, e.g.
-         sticky /tmp directory may result in EPERM on BSD.
-         So we also explicitly check "isDirectory" */
+       * sticky /tmp directory may result in EPERM on BSD.
+       * So we also explicitly check "isDirectory" */
       (GNUNET_YES != GNUNET_DISK_directory_test (fileName)))
     {
-      GNUNET_log_strerror_file (GNUNET_ERROR_TYPE_WARNING, "rmdir", fileName);
+      LOG_STRERROR_FILE (GNUNET_ERROR_TYPE_WARNING, "rmdir", fileName);
       return GNUNET_SYSERR;
     }
   if (GNUNET_SYSERR ==
@@ -1018,7 +1074,7 @@ GNUNET_DISK_directory_remove (const char *fileName)
     return GNUNET_SYSERR;
   if (0 != RMDIR (fileName))
     {
-      GNUNET_log_strerror_file (GNUNET_ERROR_TYPE_WARNING, "rmdir", fileName);
+      LOG_STRERROR_FILE (GNUNET_ERROR_TYPE_WARNING, "rmdir", fileName);
       return GNUNET_SYSERR;
     }
   return GNUNET_OK;
@@ -1046,16 +1102,17 @@ GNUNET_DISK_file_copy (const char *src, const char *dst)
     return GNUNET_SYSERR;
   pos = 0;
   in = GNUNET_DISK_file_open (src, GNUNET_DISK_OPEN_READ,
-                              GNUNET_DISK_PERM_NONE);
+                             GNUNET_DISK_PERM_NONE);
   if (!in)
     return GNUNET_SYSERR;
-  out = GNUNET_DISK_file_open (dst, GNUNET_DISK_OPEN_WRITE
-                               | GNUNET_DISK_OPEN_CREATE |
-                               GNUNET_DISK_OPEN_FAILIFEXISTS,
-                               GNUNET_DISK_PERM_USER_READ |
-                               GNUNET_DISK_PERM_USER_WRITE |
-                               GNUNET_DISK_PERM_GROUP_READ |
-                               GNUNET_DISK_PERM_GROUP_WRITE);
+  out =
+    GNUNET_DISK_file_open (dst,
+                          GNUNET_DISK_OPEN_WRITE | GNUNET_DISK_OPEN_CREATE |
+                          GNUNET_DISK_OPEN_FAILIFEXISTS,
+                          GNUNET_DISK_PERM_USER_READ |
+                          GNUNET_DISK_PERM_USER_WRITE |
+                          GNUNET_DISK_PERM_GROUP_READ |
+                          GNUNET_DISK_PERM_GROUP_WRITE);
   if (!out)
     {
       GNUNET_DISK_file_close (in);
@@ -1066,11 +1123,11 @@ GNUNET_DISK_file_copy (const char *src, const char *dst)
     {
       len = COPY_BLK_SIZE;
       if (len > size - pos)
-        len = size - pos;
+       len = size - pos;
       if (len != GNUNET_DISK_file_read (in, buf, len))
-        goto FAIL;
+       goto FAIL;
       if (len != GNUNET_DISK_file_write (out, buf, len))
-        goto FAIL;
+       goto FAIL;
       pos += len;
     }
   GNUNET_free (buf);
@@ -1100,11 +1157,11 @@ GNUNET_DISK_filename_canonicalize (char *fn)
     {
       c = *idx;
 
-      if (c == '/' || c == '\\' || c == ':' || c == '*' || c == '?' ||
-          c == '"' || c == '<' || c == '>' || c == '|')
-        {
-          *idx = '_';
-        }
+      if (c == '/' || c == '\\' || c == ':' || c == '*' || c == '?'
+         || c == '"' || c == '<' || c == '>' || c == '|')
+       {
+         *idx = '_';
+       }
 
       idx++;
     }
@@ -1128,13 +1185,13 @@ GNUNET_DISK_file_change_owner (const char *filename, const char *user)
   pws = getpwnam (user);
   if (pws == NULL)
     {
-      GNUNET_log (GNUNET_ERROR_TYPE_ERROR,
-                  _("Cannot obtain information about user `%s': %s\n"),
-                  user, STRERROR (errno));
+      LOG (GNUNET_ERROR_TYPE_ERROR,
+          _("Cannot obtain information about user `%s': %s\n"), user,
+          STRERROR (errno));
       return GNUNET_SYSERR;
     }
   if (0 != chown (filename, pws->pw_uid, pws->pw_gid))
-    GNUNET_log_strerror_file (GNUNET_ERROR_TYPE_WARNING, "chown", filename);
+    LOG_STRERROR_FILE (GNUNET_ERROR_TYPE_WARNING, "chown", filename);
 #endif
   return GNUNET_OK;
 }
@@ -1150,7 +1207,7 @@ GNUNET_DISK_file_change_owner (const char *filename, const char *user)
  */
 int
 GNUNET_DISK_file_lock (struct GNUNET_DISK_FileHandle *fh, off_t lockStart,
-                       off_t lockEnd, int excl)
+                      off_t lockEnd, int excl)
 {
   if (fh == NULL)
     {
@@ -1174,9 +1231,10 @@ GNUNET_DISK_file_lock (struct GNUNET_DISK_FileHandle *fh, off_t lockStart,
   memset (&o, 0, sizeof (OVERLAPPED));
   o.Offset = lockStart;
 
-  if (!LockFileEx (fh->h, (excl ? LOCKFILE_EXCLUSIVE_LOCK : 0)
-                   | LOCKFILE_FAIL_IMMEDIATELY, 0, lockEnd - lockStart, 0,
-                   &o))
+  if (!LockFileEx
+      (fh->h,
+       (excl ? LOCKFILE_EXCLUSIVE_LOCK : 0) | LOCKFILE_FAIL_IMMEDIATELY, 0,
+       lockEnd - lockStart, 0, &o))
     {
       SetErrnoFromWinError (GetLastError ());
       return GNUNET_SYSERR;
@@ -1196,7 +1254,7 @@ GNUNET_DISK_file_lock (struct GNUNET_DISK_FileHandle *fh, off_t lockStart,
  */
 int
 GNUNET_DISK_file_unlock (struct GNUNET_DISK_FileHandle *fh, off_t unlockStart,
-                         off_t unlockEnd)
+                        off_t unlockEnd)
 {
   if (fh == NULL)
     {
@@ -1244,12 +1302,12 @@ GNUNET_DISK_file_unlock (struct GNUNET_DISK_FileHandle *fh, off_t unlockStart,
  * @return IO handle on success, NULL on error
  */
 struct GNUNET_DISK_FileHandle *
-GNUNET_DISK_file_open (const char *fn,
-                       enum GNUNET_DISK_OpenFlags flags,
-                       enum GNUNET_DISK_AccessPermissions perm)
+GNUNET_DISK_file_open (const char *fn, enum GNUNET_DISK_OpenFlags flags,
+                      enum GNUNET_DISK_AccessPermissions perm)
 {
   char *expfn;
   struct GNUNET_DISK_FileHandle *ret;
+
 #ifdef MINGW
   DWORD access;
   DWORD disp;
@@ -1266,7 +1324,7 @@ GNUNET_DISK_file_open (const char *fn,
 #ifndef MINGW
   mode = 0;
   if (GNUNET_DISK_OPEN_READWRITE == (flags & GNUNET_DISK_OPEN_READWRITE))
-    oflags = O_RDWR;            /* note: O_RDWR is NOT always O_RDONLY | O_WRONLY */
+    oflags = O_RDWR;           /* note: O_RDWR is NOT always O_RDONLY | O_WRONLY */
   else if (flags & GNUNET_DISK_OPEN_READ)
     oflags = O_RDONLY;
   else if (flags & GNUNET_DISK_OPEN_WRITE)
@@ -1287,16 +1345,16 @@ GNUNET_DISK_file_open (const char *fn,
     {
       (void) GNUNET_DISK_directory_create_for_file (expfn);
       oflags |= O_CREAT;
-      mode = translate_unix_perms(perm);
+      mode = translate_unix_perms (perm);
     }
 
   fd = open (expfn, oflags | O_LARGEFILE, mode);
   if (fd == -1)
     {
       if (0 == (flags & GNUNET_DISK_OPEN_FAILIFEXISTS))
-       GNUNET_log_strerror_file (GNUNET_ERROR_TYPE_WARNING, "open", expfn);
+       LOG_STRERROR_FILE (GNUNET_ERROR_TYPE_WARNING, "open", expfn);
       else
-       GNUNET_log_strerror_file (GNUNET_ERROR_TYPE_DEBUG, "open", expfn);
+       LOG_STRERROR_FILE (GNUNET_ERROR_TYPE_DEBUG, "open", expfn);
       GNUNET_free (expfn);
       return NULL;
     }
@@ -1317,10 +1375,11 @@ GNUNET_DISK_file_open (const char *fn,
     }
   else if (flags & GNUNET_DISK_OPEN_CREATE)
     {
+      (void) GNUNET_DISK_directory_create_for_file (expfn);
       if (flags & GNUNET_DISK_OPEN_TRUNCATE)
-        disp = CREATE_ALWAYS;
+       disp = CREATE_ALWAYS;
       else
-        disp = OPEN_ALWAYS;
+       disp = OPEN_ALWAYS;
     }
   else if (flags & GNUNET_DISK_OPEN_TRUNCATE)
     {
@@ -1332,13 +1391,13 @@ GNUNET_DISK_file_open (const char *fn,
     }
 
   /* TODO: access priviledges? */
-  h = CreateFile (expfn, access, FILE_SHARE_DELETE | FILE_SHARE_READ
-                  | FILE_SHARE_WRITE, NULL, disp, FILE_ATTRIBUTE_NORMAL,
-                  NULL);
+  h = CreateFile (expfn, access,
+                 FILE_SHARE_DELETE | FILE_SHARE_READ | FILE_SHARE_WRITE,
+                 NULL, disp, FILE_ATTRIBUTE_NORMAL, NULL);
   if (h == INVALID_HANDLE_VALUE)
     {
       SetErrnoFromWinError (GetLastError ());
-      GNUNET_log_strerror_file (GNUNET_ERROR_TYPE_WARNING, "open", expfn);
+      LOG_STRERROR_FILE (GNUNET_ERROR_TYPE_WARNING, "open", expfn);
       GNUNET_free (expfn);
       return NULL;
     }
@@ -1346,12 +1405,12 @@ GNUNET_DISK_file_open (const char *fn,
   if (flags & GNUNET_DISK_OPEN_APPEND)
     if (SetFilePointer (h, 0, 0, FILE_END) == INVALID_SET_FILE_POINTER)
       {
-        SetErrnoFromWinError (GetLastError ());
-        GNUNET_log_strerror_file (GNUNET_ERROR_TYPE_WARNING, "SetFilePointer",
-                                  expfn);
-        CloseHandle (h);
-        GNUNET_free (expfn);
-        return NULL;
+       SetErrnoFromWinError (GetLastError ());
+       LOG_STRERROR_FILE (GNUNET_ERROR_TYPE_WARNING, "SetFilePointer",
+                          expfn);
+       CloseHandle (h);
+       GNUNET_free (expfn);
+       return NULL;
       }
 #endif
 
@@ -1385,14 +1444,16 @@ GNUNET_DISK_file_close (struct GNUNET_DISK_FileHandle *h)
   if (!CloseHandle (h->h))
     {
       SetErrnoFromWinError (GetLastError ());
-      GNUNET_log_strerror (GNUNET_ERROR_TYPE_WARNING, "close");
+      LOG_STRERROR (GNUNET_ERROR_TYPE_WARNING, "close");
+      GNUNET_free (h->oOverlapRead);
+      GNUNET_free (h->oOverlapWrite);
       GNUNET_free (h);
       return GNUNET_SYSERR;
     }
 #else
   if (close (h->fd) != 0)
     {
-      GNUNET_log_strerror (GNUNET_ERROR_TYPE_WARNING, "close");
+      LOG_STRERROR (GNUNET_ERROR_TYPE_WARNING, "close");
       GNUNET_free (h);
       return GNUNET_SYSERR;
     }
@@ -1418,7 +1479,7 @@ GNUNET_DISK_file_close (struct GNUNET_DISK_FileHandle *h)
  */
 char *
 GNUNET_DISK_get_home_filename (const struct GNUNET_CONFIGURATION_Handle *cfg,
-                               const char *serviceName, ...)
+                              const char *serviceName, ...)
 {
   const char *c;
   char *pfx;
@@ -1427,14 +1488,14 @@ GNUNET_DISK_get_home_filename (const struct GNUNET_CONFIGURATION_Handle *cfg,
   unsigned int needed;
 
   if (GNUNET_OK !=
-      GNUNET_CONFIGURATION_get_value_filename (cfg,
-                                               serviceName, "HOME", &pfx))
+      GNUNET_CONFIGURATION_get_value_filename (cfg, serviceName, "HOME",
+                                              &pfx))
     return NULL;
   if (pfx == NULL)
     {
-      GNUNET_log (GNUNET_ERROR_TYPE_WARNING,
-                  _("No `%s' specified for service `%s' in configuration.\n"),
-                  "HOME", serviceName);
+      LOG (GNUNET_ERROR_TYPE_WARNING,
+          _("No `%s' specified for service `%s' in configuration.\n"),
+          "HOME", serviceName);
       return NULL;
     }
   needed = strlen (pfx) + 2;
@@ -1444,11 +1505,12 @@ GNUNET_DISK_get_home_filename (const struct GNUNET_CONFIGURATION_Handle *cfg,
   while (1)
     {
       c = va_arg (ap, const char *);
+
       if (c == NULL)
-        break;
+       break;
       needed += strlen (c);
       if ((c[strlen (c) - 1] != '/') && (c[strlen (c) - 1] != '\\'))
-        needed++;
+       needed++;
     }
   va_end (ap);
   ret = GNUNET_malloc (needed);
@@ -1458,17 +1520,18 @@ GNUNET_DISK_get_home_filename (const struct GNUNET_CONFIGURATION_Handle *cfg,
   while (1)
     {
       c = va_arg (ap, const char *);
+
       if (c == NULL)
-        break;
+       break;
       if ((c[strlen (c) - 1] != '/') && (c[strlen (c) - 1] != '\\'))
-        strcat (ret, DIR_SEPARATOR_STR);
+       strcat (ret, DIR_SEPARATOR_STR);
       strcat (ret, c);
     }
   va_end (ap);
   if ((ret[strlen (ret) - 1] != '/') && (ret[strlen (ret) - 1] != '\\'))
-    GNUNET_DISK_directory_create_for_file (ret);
+    (void) GNUNET_DISK_directory_create_for_file (ret);
   else
-    GNUNET_DISK_directory_create (ret);
+    (void) GNUNET_DISK_directory_create (ret);
   return ret;
 }
 
@@ -1478,17 +1541,17 @@ GNUNET_DISK_get_home_filename (const struct GNUNET_CONFIGURATION_Handle *cfg,
  */
 struct GNUNET_DISK_MapHandle
 {
+  /**
+   * Address where the map is in memory.
+   */
+  void *addr;
+
 #ifdef MINGW
   /**
    * Underlying OS handle.
    */
   HANDLE h;
 #else
-  /**
-   * Address where the map is in memory.
-   */
-  void *addr;
-
   /**
    * Number of bytes mapped.
    */
@@ -1512,8 +1575,8 @@ struct GNUNET_DISK_MapHandle
  */
 void *
 GNUNET_DISK_file_map (const struct GNUNET_DISK_FileHandle *h,
-                      struct GNUNET_DISK_MapHandle **m,
-                      enum GNUNET_DISK_MapType access, size_t len)
+                     struct GNUNET_DISK_MapHandle **m,
+                     enum GNUNET_DISK_MapType access, size_t len)
 {
   if (h == NULL)
     {
@@ -1523,7 +1586,6 @@ GNUNET_DISK_file_map (const struct GNUNET_DISK_FileHandle *h,
 
 #ifdef MINGW
   DWORD mapAccess, protect;
-  void *ret;
 
   if ((access & GNUNET_DISK_MAP_TYPE_READ) &&
       (access & GNUNET_DISK_MAP_TYPE_WRITE))
@@ -1556,15 +1618,15 @@ GNUNET_DISK_file_map (const struct GNUNET_DISK_FileHandle *h,
       return NULL;
     }
 
-  ret = MapViewOfFile ((*m)->h, mapAccess, 0, 0, len);
-  if (!ret)
+  (*m)->addr = MapViewOfFile ((*m)->h, mapAccess, 0, 0, len);
+  if (!(*m)->addr)
     {
       SetErrnoFromWinError (GetLastError ());
       CloseHandle ((*m)->h);
       GNUNET_free (*m);
     }
 
-  return ret;
+  return (*m)->addr;
 #else
   int prot;
 
@@ -1577,7 +1639,7 @@ GNUNET_DISK_file_map (const struct GNUNET_DISK_FileHandle *h,
   (*m)->addr = mmap (NULL, len, prot, MAP_SHARED, h->fd, 0);
   GNUNET_assert (NULL != (*m)->addr);
   if (MAP_FAILED == (*m)->addr)
-    {    
+    {
       GNUNET_free (*m);
       return NULL;
     }
@@ -1595,6 +1657,7 @@ int
 GNUNET_DISK_file_unmap (struct GNUNET_DISK_MapHandle *h)
 {
   int ret;
+
   if (h == NULL)
     {
       errno = EINVAL;
@@ -1602,7 +1665,7 @@ GNUNET_DISK_file_unmap (struct GNUNET_DISK_MapHandle *h)
     }
 
 #ifdef MINGW
-  ret = UnmapViewOfFile (h->h) ? GNUNET_OK : GNUNET_SYSERR;
+  ret = UnmapViewOfFile (h->addr) ? GNUNET_OK : GNUNET_SYSERR;
   if (ret != GNUNET_OK)
     SetErrnoFromWinError (GetLastError ());
   if (!CloseHandle (h->h) && (ret == GNUNET_OK))
@@ -1646,6 +1709,143 @@ GNUNET_DISK_file_sync (const struct GNUNET_DISK_FileHandle *h)
 #endif
 }
 
+#if WINDOWS
+/* Copyright Bob Byrnes  <byrnes <at> curl.com>
+   http://permalink.gmane.org/gmane.os.cygwin.patches/2121
+*/
+/* Create a pipe, and return handles to the read and write ends,
+   just like CreatePipe, but ensure that the write end permits
+   FILE_READ_ATTRIBUTES access, on later versions of win32 where
+   this is supported.  This access is needed by NtQueryInformationFile,
+   which is used to implement select and nonblocking writes.
+   Note that the return value is either NO_ERROR or GetLastError,
+   unlike CreatePipe, which returns a bool for success or failure.  */
+static int
+create_selectable_pipe (PHANDLE read_pipe_ptr, PHANDLE write_pipe_ptr,
+                       LPSECURITY_ATTRIBUTES sa_ptr, DWORD psize,
+                       DWORD dwReadMode, DWORD dwWriteMode)
+{
+  /* Default to error. */
+  *read_pipe_ptr = *write_pipe_ptr = INVALID_HANDLE_VALUE;
+
+  HANDLE read_pipe = INVALID_HANDLE_VALUE, write_pipe = INVALID_HANDLE_VALUE;
+
+  /* Ensure that there is enough pipe buffer space for atomic writes.  */
+  if (psize < PIPE_BUF)
+    psize = PIPE_BUF;
+
+  char pipename[MAX_PATH];
+
+  /* Retry CreateNamedPipe as long as the pipe name is in use.
+   * Retrying will probably never be necessary, but we want
+   * to be as robust as possible.  */
+  while (1)
+    {
+      static volatile LONG pipe_unique_id;
+
+      snprintf (pipename, sizeof pipename, "\\\\.\\pipe\\gnunet-%d-%ld",
+               getpid (), InterlockedIncrement ((LONG *) & pipe_unique_id));
+#if DEBUG_PIPE
+      LOG (GNUNET_ERROR_TYPE_DEBUG,
+          "CreateNamedPipe: name = %s, size = %lu\n", pipename, psize);
+#endif
+      /* Use CreateNamedPipe instead of CreatePipe, because the latter
+       * returns a write handle that does not permit FILE_READ_ATTRIBUTES
+       * access, on versions of win32 earlier than WinXP SP2.
+       * CreatePipe also stupidly creates a full duplex pipe, which is
+       * a waste, since only a single direction is actually used.
+       * It's important to only allow a single instance, to ensure that
+       * the pipe was not created earlier by some other process, even if
+       * the pid has been reused.  We avoid FILE_FLAG_FIRST_PIPE_INSTANCE
+       * because that is only available for Win2k SP2 and WinXP.  */
+      read_pipe = CreateNamedPipeA (pipename, PIPE_ACCESS_INBOUND | dwReadMode, PIPE_TYPE_BYTE | PIPE_READMODE_BYTE, 1,        /* max instances */
+                                   psize,      /* output buffer size */
+                                   psize,      /* input buffer size */
+                                   NMPWAIT_USE_DEFAULT_WAIT, sa_ptr);
+
+      if (read_pipe != INVALID_HANDLE_VALUE)
+       {
+#if DEBUG_PIPE
+         LOG (GNUNET_ERROR_TYPE_DEBUG, "pipe read handle = %p\n", read_pipe);
+#endif
+         break;
+       }
+
+      DWORD err = GetLastError ();
+
+      switch (err)
+       {
+       case ERROR_PIPE_BUSY:
+         /* The pipe is already open with compatible parameters.
+          * Pick a new name and retry.  */
+#if DEBUG_PIPE
+         LOG (GNUNET_ERROR_TYPE_DEBUG, "pipe busy, retrying\n");
+#endif
+         continue;
+       case ERROR_ACCESS_DENIED:
+         /* The pipe is already open with incompatible parameters.
+          * Pick a new name and retry.  */
+#if DEBUG_PIPE
+         LOG (GNUNET_ERROR_TYPE_DEBUG, "pipe access denied, retrying\n");
+#endif
+         continue;
+       case ERROR_CALL_NOT_IMPLEMENTED:
+         /* We are on an older Win9x platform without named pipes.
+          * Return an anonymous pipe as the best approximation.  */
+#if DEBUG_PIPE
+         LOG (GNUNET_ERROR_TYPE_DEBUG,
+              "CreateNamedPipe not implemented, resorting to "
+              "CreatePipe: size = %lu\n", psize);
+#endif
+         if (CreatePipe (read_pipe_ptr, write_pipe_ptr, sa_ptr, psize))
+           {
+#if DEBUG_PIPE
+             LOG (GNUNET_ERROR_TYPE_DEBUG, "pipe read handle = %p\n",
+                  *read_pipe_ptr);
+             LOG (GNUNET_ERROR_TYPE_DEBUG, "pipe write handle = %p\n",
+                  *write_pipe_ptr);
+#endif
+             return GNUNET_OK;
+           }
+         err = GetLastError ();
+         LOG (GNUNET_ERROR_TYPE_ERROR, "CreatePipe failed: %d\n", err);
+         return err;
+       default:
+         LOG (GNUNET_ERROR_TYPE_ERROR, "CreateNamedPipe failed: %d\n", err);
+         return err;
+       }
+      /* NOTREACHED */
+    }
+#if DEBUG_PIPE
+  LOG (GNUNET_ERROR_TYPE_DEBUG, "CreateFile: name = %s\n", pipename);
+#endif
+
+  /* Open the named pipe for writing.
+   * Be sure to permit FILE_READ_ATTRIBUTES access.  */
+  write_pipe = CreateFileA (pipename, GENERIC_WRITE | FILE_READ_ATTRIBUTES, 0, /* share mode */
+                           sa_ptr, OPEN_EXISTING, dwWriteMode, /* flags and attributes */
+                           0); /* handle to template file */
+
+  if (write_pipe == INVALID_HANDLE_VALUE)
+    {
+      /* Failure. */
+      DWORD err = GetLastError ();
+
+#if DEBUG_PIPE
+      LOG (GNUNET_ERROR_TYPE_DEBUG, "CreateFile failed: %d\n", err);
+#endif
+      CloseHandle (read_pipe);
+      return err;
+    }
+#if DEBUG_PIPE
+  LOG (GNUNET_ERROR_TYPE_DEBUG, "pipe write handle = %p\n", write_pipe);
+#endif
+  /* Success. */
+  *read_pipe_ptr = read_pipe;
+  *write_pipe_ptr = write_pipe;
+  return GNUNET_OK;
+}
+#endif
 
 /**
  * Creates an interprocess channel
@@ -1662,9 +1862,8 @@ GNUNET_DISK_pipe (int blocking, int inherit_read, int inherit_write)
   struct GNUNET_DISK_PipeHandle *p;
   struct GNUNET_DISK_FileHandle *fds;
 
-  p =
-    GNUNET_malloc (sizeof (struct GNUNET_DISK_PipeHandle) +
-                   2 * sizeof (struct GNUNET_DISK_FileHandle));
+  p = GNUNET_malloc (sizeof (struct GNUNET_DISK_PipeHandle) +
+                    2 * sizeof (struct GNUNET_DISK_FileHandle));
   fds = (struct GNUNET_DISK_FileHandle *) &p[1];
   p->fd[0] = &fds[0];
   p->fd[1] = &fds[1];
@@ -1678,7 +1877,7 @@ GNUNET_DISK_pipe (int blocking, int inherit_read, int inherit_write)
   if (ret == -1)
     {
       eno = errno;
-      GNUNET_log_strerror (GNUNET_ERROR_TYPE_ERROR, "pipe");
+      LOG_STRERROR (GNUNET_ERROR_TYPE_ERROR, "pipe");
       GNUNET_free (p);
       errno = eno;
       return NULL;
@@ -1708,47 +1907,49 @@ GNUNET_DISK_pipe (int blocking, int inherit_read, int inherit_write)
   if (ret == -1)
     {
       eno = errno;
-      GNUNET_log_strerror (GNUNET_ERROR_TYPE_ERROR, "fcntl");
+      LOG_STRERROR (GNUNET_ERROR_TYPE_ERROR, "fcntl");
       GNUNET_break (0 == close (p->fd[0]->fd));
       GNUNET_break (0 == close (p->fd[1]->fd));
       GNUNET_free (p);
       errno = eno;
-      return NULL;    
+      return NULL;
     }
 #else
   BOOL ret;
   HANDLE tmp_handle;
 
-  ret = CreatePipe (&p->fd[0]->h, &p->fd[1]->h, NULL, 0);
+  ret =
+    create_selectable_pipe (&p->fd[0]->h, &p->fd[1]->h, NULL, 0,
+                           FILE_FLAG_OVERLAPPED, FILE_FLAG_OVERLAPPED);
   if (!ret)
     {
       GNUNET_free (p);
       SetErrnoFromWinError (GetLastError ());
       return NULL;
     }
-  if (!DuplicateHandle (GetCurrentProcess (), p->fd[0]->h,
-               GetCurrentProcess (), &tmp_handle, 0, inherit_read == GNUNET_YES ? TRUE : FALSE,
-                       DUPLICATE_SAME_ACCESS))
-       {
-         SetErrnoFromWinError (GetLastError ());
-         CloseHandle (p->fd[0]->h);
-         CloseHandle (p->fd[1]->h);
-         GNUNET_free (p);
-         return NULL;
-       }
-       CloseHandle (p->fd[0]->h);
-       p->fd[0]->h = tmp_handle;
+  if (!DuplicateHandle
+      (GetCurrentProcess (), p->fd[0]->h, GetCurrentProcess (), &tmp_handle,
+       0, inherit_read == GNUNET_YES ? TRUE : FALSE, DUPLICATE_SAME_ACCESS))
+    {
+      SetErrnoFromWinError (GetLastError ());
+      CloseHandle (p->fd[0]->h);
+      CloseHandle (p->fd[1]->h);
+      GNUNET_free (p);
+      return NULL;
+    }
+  CloseHandle (p->fd[0]->h);
+  p->fd[0]->h = tmp_handle;
 
-       if (!DuplicateHandle (GetCurrentProcess (), p->fd[1]->h,
-                       GetCurrentProcess (), &tmp_handle, 0, inherit_write == GNUNET_YES ? TRUE : FALSE,
-                       DUPLICATE_SAME_ACCESS))
-       {
-         SetErrnoFromWinError (GetLastError ());
-         CloseHandle (p->fd[0]->h);
-         CloseHandle (p->fd[1]->h);
-         GNUNET_free (p);
-         return NULL;
-       }
+  if (!DuplicateHandle
+      (GetCurrentProcess (), p->fd[1]->h, GetCurrentProcess (), &tmp_handle,
+       0, inherit_write == GNUNET_YES ? TRUE : FALSE, DUPLICATE_SAME_ACCESS))
+    {
+      SetErrnoFromWinError (GetLastError ());
+      CloseHandle (p->fd[0]->h);
+      CloseHandle (p->fd[1]->h);
+      GNUNET_free (p);
+      return NULL;
+    }
   CloseHandle (p->fd[1]->h);
   p->fd[1]->h = tmp_handle;
   if (!blocking)
@@ -1762,6 +1963,18 @@ GNUNET_DISK_pipe (int blocking, int inherit_read, int inherit_write)
     }
   p->fd[0]->type = GNUNET_PIPE;
   p->fd[1]->type = GNUNET_PIPE;
+
+  p->fd[0]->oOverlapRead = GNUNET_malloc (sizeof (OVERLAPPED));
+  p->fd[0]->oOverlapWrite = GNUNET_malloc (sizeof (OVERLAPPED));
+  p->fd[1]->oOverlapRead = GNUNET_malloc (sizeof (OVERLAPPED));
+  p->fd[1]->oOverlapWrite = GNUNET_malloc (sizeof (OVERLAPPED));
+
+  p->fd[0]->oOverlapRead->hEvent = CreateEvent (NULL, FALSE, FALSE, NULL);
+  p->fd[0]->oOverlapWrite->hEvent = CreateEvent (NULL, FALSE, FALSE, NULL);
+
+  p->fd[1]->oOverlapRead->hEvent = CreateEvent (NULL, FALSE, FALSE, NULL);
+  p->fd[1]->oOverlapWrite->hEvent = CreateEvent (NULL, FALSE, FALSE, NULL);
+
 #endif
   return p;
 }
@@ -1785,19 +1998,19 @@ GNUNET_DISK_pipe_close_end (struct GNUNET_DISK_PipeHandle *p,
   if (end == GNUNET_DISK_PIPE_END_READ)
     {
       if (!CloseHandle (p->fd[0]->h))
-        {
-          SetErrnoFromWinError (GetLastError ());
-          ret = GNUNET_SYSERR;
-        }
+       {
+         SetErrnoFromWinError (GetLastError ());
+         ret = GNUNET_SYSERR;
+       }
       p->fd[0]->h = INVALID_HANDLE_VALUE;
     }
   else if (end == GNUNET_DISK_PIPE_END_WRITE)
     {
       if (!CloseHandle (p->fd[1]->h))
-        {
-          SetErrnoFromWinError (GetLastError ());
-          ret = GNUNET_SYSERR;
-        }
+       {
+         SetErrnoFromWinError (GetLastError ());
+         ret = GNUNET_SYSERR;
+       }
       p->fd[1]->h = INVALID_HANDLE_VALUE;
     }
   save = errno;
@@ -1806,19 +2019,19 @@ GNUNET_DISK_pipe_close_end (struct GNUNET_DISK_PipeHandle *p,
   if (end == GNUNET_DISK_PIPE_END_READ)
     {
       if (0 != close (p->fd[0]->fd))
-        {
-          ret = GNUNET_SYSERR;
-          save = errno;
-        }
+       {
+         ret = GNUNET_SYSERR;
+         save = errno;
+       }
       p->fd[0]->fd = -1;
     }
   else if (end == GNUNET_DISK_PIPE_END_WRITE)
     {
       if (0 != close (p->fd[1]->fd))
-        {
-          ret = GNUNET_SYSERR;
-          save = errno;
-        }
+       {
+         ret = GNUNET_SYSERR;
+         save = errno;
+       }
       p->fd[1]->fd = -1;
     }
 #endif
@@ -1855,19 +2068,19 @@ GNUNET_DISK_pipe_close (struct GNUNET_DISK_PipeHandle *p)
   if (p->fd[0]->fd != -1)
     {
       if (0 != close (p->fd[0]->fd))
-        {
-          ret = GNUNET_SYSERR;
-          save = errno;
-        }
+       {
+         ret = GNUNET_SYSERR;
+         save = errno;
+       }
     }
 
   if (p->fd[1]->fd != -1)
     {
       if (0 != close (p->fd[1]->fd))
-        {
-          ret = GNUNET_SYSERR;
-          save = errno;
-        }
+       {
+         ret = GNUNET_SYSERR;
+         save = errno;
+       }
     }
 #endif
   GNUNET_free (p);
@@ -1877,21 +2090,19 @@ GNUNET_DISK_pipe_close (struct GNUNET_DISK_PipeHandle *p)
 
 
 /**
- * Creates a named pipe/FIFO
- * @param fn name of the named pipe
+ * Creates a named pipe/FIFO and opens it
+ * @param fn pointer to the name of the named pipe or to NULL
  * @param flags open flags
  * @param perm access permissions
  * @return pipe handle on success, NULL on error
  */
 struct GNUNET_DISK_FileHandle *
-GNUNET_DISK_npipe_open (const char *fn,
-                       enum GNUNET_DISK_OpenFlags flags,
-                       enum GNUNET_DISK_AccessPermissions perm)
+GNUNET_DISK_npipe_create (char **fn, enum GNUNET_DISK_OpenFlags flags,
+                         enum GNUNET_DISK_AccessPermissions perm)
 {
-  struct GNUNET_DISK_FileHandle *ret;
-
 #ifdef MINGW
-  HANDLE h;
+  struct GNUNET_DISK_FileHandle *ret;
+  HANDLE h = NULL;
   DWORD openMode;
   char *name;
 
@@ -1906,31 +2117,155 @@ GNUNET_DISK_npipe_open (const char *fn,
   if (flags & GNUNET_DISK_OPEN_FAILIFEXISTS)
     openMode |= FILE_FLAG_FIRST_PIPE_INSTANCE;
 
-  GNUNET_asprintf(&name, "\\\\.\\pipe\\pipename\\%s", fn);
-  h = CreateNamedPipe (fn, openMode | FILE_FLAG_OVERLAPPED,
-      PIPE_TYPE_BYTE | PIPE_READMODE_BYTE, 2, 1, 1, 0, NULL);
-  GNUNET_free(name);
-  if (h == NULL)
+  while (h == NULL)
     {
-      SetErrnoFromWinError(GetLastError());
-      return NULL;
+      DWORD error_code;
+
+      name = NULL;
+      if (*fn != NULL)
+       {
+         GNUNET_asprintf (&name, "\\\\.\\pipe\\%.246s", fn);
+#if DEBUG_NPIPE
+         LOG (GNUNET_ERROR_TYPE_DEBUG,
+              "Trying to create an instance of named pipe `%s'\n", name);
+#endif
+         h = CreateNamedPipe (name, openMode | FILE_FLAG_OVERLAPPED,
+                              PIPE_TYPE_BYTE | PIPE_READMODE_BYTE, 2, 1, 1,
+                              0, NULL);
+       }
+      else
+       {
+         GNUNET_asprintf (fn, "\\\\.\\pipe\\gnunet-%llu",
+                          GNUNET_CRYPTO_random_u64
+                          (GNUNET_CRYPTO_QUALITY_WEAK, UINT64_MAX));
+#if DEBUG_NPIPE
+         LOG (GNUNET_ERROR_TYPE_DEBUG,
+              "Trying to create unique named pipe `%s'\n", *fn);
+#endif
+         h = CreateNamedPipe (*fn,
+                              openMode | FILE_FLAG_OVERLAPPED |
+                              FILE_FLAG_FIRST_PIPE_INSTANCE,
+                              PIPE_TYPE_BYTE | PIPE_READMODE_BYTE, 2, 1, 1,
+                              0, NULL);
+       }
+      error_code = GetLastError ();
+      if (name)
+       GNUNET_free (name);
+      /* don't re-set name to NULL yet */
+      if (h == INVALID_HANDLE_VALUE)
+       {
+         SetErrnoFromWinError (error_code);
+#if DEBUG_NPIPE
+         LOG (GNUNET_ERROR_TYPE_DEBUG,
+              "Pipe creation have failed because of %d, errno is %d\n",
+              error_code, errno);
+#endif
+         if (name == NULL)
+           {
+#if DEBUG_NPIPE
+             LOG (GNUNET_ERROR_TYPE_DEBUG,
+                  "Pipe was to be unique, considering re-creation\n");
+#endif
+             GNUNET_free (*fn);
+             *fn = NULL;
+             if (error_code != ERROR_ACCESS_DENIED
+                 && error_code != ERROR_PIPE_BUSY)
+               {
+                 return NULL;
+               }
+#if DEBUG_NPIPE
+             LOG (GNUNET_ERROR_TYPE_DEBUG,
+                  "Pipe name was not unique, trying again\n");
+#endif
+             h = NULL;
+           }
+         else
+           return NULL;
+       }
     }
+  errno = 0;
 
-  ret = GNUNET_malloc(sizeof(*ret));
+  ret = GNUNET_malloc (sizeof (*ret));
   ret->h = h;
+  ret->type = GNUNET_PIPE;
+
+  ret->oOverlapRead = GNUNET_malloc (sizeof (OVERLAPPED));
+  ret->oOverlapWrite = GNUNET_malloc (sizeof (OVERLAPPED));
+
+  ret->oOverlapRead->hEvent = CreateEvent (NULL, FALSE, FALSE, NULL);
+  ret->oOverlapWrite->hEvent = CreateEvent (NULL, FALSE, FALSE, NULL);
 
   return ret;
 #else
-  int fd;
+  if (*fn == NULL)
+    {
+      char dir[] = "/tmp/gnunet-pipe-XXXXXX";
+
+      if (mkdtemp (dir) == NULL)
+       {
+         LOG_STRERROR (GNUNET_ERROR_TYPE_ERROR, "mkdtemp");
+         return NULL;
+       }
+      GNUNET_asprintf (fn, "%s/child-control", dir);
+    }
+
+  if (mkfifo (*fn, translate_unix_perms (perm)) == -1)
+    {
+      if ((errno != EEXIST) || (0 != (flags & GNUNET_DISK_OPEN_FAILIFEXISTS)))
+       return NULL;
+    }
+
+  flags = flags & (~GNUNET_DISK_OPEN_FAILIFEXISTS);
+  return GNUNET_DISK_file_open (*fn, flags, perm);
+#endif
+}
+
+
+/**
+ * Opens already existing named pipe/FIFO
+ *
+ * @param fn name of an existing named pipe
+ * @param flags open flags
+ * @param perm access permissions
+ * @return pipe handle on success, NULL on error
+ */
+struct GNUNET_DISK_FileHandle *
+GNUNET_DISK_npipe_open (const char *fn, enum GNUNET_DISK_OpenFlags flags,
+                       enum GNUNET_DISK_AccessPermissions perm)
+{
+#ifdef MINGW
+  struct GNUNET_DISK_FileHandle *ret;
+  HANDLE h;
+  DWORD openMode;
 
-  if (mkfifo(fn, translate_unix_perms(perm)) == -1)
+  openMode = 0;
+  if (flags & GNUNET_DISK_OPEN_READWRITE)
+    openMode = GENERIC_WRITE | GENERIC_READ;
+  else if (flags & GNUNET_DISK_OPEN_READ)
+    openMode = GENERIC_READ;
+  else if (flags & GNUNET_DISK_OPEN_WRITE)
+    openMode = GENERIC_WRITE;
+
+  h = CreateFile (fn, openMode, 0, NULL, OPEN_EXISTING,
+                 FILE_FLAG_OVERLAPPED | FILE_READ_ATTRIBUTES, NULL);
+  if (h == INVALID_HANDLE_VALUE)
     {
-      if (errno == EEXIST && flags & GNUNET_DISK_OPEN_FAILIFEXISTS)
-        return NULL;
+      SetErrnoFromWinError (GetLastError ());
+      return NULL;
     }
 
-  flags ~= GNUNET_DISK_OPEN_FAILIFEXISTS;
-  return GNUNET_DISK_file_open(fn, flags, perm);
+  ret = GNUNET_malloc (sizeof (*ret));
+  ret->h = h;
+  ret->type = GNUNET_PIPE;
+  ret->oOverlapRead = GNUNET_malloc (sizeof (OVERLAPPED));
+  ret->oOverlapWrite = GNUNET_malloc (sizeof (OVERLAPPED));
+  ret->oOverlapRead->hEvent = CreateEvent (NULL, FALSE, FALSE, NULL);
+  ret->oOverlapWrite->hEvent = CreateEvent (NULL, FALSE, FALSE, NULL);
+
+  return ret;
+#else
+  flags = flags & (~GNUNET_DISK_OPEN_FAILIFEXISTS);
+  return GNUNET_DISK_file_open (fn, flags, perm);
 #endif
 }
 
@@ -1943,14 +2278,14 @@ int
 GNUNET_DISK_npipe_close (struct GNUNET_DISK_FileHandle *pipe)
 {
 #ifndef MINGW
-  return close(pipe->fd) == 0 ? GNUNET_OK : GNUNET_SYSERR;
+  return close (pipe->fd) == 0 ? GNUNET_OK : GNUNET_SYSERR;
 #else
   BOOL ret;
 
-  ret = CloseHandle(pipe->h);
+  ret = CloseHandle (pipe->h);
   if (!ret)
     {
-      SetErrnoFromWinError(GetLastError());
+      SetErrnoFromWinError (GetLastError ());
       return GNUNET_SYSERR;
     }
   else
@@ -1968,7 +2303,7 @@ GNUNET_DISK_npipe_close (struct GNUNET_DISK_FileHandle *pipe)
  */
 const struct GNUNET_DISK_FileHandle *
 GNUNET_DISK_pipe_handle (const struct GNUNET_DISK_PipeHandle *p,
-                         enum GNUNET_DISK_PipeEnd n)
+                        enum GNUNET_DISK_PipeEnd n)
 {
   switch (n)
     {
@@ -1992,7 +2327,7 @@ GNUNET_DISK_pipe_handle (const struct GNUNET_DISK_PipeHandle *p,
  */
 int
 GNUNET_DISK_internal_file_handle_ (const struct GNUNET_DISK_FileHandle *fh,
-                                   void *dst, size_t dst_len)
+                                  void *dst, size_t dst_len)
 {
 #ifdef MINGW
   if (dst_len < sizeof (HANDLE))