New test for ftime

This test verifies the sanity of ftime and exposes bugs such as BZ

2014-09-17  Arjun Shankar  <arjun.is@lostca.se>

	* time/tst-ftime.c: New test.
	* time/Makefile (tests): Add tst-ftime.

2 files changed, 60 insertions, 1 deletions

diff --git a/time/Makefile b/time/Makefile
index a07c041a1e..55c1de8c58 100644
--- a/time/Makefile
+++ b/time/Makefile
@@ -37,7 +37,7 @@ aux :=	    era alt_digit lc-time-cleanup
 tests	:= test_time clocktest tst-posixtz tst-strptime tst_wcsftime \
 	   tst-getdate tst-mktime tst-mktime2 tst-ftime_l tst-strftime \
 	   tst-mktime3 tst-strptime2 bug-asctime bug-asctime_r bug-mktime1 \
-	   tst-strptime3 bug-getdate1 tst-strptime-whitespace
+	   tst-strptime3 bug-getdate1 tst-strptime-whitespace tst-ftime
 
 include ../Rules
 
diff --git a/time/tst-ftime.c b/time/tst-ftime.c
new file mode 100644
index 0000000000..78fb2f68c1
--- /dev/null
+++ b/time/tst-ftime.c
@@ -0,0 +1,59 @@
+/* Verify that ftime is sane.
+   Copyright (C) 2014 Free Software Foundation, Inc.
+   This file is part of the GNU C Library.
+
+   The GNU C Library is free software; you can redistribute it and/or
+   modify it under the terms of the GNU Lesser General Public
+   License as published by the Free Software Foundation; either
+   version 2.1 of the License, or (at your option) any later version.
+
+   The GNU C Library is distributed in the hope that it will be useful,
+   but WITHOUT ANY WARRANTY; without even the implied warranty of
+   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
+   Lesser General Public License for more details.
+
+   You should have received a copy of the GNU Lesser General Public
+   License along with the GNU C Library; if not, see
+   <http://www.gnu.org/licenses/>.  */
+
+#include <sys/timeb.h>
+#include <stdio.h>
+
+static int
+do_test (void)
+{
+  struct timeb prev, curr = {.time = 0, .millitm = 0};
+  int sec = 0;
+
+  while (sec != 3)
+    {
+      prev = curr;
+
+      if (ftime (&curr))
+        {
+          printf ("ftime returned an error\n");
+          return 1;
+        }
+
+      if (curr.time < prev.time)
+        {
+          printf ("ftime's time flowed backwards\n");
+          return 1;
+        }
+
+      if (curr.time == prev.time
+          && curr.millitm < prev.millitm)
+        {
+          printf ("ftime's millitm flowed backwards\n");
+          return 1;
+        }
+
+      if (curr.time > prev.time)
+        sec ++;
+    }
+  return 0;
+}
+
+#define TIMEOUT 3
+#define TEST_FUNCTION do_test ()
+#include "../test-skeleton.c"