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
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266
267
268
269
270
271
272
273
274
275
276
277
278
279
280
281
282
283
284
285
286
287
288
289
290
291
292
293
294
295
296
297
298
299
300
301
302
303
304
305
306
307
308
309
310
311
312
313
314
315
316
317
318
319
320
321
322
323
324
325
326
327
328
|
--date and time functions
module(..., package.seeall)
require("posix")
require("format")
require("fs")
--global for date formating see below for more information
--Mon Nov 26 19:56:10 UTC 2007 looks like most systems use this
--print(os.date(date.format))
formats = "%a %b %d %X %Z %Y"
months ={ {"January","Jan"},
{"February", "Feb"},
{"March","Mar"},
{"April", "Apr"},
{"May","May"},
{"June","Jun"},
{"July","Jul"},
{"August","Aug"},
{"September","Sep"},
{"October","Oct"},
{"November","Nov"},
{"December","Dec"}
}
revmonths = {["january"] = 1, ["jan"] = 1,
["february"] = 2, ["feb"] = 2,
["march"] = 3, ["mar"] = 3,
["april"] = 4, ["apr"] = 4,
["may"] = 5,
["june"] = 6, ["jun"] = 6,
["july"] = 7, ["jul"] = 7,
["august"] = 8, ["aug"] = 8,
["september"] = 9, ["sep"] = 9,
["october"] = 10, ["oct"] = 10,
["november"] = 11, ["nov"] = 11,
["december"] = 12, ["dec"] = 12
}
dow = { {"Sunday","Sun"},
{"Monday","Mon"},
{"Tuesday","Tue"},
{"Wednesday","Wed"},
{"Thursday","Thu"},
{"Friday","Fri"},
{"Saturday","Sat"}
}
revdow = { ["sunday"] = 1, ["sun"] = 2,
["monday"] = 2, ["mon"] = 2,
["tuesday"] = 3, ["tue"] = 3,
["wednesday"] = 4, ["wed"] = 4,
["thursday"] = 5, ["thu"] = 5,
["friday"] = 6, ["fri"] = 6,
["saturday"] = 7, ["sat"] =7
}
-- + usually denotes right of PM and - means left. It seems that /etc/TZ needs these
--reversed for alpine/busybox. difference in col 2 and 5
--this list is not full. May need some more added. No Africa or Asia
--Abrr TZ,Real Offset, FullName, Location, What would be put in /etc/TZ(busybox needed offset)
timezones = {
{"A","+1","Alpha Time Zone","Military","Alpha-1"},
{"ACDT","+10:30","Australian Central Daylight Time","Australia","ACDT-10:30"},
{"ACST","+9:30","Australian Central Standard Time","Australia","ACST-9:30"},
{"ADT","-3","Atlantic Daylight Time","North America","ADT+3"},
{"AEDT","+11","Australian Eastern Daylight Time","Australia","AEDT-11"},
{"AEST","+10","Australian Eastern Standard Time","Australia","AEST-10"},
{"AKDT","-8","Alaska Daylight Time","North America","AKDT+8"},
{"AKST","-9","Alaska Standard Time","North America","AKST+9"},
{"AST","-4","Atlantic Standard Time","North America","AST+4"},
{"AWDT","+9","Australian Western Daylight Time","Australia","AWDT-9"},
{"AWST","+8","Australian Western Standard Time","Australia","AWST-8"},
{"B","+2","Bravo Time Zone","Military","Bravo-2"},
{"BST","+1","British Summer Time","Europe","BST-1"},
{"C","+3","Charlie Time Zone","Military","Charlie-3"},
{"CDT","-5","Central Daylight Time","North America","CDT+5"},
{"CEDT","+2","Central European Daylight Time","Europe","CEDT-2"},
{"CEST","+2","Central European Summer Time","Europe","CEST-2"},
{"CET","+1","Central European Time","Europe","CET-1"},
{"CST","+10:30","Central Summer(Daylight) Time","Australia","CST-10:30"},
{"CST","+9:30","Central Standard Time","Australia","CST-9:30"},
{"CST","-6","Central Standard Time","North America","CST+6"},
{"CXT","+7","Christmas Island Time","Australia","CXT-7"},
{"D","+4","Delta Time Zone","Military","Delta-4"},
{"E","+5","Echo Time Zone","Military","Echo-5"},
{"EDT","-4","Eastern Daylight Time","North America","EDT+4"},
{"EEDT","+3","Eastern European Daylight Time","Europe","EEDT-3"},
{"EEST","+3","Eastern European Summer Time","Europe","EEST-3"},
{"EET","+2","Eastern European Time","Europe","EET-2"},
{"EST","+11","Eastern Summer(Daylight) Time","Australia","EST-11"},
{"EST","+10","Eastern Standard Time","Australia","EST-10"},
{"EST","-5","Eastern Standard Time","North America","EST+5"},
{"F","+6","Foxtrot Time Zone","Military","Foxtrot-6"},
{"G","+7","Golf Time Zone","Military","Golf-7"},
{"GMT","+0","Greenwich Mean Time","Europe","GMT+0"},
{"H","+8","Hotel Time Zone","Military","Hotel-8"},
{"HAA","-3","Heure Avancée de l'Atlantique","North America","HAA+3"},
{"HAC","-5","Heure Avancée du Centre","North America","HAC+5"},
{"HADT","-9","Hawaii-Aleutian Daylight Time","North America","HADT+9"},
{"HAE","-4","Heure Avancée de l'Est","North America","HAE+4"},
{"HAP","-7","Heure Avancée du Pacifique","North America","HAP+7"},
{"HAR","-6","Heure Avancée des Rocheuses","North America","HAR+6"},
{"HAST","-10","Hawaii-Aleutian Standard Time","North America","HAST+10"},
{"HAT","-2:30","Heure Avancée de Terre-Neuve","North America","HAT+2:30"},
{"HAY","-8","Heure Avancée du Yukon","North America","HAY+8"},
{"HNA","-4","Heure Normale de l'Atlantique","North America","HNA+4"},
{"HNC","-6","Heure Normale du Centre","North America","HNC+6"},
{"HNE","-5","Heure Normale de l'Est","North America","HNE+5"},
{"HNP","-8","Heure Normale du Pacifique","North America","HNP+8"},
{"HNR","-7","Heure Normale des Rocheuses","North America","HNR+7"},
{"HNT","-3:30","Heure Normale de Terre-Neuve","North America","HNT+3:30"},
{"HNY","-9","Heure Normale du Yukon","North America","HNY+9"},
{"I","+9","India Time Zone","Military","India-9"},
{"IST","+1","Irish Summer Time","Europe","IST-1"},
{"K","+10","Kilo Time Zone","Military","Kilo-10"},
{"L","+11","Lima Time Zone","Military","Lima-11"},
{"M","+12","Mike Time Zone","Military","Mike-12"},
{"MDT","-6","Mountain Daylight Time","North America","MDT+6"},
{"MESZ","+2","Mitteleuroäische Sommerzeit","Europe","MESZ-2"},
{"MEZ","+1","Mitteleuropäische Zeit","Europe","MEZ-1"},
{"MST","-7","Mountain Standard Time","North America","MST+7"},
{"N","-1","November Time Zone","Military","November+1"},
{"NDT","-2:30","Newfoundland Daylight Time","North America","NDT+2:30"},
{"NFT","+11:30","Norfolk (Island) Time","Australia","NFT-11:30"},
{"NST","-3:30","Newfoundland Standard Time","North America","NST+3:30"},
{"O","-2","Oscar Time Zone","Military","Oscar+2"},
{"P","-3","Papa Time Zone","Military","Papa+3"},
{"PDT","-7","Pacific Daylight Time","North America","PDT+7"},
{"PST","-8","Pacific Standard Time","North America","PST+8"},
{"Q","-4","Quebec Time Zone","Military","Quebec+4"},
{"R","-5","Romeo Time Zone","Military","Romeo+5"},
{"S","-6","Sierra Time Zone","Military","Sierra+6"},
{"T","-7","Tango Time Zone","Military","Tango+7"},
{"U","-8","Uniform Time Zone","Military","Uniform+8"},
{"UTC","+0","Coordinated Universal Time","Europe","UTC+0"},
{"V","-9","Victor Time Zone","Military","Victor+9"},
{"W","-10","Whiskey Time Zone","Military","Whiskey+10"},
{"WEDT","+1","Western European Daylight Time","Europe","WEDT-1"},
{"WEST","+1","Western European Summer Time","Europe","WEST-1"},
{"WET","+0","Western European Time","Europe","WET+0"},
{"WST","+9","Western Summer(Daylight) Time","Australia","WST-9"},
{"WST","+8","Western Standard Time","Australia","WST-8"},
{"X","-11","X-ray Time Zone","Military","X-ray+11"},
{"Y","-12","Yankee Time Zone","Military","Yankee+12"},
{"Z","+0","Zulu Time Zone","Military","Zulu+0"}
}
--os.time() will give seconds since 1970-epoch
--os.date() will give formated time strings
--os.time{year=2007,month=1,day=1,hour=2,min=1,sec=1}
--os.date(date.format,os.time())
--give me a table
--t = { {year=2007,month=1,day=2,hour=2}, {year=2006,month=1,day=5} }
--will return a table sorted by oldest <-> newest
--to grab the largest and smallest a,b=g[1],g[table.maxn(g)]
function date_to_seconds (t)
g = {}
count = table.maxn(t)
for i = 1,count do
g[#g+1] = os.time(t[i])
end
table.sort(g)
return g
end
-- the reverse of date_to_seconds. expecting a table of seconds
--format can be changed. This seems to be standard, dow,mon,dom,time,zone,year
-- seems like %z- +0000 time zone format and %Z- 3 letter timezone undocumented or new
function seconds_to_date (t)
g = {}
count = table.maxn(t)
for i = 1,count do
g[#g+1] = os.date(formats,t[i])
end
return g
end
--Wed Nov 28 14:01:23 UTC 2007
--os.date(date.formats) put into a table
--year,month,day,hour,min,sec,isdst- may need a dst table to set this automatically
function string_to_table (str)
if str == nil then str = os.date(formats) end
g = {}
temp = format.string_to_table(str,"%s")
month = abr_month_num(temp[2])
g["month"] = month
day = temp[3]
g["day"] = day
--may do something with this if have a tz table ??
tz = temp[5]
year = temp[6]
g["year"] = year
temp2 = format.string_to_table(temp[4],":")
hour = temp2[1]
g["hour"] = hour
min = temp2[2]
g["min"] = min
sec = temp2[3]
g["sec"] = sec
return g
end
--give dates in seconds and gives the difference in years,months,days,...
--gives a table back with hour,min,month,sec,day,year to display something like
--you have 10 years, 14 hours, 10 days to renew you certificate
-- in secs - year, day, hour,min,sec
t_time = { field_names = {"years","days","hours","minutes","seconds"},
31556926,86400,3600,60,1
}
function date_diff (d1, d2)
g = {}
if d2 == nil then d2 = os.time() end
--first sum of seconds
sum = math.abs(os.difftime(d1,d2))
--going to go through and get it smaller with each pass through the table
for a,b in ipairs(t_time) do
print(sum)
hold = math.modf(sum/b)
g[t_time.field_names[a]] = hold
sum = (sum - (hold*b))
end
return g
end
--give a search number and return the month name
function num_month_name (search)
return months[search][1]
end
--give a search number and return the month abr
function num_month_name_abr (search)
return months[search][2]
end
function name_month_num (search)
return revmonths[string.lower(search)]
end
function abr_month_num (search)
return revmonths[string.lower(search)]
end
function num_dow_name (search)
return dow[search][1]
end
function num_dow_name_abr (search)
return dow[search][2]
end
function name_dow_num (search)
return revdow[string.lower(search)]
end
function abr_dow_num (search)
return revdow[string.lower(search)]
end
--tell me what TimeZone my system is set to
function what_tz ()
f = fs.read_file_as_array("/etc/TZ") or {}
local tz = f[1]
return tz
end
--change the timezone my system is set to
function change_tz ( tz )
--give us something like CET-1, this is busy box offset need to fix.
tz = string.gsub(tz, "%+", "%%+")
tz = string.gsub(tz, "%-", "%%-")
tz = "^" .. tz .. "$"
result = {}
for a=1,table.maxn(date.timezones) do
c = string.match(date.timezones[a][5], tz)
if c ~= nil then result[#result +1] = c end
end
if table.maxn(result) == 1 then
fs.write_file("/etc/TZ", result[1])
mess = "Success"
else
mess = "Too many matches."
end
return mess,date.what_tz()
end
|