3988N/A

3988N/A

3988N/A#include <stdlib.h>

3988N/A#include <stdbool.h>

3988N/A#include <unistd.h>

3988N/A#include <getopt.h>

3988N/A#include <string.h>

3988N/A#include <ftw.h>

3988N/A#include <sys/mman.h>

3988N/A#include <fcntl.h>

3988N/A

4001N/A#include "dbus-common.h"

3988N/A#include "util.h"

3988N/A#include "spawn-polkit-agent.h"

3988N/A#include "build.h"

3988N/A#include "strv.h"

3988N/A#include "pager.h"

3988N/A#include "set.h"

3988N/A#include "path-util.h"

3988N/A

3988N/Astatic bool arg_no_pager = false;

3988N/Astatic enum transport {

3988N/A TRANSPORT_NORMAL,

4001N/A TRANSPORT_SSH,

3988N/A TRANSPORT_POLKIT

3988N/A} arg_transport = TRANSPORT_NORMAL;

3988N/Astatic bool arg_ask_password = true;

3988N/Astatic const char *arg_host = NULL;

3988N/Astatic bool arg_convert = true;

3988N/A

3988N/Astatic void pager_open_if_enabled(void) {

3988N/A

3988N/A if (arg_no_pager)

3988N/A return;

3988N/A

3988N/A pager_open();

4001N/A}

3988N/A

3988N/Astatic void polkit_agent_open_if_enabled(void) {

3988N/A

3988N/A /* Open the polkit agent as a child process if necessary */

3988N/A

3988N/A if (!arg_ask_password)

3988N/A return;

3988N/A

3988N/A polkit_agent_open();

3988N/A}

3988N/A

3988N/Atypedef struct StatusInfo {

3988N/A char **locale;

3988N/A const char *vconsole_keymap;

3988N/A const char *vconsole_keymap_toggle;

3988N/A const char *x11_layout;

3988N/A const char *x11_model;

3988N/A const char *x11_variant;

3988N/A const char *x11_options;

3988N/A} StatusInfo;

3988N/A

3988N/Astatic void print_status_info(StatusInfo *i) {

3988N/A assert(i);

3988N/A

3988N/A if (strv_isempty(i->locale))

3988N/A puts(" System Locale: n/a\n");

3988N/A else {

3988N/A char **j;

3988N/A

3988N/A printf(" System Locale: %s\n", i->locale[0]);

3988N/A STRV_FOREACH(j, i->locale + 1)

3988N/A printf(" %s\n", *j);

3988N/A }

3988N/A

3988N/A printf(" VC Keymap: %s\n", strna(i->vconsole_keymap));

3988N/A if (!isempty(i->vconsole_keymap_toggle))

3988N/A printf("VC Toggle Keymap: %s\n", i->vconsole_keymap_toggle);

3988N/A

3988N/A printf(" X11 Layout: %s\n", strna(i->x11_layout));

3988N/A if (!isempty(i->x11_model))

3988N/A printf(" X11 Model: %s\n", i->x11_model);

3988N/A if (!isempty(i->x11_variant))

3988N/A printf(" X11 Variant: %s\n", i->x11_variant);

3988N/A if (!isempty(i->x11_options))

4001N/A printf(" X11 Options: %s\n", i->x11_options);

4001N/A}

4001N/A

4001N/Astatic int status_property(const char *name, DBusMessageIter *iter, StatusInfo *i) {

4001N/A int r;

4001N/A

4001N/A assert(name);

4001N/A assert(iter);

4001N/A

4001N/A switch (dbus_message_iter_get_arg_type(iter)) {

4001N/A

4001N/A case DBUS_TYPE_STRING: {

4001N/A const char *s;

4001N/A

4001N/A dbus_message_iter_get_basic(iter, &s);

4001N/A if (!isempty(s)) {

4001N/A if (streq(name, "VConsoleKeymap"))

4001N/A i->vconsole_keymap = s;

4001N/A else if (streq(name, "VConsoleKeymapToggle"))

4001N/A i->vconsole_keymap_toggle = s;

4001N/A else if (streq(name, "X11Layout"))

4001N/A i->x11_layout = s;

4001N/A else if (streq(name, "X11Model"))

4001N/A i->x11_model = s;

4001N/A else if (streq(name, "X11Variant"))

4001N/A i->x11_variant = s;

4001N/A else if (streq(name, "X11Options"))

3988N/A i->x11_options = s;

3988N/A }

3988N/A break;

3988N/A }

3988N/A

3988N/A case DBUS_TYPE_ARRAY:

3988N/A

3988N/A if (dbus_message_iter_get_element_type(iter) == DBUS_TYPE_STRING) {

3988N/A char **l;

3988N/A

3988N/A r = bus_parse_strv_iter(iter, &l);

3988N/A if (r < 0)

3988N/A return r;

3988N/A

3988N/A if (streq(name, "Locale")) {

3988N/A strv_free(i->locale);

3988N/A i->locale = l;

3988N/A l = NULL;

3988N/A }

3988N/A

3988N/A strv_free(l);

3988N/A }

3988N/A }

3988N/A

3988N/A return 0;

3988N/A}

3988N/A

3988N/Astatic int show_status(DBusConnection *bus, char **args, unsigned n) {

3988N/A _cleanup_dbus_message_unref_ DBusMessage *reply = NULL;

3988N/A const char *interface = "";

3988N/A int r;

3988N/A DBusMessageIter iter, sub, sub2, sub3;

3988N/A StatusInfo info;

3988N/A

3988N/A assert(args);

3988N/A

3988N/A r = bus_method_call_with_reply(

3988N/A bus,

3988N/A "org.freedesktop.locale1",

3988N/A "/org/freedesktop/locale1",

3988N/A "org.freedesktop.DBus.Properties",

3988N/A "GetAll",

3988N/A &reply,

3988N/A NULL,

3988N/A DBUS_TYPE_STRING, &interface,

3988N/A DBUS_TYPE_INVALID);

3988N/A if (r < 0)

3988N/A return r;

3988N/A

3988N/A if (!dbus_message_iter_init(reply, &iter) ||

3988N/A dbus_message_iter_get_arg_type(&iter) != DBUS_TYPE_ARRAY ||

3988N/A dbus_message_iter_get_element_type(&iter) != DBUS_TYPE_DICT_ENTRY) {

3988N/A log_error("Failed to parse reply.");

3988N/A return -EIO;

3988N/A }

3988N/A

3988N/A zero(info);

3988N/A dbus_message_iter_recurse(&iter, &sub);

3988N/A

3988N/A while (dbus_message_iter_get_arg_type(&sub) != DBUS_TYPE_INVALID) {

3988N/A const char *name;

3988N/A

3988N/A if (dbus_message_iter_get_arg_type(&sub) != DBUS_TYPE_DICT_ENTRY) {

3988N/A log_error("Failed to parse reply.");

3988N/A return -EIO;

3988N/A }

4001N/A

3988N/A dbus_message_iter_recurse(&sub, &sub2);

3988N/A

3988N/A if (bus_iter_get_basic_and_next(&sub2, DBUS_TYPE_STRING, &name, true) < 0) {

3988N/A log_error("Failed to parse reply.");

3988N/A return -EIO;

3988N/A }

3988N/A

3988N/A if (dbus_message_iter_get_arg_type(&sub2) != DBUS_TYPE_VARIANT) {

3988N/A log_error("Failed to parse reply.");

3988N/A return -EIO;

3988N/A }

3988N/A

3988N/A dbus_message_iter_recurse(&sub2, &sub3);

3988N/A

3988N/A r = status_property(name, &sub3, &info);

3988N/A if (r < 0) {

3988N/A log_error("Failed to parse reply.");

3988N/A return r;

3988N/A }

3988N/A

3988N/A dbus_message_iter_next(&sub);

3988N/A }

3988N/A

3988N/A print_status_info(&info);

3988N/A strv_free(info.locale);

3988N/A return 0;

3988N/A}

3988N/A

3988N/Astatic int set_locale(DBusConnection *bus, char **args, unsigned n) {

3988N/A _cleanup_dbus_message_unref_ DBusMessage *m = NULL, *reply = NULL;

3988N/A dbus_bool_t interactive = true;

3988N/A DBusError error;

3988N/A DBusMessageIter iter;

3988N/A int r;

3988N/A

3988N/A assert(bus);

3988N/A assert(args);

3988N/A

3988N/A dbus_error_init(&error);

3988N/A

3988N/A polkit_agent_open_if_enabled();

3988N/A

3988N/A m = dbus_message_new_method_call(

3988N/A "org.freedesktop.locale1",

3988N/A "/org/freedesktop/locale1",

3988N/A "org.freedesktop.locale1",

3988N/A "SetLocale");

3988N/A if (!m)

3988N/A return log_oom();

3988N/A

3988N/A dbus_message_iter_init_append(m, &iter);

3988N/A

3988N/A r = bus_append_strv_iter(&iter, args + 1);

3988N/A if (r < 0)

3988N/A return log_oom();

3988N/A

3988N/A if (!dbus_message_iter_append_basic(&iter, DBUS_TYPE_BOOLEAN, &interactive))

3988N/A return log_oom();

3988N/A

3988N/A reply = dbus_connection_send_with_reply_and_block(bus, m, -1, &error);

3988N/A if (!reply) {

3988N/A log_error("Failed to issue method call: %s", bus_error_message(&error));

3988N/A r = -EIO;

3988N/A goto finish;

3988N/A }

3988N/A

3988N/A r = 0;

3988N/A

3988N/Afinish:

3988N/A dbus_error_free(&error);

3988N/A return r;

3988N/A}

3988N/A

3988N/Astatic int list_locales(DBusConnection *bus, char **args, unsigned n) {

3988N/A /* Stolen from glibc... */

3988N/A

3988N/A struct locarhead {

3988N/A uint32_t magic;

3988N/A /* Serial number. */

3988N/A uint32_t serial;

3988N/A /* Name hash table. */

3988N/A uint32_t namehash_offset;

3988N/A uint32_t namehash_used;

3988N/A uint32_t namehash_size;

3988N/A /* String table. */

3988N/A uint32_t string_offset;

3988N/A uint32_t string_used;

3988N/A uint32_t string_size;

3988N/A /* Table with locale records. */

3988N/A uint32_t locrectab_offset;

3988N/A uint32_t locrectab_used;

3988N/A uint32_t locrectab_size;

3988N/A /* MD5 sum hash table. */

3988N/A uint32_t sumhash_offset;

3988N/A uint32_t sumhash_used;

3988N/A uint32_t sumhash_size;

3988N/A };

3988N/A

3988N/A struct namehashent {

3988N/A /* Hash value of the name. */

3988N/A uint32_t hashval;

3988N/A /* Offset of the name in the string table. */

3988N/A uint32_t name_offset;

3988N/A /* Offset of the locale record. */

3988N/A uint32_t locrec_offset;

3988N/A };

3988N/A

3988N/A const struct locarhead *h;

3988N/A const struct namehashent *e;

3988N/A const void *p = MAP_FAILED;

3988N/A _cleanup_close_ int fd = -1;

3988N/A _cleanup_strv_free_ char **l = NULL;

3988N/A char **j;

3988N/A Set *locales;

3988N/A size_t sz = 0;

3988N/A struct stat st;

3988N/A unsigned i;

3988N/A int r;

3988N/A

3988N/A locales = set_new(string_hash_func, string_compare_func);

3988N/A if (!locales)

3988N/A return log_oom();

3988N/A

3988N/A fd = open("/usr/lib/locale/locale-archive", O_RDONLY|O_NOCTTY|O_CLOEXEC);

3988N/A if (fd < 0) {

3988N/A log_error("Failed to open locale archive: %m");

3988N/A r = -errno;

3988N/A goto finish;

3988N/A }

3988N/A

3988N/A if (fstat(fd, &st) < 0) {

3988N/A log_error("fstat() failed: %m");

3988N/A r = -errno;

3988N/A goto finish;

3988N/A }

3988N/A

3988N/A if (!S_ISREG(st.st_mode)) {

3988N/A log_error("Archive file is not regular");

3988N/A r = -EBADMSG;

3988N/A goto finish;

3988N/A }

3988N/A

3988N/A if (st.st_size < (off_t) sizeof(struct locarhead)) {

3988N/A log_error("Archive has invalid size");

3988N/A r = -EBADMSG;

3988N/A goto finish;

3988N/A }

3988N/A

3988N/A p = mmap(NULL, st.st_size, PROT_READ, MAP_SHARED, fd, 0);

3988N/A if (p == MAP_FAILED) {

3988N/A log_error("Failed to map archive: %m");

3988N/A r = -errno;

3988N/A goto finish;

}

h = (const struct locarhead *) p;

if (h->magic != 0xde020109 ||

h->namehash_offset + h->namehash_size > st.st_size ||

h->string_offset + h->string_size > st.st_size ||

h->locrectab_offset + h->locrectab_size > st.st_size ||

h->sumhash_offset + h->sumhash_size > st.st_size) {

log_error("Invalid archive file.");

r = -EBADMSG;

goto finish;

}

e = (const struct namehashent*) ((const uint8_t*) p + h->namehash_offset);

for (i = 0; i < h->namehash_size; i++) {

char *z;

if (e[i].locrec_offset == 0)

continue;

z = strdup((char*) p + e[i].name_offset);

if (!z) {

r = log_oom();

goto finish;

}

r = set_put(locales, z);

if (r < 0) {

free(z);

log_error("Failed to add locale: %s", strerror(-r));

goto finish;

}

}

l = set_get_strv(locales);

if (!l) {

r = log_oom();

goto finish;

}

set_free(locales);

locales = NULL;

strv_sort(l);

pager_open_if_enabled();

STRV_FOREACH(j, l)

puts(*j);

r = 0;

finish:

if (p != MAP_FAILED)

munmap((void*) p, sz);

set_free_free(locales);

return r;

}

static int set_vconsole_keymap(DBusConnection *bus, char **args, unsigned n) {

_cleanup_dbus_message_unref_ DBusMessage *reply = NULL;

dbus_bool_t interactive = true, b;

const char *map, *toggle_map;

assert(bus);

assert(args);

if (n > 3) {

log_error("Too many arguments.");

return -EINVAL;

}

polkit_agent_open_if_enabled();

map = args[1];

toggle_map = n > 2 ? args[2] : "";

b = arg_convert;

return bus_method_call_with_reply(

bus,

"org.freedesktop.locale1",

"/org/freedesktop/locale1",

"org.freedesktop.locale1",

"SetVConsoleKeyboard",

&reply,

NULL,

DBUS_TYPE_STRING, &map,

DBUS_TYPE_STRING, &toggle_map,

DBUS_TYPE_BOOLEAN, &b,

DBUS_TYPE_BOOLEAN, &interactive,

DBUS_TYPE_INVALID);

}

static Set *keymaps = NULL;

static int nftw_cb(

const char *fpath,

const struct stat *sb,

int tflag,

struct FTW *ftwbuf) {

char *p, *e;

int r;

if (tflag != FTW_F)

return 0;

if (!endswith(fpath, ".map") &&

!endswith(fpath, ".map.gz"))

return 0;

p = strdup(path_get_file_name(fpath));

if (!p)

return log_oom();

e = endswith(p, ".map");

if (e)

*e = 0;

e = endswith(p, ".map.gz");

if (e)

*e = 0;

r = set_put(keymaps, p);

if (r == -EEXIST)

free(p);

else if (r < 0) {

log_error("Can't add keymap: %s", strerror(-r));

free(p);

return r;

}

return 0;

}

static int list_vconsole_keymaps(DBusConnection *bus, char **args, unsigned n) {

char **l, **i;

keymaps = set_new(string_hash_func, string_compare_func);

if (!keymaps)

return log_oom();

nftw("/usr/share/kbd/keymaps/", nftw_cb, 20, FTW_MOUNT|FTW_PHYS);

nftw("/usr/lib/kbd/keymaps/", nftw_cb, 20, FTW_MOUNT|FTW_PHYS);

nftw("/lib/kbd/keymaps/", nftw_cb, 20, FTW_MOUNT|FTW_PHYS);

l = set_get_strv(keymaps);

if (!l) {

set_free_free(keymaps);

return log_oom();

}

set_free(keymaps);

if (strv_isempty(l)) {

log_error("Couldn't find any console keymaps.");

return -ENOENT;

}

strv_sort(l);

pager_open_if_enabled();

STRV_FOREACH(i, l)

puts(*i);

strv_free(l);

return 0;

}

static int set_x11_keymap(DBusConnection *bus, char **args, unsigned n) {

_cleanup_dbus_message_unref_ DBusMessage *reply = NULL;

dbus_bool_t interactive = true, b;

const char *layout, *model, *variant, *options;

assert(bus);

assert(args);

if (n > 5) {

log_error("Too many arguments.");

return -EINVAL;

}

polkit_agent_open_if_enabled();

layout = args[1];

model = n > 2 ? args[2] : "";

variant = n > 3 ? args[3] : "";

options = n > 3 ? args[4] : "";

b = arg_convert;

return bus_method_call_with_reply(

bus,

"org.freedesktop.locale1",

"/org/freedesktop/locale1",

"org.freedesktop.locale1",

"SetX11Keyboard",

&reply,

NULL,

DBUS_TYPE_STRING, &layout,

DBUS_TYPE_STRING, &model,

DBUS_TYPE_STRING, &variant,

DBUS_TYPE_STRING, &options,

DBUS_TYPE_BOOLEAN, &b,

DBUS_TYPE_BOOLEAN, &interactive,

DBUS_TYPE_INVALID);

}

static int help(void) {

printf("%s [OPTIONS...] COMMAND ...\n\n"

"Query or change system time and date settings.\n\n"

" -h --help Show this help\n"

" --version Show package version\n"

" --no-convert Don't convert keyboard mappings\n"

" --no-pager Do not pipe output into a pager\n"

" --no-ask-password Do not prompt for password\n"

" -H --host=[USER@]HOST Operate on remote host\n\n"

"Commands:\n"

" status Show current locale settings\n"

" set-locale LOCALE... Set system locale\n"

" list-locales Show known locales\n"

" set-keymap MAP [MAP] Set virtual console keyboard mapping\n"

" list-keymaps Show known virtual console keyboard mappings\n"

" set-x11-keymap LAYOUT [MODEL] [VARIANT] [OPTIONS]\n"

" Set X11 keyboard mapping\n",

program_invocation_short_name);

return 0;

}

static int parse_argv(int argc, char *argv[]) {

enum {

ARG_VERSION = 0x100,

ARG_NO_PAGER,

ARG_NO_CONVERT,

ARG_NO_ASK_PASSWORD

};

static const struct option options[] = {

{ "help", no_argument, NULL, 'h' },

{ "version", no_argument, NULL, ARG_VERSION },

{ "no-pager", no_argument, NULL, ARG_NO_PAGER },

{ "host", required_argument, NULL, 'H' },

{ "privileged", no_argument, NULL, 'P' },

{ "no-ask-password", no_argument, NULL, ARG_NO_ASK_PASSWORD },

{ "no-convert", no_argument, NULL, ARG_NO_CONVERT },

{ NULL, 0, NULL, 0 }

};

int c;

assert(argc >= 0);

assert(argv);

while ((c = getopt_long(argc, argv, "has:H:P", options, NULL)) >= 0) {

switch (c) {

case 'h':

help();

return 0;

case ARG_VERSION:

puts(PACKAGE_STRING);

puts(DISTRIBUTION);

puts(SYSTEMD_FEATURES);

return 0;

case 'P':

arg_transport = TRANSPORT_POLKIT;

break;

case 'H':

arg_transport = TRANSPORT_SSH;

arg_host = optarg;

break;

case ARG_NO_CONVERT:

arg_convert = false;

break;

case ARG_NO_PAGER:

arg_no_pager = true;

break;

case '?':

return -EINVAL;

default:

log_error("Unknown option code %c", c);

return -EINVAL;

}

}

return 1;

}

static int localectl_main(DBusConnection *bus, int argc, char *argv[], DBusError *error) {

static const struct {

const char* verb;

const enum {

MORE,

LESS,

EQUAL

} argc_cmp;

const int argc;

int (* const dispatch)(DBusConnection *bus, char **args, unsigned n);

} verbs[] = {

{ "status", LESS, 1, show_status },

{ "set-locale", MORE, 2, set_locale },

{ "list-locales", EQUAL, 1, list_locales },

{ "set-keymap", MORE, 2, set_vconsole_keymap },

{ "list-keymaps", EQUAL, 1, list_vconsole_keymaps },

{ "set-x11-keymap", MORE, 2, set_x11_keymap },

};

int left;

unsigned i;

assert(argc >= 0);

assert(argv);

assert(error);

left = argc - optind;

if (left <= 0)

/* Special rule: no arguments means "status" */

i = 0;

else {

if (streq(argv[optind], "help")) {

help();

return 0;

}

for (i = 0; i < ELEMENTSOF(verbs); i++)

if (streq(argv[optind], verbs[i].verb))

break;

if (i >= ELEMENTSOF(verbs)) {

log_error("Unknown operation %s", argv[optind]);

return -EINVAL;

}

}

switch (verbs[i].argc_cmp) {

case EQUAL:

if (left != verbs[i].argc) {

log_error("Invalid number of arguments.");

return -EINVAL;

}

break;

case MORE:

if (left < verbs[i].argc) {

log_error("Too few arguments.");

return -EINVAL;

}

break;

case LESS:

if (left > verbs[i].argc) {

log_error("Too many arguments.");

return -EINVAL;

}

break;

default:

assert_not_reached("Unknown comparison operator.");

}

if (!bus) {

log_error("Failed to get D-Bus connection: %s", error->message);

return -EIO;

}

return verbs[i].dispatch(bus, argv + optind, left);

}

int main(int argc, char *argv[]) {

int r, retval = EXIT_FAILURE;

DBusConnection *bus = NULL;

DBusError error;

dbus_error_init(&error);

log_parse_environment();

log_open();

r = parse_argv(argc, argv);

if (r < 0)

goto finish;

else if (r == 0) {

retval = EXIT_SUCCESS;

goto finish;

}

if (arg_transport == TRANSPORT_NORMAL)

bus = dbus_bus_get_private(DBUS_BUS_SYSTEM, &error);

else if (arg_transport == TRANSPORT_POLKIT)

bus_connect_system_polkit(&bus, &error);

else if (arg_transport == TRANSPORT_SSH)

bus_connect_system_ssh(NULL, arg_host, &bus, &error);

else

assert_not_reached("Uh, invalid transport...");

r = localectl_main(bus, argc, argv, &error);

retval = r < 0 ? EXIT_FAILURE : r;

finish:

if (bus) {

dbus_connection_flush(bus);

dbus_connection_close(bus);

dbus_connection_unref(bus);

}

dbus_error_free(&error);

dbus_shutdown();

pager_close();

return retval;

}