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
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
|
--- ./pom/pom.6.orig 2001-08-29 10:11:31.000000000 -0500
+++ ./pom/pom.6 2006-09-08 19:36:28.000000000 -0500
@@ -33,7 +33,7 @@
.\"
.\" @(#)pom.6 8.1 (Berkeley) 5/31/93
.\"
-.Dd January 9, 1999
+.Dd September 8, 2006
.Dt POM 6
.Os
.Sh NAME
@@ -41,7 +41,8 @@
.Nd display the phase of the moon
.Sh SYNOPSIS
.Nm
-.Op [[[[[cc]yy]mm]dd]HH]
+.Op Fl d Ar num
+.Op Ar [[[[cc]yy]mm]dd]HH
.Sh DESCRIPTION
The
.Nm
@@ -49,6 +50,13 @@
Useful for selecting software completion target dates and predicting
managerial behavior.
.Pp
+.Bl -tag -width [-d num]
+.It Ar [-d num]
+Display the percentage with
+.Ar num
+decimals (within reasonable limits).
+The default is to display an integer percentage.
+.El
.Bl -tag -width [[[[[cc]yy]mm]dd]HH]
.It Ar [[[[[cc]yy]mm]dd]HH]
Display the phase of the moon for a given time. The format is similar to
@@ -67,6 +75,9 @@
.Pp
This program does not allow for the difference between the TDT and
UTC timescales (about one minute at the time of writing).
+.Sh NOTES
+.Nm
+recognizes 3321 as being within reasonable limits.
.Sh ACKNOWLEDGEMENTS
This program is based on algorithms from
.%B Practical Astronomy with Your Calculator, Third Edition
--- ./pom/pom.c.orig 2000-08-03 19:12:33.000000000 -0500
+++ ./pom/pom.c 2006-09-08 19:47:09.000000000 -0500
@@ -59,11 +59,14 @@
*
* Updated to the Third Edition of Duffett-Smith's book, Paul Janzen, IX 1998
*
+ * Modified for Slackware by Eric Hameleers <alien@slackware.com> 09-09-2006
+ *
*/
#include <ctype.h>
#include <err.h>
#include <math.h>
+#include <limits.h>
#include <stdio.h>
#include <string.h>
#include <stdlib.h>
@@ -101,16 +104,36 @@
char *argv[];
{
time_t tmpt, now;
- double days, today, tomorrow;
+ double days, today, tomorrow, accuracy;
char buf[1024];
+ int ch, decimals=0;
/* Revoke setgid privileges */
setregid(getgid(), getgid());
+ while ((ch = getopt(argc, argv, "d:h?")) != -1)
+ switch (ch) {
+ case 'd':
+ decimals = atoi(optarg);
+ if (decimals < 0 || (decimals != 3321 && decimals > __DBL_DIG__))
+ errx(1, "illegal argument for -d option");
+ break;
+ case 'h':
+ case '?':
+ (void)fprintf(stderr, "usage: pom [-d digits] [[[[[cc]yy]mm]dd]HH]\n");
+ exit(1);
+ default:
+ break;
+ }
+ argc -= optind;
+ argv += optind;
+
+ accuracy = ( decimals == 3321 ? 0.5: 0.5 / pow(10, decimals) );
+
if (time(&now) == (time_t)-1)
err(1, "time");
- if (argc > 1) {
- tmpt = parsetime(argv[1]);
+ if (argc > 0) {
+ tmpt = parsetime(argv[0]);
strftime(buf, sizeof(buf), "%a %Y %b %e %H:%M:%S (%Z)",
localtime(&tmpt));
printf("%s: ", buf);
@@ -118,15 +141,20 @@
tmpt = now;
}
days = (tmpt - EPOCH_MINUS_1970 * 86400) / 86400.0;
- today = potm(days) + .5;
+ today = potm(days) + accuracy;
if (tmpt < now)
(void)printf("The Moon was ");
else if (tmpt == now)
(void)printf("The Moon is ");
else
(void)printf("The Moon will be ");
- if ((int)today == 100)
+ if ((int)today == 100) {
(void)printf("Full\n");
+ if (decimals == 3321)
+ /* (void)printf("Howl!!! Know me, I am PJV.\n"); */
+ /* PJV's number is not 3321, and shan't be revealed here */
+ (void)printf("I saw the best minds of my generation destroyed by\n");
+ }
else if (!(int)today)
(void)printf("New\n");
else {
@@ -134,19 +162,19 @@
if ((int)today == 50)
(void)printf("%s\n", tomorrow > today ?
"at the First Quarter" : "at the Last Quarter");
- /* today is 0.5 too big, but it doesn't matter here
- * since the phase is changing fast enough
+ /* today is "accuracy" too big, but it doesn't matter
+ * here since the phase is changing fast enough
*/
else {
- today -= 0.5; /* Now it might matter */
+ today -= accuracy; /* Now it might matter */
(void)printf("%s ", tomorrow > today ?
"Waxing" : "Waning");
if (today > 50)
- (void)printf("Gibbous (%1.0f%% of Full)\n",
- today);
+ (void)printf("Gibbous (%1.*f%% of Full)\n",
+ decimals, today);
else if (today < 50)
- (void)printf("Crescent (%1.0f%% of Full)\n",
- today);
+ (void)printf("Crescent (%1.*f%% of Full)\n",
+ decimals, today);
}
}
exit(0);
|