cosmic-settings/app/src/pages/input/touchpad.rs

use apply::Apply;
use cosmic::widget::{self, settings};
use cosmic::Element;
use cosmic_comp_config::input::AccelProfile;
use cosmic_settings_page::Section;
use cosmic_settings_page::{self as page, section};
use slotmap::SlotMap;

use super::Message;

#[derive(Default)]
pub struct Page;

impl page::Page<crate::pages::Message> for Page {
    fn content(
        &self,
        sections: &mut SlotMap<section::Entity, Section<crate::pages::Message>>,
    ) -> Option<page::Content> {
        Some(vec![
            sections.insert(touchpad()),
            sections.insert(scrolling()),
        ])
    }

    fn info(&self) -> page::Info {
        page::Info::new("touchpad", "input-touchpad-symbolic")
            .title(fl!("touchpad"))
            .description(fl!("touchpad", "desc"))
    }
}

impl page::AutoBind<crate::pages::Message> for Page {}

fn touchpad() -> Section<crate::pages::Message> {
    Section::default()
        .descriptions(vec![
            fl!("touchpad", "primary-button"),
            fl!("touchpad", "speed"),
            fl!("touchpad", "acceleration"),
            fl!("touchpad", "acceleration-desc"),
            fl!("touchpad", "double-click-speed"),
            fl!("touchpad", "double-click-speed-desc"),
        ])
        .view::<Page>(|binder, _page, section| {
            let descriptions = &section.descriptions;

            let input = binder.page::<super::Page>().expect("input page not found");

            settings::view_section(&section.title)
                .add(settings::item(
                    &descriptions[0],
                    cosmic::widget::segmented_selection::horizontal(&input.touchpad_primary_button)
                        .on_activate(|x| Message::PrimaryButtonSelected(x, true)),
                ))
                .add(
                    settings::item::builder(&descriptions[1]).control(widget::slider(
                        0.0..=100.0,
                        (input
                            .input_touchpad
                            .acceleration
                            .as_ref()
                            .map_or(0.0, |x| x.speed)
                            + 1.0)
                            * 50.0,
                        |value| Message::SetMouseSpeed((value / 50.0) - 1.0, true),
                    )),
                )
                .add(
                    settings::item::builder(&descriptions[2])
                        .description(&descriptions[3])
                        .toggler(
                            input
                                .input_touchpad
                                .acceleration
                                .as_ref()
                                .map_or(true, |x| x.profile == Some(AccelProfile::Adaptive)),
                            |x| Message::SetAcceleration(x, true),
                        ),
                )
                // TODO disable while typing
                .add(
                    settings::item::builder(&descriptions[4])
                        .description(&descriptions[5])
                        .control(widget::slider(0..=100, 0, |x| {
                            Message::SetDoubleClickSpeed(x, true)
                        })),
                )
                .apply(Element::from)
                .map(crate::pages::Message::Input)
        })
}

fn scrolling() -> Section<crate::pages::Message> {
    Section::default()
        .title(fl!("mouse-scrolling"))
        .descriptions(vec![
            fl!("mouse-scrolling", "speed"),
            fl!("mouse-scrolling", "natural"),
            fl!("mouse-scrolling", "natural-desc"),
        ])
        .view::<Page>(|binder, _page, section| {
            let descriptions = &section.descriptions;

            let input = binder.page::<super::Page>().expect("input page not found");

            settings::view_section(&section.title)
                .add(settings::item(
                    &descriptions[0],
                    // TODO show numeric value
                    // TODO desired range?
                    widget::slider(
                        1.0..=100.0,
                        input
                            .input_touchpad
                            .scroll_config
                            .as_ref()
                            .and_then(|x| x.scroll_factor)
                            .unwrap_or(1.)
                            .log(2.)
                            * 10.0
                            + 50.0,
                        |value| Message::SetScrollFactor(2f64.powf((value - 50.0) / 10.0), true),
                    ),
                ))
                .add(
                    settings::item::builder(&descriptions[1])
                        .description(&descriptions[2])
                        .toggler(
                            input
                                .input_touchpad
                                .scroll_config
                                .as_ref()
                                .and_then(|x| x.natural_scroll)
                                .unwrap_or(false),
                            |x| Message::SetNaturalScroll(x, true),
                        ),
                )
                .apply(Element::from)
                .map(crate::pages::Message::Input)
        })
}