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#include "libbb.h"
60#include "rtc_.h"
61
62#define SYS_RTC_PATH "/sys/class/rtc/%s/device/power/wakeup"
63#define SYS_POWER_PATH "/sys/power/state"
64
65static NOINLINE bool may_wakeup(const char *rtcname)
66{
67 ssize_t ret;
68 char buf[128];
69
70
71 rtcname = skip_dev_pfx(rtcname);
72
73 snprintf(buf, sizeof(buf), SYS_RTC_PATH, rtcname);
74 ret = open_read_close(buf, buf, sizeof(buf));
75 if (ret < 0)
76 return false;
77
78
79 return is_prefixed_with(buf, "enabled\n") != NULL;
80}
81
82static NOINLINE void setup_alarm(int fd, time_t *wakeup, time_t rtc_time)
83{
84 struct tm *ptm;
85 struct linux_rtc_wkalrm wake;
86
87
88
89
90
91
92
93
94
95
96
97 ptm = localtime(wakeup);
98
99 wake.time.tm_sec = ptm->tm_sec;
100 wake.time.tm_min = ptm->tm_min;
101 wake.time.tm_hour = ptm->tm_hour;
102 wake.time.tm_mday = ptm->tm_mday;
103 wake.time.tm_mon = ptm->tm_mon;
104 wake.time.tm_year = ptm->tm_year;
105
106 wake.time.tm_wday = -1;
107 wake.time.tm_yday = -1;
108 wake.time.tm_isdst = -1;
109
110
111
112
113 if ((rtc_time + (24 * 60 * 60)) > *wakeup) {
114 xioctl(fd, RTC_ALM_SET, &wake.time);
115 xioctl(fd, RTC_AIE_ON, 0);
116 } else {
117
118 wake.enabled = 1;
119 xioctl(fd, RTC_WKALM_SET, &wake);
120 }
121}
122
123#define RTCWAKE_OPT_AUTO 0x01
124#define RTCWAKE_OPT_LOCAL 0x02
125#define RTCWAKE_OPT_UTC 0x04
126#define RTCWAKE_OPT_DEVICE 0x08
127#define RTCWAKE_OPT_SUSPEND_MODE 0x10
128#define RTCWAKE_OPT_SECONDS 0x20
129#define RTCWAKE_OPT_TIME 0x40
130
131int rtcwake_main(int argc, char **argv) MAIN_EXTERNALLY_VISIBLE;
132int rtcwake_main(int argc UNUSED_PARAM, char **argv)
133{
134 unsigned opt;
135 const char *rtcname = NULL;
136 const char *suspend = "standby";
137 const char *opt_seconds;
138 const char *opt_time;
139
140 time_t rtc_time;
141 time_t sys_time;
142 time_t alarm_time = alarm_time;
143 unsigned seconds = seconds;
144 int utc = -1;
145 int fd;
146
147#if ENABLE_LONG_OPTS
148 static const char rtcwake_longopts[] ALIGN1 =
149 "auto\0" No_argument "a"
150 "local\0" No_argument "l"
151 "utc\0" No_argument "u"
152 "device\0" Required_argument "d"
153 "mode\0" Required_argument "m"
154 "seconds\0" Required_argument "s"
155 "time\0" Required_argument "t"
156 ;
157#endif
158 opt = getopt32long(argv,
159
160 "^alud:m:s:t:" "\0" "s:t:s--t:t--s", rtcwake_longopts,
161 &rtcname, &suspend, &opt_seconds, &opt_time);
162
163
164
165
166
167 if (opt & (RTCWAKE_OPT_UTC | RTCWAKE_OPT_LOCAL))
168 utc = opt & RTCWAKE_OPT_UTC;
169 if (opt & RTCWAKE_OPT_SECONDS) {
170
171 seconds = xatou(opt_seconds);
172 } else {
173
174
175 if (sizeof(alarm_time) <= sizeof(long))
176 alarm_time = xatol(opt_time);
177 else
178 alarm_time = xatoll(opt_time);
179 }
180
181 if (utc == -1)
182 utc = rtc_adjtime_is_utc();
183
184
185 xchdir("/dev");
186
187
188 fd = rtc_xopen(&rtcname, O_RDONLY);
189
190 if (strcmp(suspend, "on") != 0)
191 if (!may_wakeup(rtcname))
192 bb_error_msg_and_die("%s not enabled for wakeup events", rtcname);
193
194
195 sys_time = time(NULL);
196 {
197 struct tm tm_time;
198 rtc_read_tm(&tm_time, fd);
199 rtc_time = rtc_tm2time(&tm_time, utc);
200 }
201
202 if (opt & RTCWAKE_OPT_TIME) {
203
204 alarm_time += rtc_time - sys_time;
205 if (alarm_time < rtc_time)
206
207
208
209
210 bb_error_msg_and_die("time doesn't go backward to %s", ctime(&alarm_time));
211 } else
212 alarm_time = rtc_time + seconds + 1;
213
214 setup_alarm(fd, &alarm_time, rtc_time);
215 sync();
216#if 0
217 printf("sys_time: %s", ctime(&sys_time));
218 printf("rtc_time: %s", ctime(&rtc_time));
219#endif
220 printf("wakeup from \"%s\" at %s", suspend, ctime(&alarm_time));
221 fflush_all();
222 usleep(10 * 1000);
223
224 if (strcmp(suspend, "on") != 0)
225 xopen_xwrite_close(SYS_POWER_PATH, suspend);
226 else {
227
228 unsigned long data;
229
230 do {
231 ssize_t ret = safe_read(fd, &data, sizeof(data));
232 if (ret < 0) {
233 bb_perror_msg("rtc read");
234 break;
235 }
236 } while (!(data & RTC_AF));
237 }
238
239 xioctl(fd, RTC_AIE_OFF, 0);
240
241 if (ENABLE_FEATURE_CLEAN_UP)
242 close(fd);
243
244 return EXIT_SUCCESS;
245}
246