op_power: try to handle mounted-cards-on-suspend mess
[openpandora.oe.git] / recipes / pandora-system / pandora-scripts / op_power.sh
index dd0101d..bdfe27c 100644 (file)
@@ -53,45 +53,114 @@ resume_net() {
        rm -f /tmp/hcistate /tmp/wlstate
 }
 
+display_on() {
+       echo 0 > /sys/class/graphics/fb0/blank
+
+       maxbright=$(cat $SYSFS_BACKLIGHT/max_brightness)
+       oldbright=0
+       if [ -f /tmp/oldbright ]; then
+               oldbright=$(cat /tmp/oldbright)
+       fi
+       if [ $oldbright -eq 0 ]; then
+               oldbright=$(cat /etc/pandora/conf/brightness.state)
+       fi
+       if [ $oldbright -ge 3 ] && [ $oldbright -le $maxbright ]; then 
+               /usr/pandora/scripts/op_bright.sh $oldbright 
+       else
+               /usr/pandora/scripts/op_bright.sh $maxbright
+       fi
+}
+
+display_off() {
+       brightness=$(cat $SYSFS_BACKLIGHT_BRIGHTNESS)
+       if [ $brightness -gt 0 ]; then
+               echo $brightness > /tmp/oldbright
+       fi
+       echo 0 > $SYSFS_BACKLIGHT_BRIGHTNESS
+
+       echo 1 > /sys/class/graphics/fb0/blank
+}
+
 lowPowerOn(){ #switch from normal to lowpower mode
-       cat /proc/pandora/cpu_mhz_max > /tmp/oldspeed
-       cat $SYSFS_BACKLIGHT_BRIGHTNESS > /tmp/oldbright
+       display_off
+
        pidlist=$(pstree -lpA | grep pnd_run.sh | sed -ne 's/.*(\([0-9]\+\))/\1/p')
        for PID in $pidlist
        do
-               kill -19 $PID #send SIGSTOP
+               kill -STOP $PID
        done
+
        suspend_net
-       echo 0 > $SYSFS_BACKLIGHT_BRIGHTNESS
-       echo 1 > /sys/devices/platform/omapfb/graphics/fb0/blank
+
+       cat /proc/pandora/cpu_mhz_max > /tmp/oldspeed
        /usr/pandora/scripts/op_cpuspeed.sh 125
 }
 
 lowPowerOff(){ # switch from lowpower to normal mode
        oldspeed=$(cat /tmp/oldspeed)
        /usr/pandora/scripts/op_cpuspeed.sh $oldspeed
-       oldbright=$(cat /tmp/oldbright)
-       maxbright=$(cat $SYSFS_BACKLIGHT/max_brightness)
-       echo 0 > /sys/devices/platform/omapfb/graphics/fb0/blank
-       sleep 0.1s # looks cleaner, could flicker without
-       oldspeed=$(cat /tmp/oldspeed)
-       if [ $oldbright -ge 3 ] && [ $oldbright -le $maxbright ]; then 
-               /usr/pandora/scripts/op_bright.sh $oldbright 
-       else
-               /usr/pandora/scripts/op_bright.sh $maxbright
-       fi
+
+       display_on
        resume_net
+
        pidlist=$(pstree -lpA | grep pnd_run.sh | sed -ne 's/.*(\([0-9]\+\))/\1/p')
        for PID in $pidlist
        do
-               kill -18 $PID #send SIGCONT
+               kill -CONT $PID
        done
        echo 255 > /sys/class/leds/pandora\:\:power/brightness #power LED bright
 }
 
+show_message() {
+       # TODO: check if desktop is visible; maybe use layer3?
+       xfceuser=$(ps u -C xfce4-session | tail -n1 | awk '{print $1}')
+       cmd="DISPLAY=:0.0 zenity --info --text \"$1\""
+       su -c "$cmd" $xfceuser
+}
+
 suspend_real() {
        delay=0
 
+       if ! [ -e /sys/power/state ]; then
+               # no kernel suspend support
+               return 1
+       fi
+
+       # can't suspend while SGX is in use due to bugs
+       # (prevents low power states and potential lockup)
+       if lsof -t /dev/pvrsrvkm > /dev/null; then
+               return 1
+       fi
+
+       # TODO: we probably want to NOT do real suspend if:
+       # - cards don't unmount (running PNDs will break)
+       # - while charging too, since it stops on suspend?
+
+       if ! grep -q 'mmc_core.removable=0' /proc/cmdline; then
+               # must unmount cards because they will be "ejected" on suspend
+               # (some filesystems may even deadlock if we don't do this due to bugs)
+               mounts="$(grep "/dev/mmcblk" /proc/mounts | awk '{print $1}' | xargs echo)"
+               for mnt in $mounts; do
+                       if ! umount $mnt; then
+                               show_message "Could not unmount $mnt, using partial suspend only"
+                               return 1
+                       fi
+               done
+               swaps="$(grep "/dev/mmcblk" /proc/swaps | awk '{print $1}' | xargs echo)"
+               for swp in $swaps; do
+                       if ! swapoff $swp; then
+                               show_message "Could not unmount $swp, using partial suspend only"
+                               return 1
+                       fi
+               done
+       else
+               if [ ! -e /etc/pandora/suspend-warned ]; then
+                       show_message "Pandora will now suspend.\n\n\
+Please do not remove SD cards while pandora is suspended, doing so will corrupt them."
+                       touch /etc/pandora/suspend-warned
+               fi
+       fi
+
        # FIXME: fix the kernel and get rid of this
        suspend_net
 
@@ -108,11 +177,8 @@ suspend_real() {
                fi
        done
 
-       # must unmount cards because they will be "ejected" on suspend
-       # (some filesystems may even deadlock if we don't do this due to bugs)
-       grep "/dev/mmcblk" /proc/mounts | awk '{print $1}' | xargs umount -r
-
        sleep $delay
+       sync
        echo mem > /sys/power/state
 
        # if we are here, either we already resumed or the suspend failed
@@ -126,21 +192,24 @@ suspend_real() {
        # wait here a bit to prevent this script from running again (keep op_power.lock)
        # in case user did resume using the power switch.
        sleep 2
+
+       return 0
 }
 
 suspend_() {
        # dim power LED
        echo 16 > /sys/class/leds/pandora\:\:power/brightness
 
-       if [ -e /sys/power/state ]; then
-               suspend_real
+       if suspend_real; then
+               # resumed already
+               powerstate="on"
        else
                lowPowerOn
        fi
 }
 
 resume() {
-       if [ -e /sys/power/state ]; then
+       if [ "$powerstate" = "on" ]; then
                # nothing to do
                echo "resume called unexpectedly" >&2
        else
@@ -148,13 +217,6 @@ resume() {
        fi
 }
 
-suspend_check() {
-       if [ -e /sys/power/state ]; then
-               # in case of real suspend we've already resumed
-               powerstate="on"
-       fi
-}
-
 shutdown(){ # warns the user and shuts the pandora down
        xfceuser=$(ps u -C xfce4-session | tail -n1 | awk '{print $1}')
        time=5
@@ -174,42 +236,14 @@ shutdown(){ # warns the user and shuts the pandora down
        fi
 }
 
-displayOn(){ # turns the display on
-       #echo 0 > /sys/devices/platform/omapfb/graphics/fb0/blank
-       #sleep 0.1s # looks cleaner, could flicker without
-       maxbright=$(cat $SYSFS_BACKLIGHT/max_brightness)
-       oldbright=0
-       if [ -f /tmp/oldbright ]; then
-               oldbright=$(cat /tmp/oldbright)
-       fi
-       if [ $oldbright -eq 0 ]; then
-               oldbright=$(cat /etc/pandora/conf/brightness.state)
-       fi
-       if [ $oldbright -ge 3 ] && [ $oldbright -le $maxbright ]; then 
-               /usr/pandora/scripts/op_bright.sh $oldbright 
-       else
-               /usr/pandora/scripts/op_bright.sh $maxbright
-       fi
-}
-
-displayOff(){ # turns the display off
-       brightness=$(cat $SYSFS_BACKLIGHT_BRIGHTNESS)
-       if [ $brightness -gt 0 ]; then
-               echo $brightness > /tmp/oldbright
-       fi
-       echo 0 > $SYSFS_BACKLIGHT_BRIGHTNESS
-       #echo 1 > /sys/devices/platform/omapfb/graphics/fb0/blank
-}
-
 if [[ "$2" == "" ]]; then
        if [[ "$1" -le 2 ]]; then # power button was pressed 1-2sec, "suspend"
                if [[ "$powerstate" == "buttonlowpower" ]]; then
                        (debug && echo "resume") || resume
                        powerstate="on"
                elif [[ "$powerstate" == "on" ]]; then
-                       (debug && echo "suspend") || suspend_
                        powerstate="buttonlowpower"
-                       suspend_check
+                       (debug && echo "suspend") || suspend_
                fi
        elif [[ "$1" -ge 3 ]]; then # power button was pressed 3 sec or longer, shutdown
                if [[ "$powerstate" == "on" ]]; then
@@ -225,7 +259,7 @@ elif [[ "$2" == "lid" ]]; then
                                        powerstate="on"
                                ;;
                                *)
-                                       (debug && echo "displayOn") || displayOn
+                                       (debug && echo "display_on") || display_on
                                        powerstate="on"
                                ;;
                        esac
@@ -237,12 +271,11 @@ elif [[ "$2" == "lid" ]]; then
                                        (debug && echo "shutdown") || shutdown
                                ;;
                                "lowpower")
-                                       (debug && echo "suspend") || suspend_
                                        powerstate="lidlowpower"
-                                       suspend_check
+                                       (debug && echo "suspend") || suspend_
                                ;;
                                *)
-                                       (debug && echo "displayOff") || displayOff
+                                       (debug && echo "display_off") || display_off
                                        powerstate="liddisplayoff"
                                ;;
                        esac