From 3a9241add947cb6d24b5de7a8927517426a78795 Mon Sep 17 00:00:00 2001
From: Rob Landley <rob@landley.net>
Date: Sat, 25 Aug 2012 14:25:22 -0500
Subject: Move commands into "posix", "lsb", and "other" menus/directories.

---
 toys/lsb/seq.c | 48 ++++++++++++++++++++++++++++++++++++++++++++++++
 1 file changed, 48 insertions(+)
 create mode 100644 toys/lsb/seq.c

(limited to 'toys/lsb/seq.c')

diff --git a/toys/lsb/seq.c b/toys/lsb/seq.c
new file mode 100644
index 00000000..a41537c0
--- /dev/null
+++ b/toys/lsb/seq.c
@@ -0,0 +1,48 @@
+/* vi: set sw=4 ts=4:
+ *
+ * seq.c - Count from first to last, by increment.
+ *
+ * Copyright 2006 Rob Landley <rob@landley.net>
+ *
+ * Not in SUSv3.  (Don't ask me why not.)
+
+USE_SEQ(NEWTOY(seq, "<1>3?", TOYFLAG_USR|TOYFLAG_BIN))
+
+config SEQ
+	bool "seq"
+	depends on TOYBOX_FLOAT
+	default y
+	help
+	  usage: seq [first] [increment] last
+
+	  Count from first to last, by increment.  Omitted arguments default
+	  to 1.  Two arguments are used as first and last.  Arguments can be
+	  negative or floating point.
+*/
+
+#include "toys.h"
+
+void seq_main(void)
+{
+	double first, increment, last, dd;
+
+	// Parse command line arguments, with appropriate defaults.
+	// Note that any non-numeric arguments are treated as zero.
+	first = increment = 1;
+	switch (toys.optc) {
+		case 3:
+			increment = atof(toys.optargs[1]);
+		case 2:
+			first = atof(*toys.optargs);
+		default:
+			last = atof(toys.optargs[toys.optc-1]);
+	}
+
+	// Yes, we're looping on a double.  Yes rounding errors can accumulate if
+	// you use a non-integer increment.  Deal with it.
+	for (dd=first; (increment>0 && dd<=last) || (increment <0 && dd>=last);
+		dd+=increment)
+	{
+		printf("%g\n", dd);
+	}
+}
-- 
cgit v1.2.3