drakx - Mageia Installer and base platform for many utilities

Mageia Installer and base platform for many utilities
Thierry Vignaud [tv]
path: root/perl-install/standalone/menu/localedrake-user.desktop.in
diff options
author	Thierry Vignaud <thierry.vignaud@gmail.com>	2016-12-11 18:39:05 +0100
committer	Thierry Vignaud <thierry.vignaud@gmail.com>	2016-12-12 10:12:44 +0100
commit	ea1908ab2c9e4b9eedf1dfbfb0449bc049ecdcb8 (patch)
tree	ceacd1fb3eb0a77d7ad95f2d8a587e5cae6975b2 /perl-install/standalone/menu/localedrake-user.desktop.in
parent	8f904fa664b953e2f81759dd7597067c8a0a7242 (diff)
download	drakx-ea1908ab2c9e4b9eedf1dfbfb0449bc049ecdcb8.tar drakx-ea1908ab2c9e4b9eedf1dfbfb0449bc049ecdcb8.tar.gz drakx-ea1908ab2c9e4b9eedf1dfbfb0449bc049ecdcb8.tar.bz2 drakx-ea1908ab2c9e4b9eedf1dfbfb0449bc049ecdcb8.tar.xz drakx-ea1908ab2c9e4b9eedf1dfbfb0449bc049ecdcb8.zip
make sure ratio is an int64 (mga#19895)
as this is the variable that cause issues
Diffstat (limited to 'perl-install/standalone/menu/localedrake-user.desktop.in')
0 files changed, 0 insertions, 0 deletions
221'>221 222 223 224 225 226 227 228 229 230 231 232 233 234 235 236 237 238 239 240 241 242 243 244 245 246 247 248 249 250 251 252 253 254 255 256 257 258 259 260 261 262 263 264 265 266 267 268 269 270 271 272 273 274 275 276 277 278 279
#!/usr/bin/perl -cw

my $ooo_version = '3.0';
my $use_modules = to_bool($live->{settings}{pack});
my @user_config_dirs = ('/etc/skel', if_($live->{settings}{default_user}, '/home/' . $live->{settings}{default_user}));

sub build_one_label {
	my ($live) = @_;

        my ($version, $extra) =  split(/-/, $live->{settings}{version});
	$version .= "S" if ($extra eq 'spring');
	"LABEL=" . join ("-", "Mageia", $version, $live->{settings}{desktop}, $live->{settings}{product});
}

my $_l = {
    workdir => $live->{settings}{workdir},
    system => {
        root => $live->{settings}{chroot},
        repository => $live->{settings}{repository},
        auto_install => 'config/auto_inst.cfg.pl',
        install_env => {
            DRAKLIVE_DESKTOP => $live->{settings}{desktop},
            DRAKLIVE_MEDIA => $live->{settings}{media},
            DRAKLIVE_PRODUCT => $live->{settings}{product},
            DRAKLIVE_ARCH => $live->{settings}{arch},
            DRAKLIVE_ADDITIONAL_REPOSITORY => $live->{settings}{additional_repository},
            DRAKLIVE_COMMERCIAL => $live->{settings}{commercial},
            DRAKLIVE_DEFAULT_USER => $live->{settings}{default_user},
        },
        hide_media_dirs => to_bool($live->{settings}{product} =~ /liveusb-rw/i),
        if_($live->{settings}{default_user}, preselect_kdm_user => $live->{settings}{default_user}),
        langs_always => [ 'en_US' ],
        files => [
            if_($live->{settings}{product} =~ /liveusb-rw/i && $live->{settings}{commercial},
                [ 'files/xdg-email-hook.sh', '/usr/bin/xdg-email-hook.sh', { mode => 0755, no_install => 1 } ],
                [ 'files/portable-directories-liveusb-rw', '/etc/X11/xinit.d/portable-directories-liveusb-rw', { mode => 0755, no_install => 1 } ],
            ),
            if_($live->{settings}{media} eq 'usb',
                [ 'files/99-live-disable-suspend-hibernate.fdi', '/etc/hal/fdi/policy/99-live-disable-suspend-hibernate.fdi', { mode => 0644, no_install => 1 } ],
                [ 'files/desktop-directories-liveusb-rw', '/etc/X11/xinit.d/xx_desktop-directories-liveusb-rw', { mode => 0755, no_install => 1 } ],
                [ 'files/draklive-install.usb', '/etc/sysconfig/draklive-install', { mode => 0755 } ],
            ),
            #- make cups the default spooler
            [ 'files/defaultspooler', '/etc/foomatic/defaultspooler', { mode => 0644 } ],
            if_($live->{settings}{media} eq 'CD',
                #- eject eject cd medium before halt/reboot
                [ 'files/halt-local.service', '/etc/systemd/system/halt-local.service', { mode => 0644 } ],
                [ 'files/halt.local.CD', '/sbin/halt.local', { mode => 0755 } ],
                #- do not load usblp and trigger autosetupprintqueues in live since cups is not available
                [ 'files/live.modprobe.CD', '/etc/modprobe.d/live.conf', { mode => 0644, no_install => 1 } ],
            ),
            if_($live->{settings}{media} ne 'usb', #- FIXME
                #- umount tmp rpm hack before /etc/init.d/halt tries and fails
                [ 'files/halt.pre', '/sbin/halt.pre', { mode => 0755 } ],
            ),
            #- disable first boot wizard at live boot
            [ 'files/firstboot', '/etc/sysconfig/firstboot', { mode => 0644 } ],
            #- enable drakx-finish-install at live boot
            [ "files/finish-install.$live->{settings}{media}", '/etc/sysconfig/finish-install', { mode => 0644 } ],
            #- disable speedboot for first boot after disk installation
            [ 'files/draklive-install.d/remove.d/disable-speedboot', '/etc/draklive-install.d/remove.d/disable-speedboot', { mode => 0644 } ],
	    if_($live->{settings}{desktop} eq 'KDE4',
		[ 'files/draklive-install.d/run.d/generate-gtk-icon-cache.sh', '/etc/draklive-install.d/run.d/generate-gtk-icon-cache.sh', { mode => 755 } ]),
            #- sysconfig files for first boot
            [ $live->{settings}{media} eq 'usb' ?
                "files/finish-install.$live->{settings}{media}" :
                'files/draklive-install.d/finish-install',
              '/etc/draklive-install.d/sysconfig/finish-install', { mode => 0644 } ],
            [ 'files/draklive-install.d/firstboot', '/etc/draklive-install.d/sysconfig/firstboot', { mode => 0644 } ],
            [ 'files/draklive-install.d/services', '/etc/draklive-install.d/services', { mode => 0644 } ],
            if_($live->{settings}{media} eq 'usb',
                [ 'files/draklive-install.d/draklive-resize', '/etc/draklive-install.d/sysconfig/draklive-resize', { mode => 0644 } ],
            ),
            #- don't make kbluetoothrc display an annoying and useless popup window, and disable it by default
            [ 'files/kbluetoothrc', '/etc/kde/kbluetoothrc', { mode => 0644 } ],
            [ 'files/korgacrc', '/etc/kde/korgacrc', { mode => 0644 } ],
            (map { [ 'files/mgaonlinerc', $_ . '/.MgaOnline/mgaonline', { mode => 0644, no_install => 1 } ] } @user_config_dirs),
            (map { [ 'files/draksnapshot.sysconfig', $_ . '/.draksnapshot', { mode => 0644, no_install => 1 } ] } @user_config_dirs),
            [ 'files/compute-ooo-dicts.pl', '/usr/sbin/compute-ooo-dicts.pl', { mode => 0755 } ],
            [ 'files/compute-i18n-list.pl', '/usr/sbin/compute-i18n-list.pl', { mode => 0755 } ],
            if_($live->{settings}{desktop} eq 'GNOME', 
	        [ 'files/99dm-reload.xsetup', '/etc/X11/xsetup.d/', { mode => 0755 } ]),
            if_($live->{settings}{product} =~ /guadec/i,
                [ 'files/GUADEC-booklet.desktop', '/usr/share/nautilus/default-desktop/booklet.desktop' ],
            ),
        ],
        remove_files => [
            (map { "/etc/modprobe.preload.d/$_" } qw(cpufreq pcmcia rfswitch)),
            "/etc/udev/rules.d/70-persistent-*.rules",
            "/var/lib/dbus/machine-id",
            "/etc/ssh/ssh_host_*",
        ],
        module_options => {
            loop => "max_loop=64",
        },
        exclude_modules => [],
        additional_modules => [
            #'modules/i586/unionfs.ko',
        ],
        stage2_updates => [
            # [ "files/pkgs.pm", "/usr/lib/libDrakX/install/pkgs.pm" ],
        ],
        patches => [
        ],
        erase_rpms => [
        ],
        rpms => [
        ],
        disable_services => [
            qw(bluetooth laptop-mode pcmcia mdadm pcscd),
            qw(cups hplip oki4daemon),     # printing
            qw(capi4linux ibod isdn4linux isdnlog bpalogin),
            qw(cpqarrayd upsd upsmon), # uncommon hardware
            qw(lisa ntpd snmpd), # unneeded software
            #qw(acpi acpid apmd),     # enabled by drakboot when needed
            qw(dkms),           # slows down live boot, reenabled after install
            qw(anacron crond), # slows down basic usage and install, reenabled after install
            qw(sshd),
            qw(hcfpci hsf slmodemd),
            qw(portmap nfs-common),
            qw(kav4ws freshclam clamd),
	    if_($live->{settings}{media} eq 'CD', preload), 
        ],
        vga_mode => 788,
        gfxboot => $live->{settings}{media} ne 'usb', #- disable gfxboot on USB, buggy with grub on some systems
        if_($live->{settings}{media} eq 'usb',
            initrd_pre_pivot =>
              #- keep an unmodified live tree for draklive-install
              #- hack: mount it rw with a dummy branch and remount it ro later, current unionfs fails to mount ro directly
              #- hack: the union can not be "stacked" (i.e. mounted) over another union, so do it early in initrd, and use a tmpfs for the dummy branch, so it can be moved in the real root
              join("\n", map { "sh -c '$_'" }
                   'mkdir -p /live/source /live/dummy',
                   'mount -o mode=755,rw -t tmpfs none /live/dummy',
                   'mount -o dirs=/live/dummy=rw' . if_($use_modules, ':$(cat /live/modules.lst)') . ':/live/distrib=ro -t unionfs unionfs /live/source',
               ),
        ),
        initrd_post =>
          join("\n",
               if_($live->{settings}{media} eq 'usb', do {
                   my $tmp = "/live/tmp";
                   my @sticky = qw(/var/tmp /tmp);
                   (
                       "sh -c 'mkdir -p $tmp'",
                       "mount -t tmpfs none $tmp",
                       "mkdir $tmp/var",
                       (map {
                           ("mkdir $tmp$_", "mount -o dirs=$tmp$_=rw:/live/distrib$_=ro -t unionfs unionfs $_")
                       } (qw(/var/log), @sticky)),
                       "chmod 1777 @sticky",
                   );
               }),
          ),
        postInstall => join(';',
                            if_($live->{settings}{default_user}, "echo $live->{settings}{default_user} > /etc/draklive-install.d/user"),
                            "perl -pi -e 's,<DEFAULT_USER>,$live->{settings}{default_user},' /etc/draklive-install.d/sysconfig/finish-install",
			    #- used by liveusb-rw
                            "/usr/sbin/compute-i18n-list.pl --ooo=${ooo_version}",
                            if_($live->{settings}{product} =~ /liveusb-rw/i && $live->{settings}{desktop} =~ /^KDE/,
                                #- FIXME: check if still valid for KDE4
                                "perl -pi -e 's,kde[/-]KMail,mageia-mozilla-thunderbird,' /var/lib/mageia/kde-profiles/common/share/config/kickerrc"
                            ),
                            #- fix user perms for copied files
                            if_($live->{settings}{default_user}, "chown -R " .
                                  "$live->{settings}{default_user}.$live->{settings}{default_user}" . 
                                  " /home/$live->{settings}{default_user}"),
                            #- rpath removal will be "lost" on update
                            #- but not important since all packages files would be on the same loopback
                            #-   should not be needed with latest unionfs which resolves /proc/self/exe correctly
                            #-   FIXME: test with live USB r/w
                            #"chrpath -d /usr/lib/ooo-${ooo_version}/program/soffice.bin",
                            #- workaround rpm bug that leaves a corrupted rpm DB in chroot
                            "rm -f /var/lib/rpm/__db.*",
			    "rm -f /.readahead_collect",
                            #- adduser seems to create a sparse lastlog with a slot for all available users
                            #- which can be huge
                            '> /var/log/lastlog',
                            if_($live->{settings}{desktop} eq 'KDE4', 
                                "rm -f /usr/share/icons/*/icon-theme.cache",
                                "cp -a /etc/akonadi/mysql-global.conf /etc/akonadi/mysql-global-standard.conf",
                                "cp /etc/akonadi/mysql-global-mobile.conf /etc/akonadi/mysql-global.conf",
                                "ak=/etc/draklive-install.d/run.d/restore-akonadi-config.sh; echo -e '#!/bin/sh\ncp /etc/akonadi/mysql-global-standard.conf /etc/akonadi/mysql-global.conf' > \$ak; chmod +x \$ak",
                            ),
			    # FIXME
                            #if_($live->{settings}{desktop} eq 'GNOME',
			    #	"mkdir -p '/home/$live->{settings}{default_user}/.config/autostart'",
			    #	"for file in '/etc/xdg/autostart/tracker*.desktop'; do sed s/X-GNOME-Autostart-enabled=true/X-GNOME-Autostart-enabled=false/g $file > '/home/$live->{settings}{default_user}/.config/autostart/$(basename $file)'; done",
			    #),

                            "d=/var/lib/flash-player-plugin/; [ -d \$d ] && rm -f \$d/*.rpm",
                        ),
        additional_media => [
          if_($live->{settings}{updates_repository},
            {
                name => 'core_updates_testing',
                path => $live->{settings}{updates_repository} . '/' . $live->{settings}{arch} . '/media/core/updates_testing',
                packages => [
                ],
            },
          ),
        ],
    },
    loopbacks => {
        exclude => {
            type => 'squashfs',
            files => [
                { path => '/root/drakx' },
                #- to skip a file list generated with:
                #- find /usr/share/doc/HTML -mindepth 1 -maxdepth 1 -type d > /root/drakx/HTML.skipped
                #{ source => '/root/drakx/HTML.skipped', rooted => 1 },
            ],
        },
        if_($use_modules, modules  => [
           { type => 'squashfs', source => '/root/drakx/i18n-*.lst', rooted => 1 },
        ]),
    },
    regions => {
        #- the "all" region has a magical behavior and selects all langs
        int => [qw(de en es fr it pl pt_BR ru)],
        guadec => [qw(de en es fr it nb nn nl pl pt_BR ro ru tr)],
        'Europe-Americas' => [qw(bg cs da de el en es et fi fr hr hu it ky lt lv nb nl nn no pl pt pt_BR ro ru sv tr uk uz)],
        #'africa-asia' => [qw(de en es fr it nb nn nl pl pt_BR ro ru tr ar he hi id ko ms zu ja zh_CN zh_TW)],
        'Africa-Asia' => [qw(aa af am ar as ber bn ha he hi id ig ja kn ko ks ml mr or pa sd ta th tn ts ve vi xh yo zh_CN zh_TW zu)],
        'Europe1-Americas' => [qw(de el en es fr it nl pt pt_BR sl tr)],
        'Europe2' => [qw(bg cs da et fi hr hu lt lv nb no nn pl ro ru sv uk uz)],
        'Africa-India' => [qw(zu aa af am ar as ber bn ha he hi ig kn ks ml mr or pa sd ta tn ts ve xh yo)],
        'Asia-Noindia' => [qw(id ja ko th vi zh_CN zh_TW)],
    },
    packs => {
        int => [ map { "i18n-$_" } qw(de en es fi fr it nl pt sv) ],
        da => [ map { "i18n-$_" } qw(da en) ],
    },
    if_($live->{settings}{media} eq 'CD',
        media => {
            storage => 'cdrom',
            bootloader_timeout => 10,
            boot_entries => [ "" => "", "linux" => " install", "harddisk" => "" ],
            if_($live->{settings}{product} =~ /LiveCD/i,
                source => build_one_label($live),
                pre => [ 'for i in seq 1 5; do showlabels --removable | grep '.build_one_label($live).'; if [ $? -eq 0 ]; then break; fi; sleep 1; done' ],
                extra_modules => [ qw(vfat sd_mod usb_storage uhci_hcd ohci_hcd ehci_hcd xhci_hcd) ],
                files => [
			    # FIXME: add doc and autorun
			    #[ 'extra/livecd/autorun/*', ''],
			    #map { [ 'extra/livecd/' . $_, $_ ] } qw(LISEZMOI.pdf README.pdf) 
			 ],
            ),
        },
        #extra_media => [ { storage => 'usb' } ],
        mount => MDV::Draklive::Mounts::volatile_squash_union($use_modules),
    ),
    if_($live->{settings}{media} eq 'usb',
        media => {
            storage => 'usb',
            bootloader_timeout => 1,
            mount_options => 'dmask=0000,fmask=0111',
            extra_boot => [ qw(cdrom) ],
            if_($live->{settings}{product} =~ /liveusb-rw/i,
                source => "LABEL=Mga_USB",
                title => "Mageia Live USB",
                boot_entries => [ "" => "" ],
                files => [
                    [ 'extra/liveusb-rw-common/*', '' ],
                    ($live->{settings}{commercial} ?
                       [ 'extra/liveusb-rw-commercial/*', '' ] :
                       [ 'extra/liveusb-rw/*', '' ]
                    ),
                ],
		partitions => [
		    {
			size => common::MB(8000),
			mntpoint => '/',
		    },
		],
                remove_files => [ '.svn', '*~' ],
            ),
        },
        mount => MDV::Draklive::Mounts::squash_union('1000M', '150M', $use_modules),
    ),
};

context:
space:
mode: