1/*-
2 * Copyright (c) 1993
3 * The Regents of the University of California. All rights reserved.
4 *
5 * Redistribution and use in source and binary forms, with or without
6 * modification, are permitted provided that the following conditions
7 * are met:
8 * 1. Redistributions of source code must retain the above copyright

--- 29 unchanged lines hidden (view full) ---

38#endif /* not lint */
39
40#ifndef lint
41#if 0
42static char sccsid[] = "@(#)jot.c 8.1 (Berkeley) 6/6/93";
43#endif
44#endif
45#include <sys/cdefs.h>
46__FBSDID("$FreeBSD: head/usr.bin/jot/jot.c 132240 2004-07-16 05:10:46Z tjr $");
47
48/*
49 * jot - print sequential or random data
50 *
51 * Author: John Kunze, Office of Comp. Affairs, UCB
52 */
53
54#include <ctype.h>

--- 6 unchanged lines hidden (view full) ---

61#include <time.h>
62#include <unistd.h>
63
64#define REPS_DEF 100
65#define BEGIN_DEF 1
66#define ENDER_DEF 100
67#define STEP_DEF 1
68
69#define is_default(s) (strcmp((s), "-") == 0)
70
71double begin;
72double ender;
73double s;
74long reps;
75int randomize;
76int infinity;

--- 57 unchanged lines hidden (view full) ---

134 argc -= optind;
135 argv += optind;
136
137 switch (argc) { /* examine args right to left, falling thru cases */
138 case 4:
139 if (!is_default(argv[3])) {
140 if (!sscanf(argv[3], "%lf", &s))
141 errx(1, "bad s value: %s", argv[3]);
142 mask |= 01;
143 }
144 case 3:
145 if (!is_default(argv[2])) {
146 if (!sscanf(argv[2], "%lf", &ender))
147 ender = argv[2][strlen(argv[2])-1];
148 mask |= 02;
149 if (!prec)
150 n = getprec(argv[2]);
151 }
152 case 2:
153 if (!is_default(argv[1])) {
154 if (!sscanf(argv[1], "%lf", &begin))
155 begin = argv[1][strlen(argv[1])-1];
156 mask |= 04;
157 if (!prec)
158 prec = getprec(argv[1]);
159 if (n > prec) /* maximum precision */
160 prec = n;
161 }
162 case 1:
163 if (!is_default(argv[0])) {
164 if (!sscanf(argv[0], "%ld", &reps))
165 errx(1, "bad reps value: %s", argv[0]);
166 mask |= 010;
167 }
168 break;
169 case 0:
170 usage();
171 default:
172 errx(1, "too many arguments. What do you mean by %s?",
173 argv[4]);
174 }
175 getformat();
176 while (mask) /* 4 bit mask has 1's where last 4 args were given */
177 switch (mask) { /* fill in the 0's by default or computation */
178 case 001:
179 reps = REPS_DEF;
180 mask = 011;
181 break;
182 case 002:
183 reps = REPS_DEF;
184 mask = 012;
185 break;
186 case 003:
187 reps = REPS_DEF;
188 mask = 013;
189 break;
190 case 004:
191 reps = REPS_DEF;
192 mask = 014;
193 break;
194 case 005:
195 reps = REPS_DEF;
196 mask = 015;
197 break;
198 case 006:
199 reps = REPS_DEF;
200 mask = 016;
201 break;
202 case 007:
203 if (randomize) {
204 reps = REPS_DEF;
205 mask = 0;
206 break;
207 }
208 if (s == 0.0) {
209 reps = 0;
210 mask = 0;
211 break;
212 }
213 reps = (ender - begin + s) / s;
214 if (reps <= 0)
215 errx(1, "impossible stepsize");
216 mask = 0;
217 break;
218 case 010:
219 begin = BEGIN_DEF;
220 mask = 014;
221 break;
222 case 011:
223 begin = BEGIN_DEF;
224 mask = 015;
225 break;
226 case 012:
227 s = (randomize ? time(NULL) : STEP_DEF);
228 mask = 013;
229 break;
230 case 013:
231 if (randomize)
232 begin = BEGIN_DEF;
233 else if (reps == 0)
234 errx(1, "must specify begin if reps == 0");
235 begin = ender - reps * s + s;
236 mask = 0;
237 break;
238 case 014:
239 s = (randomize ? -1.0 : STEP_DEF);
240 mask = 015;
241 break;
242 case 015:
243 if (randomize)
244 ender = ENDER_DEF;
245 else
246 ender = begin + reps * s - s;
247 mask = 0;
248 break;
249 case 016:
250 if (randomize)
251 s = -1.0;
252 else if (reps == 0)
253 errx(1, "infinite sequences cannot be bounded");
254 else if (reps == 1)
255 s = 0.0;
256 else
257 s = (ender - begin) / (reps - 1);
258 mask = 0;
259 break;
260 case 017: /* if reps given and implied, */
261 if (!randomize && s != 0.0) {
262 long t = (ender - begin + s) / s;
263 if (t <= 0)
264 errx(1, "impossible stepsize");
265 if (t < reps) /* take lesser */
266 reps = t;
267 }
268 mask = 0;

--- 182 unchanged lines hidden ---