Something went wrong. Try again.
A modern, network-enabled music player platform built on Rockbox technology. rockboxd.tsiry-sandratraina.com
rust deno navidrome airplay libadwaita zig mpris snapcast mpd rockbox audio subsonic
Something went wrong. Try again.
123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107--[[/*************************************************************************** * __________ __ ___. * Open \______ \ ____ ____ | | _\_ |__ _______ ___ * Source | _// _ \_/ ___\| |/ /| __ \ / _ \ \/ / * Jukebox | | ( <_> ) \___| < | \_\ ( <_> > < < * Firmware |____|_ /\____/ \___ >__|_ \|___ /\____/__/\_ \ * \/ \/ \/ \/ \/ * * Copyright (C) 2021 William Wilgus * * This program is free software; you can redistribute it and/or * modify it under the terms of the GNU General Public License * as published by the Free Software Foundation; either version 2 * of the License, or (at your option) any later version. * * This software is distributed on an "AS IS" basis, WITHOUT WARRANTY OF ANY * KIND, either express or implied. * ****************************************************************************/]]--create keyboard layout--BILGUS 4/2021-- create_kbd_layout = require("create_kbd_layout")-- local layout = create_kbd_layout("abcd")
local function encode_short(n) return string.char(bit.band(0x00FF, n), bit.rshift(bit.band(0xFF00, n), 8))end
local function utf8decode(str) local INVALID = 0xfffd local t = {} local function check_char(c) local tail = false local code c = string.byte(c) if (c <= 0x7f) or (c >= 0xc2) then -- Start of new character if (c < 0x80) then -- U-00000000 - U-0000007F, 1 string.byte code = c; elseif (c < 0xe0) then -- U-00000080 - U-000007FF, 2 string.bytes tail = 1; code = bit.band(c, 0x1f) elseif (c < 0xf0) then -- U-00000800 - U-0000FFFF, 3 string.bytes tail = 2; code = bit.band(c, 0x0f) elseif (c < 0xf5) then -- U-00010000 - U-001FFFFF, 4 string.bytes tail = 3; code = bit.band(c, 0x07) else -- Invalid size code = INVALID; end
while tail and c ~= 0 do tail = tail - 1 if bit.band(c, 0xc0) == 0x80 then -- Valid continuation character code = bit.bor(bit.lshift(code, 6),bit.band(c, 0x3f)) else -- Invalid continuation char code = INVALID; break; end end else -- Invalid UTF-8 char code = INVALID; end -- currently we don't support chars above U-FFFF t[#t + 1 ] = encode_short((code < 0x10000) and code or INVALID) end str:gsub(".", check_char) -- run check function for every char return table.concat(t)end
local function create_keyboard_layout(s_layout) local insert = table.insert lines = {}
for str in string.gmatch(s_layout, "([^\n]+)") do local len = string.len(str) lines[#lines + 1] = table.concat({encode_short(len), utf8decode(str)}) end lines[#lines + 1] = encode_short(0xFEFF)
return table.concat(lines)end
--[[local name = "Test_KBD_LAYOUT_" .. tostring(1)local test = create_keyboard_layout("ABCDEFGHIJKLM\nNOPQRSTUVWXYZ\n0123456789")local file = io.open('/' .. name, "w+") -- overwrite, rb ignores the 'b' flagfile:write(test)-- write the layout to the file nowfile:close()
if not file then rb.splash(rb.HZ, "Error opening /" .. name) returnendrb.kbd_input(name, test)]]return create_keyboard_layout