1 files changed, 99 insertions, 0 deletions
diff --git a/ui/qt5/inputpage.cc b/ui/qt5/inputpage.cc
new file mode 100644
index 0000000..f0816b4
--- /dev/null
+++ b/ui/qt5/inputpage.cc
@@ -0,0 +1,99 @@
+/*
+ * inputpage.cc - Implementation of the UI.Input page
+ * horizon-qt5, the Qt 5 user interface for
+ * Project Horizon
+ *
+ * Copyright (c) 2019 Adélie Linux and contributors.  All rights reserved.
+ * This code is licensed under the AGPL 3.0 license, as noted in the
+ * LICENSE-code file in the root directory of this repository.
+ *
+ * SPDX-License-Identifier: AGPL-3.0-only
+ */
+
+#include "inputpage.hh"
+
+#include <QLabel>
+#include <QVBoxLayout>
+
+/* XXX TODO: Share with hscript/meta.cc - perhaps make a common header? */
+#include <set>
+#include <string>
+const std::set<std::string> valid_keymaps = {
+    "us", "ad", "af", "ara", "al", "am", "at", "az", "by", "be", "bd", "in",
+    "ba", "br", "bg", "ma", "mm", "ca", "cd", "cn", "hr", "cz", "dk", "nl",
+    "bt", "ee", "ir", "iq", "fo", "fi", "fr", "gh", "gn", "ge", "de", "gr",
+    "hu", "is", "il", "it", "jp", "kg", "kh", "kz", "la", "latam", "lt", "lv",
+    "mao", "me", "mk", "mt", "mn", "no", "pl", "pt", "ro", "ru", "rs", "si",
+    "sk", "es", "se", "ch", "sy", "tj", "lk", "th", "tr", "ua", "gb", "uz",
+    "vn", "kr", "ie", "pk", "mv", "za", "epo", "np", "ng", "et", "sn", "brai",
+    "tm", "ml", "tz", "ke", "bw", "ph"
+};
+
+#ifdef HAS_INSTALL_ENV
+#include <QProcess>
+#include <QPushButton>
+#include <QLineEdit>
+#include <X11/XKBlib.h>
+#include <X11/extensions/XKBrules.h>
+#endif  /* HAS_INSTALL_ENV */
+
+InputPage::InputPage(QWidget *parent) : HorizonWizardPage(parent) {
+    QLabel *descLabel;
+    QVBoxLayout *layout;
+
+    loadWatermark("intro");
+    setTitle(tr("Keyboard Layout"));
+
+    descLabel = new QLabel(tr("Choose the layout of your keyboard."));
+
+    /* REQ: UI.Input.LayoutList */
+    layoutList = new QListWidget(this);
+    layoutList->setSelectionMode(QAbstractItemView::SingleSelection);
+    layoutList->setWhatsThis(tr("This is a list of keyboard layouts.  Select one to choose the layout of the keyboard you will be using on your Adélie Linux computer."));
+    for(auto &map : valid_keymaps) {
+        layoutList->addItem(map.c_str());
+    }
+
+    registerField("keymap*", layoutList);
+
+#ifdef HAS_INSTALL_ENV
+    /* REQ: UI.Input.ChooseLayout */
+    QObject::connect(layoutList, &QListWidget::currentItemChanged,
+                     [](QListWidgetItem *current, QListWidgetItem *) {
+        if(current == nullptr) return;
+
+        QProcess setxkbmap;
+        setxkbmap.execute("setxkbmap", {current->text()});
+    });
+
+    /* REQ: UI.Input.Test */
+    QLineEdit *testArea = new QLineEdit(this);
+    testArea->setPlaceholderText(tr("Type here to test the keyboard layout you've selected."));
+    testArea->setWhatsThis(tr("By typing into this box, you can ensure the layout you've selected is the correct one."));
+#endif  /* HAS_INSTALL_ENV */
+
+    layout = new QVBoxLayout(this);
+    layout->addWidget(descLabel);
+    layout->addSpacing(20);
+    layout->addWidget(layoutList);
+#ifdef HAS_INSTALL_ENV
+    layout->addStretch();
+    layout->addWidget(testArea);
+#endif  /* HAS_INSTALL_ENV */
+
+    setLayout(layout);
+}
+
+void InputPage::initializePage() {
+#ifdef HAS_INSTALL_ENV
+    /* Select the current keyboard layout, if available. */
+    Display *dpy = XOpenDisplay(nullptr);
+    if(dpy != nullptr) {
+        XkbRF_VarDefsRec vardefs;
+        XkbRF_GetNamesProp(dpy, nullptr, &vardefs);
+        QList<QListWidgetItem *> items = layoutList->findItems(vardefs.layout, Qt::MatchExactly);
+        if(!items.empty()) layoutList->setCurrentItem(items.at(0));
+        XCloseDisplay(dpy);
+    }
+#endif  /* HAS_INSTALL_ENV */
+}