1 files changed, 132 insertions, 0 deletions
diff --git a/src/check_str.c b/src/check_str.c
new file mode 100644
index 0000000..9f7f3d8
--- /dev/null
+++ b/src/check_str.c
@@ -0,0 +1,132 @@
+/*
+ * Check: a unit test framework for C
+ * Copyright (C) 2001, 2002 Arien Malec
+ *
+ * This 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.
+ *
+ * This 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 this library; if not, write to the
+ * Free Software Foundation, Inc., 59 Temple Place - Suite 330,
+ * Boston, MA 02111-1307, USA.
+ */
+
+#include "../lib/libcompat.h"
+
+#include <stdio.h>
+#include <stdarg.h>
+
+#include "check.h"
+#include "check_list.h"
+#include "check_error.h"
+#include "check_impl.h"
+#include "check_str.h"
+
+static const char *tr_type_str (TestResult *tr);
+static int percent_passed (TestStats *t);
+
+char *tr_str (TestResult *tr) 
+{
+  const char *exact_msg;
+  char *rstr;
+  
+  exact_msg = (tr->rtype == CK_ERROR) ? "(after this point) ": "";
+  
+  rstr = ck_strdup_printf ("%s:%d:%s:%s:%s:%d: %s%s",
+                           tr->file, tr->line,
+                           tr_type_str(tr), tr->tcname, tr->tname, tr->iter,
+                           exact_msg, tr->msg);
+
+  return rstr;
+}
+
+char *tr_short_str (TestResult *tr) 
+{
+  const char *exact_msg;
+  char *rstr;
+  
+  exact_msg = (tr->rtype == CK_ERROR) ? "(after this point) ": "";
+  
+  rstr = ck_strdup_printf ("%s:%d: %s%s",
+                           tr->file, tr->line,
+                           exact_msg, tr->msg);
+
+  return rstr;
+}
+
+char *sr_stat_str (SRunner *sr)
+{
+  char *str;
+  TestStats *ts;
+  
+  ts = sr->stats;
+  
+  str = ck_strdup_printf ("%d%%: Checks: %d, Failures: %d, Errors: %d",
+                          percent_passed (ts), ts->n_checked, ts->n_failed,
+                          ts->n_errors);
+
+  return str;
+}
+
+char *ck_strdup_printf (const char *fmt, ...)
+{
+  /* Guess we need no more than 100 bytes. */
+  int n, size = 100;
+  char *p;
+  va_list ap;
+
+  p = emalloc (size);
+
+  while (1)
+    {
+      /* Try to print in the allocated space. */
+      va_start(ap, fmt);
+      n = vsnprintf (p, size, fmt, ap);
+      va_end(ap);
+      /* If that worked, return the string. */
+      if (n > -1 && n < size)
+        return p;
+
+      /* Else try again with more space. */
+      if (n > -1)   /* C99 conform vsnprintf() */
+        size = n+1; /* precisely what is needed */
+      else          /* glibc 2.0 */
+        size *= 2;  /* twice the old size */
+
+      p = erealloc (p, size);
+    }
+}
+
+static const char *tr_type_str (TestResult *tr)
+{
+  const char *str = NULL;
+  if (tr->ctx == CK_CTX_TEST) {
+    if (tr->rtype == CK_PASS)
+      str = "P";
+    else if (tr->rtype == CK_FAILURE)
+      str = "F";
+    else if (tr->rtype == CK_ERROR)
+      str = "E";
+  } else
+    str = "S";
+
+  return str;
+}
+
+static int percent_passed (TestStats *t)
+{
+  if (t->n_failed == 0 && t->n_errors == 0)
+    return 100;
+  else if (t->n_checked == 0)
+    return 0;
+  else
+    return (int) ( (float) (t->n_checked - (t->n_failed + t->n_errors)) /
+		   (float) t->n_checked * 100);
+}