aio: add 'sync' subcommand

If the underlying platform supports fsync(), $handle sync
invokes fsync() on the stream file descriptor.

Signed-off-by: Steve Bennett <steveb@workware.net.au>

1 files changed, 20 insertions, 0 deletions

diff --git a/jim-aio.c b/jim-aio.c
index 9432c97..ef3f139 100644
--- a/jim-aio.c
+++ b/jim-aio.c
@@ -772,6 +772,17 @@ static int aio_cmd_ndelay(Jim_Interp *interp, int argc, Jim_Obj *const *argv)
 }
 #endif
 
+#ifdef HAVE_FSYNC
+static int aio_cmd_sync(Jim_Interp *interp, int argc, Jim_Obj *const *argv)
+{
+    AioFile *af = Jim_CmdPrivData(interp);
+
+    fflush(af->fp);
+    fsync(af->fd);
+    return JIM_OK;
+}
+#endif
+
 static int aio_cmd_buffering(Jim_Interp *interp, int argc, Jim_Obj *const *argv)
 {
     AioFile *af = Jim_CmdPrivData(interp);
@@ -995,6 +1006,15 @@ static const jim_subcmd_type aio_command_table[] = {
         /* Description: Set O_NDELAY (if arg). Returns current/new setting. */
     },
 #endif
+#ifdef HAVE_FSYNC
+    {   "sync",
+        NULL,
+        aio_cmd_sync,
+        0,
+        0,
+        /* Description: Flush and fsync() the stream */
+    },
+#endif
     {   "buffering",
         "none|line|full",
         aio_cmd_buffering,