#!/bin/ash
#181231 sfs
L(){
for i in vboxdrv.ko vboxnetadp.ko vboxnetflt.ko vboxpci.ko ;do
    i2="`basename $i .ko`"
    [ "`lsmod |egrep '^'$i2' '`" ] || wt -o "sudo modprobe $i2"
done
}

#m="$(find /lib/modules/`uname -r`  -type f \( -name "vboxdrv.*" \))"
if [ ! "`lsmod |egrep '^vboxdrv '`" ] ;then
#    for m in $(find  /lib/modules/extramodules-`uname -r |sed 's/.[0-9]-[0-9]//'` /lib/modules/`uname -r` -type f \( -name "vbox*" \)) ;do
    for m in $(find -L /lib/modules/`uname -r`/extramodules /lib/modules/`uname -r` -type f \( -name "vbox*" \)) ;do
	m2="`basename $m |awk -F. '{print $1}'`" 
	[ ! "`lsmod |egrep '^'$m2''`" ] && sudo insmod "$m"  && echo "$m2 loaded" 
    done
sleep 3
fi
#exit
if [ ! "`lsmod |egrep '^vboxdrv '`" ] ;then
    sudo depmod
    L
fi

if [ "`lsmod |egrep '^vboxdrv '`" ] ;then

    #http://forum.puppyrus.org/index.php?topic=21311.msg152010#msg152010
    sed -i 's#"GUI/Toolbar" value="false"#"GUI/Toolbar" value="true"#' ~/.config/VirtualBox/VirtualBox.xml

    /usr/bin/VirtualBox &
else
    ntf -a "Для ядра `uname -r`" "не найдены модули ядра Virtualbox.
Найти : sudo pacman -Ss virtualbox-host-modules" &
fi