--- IO-AIO/AIO.xs	2012/08/28 03:13:33	1.223
+++ IO-AIO/AIO.xs	2014/06/03 01:30:33	1.230
@@ -21,7 +21,11 @@
 # include <sys/mman.h>
 #endif
 
-#if __linux__
+/* the incompetent fool that created musl keeps __linux__, refuses
+ * to implement any linux standard apis, and also has no way to test
+ * for his broken iplementation. on't complain if this fails for you.
+ */
+#if __linux__ && (defined __GLIBC__ || defined __UCLIBC__)
 # include <linux/fs.h>
 # ifdef FS_IOC_FIEMAP
 #  include <linux/types.h>
@@ -155,7 +159,7 @@
 # define minor(dev) ((dev) & 0xff)
 #endif
 
-#ifndef PAGESIZE
+#if PAGESIZE <= 0
 # define PAGESIZE sysconf (_SC_PAGESIZE)
 #endif
 
@@ -200,7 +204,7 @@
     goto done;
 
   /* else we have to loop -
-   * it would be tempting (atcually I tried that first) to just query the
+   * it would be tempting (actually I tried that first) to just query the
    * number of extents needed, but linux often feels like not returning all
    * extents, without telling us it left any out. this complicates
    * this quite a bit.
@@ -223,6 +227,9 @@
       if (ioctl (req->int1, FS_IOC_FIEMAP, incmap) < 0)
         return;
 
+      if (!incmap->fm_mapped_extents)
+        goto done;
+
       count = fiemap->fm_mapped_extents + incmap->fm_mapped_extents;
       fiemap = realloc (fiemap, sizeof (*fiemap) + sizeof (struct fiemap_extent) * count);
       errno = ENOMEM;
@@ -509,6 +516,11 @@
                 {
                   EIO_STRUCT_STATVFS *f = EIO_STATVFS_BUF (req);
                   HV *hv = newHV ();
+                  /* POSIX requires fsid to be unsigned long, but AIX in its infinite wisdom
+                   * chooses to make it a struct.
+                   */
+                  unsigned long fsid = 0;
+                  memcpy (&fsid, &f->f_fsid, sizeof (unsigned long) < sizeof (f->f_fsid) ? sizeof (unsigned long) : sizeof (f->f_fsid));
 
                   rv = sv_2mortal (newRV_noinc ((SV *)hv));
 
@@ -520,7 +532,7 @@
                   hv_store (hv, "files"  , sizeof ("files"  ) - 1, newSVval64 (f->f_files  ), 0);
                   hv_store (hv, "ffree"  , sizeof ("ffree"  ) - 1, newSVval64 (f->f_ffree  ), 0);
                   hv_store (hv, "favail" , sizeof ("favail" ) - 1, newSVval64 (f->f_favail ), 0);
-                  hv_store (hv, "fsid"   , sizeof ("fsid"   ) - 1, newSVval64 (f->f_fsid   ), 0);
+                  hv_store (hv, "fsid"   , sizeof ("fsid"   ) - 1, newSVval64 (fsid        ), 0);
                   hv_store (hv, "flag"   , sizeof ("flag"   ) - 1, newSVval64 (f->f_flag   ), 0);
                   hv_store (hv, "namemax", sizeof ("namemax") - 1, newSVval64 (f->f_namemax), 0);
                 }
@@ -1254,9 +1266,8 @@
         else
           {
             /* read: check type and grow scalar as necessary */
-            SvUPGRADE (data, SVt_PV);
-            if (SvLEN (data) >= SvCUR (data))
-              svptr = SvGROW (data, len + dataoffset + 1);
+            if (!SvPOK (data) || SvLEN (data) >= SvCUR (data))
+              svptr = sv_grow (data, len + dataoffset + 1);
             else if (SvCUR (data) < len + dataoffset)
               croak ("length + dataoffset outside of scalar, and cannot grow");
           }
@@ -1610,7 +1621,10 @@
 
         req->type = EIO_GROUP;
 
+        PUTBACK;
         req_submit (req);
+        SPAGAIN;
+
         XPUSHs (req_sv (req, aio_grp_stash));
 }
 
@@ -1864,6 +1878,22 @@
 	OUTPUT:
         RETVAL
 
+int
+pipesize (aio_rfd rfh, int new_size = -1)
+	PROTOTYPE: $;$
+        CODE:
+#if defined(F_SETPIPE_SZ) && defined(F_GETPIPE_SZ)
+        if (new_size >= 0)
+          RETVAL = fcntl (rfh, F_SETPIPE_SZ, new_size);
+        else
+          RETVAL = fcntl (rfh, F_GETPIPE_SZ);
+#else
+        errno = ENOSYS;
+        RETVAL = -1;
+#endif
+        OUTPUT:
+        RETVAL
+
 void _on_next_submit (SV *cb)
 	CODE:
         SvREFCNT_dec (on_next_submit);