1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
|
/* seq.c - Count from first to last, by increment.
*
* Copyright 2006 Rob Landley <rob@landley.net>
*
* http://refspecs.linuxfoundation.org/LSB_4.1.0/LSB-Core-generic/LSB-Core-generic/seq.html
USE_SEQ(NEWTOY(seq, "<1>3?f:s:w[!fw]", TOYFLAG_USR|TOYFLAG_BIN))
config SEQ
bool "seq"
depends on TOYBOX_FLOAT
default y
help
usage: seq [-w|-f fmt_str] [-s sep_str] [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.
-f Use fmt_str as a printf-style floating point format string
-s Use sep_str as separator, default is a newline character
-w Pad to equal width with leading zeroes.
*/
#define FOR_seq
#include "toys.h"
GLOBALS(
char *sep;
char *fmt;
)
// Ensure there's one %f escape with correct attributes
static void insanitize(char *f)
{
char *s = next_printf(f, 0);
if (!s) error_exit("bad -f no %%f");
if (-1 == stridx("aAeEfFgG", *s) || (s = next_printf(s, 0))) {
// The @ is a byte offset, not utf8 chars. Waiting for somebody to complain.
error_exit("bad -f '%s'@%d", f, (int)(s-f+1));
}
}
void seq_main(void)
{
double first, increment, last, dd;
char *sep_str = "\n", *fmt_str = "%g";
int output = 0;
// 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]);
}
// Pad to largest width
if (toys.optflags & FLAG_w) {
char *s;
int i, len, dot, left = 0, right = 0;
for (i=0; i<3; i++) {
dd = (double []){first, increment, last}[i];
len = sprintf(toybuf, "%g", dd);
if ((s = strchr(toybuf, '.'))) {
dot = s-toybuf;
if (left<dot) left = dot;
dot = len-dot-1;
if (right<dot) right = dot;
} else if (len>left) left = len;
}
sprintf(fmt_str = toybuf, "%%0%d.%df", left+right+!!right, right);
}
if (toys.optflags & FLAG_f) insanitize(fmt_str = TT.fmt);
if (toys.optflags & FLAG_s) sep_str = TT.sep;
// 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)
{
if (dd != first) printf("%s", sep_str);
printf(fmt_str, dd);
output = 1;
}
if (output) printf("\n");
}
|
