index : forums	master
	The forums.mageia.org Website	Maat [maat]

aboutsummaryrefslogtreecommitdiffstats

log msg author committer range

path: root/phpBB/phpbb/db/extractor/sqlite3_extractor.php

diff options

context:	12345678910152025303540
space:	includeignore
mode:	unifiedssdiffstat only

author	JoshyPHP <s9e.dev@gmail.com>	2015-12-05 09:53:26 +0100
committer	JoshyPHP <s9e.dev@gmail.com>	2015-12-05 09:53:26 +0100
commit	4b8acefc6c3ed245778843ae7e52a7576eef6c28 (patch)
tree	8b717959ef87685c6aed5b2c3a9129b3c7714d8c /phpBB/phpbb/db/extractor/sqlite3_extractor.php
parent	b0dfca1dbf503d8dbbcac87d7025b73227fb27ad (diff)
download	forums-4b8acefc6c3ed245778843ae7e52a7576eef6c28.tar forums-4b8acefc6c3ed245778843ae7e52a7576eef6c28.tar.gz forums-4b8acefc6c3ed245778843ae7e52a7576eef6c28.tar.bz2 forums-4b8acefc6c3ed245778843ae7e52a7576eef6c28.tar.xz forums-4b8acefc6c3ed245778843ae7e52a7576eef6c28.zip

[ticket/13451] Added regression test

PHPBB3-13451

Diffstat (limited to 'phpBB/phpbb/db/extractor/sqlite3_extractor.php')

0 files changed, 0 insertions, 0 deletions

generated by cgit v1.2.1 (git 2.21.0) at 2025-09-05 16:46:44 +0000

package Xconfig; # $Id$

use diagnostics;
use strict;

use common qw(:common :file :system);
use mouse;
use devices;
use Xconfigurator;

# otherwise uses the rule substr($keymap, 0, 2)
my %keymap_translate = (
    cf => "ca_enhanced",
    uk => "gb",
);


1;

sub keymap_translate {
    $keymap_translate{$_[0]} || substr($_[0], 0, 2);
}


sub getinfo {
    my $o = shift || {};
    getinfoFromDDC($o);
    getinfoFromSysconfig($o);

    add2hash($o->{mouse}, mouse::detect()) unless $o->{mouse}{XMOUSETYPE};

    $o->{mouse}{device} ||= "mouse" if -e "/dev/mouse";
    $o;
}

sub getinfoFromXF86Config {
    my $o = shift || {};
    my $prefix = shift || "";
    my (%c, $depth, $driver);

    $o->{card}{server} ||= $1 if readlink("$prefix/etc/X11/X") =~ /XF86_ (\w+)$/x; #- /x for perl2fcalls

    local *F;
    open F, "$prefix/etc/X11/XF86Config" or return {};
    foreach (<F>) {
	if (/^Section "Keyboard"/ .. /^EndSection/) {
	    $o->{keyboard}{xkb_keymap} ||= $1 if /^\s*XkbLayout\s+"(.*?)"/;
	} elsif (/^Section "Pointer"/ .. /^EndSection/) {
	    $o->{mouse}{XMOUSETYPE} ||= $1 if /^\s*Protocol\s+"(.*?)"/;
	    $o->{mouse}{device} ||= $1 if m|^\s*Device\s+"/dev/(.*?)"|;