2 * Copyright (c) 2014 Ian Sutton <ian@kremlin.cc>
4 * Permission to use, copy, modify, and distribute this software for any
5 * purpose with or without fee is hereby granted, provided that the above
6 * copyright notice and this permission notice appear in all copies.
8 * THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
9 * WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
10 * MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
11 * ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
12 * WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
13 * ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
14 * OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
21 #include <sys/types.h>
29 #include <glib/gprintf.h>
30 #include <glib-unix.h>
31 #include <glib/gstdio.h>
32 #include <polkit/polkit.h>
34 #include "timedated-gen.h"
35 #include "timedated.h"
37 #include "../../util.h"
39 #define TZNAME_MAX PATH_MAX
41 GPtrArray
*timedated_freeable
;
42 Timedate1
*timedated_interf
;
44 GMainLoop
*timedated_loop
;
47 gboolean dbus_interface_exported
; /* reliable because of gdbus operational guarantees */
49 const gchar
*OS_LOCALTIME
= "/etc/localtime"; /* current timezone file */
50 const gchar
*OS_TIMEZONE_PATH
= "/usr/share/zoneinfo"; /* path to system timezone files */
52 struct timezone_checksum_pair
{
60 static struct timezone_checksum_pair tz_table
[5000];
62 /* --- begin method/property/dbus signal code --- */
65 on_handle_set_time(Timedate1
*td1_passed_interf
,
66 GDBusMethodInvocation
*invoc
,
71 gint64 proposed_time
, cur_time
;
72 const gchar
*bus_name
;
73 gboolean policykit_auth
;
74 check_auth_result is_authed
;
75 gboolean relative
; /* relative if passed time_t is meant to be added to current time */
76 struct timespec
*new_time
;
78 params
= g_dbus_method_invocation_get_parameters(invoc
);
79 g_variant_get(params
, "(xbb)", &proposed_time
, &relative
, &policykit_auth
);
80 bus_name
= g_dbus_method_invocation_get_sender(invoc
);
82 is_authed
= polkit_try_auth(bus_name
, "org.freedesktop.timedate1.set-time", policykit_auth
);
86 case AUTHORIZED_NATIVELY
:
87 case AUTHORIZED_BY_PROMPT
:
90 case UNAUTHORIZED_NATIVELY
:
91 case UNAUTHORIZED_FAILED_PROMPT
:
92 g_dbus_method_invocation_return_dbus_error(invoc
, "org.freedesktop.timedate1.Error.EACCES", "Insufficient permissions to set system time.");
96 g_dbus_method_invocation_return_dbus_error(invoc
, "org.freedesktop.timedate1.Error.EFAULT", "Provided bus name is invalid.");
100 g_dbus_method_invocation_return_dbus_error(invoc
, "org.freedesktop.timedate1.Error.EFAULT", "Provided action ID is invalid.");
105 g_dbus_method_invocation_return_dbus_error(invoc
, "org.freedesktop.timedate1.Error.ECANCELED", "Failed to set system time for unknown reasons.");
111 timedate1_complete_set_time(td1_passed_interf
, invoc
);
114 } else if(relative
) {
116 cur_time
= g_get_real_time();
118 if(proposed_time
< 0 && cur_time
+ proposed_time
> cur_time
) {
120 g_dbus_method_invocation_return_dbus_error(invoc
, "org.freedesktop.timedate1.Error.EINVAL", "Resultant time out of bounds.");
123 } else if(proposed_time
> 0 && cur_time
+ proposed_time
< cur_time
) {
125 g_dbus_method_invocation_return_dbus_error(invoc
, "org.freedesktop.timedate1.Error.EINVAL", "Resultant time out of bounds.");
129 new_time
= mktimespec(proposed_time
);
131 if(!clock_settime(CLOCK_REALTIME
, new_time
)) {
133 timedate1_complete_set_time(td1_passed_interf
, invoc
);
138 g_dbus_method_invocation_return_dbus_error(invoc
, "org.freedesktop.timedate1.Error.ECANCELED", "Failed to set system time for unknown reasons.");
142 } else if(proposed_time
> 0) {
145 new_time
= mktimespec(proposed_time
);
147 if(!clock_settime(CLOCK_REALTIME
, new_time
)) {
149 timedate1_complete_set_time(td1_passed_interf
, invoc
);
154 g_dbus_method_invocation_return_dbus_error(invoc
, "org.freedesktop.timedate1.Error.ECANCELED", "Failed to set system time for unknown reasons.");
160 g_dbus_method_invocation_return_dbus_error(invoc
, "org.freedesktop.timedate1.Error.EINVAL", "Resultant time out of bounds.");
166 on_handle_set_timezone(Timedate1
*td1_passed_interf
,
167 GDBusMethodInvocation
*invoc
,
173 const gchar
*bus_name
;
174 gboolean policykit_auth
;
175 check_auth_result is_authed
;
177 gchar
*tz_target_path
;
178 struct stat
*statbuf
;
181 params
= g_dbus_method_invocation_get_parameters(invoc
);
182 g_variant_get(params
, "(sb)", &proposed_tz
, &policykit_auth
);
183 bus_name
= g_dbus_method_invocation_get_sender(invoc
);
185 is_authed
= polkit_try_auth(bus_name
, "org.freedesktop.timedate1.set-timezone", policykit_auth
);
189 case AUTHORIZED_NATIVELY
:
190 case AUTHORIZED_BY_PROMPT
:
193 case UNAUTHORIZED_NATIVELY
:
194 case UNAUTHORIZED_FAILED_PROMPT
:
195 g_dbus_method_invocation_return_dbus_error(invoc
, "org.freedesktop.timedate1.Error.EACCES", "Insufficient permissions to set timezone.");
199 g_dbus_method_invocation_return_dbus_error(invoc
, "org.freedesktop.timedate1.Error.EFAULT", "Provided bus name is invalid.");
202 case ERROR_BADACTION
:
203 g_dbus_method_invocation_return_dbus_error(invoc
, "org.freedesktop.timedate1.Error.EFAULT", "Provided action ID is invalid.");
208 g_dbus_method_invocation_return_dbus_error(invoc
, "org.freedesktop.timedate1.Error.ECANCELED", "Failed to set timezone for unknown reasons.");
212 statbuf
= (struct stat
*) calloc(1, sizeof(struct stat
));
213 tz_target_path
= (gchar
*) calloc(1, TZNAME_MAX
);
215 g_ptr_array_add(timedated_freeable
, statbuf
);
216 g_ptr_array_add(timedated_freeable
, tz_target_path
);
218 strlcat(tz_target_path
, TZDIR
, TZNAME_MAX
);
219 strlcat(tz_target_path
, "/", TZNAME_MAX
);
220 strlcat(tz_target_path
, proposed_tz
, TZNAME_MAX
);
222 if(strstr(tz_target_path
, "../")) {
224 g_dbus_method_invocation_return_dbus_error(invoc
, "org.freedesktop.timedate1.Error.EBADF", "Provided timezone is invalid.");
231 if(lstat(tz_target_path
, statbuf
)) {
236 g_dbus_method_invocation_return_dbus_error(invoc
, "org.freedesktop.timedate1.Error.ENOENT", "Specified timezone does not exist.");
240 g_dbus_method_invocation_return_dbus_error(invoc
, "org.freedesktop.timedate1.Error.EBADF", "Specified timezone is invalid.");
247 if(!S_ISREG(statbuf
->st_mode
)) {
249 g_dbus_method_invocation_return_dbus_error(invoc
, "org.freedesktop.timedate1.Error.EBADF", "Specified path is of an inappropriate type.");
253 memset(statbuf
, 0, sizeof statbuf
);
255 if(!lstat(TZDEFAULT
, statbuf
))
256 if(remove(TZDEFAULT
))
259 if(symlink(tz_target_path
, TZDEFAULT
))
263 timedate1_complete_set_timezone(td1_passed_interf
, invoc
);
269 on_handle_set_local_rtc(Timedate1
*td1_passed_interf
,
270 GDBusMethodInvocation
*invoc
,
274 g_dbus_method_invocation_return_dbus_error(invoc
, "org.freedesktop.timedate1.Error.ENODEV", "Unix RTC must be in UTC.");
279 on_handle_set_ntp(Timedate1
*td1_passed_interf
,
280 GDBusMethodInvocation
*invoc
,
289 GStatBuf
*stat_zoneinfo
;
290 gchar
*find_cmd
, *readlink_path
, *ret
, *argvp
, *hash_to_match
;
293 struct timezone_checksum_pair tmp
;
295 find_cmd
= (gchar
*) g_malloc0(2048);
296 stat_zoneinfo
= (GStatBuf
*) g_malloc0(8192);
297 err
= (GError
*) g_malloc0(2048);
299 if(g_stat(OS_LOCALTIME
, stat_zoneinfo
)) {
301 g_printf("could not read from %s! please symlink or copy a timezone file from %s to %s!\n", OS_LOCALTIME
, OS_TIMEZONE_PATH
, OS_LOCALTIME
);
304 } else if(g_file_test(OS_LOCALTIME
, G_FILE_TEST_IS_SYMLINK
)) {
306 readlink_path
= g_file_read_link(OS_LOCALTIME
, &err
);
308 gchar
*split
[2] = { readlink_path
, "" };
309 tmp
= parse_timezone_path(split
);
314 g_free(readlink_path
);
318 g_printf("%s is not a symlink! attempting to match checksums in %s...\n", OS_LOCALTIME
, OS_TIMEZONE_PATH
);
319 hash_to_match
= get_file_sha256(OS_LOCALTIME
);
321 /* ret = lookup_hash(hash_to_match); */
322 return FALSE
; /* TODO fix me for real */
325 g_free(hash_to_match
);
333 /* Unix time must be in UTC. */
335 our_get_local_rtc() {
337 gboolean ret
= FALSE
;
345 const gboolean ret
= FALSE
;
353 const gboolean ret
= FALSE
;
359 our_get_ntpsynchronized() {
361 const gboolean ret
= FALSE
;
367 our_get_time_usec() {
375 our_get_rtc_time_usec() {
382 /* --- end method/property/dbus signal code, begin bus/name handlers --- */
384 static void timedated_on_bus_acquired(GDBusConnection
*conn
,
386 gpointer user_data
) {
388 g_printf("got bus/name, exporting %s's interface...\n", name
);
390 timedated_interf
= timedate1_skeleton_new();
392 /* attach function pointers to generated struct's method handlers */
393 g_signal_connect(timedated_interf
, "handle-set-time", G_CALLBACK(on_handle_set_time
), NULL
);
394 g_signal_connect(timedated_interf
, "handle-set-timezone", G_CALLBACK(on_handle_set_timezone
), NULL
);
395 g_signal_connect(timedated_interf
, "handle-set-local-rtc", G_CALLBACK(on_handle_set_local_rtc
), NULL
);
396 g_signal_connect(timedated_interf
, "handle-set-ntp", G_CALLBACK(on_handle_set_ntp
), NULL
);
398 /* set our properties before export */
399 timedate1_set_timezone(timedated_interf
, our_get_timezone());
400 timedate1_set_local_rtc(timedated_interf
, our_get_local_rtc());
401 timedate1_set_can_ntp(timedated_interf
, our_get_can_ntp());
402 timedate1_set_ntp(timedated_interf
, our_get_ntp());
403 timedate1_set_ntpsynchronized(timedated_interf
, our_get_ntpsynchronized());
404 timedate1_set_time_usec(timedated_interf
, our_get_time_usec());
405 timedate1_set_rtctime_usec(timedated_interf
, our_get_rtc_time_usec());
407 if(!g_dbus_interface_skeleton_export(G_DBUS_INTERFACE_SKELETON(timedated_interf
),
409 "/org/freedesktop/timedate1",
412 g_printf("failed to export %s's interface!\n", name
);
413 timedated_mem_clean();
417 dbus_interface_exported
= TRUE
;
418 g_printf("exported %s's interface on the system bus...\n", name
);
422 static void timedated_on_name_acquired(GDBusConnection
*conn
,
424 gpointer user_data
) {
426 g_printf("success!\n");
429 static void timedated_on_name_lost(GDBusConnection
*conn
,
431 gpointer user_data
) {
435 g_printf("failed to connect to the system bus while trying to acquire name '%s': either dbus-daemon isn't running or we don't have permission to push names and/or their interfaces to it.\n", name
);
436 timedated_mem_clean();
439 g_print("lost name %s, exiting...\n", name
);
441 timedated_mem_clean();
444 /* --- end bus/name handlers, begin misc unix functions --- */
446 /* safe call to clean and then exit
447 * this stops our GMainLoop safely before letting main() return */
448 void timedated_mem_clean() {
450 g_printf("exiting...\n");
452 if(dbus_interface_exported
)
453 g_dbus_interface_skeleton_unexport(G_DBUS_INTERFACE_SKELETON(timedated_interf
));
455 if(g_main_loop_is_running(timedated_loop
))
456 g_main_loop_quit(timedated_loop
);
460 /* wrapper for glib's unix signal handling; called only once if terminating signal is raised against us */
461 gboolean
unix_sig_terminate_handler(gpointer data
) {
463 g_printf("caught SIGINT/HUP/TERM, exiting\n");
465 timedated_mem_clean();
466 return G_SOURCE_REMOVE
;
469 void set_signal_handlers() {
471 /* we don't care about its descriptor, we never need to unregister these */
472 g_unix_signal_add(SIGINT
, unix_sig_terminate_handler
, NULL
);
473 g_unix_signal_add(SIGHUP
, unix_sig_terminate_handler
, NULL
);
474 g_unix_signal_add(SIGTERM
, unix_sig_terminate_handler
, NULL
);
479 set_signal_handlers();
481 /*if(!build_lookup_table())
484 timedated_loop
= g_main_loop_new(NULL
, TRUE
);
485 timedated_freeable
= g_ptr_array_new();
487 bus_descriptor
= g_bus_own_name(G_BUS_TYPE_SYSTEM
,
488 "org.freedesktop.timedate1",
489 G_BUS_NAME_OWNER_FLAGS_NONE
,
490 timedated_on_bus_acquired
,
491 timedated_on_name_acquired
,
492 timedated_on_name_lost
,
496 g_main_loop_run(timedated_loop
);
497 /* runs until single g_main_loop_quit() call is raised inside <interface>_mem_clean() */
498 g_main_loop_unref(timedated_loop
);
500 /* guaranteed unownable */
501 g_bus_unown_name(bus_descriptor
);
503 /* at this point no operations can occur with our data, it is safe to free it + its container */
504 g_ptr_array_free(timedated_freeable
, TRUE
);
509 static struct timezone_checksum_pair
parse_timezone_path(gchar
**pair
) {
511 gchar
*prefix_pattern
, *right_prefix_pattern
, *posix_prefix_pattern
, *lean_path
;
512 GRegex
*prefix
, *posix
, *right
;
514 struct timezone_checksum_pair ret
= { NULL
, NULL
, FALSE
, FALSE
};
519 prefix_pattern
= (gchar
*) g_malloc0(4096);
520 right_prefix_pattern
= (gchar
*) g_malloc0(4096);
521 posix_prefix_pattern
= (gchar
*) g_malloc0(4096);
523 g_sprintf(prefix_pattern
, "%s/", OS_TIMEZONE_PATH
);
524 g_sprintf(posix_prefix_pattern
, "%s/posix/", OS_TIMEZONE_PATH
);
525 g_sprintf(right_prefix_pattern
, "%s/right/", OS_TIMEZONE_PATH
);
527 prefix
= g_regex_new(prefix_pattern
, 0, 0, &err
);
528 posix
= g_regex_new(posix_prefix_pattern
, 0, 0, &err
);
529 right
= g_regex_new(right_prefix_pattern
, 0, 0, &err
);
531 if(g_regex_match_full(posix
, pair
[0], -1, 0, G_REGEX_MATCH_NOTEMPTY
, NULL
, NULL
)) {
534 lean_path
= g_regex_replace_literal(posix
, pair
[0], -1, 0, "", G_REGEX_MATCH_NOTEMPTY
, NULL
);
536 } else if(g_regex_match_full(right
, pair
[0], -1, 0, G_REGEX_MATCH_NOTEMPTY
, NULL
, NULL
)) {
539 lean_path
= g_regex_replace_literal(right
, pair
[0], -1, 0, "", G_REGEX_MATCH_NOTEMPTY
, NULL
);
542 lean_path
= g_regex_replace_literal(prefix
, pair
[0], -1, 0, "", G_REGEX_MATCH_NOTEMPTY
, NULL
);
544 ret
.path
= lean_path
;
546 ret
.sum
= g_malloc0(256);
547 g_strlcpy(ret
.sum
, pair
[1], 66);
549 g_regex_unref(prefix
);
550 g_regex_unref(right
);
551 g_regex_unref(posix
);
556 /* TODO need to deconstruct tz_table on exit
557 static gboolean build_lookup_table() {
559 gchar *find_cmd, **map_pairs, *find_output, *path_buf, *sum_buf, **entry_buf;
568 find_cmd = (gchar *) g_malloc0(4096);
569 find_output = (gchar *) g_malloc0(1000000);
571 g_sprintf(find_cmd, "/bin/sh -c \"find %s -type f -exec cksum -a sha256 {} \\; | sed -E 's/SHA256 \\(//g' | sed -E 's/\\) = /=/g'\"", OS_TIMEZONE_PATH);
573 if(!g_spawn_command_line_sync(find_cmd, &find_output, NULL, NULL, &err)) {
575 g_printf("error running `%s`\n", find_cmd);
579 map_pairs = g_strsplit(find_output, "\n", INT_MAX);
581 while(map_pairs[i] && (entry_buf = g_strsplit(map_pairs[i], "=", INT_MAX))) {
583 tz_table[i] = parse_timezone_path(entry_buf);
585 g_strfreev(entry_buf);
596 static gchar *lookup_hash(gchar *hash) {
600 while(tz_table[i].sum)
601 if(!g_strcmp0(tz_table[i].sum, hash))
602 return tz_table[i].path;
609 /* takes number of microseconds since epoch and returns a
610 * ptr to a timespec suitable to be passed to clock_settime(3)
612 static struct timespec
* mktimespec(gint64 us
) {
617 gint64 div_buf_remainder
, div_buf_s
, div_buf_ns
;
618 struct timespec
*ret
;
620 div_buf_s
= (us
/ 1000000); /* us / 10^6 = s */
621 div_buf_remainder
= (us
% 1000000); /* fraction of second lost from prev. line */
622 div_buf_ns
= div_buf_remainder
* 1000; /* us * 10^3 = ns */
624 seconds
= (time_t) div_buf_s
; /* porting note: most systems use 32 bit time, adjust accordingly */
625 nanoseconds
= (long) div_buf_ns
;
627 ret
= (struct timespec
*) calloc(1, sizeof(struct timespec
));
629 ret
->tv_sec
= seconds
;
630 ret
->tv_nsec
= nanoseconds
;
632 g_ptr_array_add(timedated_freeable
, ret
);