Unverified Commit 8778fad4 authored by boklm's avatar boklm
Browse files

Add a TBBTestSuite::XServer module 

This will be used to start an X server with a dummy driver, and a window
manager, to run the tests in.

The Xdummy script and the xorg.conf files have been taken from xpra.org.
parent 582a8c4a

TBBTestSuite/XServer.pm

0 → 100644
+79 −0
Original line number Diff line number Diff line 
package TBBTestSuite::XServer;

use FindBin;

use TBBTestSuite::Common qw(exit_error);

use IO::CaptureOutput qw(capture_exec);

use POSIX ":sys_wait_h";



our (@ISA, @EXPORT_OK);

BEGIN {

    require Exporter;

    @ISA       = qw(Exporter);

    @EXPORT_OK = qw(start_X stop_X set_Xmode);

}



my %Xpid;

my %WMpid;



sub free_display {

    my $i = 0;

    while ($i < 1000) {

        return ":$i" unless -S "/tmp/.X11-unix/X$i";

        $i++;

    }

    exit_error "Could not find free X display";

}



sub start_X {

    my ($logfile, $display) = @_;

    $display //= free_display;

    my $datadir = "$FindBin::Bin/data";

    $Xpid{$display} = fork;

    if (!$Xpid{$display}) {

        open(STDOUT, '>', '/dev/null');

        open(STDERR, '>', '/dev/null');

        exec("$datadir/Xdummy", '-noreset', '+extension', 'GLX',

            '+extension', 'RANDR', '+extension', 'RENDER', '-config',

            "$datadir/xorg.conf", '-logfile', $logfile, $display)

                || exit_error "Could not start Xorg";

    }

    sleep 3;

    $ENV{DISPLAY} = $display;

    $WMpid{$display} = fork;

    if (!$WMpid{$display}) {

        open(STDOUT, '>', '/dev/null');

        open(STDERR, '>', '/dev/null');

        exec('fluxbox')

                || exit_error "Could not start WM";

    }

    return $display;

}



sub kill_process {

    my ($pid) = @_;

    return unless $pid;

    kill 15, $pid;

    my ($kid, $i) = (0, 5);

    while ($kid == 0 && $i) {

        $i--;

        $kid = waitpid($pid, WNOHANG);

        sleep 1 if $kid == 0;

    }

    kill 9, $pid if $kid == 0;

}



sub stop_X {

    my ($display) = @_;

    kill_process $WMpid{$display};

    kill_process $Xpid{$display};

}



sub set_Xmode {

    my ($display, $mode) = @_;

    $ENV{DISPLAY} = $display;

    my ($out, $err, $success)

        = capture_exec('xrandr', '--output', 'default', '--mode', $mode);

    exit_error "Error changing mode: $err" unless $success;

    return $success;

}



1;

data/Xdummy

0 → 100755
+71 −0
Original line number Diff line number Diff line 
#!/bin/sh

#@PydevCodeAnalysisIgnore



# This script has been downloaded from:

# https://www.xpra.org/trac/browser/xpra/trunk/src/scripts/xpra_Xdummy



find_ld_linux() {

	arch=$(uname -m)



	if [ $arch = "x86_64" ]; then

		LD_LINUX='/lib64/ld-linux-x86-64.so.2'

	elif [ $arch = "i386" ]; then

		LD_LINUX='/lib/ld-linux.so.2'

	elif [ $arch = "i486" ]; then

		LD_LINUX='/lib/ld-linux.so.2'

	elif [ $arch = "i586" ]; then

		LD_LINUX='/lib/ld-linux.so.2'

	elif [ $arch = "i686" ]; then

		LD_LINUX='/lib/ld-linux.so.2'

	elif [ $arch = "armel" ]; then

		LD_LINUX='/lib/ld-linux.so.3'

	elif [ $arch = "armhfp" ]; then

		LD_LINUX='/lib/ld-linux.so.3'

	elif [ $arch = "armhf" ]; then

		LD_LINUX='/lib/ld-linux-armhf.so.3'

	elif [ $arch = "ppc64" ]; then

		LD_LINUX='/lib64/ld64.so.1'

	elif [ $arch = "s390x" ]; then

		LD_LINUX='/lib64/ld64.so.1'

	else

		#suitable for: powerpc/ppc, mips/mipsel, s390 and others:

		LD_LINUX='/lib/ld.so.1'

	fi



	if [ ! -x "$LD_LINUX" ]; then

		LD_LINUX=''

		echo "could not determine ld path for $arch, please file an xpra bug"

	fi

}



XORG_BIN=$(which Xorg)

if [ ! -x "$XORG_BIN" ]; then

	echo "failed to locate Xorg binary to run"

	exit 1

fi



if [ -u "$XORG_BIN" ]; then

	# setuid is set, we need to do magic

	find_ld_linux

	if [ -n "$LD_LINUX" ]; then

		if [ -n "$BASH" ]; then

			#running in bash, can show a more helpful command name:

			exec -a "Xorg-nosuid" "$LD_LINUX" "$XORG_BIN" "$@"

		else

			exec "$LD_LINUX" "$XORG_BIN" "$@"

		fi

	else

		#fallback to making a copy of the binary:

		DOTXPRA_DIR="$HOME/.xpra"

		if [ ! -d "$DOTXPRA_DIR" ]; then

	 		mkdir "$DOTXPRA_DIR"

	 		chmod 700 "$DOTXPRA_DIR"

	 	fi

		NOSUID_XORG="$DOTXPRA_DIR/Xorg-nosuid"

	 	cp -f "$XORG_BIN" "$NOSUID_XORG"

	 	exec "$NOSUID_XORG" "$@"

	 fi

else

	# setuid is not set on xorg_bin

	exec "$XORG_BIN" "$@"

fi

data/xorg.conf

0 → 100644
+132 −0
Original line number Diff line number Diff line 
Section "ServerFlags"

  Option "DontVTSwitch" "true"

  Option "AllowMouseOpenFail" "true"

  Option "PciForceNone" "true"

  Option "AutoEnableDevices" "false"

  Option "AutoAddDevices" "false"

EndSection



Section "InputDevice"

  Identifier "dummy_mouse"

  Option "CorePointer" "true"

  Driver "void"

EndSection



Section "InputDevice"

  Identifier "dummy_keyboard"

  Option "CoreKeyboard" "true"

  Driver "void"

EndSection



Section "Device"

  Identifier "dummy_videocard"

  Driver "dummy"

  Option "ConstantDPI" "true"

  #VideoRam 4096000

  #VideoRam 256000

  VideoRam 192000

EndSection



Section "Monitor"

  Identifier "dummy_monitor"

  HorizSync   5.0 - 1000.0

  VertRefresh 5.0 - 200.0

  #This can be used to get a specific DPI, but only for the default resolution:

  #DisplaySize 508 317

  #NOTE: the highest modes will not work without increasing the VideoRam

  # for the dummy video card.

  Modeline "32768x32768" 15226.50 32768 35800 39488 46208 32768 32771 32781 32953

  Modeline "32768x16384" 7516.25 32768 35544 39192 45616 16384 16387 16397 16478

  Modeline "16384x8192" 2101.93 16384 16416 24400 24432 8192 8390 8403 8602

  Modeline "8192x4096" 424.46 8192 8224 9832 9864 4096 4195 4202 4301

  Modeline "5496x1200" 199.13 5496 5528 6280 6312 1200 1228 1233 1261

  Modeline "5280x1080" 169.96 5280 5312 5952 5984 1080 1105 1110 1135

  Modeline "5280x1200" 191.40 5280 5312 6032 6064 1200 1228 1233 1261

  Modeline "5120x3200" 199.75 5120 5152 5904 5936 3200 3277 3283 3361

  Modeline "4800x1200" 64.42 4800 4832 5072 5104 1200 1229 1231 1261

  Modeline "3840x2880" 133.43 3840 3872 4376 4408 2880 2950 2955 3025

  Modeline "3840x2560" 116.93 3840 3872 4312 4344 2560 2622 2627 2689

  Modeline "3840x2048" 91.45 3840 3872 4216 4248 2048 2097 2101 2151

  Modeline "3840x1080" 100.38 3840 3848 4216 4592 1080 1081 1084 1093

  Modeline "3600x1200" 106.06 3600 3632 3984 4368 1200 1201 1204 1214

  Modeline "3288x1080" 39.76 3288 3320 3464 3496 1080 1106 1108 1135

  Modeline "2048x2048" 49.47 2048 2080 2264 2296 2048 2097 2101 2151

  Modeline "2048x1536" 80.06 2048 2104 2312 2576 1536 1537 1540 1554

  Modeline "2560x1600" 47.12 2560 2592 2768 2800 1600 1639 1642 1681

  Modeline "2560x1440" 42.12 2560 2592 2752 2784 1440 1475 1478 1513

  Modeline "1920x1440" 69.47 1920 1960 2152 2384 1440 1441 1444 1457

  Modeline "1920x1200" 26.28 1920 1952 2048 2080 1200 1229 1231 1261

  Modeline "1920x1080" 23.53 1920 1952 2040 2072 1080 1106 1108 1135

  Modeline "1680x1050" 20.08 1680 1712 1784 1816 1050 1075 1077 1103

  Modeline "1600x1200" 22.04 1600 1632 1712 1744 1200 1229 1231 1261

  Modeline "1600x900" 33.92 1600 1632 1760 1792 900 921 924 946

  Modeline "1440x900" 30.66 1440 1472 1584 1616 900 921 924 946

  ModeLine "1366x768" 72.00 1366 1414 1446 1494  768 771 777 803

  Modeline "1280x1024" 31.50 1280 1312 1424 1456 1024 1048 1052 1076

  Modeline "1280x800" 24.15 1280 1312 1400 1432 800 819 822 841

  Modeline "1280x768" 23.11 1280 1312 1392 1424 768 786 789 807

  Modeline "1360x768" 24.49 1360 1392 1480 1512 768 786 789 807

  Modeline "1024x768" 18.71 1024 1056 1120 1152 768 786 789 807

  Modeline "768x1024" 19.50 768 800 872 904 1024 1048 1052 1076





  #common resolutions for android devices (both orientations):

  Modeline "800x1280" 25.89 800 832 928 960 1280 1310 1315 1345

  Modeline "1280x800" 24.15 1280 1312 1400 1432 800 819 822 841

  Modeline "720x1280" 30.22 720 752 864 896 1280 1309 1315 1345

  Modeline "1280x720" 27.41 1280 1312 1416 1448 720 737 740 757

  Modeline "768x1024" 24.93 768 800 888 920 1024 1047 1052 1076

  Modeline "1024x768" 23.77 1024 1056 1144 1176 768 785 789 807

  Modeline "600x1024" 19.90 600 632 704 736 1024 1047 1052 1076

  Modeline "1024x600" 18.26 1024 1056 1120 1152 600 614 617 631

  Modeline "536x960" 16.74 536 568 624 656 960 982 986 1009

  Modeline "960x536" 15.23 960 992 1048 1080 536 548 551 563

  Modeline "600x800" 15.17 600 632 688 720 800 818 822 841

  Modeline "800x600" 14.50 800 832 880 912 600 614 617 631

  Modeline "480x854" 13.34 480 512 560 592 854 873 877 897

  Modeline "848x480" 12.09 848 880 920 952 480 491 493 505

  Modeline "480x800" 12.43 480 512 552 584 800 818 822 841

  Modeline "800x480" 11.46 800 832 872 904 480 491 493 505

  #resolutions for android devices (both orientations)

  #minus the status bar

  #38px status bar (and width rounded up)

  Modeline "800x1242" 25.03 800 832 920 952 1242 1271 1275 1305

  Modeline "1280x762" 22.93 1280 1312 1392 1424 762 780 783 801

  Modeline "720x1242" 29.20 720 752 856 888 1242 1271 1276 1305

  Modeline "1280x682" 25.85 1280 1312 1408 1440 682 698 701 717

  Modeline "768x986" 23.90 768 800 888 920 986 1009 1013 1036

  Modeline "1024x730" 22.50 1024 1056 1136 1168 730 747 750 767

  Modeline "600x986" 19.07 600 632 704 736 986 1009 1013 1036

  Modeline "1024x562" 17.03 1024 1056 1120 1152 562 575 578 591

  Modeline "536x922" 16.01 536 568 624 656 922 943 947 969

  Modeline "960x498" 14.09 960 992 1040 1072 498 509 511 523

  Modeline "600x762" 14.39 600 632 680 712 762 779 783 801

  Modeline "800x562" 13.52 800 832 880 912 562 575 578 591

  Modeline "480x810" 12.59 480 512 552 584 810 828 832 851

  Modeline "848x442" 11.09 848 880 920 952 442 452 454 465

  Modeline "480x762" 11.79 480 512 552 584 762 779 783 801

EndSection



Section "Screen"

  Identifier "dummy_screen"

  Device "dummy_videocard"

  Monitor "dummy_monitor"

  DefaultDepth 24

  SubSection "Display"

    Viewport 0 0

    Depth 24

    #Modes "32768x32768" "32768x16384" "16384x8192" "8192x4096" "5120x3200" "3840x2880" "3840x2560" "3840x2048" "2048x2048" "2560x1600" "1920x1440" "1920x1200" "1920x1080" "1600x1200" "1680x1050" "1600x900" "1400x1050" "1440x900" "1280x1024" "1366x768" "1280x800" "1024x768" "1024x600" "800x600" "320x200"

    Modes "5120x3200" "3840x2880" "3840x2560" "3840x2048" "2048x2048" "2560x1600" "1920x1440" "1920x1200" "1920x1080" "1600x1200" "1680x1050" "1600x900" "1400x1050" "1440x900" "1280x1024" "1366x768" "1280x800" "1024x768" "1024x600" "800x600" "320x200"

    #Virtual 32000 32000

    #Virtual 16384 8192

    Virtual 8192 4096

    #Virtual 5120 3200

  EndSubSection

EndSection



Section "ServerLayout"

  Identifier   "dummy_layout"

  Screen       "dummy_screen"

  InputDevice  "dummy_mouse"

  InputDevice  "dummy_keyboard"

EndSection

install-deps

+27 −0
Original line number Diff line number Diff line
@@ -14,6 +14,15 @@ yum_install() { 
    done

}



apt_install() {

    apt-get install -y "$@"

}



pkg_install() {

    [ -f /etc/debian_version ] && apt_install "$@"

    [ -f /etc/redhat-release ] && which yum > /dev/null 2>&1 && yum_install "$@"

}



perlmodules='

Cwd Data::Dump Digest::SHA File::Path File::Slurp File::Spec File::Temp

FindBin Getopt::Long IO::CaptureOutput IO::Socket::INET Image::Magick
@@ -73,3 +82,21 @@ then 
        cpan_install $perlmod

    done

fi



install_X() {

    packages="fluxbox"

    [ -f /etc/debian_version ] && packages="$packages xserver-xorg-video-dummy"

    [ -f /etc/redhat-release ] && packages="$packages xorg-x11-drv-dummy"

    pkg_install $packages

}



while test $# != 0

do

    case "$1" in

        X)

            install_X ;;

        *)

            echo "Unknown option $1" >&2 ;;

    esac

    shift

done