49c8c1d13acd0cf65c1e208cd1977c34ab5f2ea2
[openpandora.oe.git] / recipes / pandora-system / pandora-scripts / op_power.sh
1 #!/bin/bash
2
3 . /usr/pandora/scripts/op_paths.sh
4
5 # XXX: better use lockfile (or something), but it's not in current firmware
6 test -e /tmp/op_power.lock && exit 2
7 touch /tmp/op_power.lock
8
9 debug(){
10         return 1 # 0 when debugging, 1 when not
11 }
12
13 test -e $(grep /etc/passwd -e $(ps u -C xfce4-session | tail -n1 | awk '{print $1}')| cut -f 6 -d ":")/.lidconfig && lidconfig=$(cat $(grep /etc/passwd -e $(ps u -C xfce4-session | tail -n1 | awk '{print $1}')| cut -f 6 -d ":")/.lidconfig) # read lid conf. file if it exists
14
15 #powerbuttonconfig=$(cat $(grep /etc/passwd -e $(ps u -C xfce4-session | tail -n1 | awk '{print $1}')| cut -f 6 -d ":")/.powerbuttonconfig)
16
17 if [ -e /tmp/powerstate ]; then 
18         powerstate="$(cat /tmp/powerstate)"
19 else
20         powerstate="on"
21 fi
22
23 debug && echo "powerstate=$powerstate"
24
25 suspend_net() {
26         hcistate=$(hciconfig hci0 | grep DOWN)
27         if [ $hcistate ]; then
28                 echo "down" > /tmp/hcistate
29         else
30                 echo "up" > /tmp/hcistate
31                 hciconfig hci0 down
32         fi
33         wlstate=$(lsmod | grep -m1 wl1251)
34         if [ -z "$wlstate" ]; then
35                 echo "down" > /tmp/wlstate
36         else
37                 echo "up" > /tmp/wlstate
38                 ifconfig wlan0 down
39                 rmmod board_omap3pandora_wifi 2> /dev/null
40                 rmmod wl1251_sdio wl1251
41         fi
42 }
43
44 resume_net() {
45         hcistate=$(cat /tmp/hcistate)
46         if [ "$hcistate" = "up" ]; then
47                 hciconfig hci0 up pscan
48         fi
49         wlstate=$(cat /tmp/wlstate)
50         if [ "$wlstate" = "up" ]; then
51                 /etc/init.d/wl1251-init start
52         fi
53         rm -f /tmp/hcistate /tmp/wlstate
54 }
55
56 display_on() {
57         echo 0 > /sys/class/graphics/fb0/blank
58
59         # only bother restoring brightness if it's 0
60         # (old kernel or user messed it up somehow)
61         brightness=$(cat $SYSFS_BACKLIGHT_BRIGHTNESS)
62         if [ $brightness -gt 0 ]; then
63                 return 0
64         fi
65
66         maxbright=$(cat $SYSFS_BACKLIGHT/max_brightness)
67         oldbright=0
68         if [ -f /tmp/oldbright ]; then
69                 oldbright=$(cat /tmp/oldbright)
70         fi
71         if [ $oldbright -eq 0 ]; then
72                 oldbright=$(cat /etc/pandora/conf/brightness.state)
73         fi
74         if [ $oldbright -ge 3 ] && [ $oldbright -le $maxbright ]; then 
75                 /usr/pandora/scripts/op_bright.sh $oldbright 
76         else
77                 /usr/pandora/scripts/op_bright.sh $maxbright
78         fi
79 }
80
81 display_off() {
82         brightness=$(cat $SYSFS_BACKLIGHT_BRIGHTNESS)
83         if [ $brightness -gt 0 ]; then
84                 echo $brightness > /tmp/oldbright
85         fi
86         kernel_major=`uname -r | cut -c 1`
87         if [ "$kernel_major" = "2" ]; then
88                 echo 0 > $SYSFS_BACKLIGHT_BRIGHTNESS
89         fi
90
91         echo 1 > /sys/class/graphics/fb0/blank
92 }
93
94 lowPowerOn(){ #switch from normal to lowpower mode
95         display_off
96
97         pidlist=$(pstree -lpA | grep pnd_run.sh | sed -ne 's/.*(\([0-9]\+\))/\1/p')
98         for PID in $pidlist
99         do
100                 kill -STOP $PID
101         done
102
103         suspend_net
104
105         cat /proc/pandora/cpu_mhz_max > /tmp/oldspeed
106         /usr/pandora/scripts/op_cpuspeed.sh -n 125
107 }
108
109 lowPowerOff(){ # switch from lowpower to normal mode
110         oldspeed=$(cat /tmp/oldspeed)
111         /usr/pandora/scripts/op_cpuspeed.sh -n $oldspeed
112         rm -f /tmp/oldspeed
113
114         display_on
115         resume_net
116
117         pidlist=$(pstree -lpA | grep pnd_run.sh | sed -ne 's/.*(\([0-9]\+\))/\1/p')
118         for PID in $pidlist
119         do
120                 kill -CONT $PID
121         done
122         echo 255 > /sys/class/leds/pandora\:\:power/brightness #power LED bright
123 }
124
125 display_on_with_checks() {
126         # after turning on the display, we don't want lowpower state
127         # (which could be active because of some races)
128         if [ "$powerstate" = "buttonlowpower" -o "$powerstate" = "lidlowpower" -o \
129              -e /tmp/oldspeed ]
130         then
131                 lowPowerOff
132         else
133                 display_on
134         fi
135 }
136
137 show_message() {
138         # TODO: check if desktop is visible; maybe use layer3?
139         xfceuser=$(ps u -C xfce4-session | tail -n1 | awk '{print $1}')
140         cmd="DISPLAY=:0.0 zenity --info --text \"$1\" --timeout 10"
141         su -c "$cmd" $xfceuser
142 }
143
144 suspend_real() {
145         delay=0
146
147         if ! [ -e /sys/power/state ]; then
148                 # no kernel suspend support
149                 return 1
150         fi
151
152         current_now="$(cat /sys/class/power_supply/bq27500-0/current_now)"
153  
154         if [ $current_now -gt 0 ]; then 
155                 return 1 
156                 #don't suspend while unit is charging
157         fi
158
159         # can't suspend while SGX is in use due to bugs
160         # (prevents low power states and potential lockup)
161         if lsof -t /dev/pvrsrvkm > /dev/null; then
162                 return 1
163         fi
164
165         if ! grep -q 'mmc_core.removable=0' /proc/cmdline; then
166                 # must unmount cards because they will be "ejected" on suspend
167                 # (some filesystems may even deadlock if we don't do this due to bugs)
168                 mounts="$(grep "/dev/mmcblk" /proc/mounts | awk '{print $1}' | xargs echo)"
169                 for mnt in $mounts; do
170                         if ! umount $mnt; then
171                                 show_message "Could not unmount $mnt, using partial suspend only"
172                                 return 1
173                         fi
174                 done
175                 swaps="$(grep "/dev/mmcblk" /proc/swaps | awk '{print $1}' | xargs echo)"
176                 for swp in $swaps; do
177                         if ! swapoff $swp; then
178                                 show_message "Could not unmount $swp, using partial suspend only"
179                                 return 1
180                         fi
181                 done
182         else
183                 if [ ! -e /etc/pandora/suspend-warned ]; then
184                         show_message "Pandora will now suspend.\n\n\
185 Please do not remove SD cards while pandora is suspended, doing so will corrupt them."
186                         touch /etc/pandora/suspend-warned
187                 fi
188         fi
189
190         # FIXME: fix the kernel and get rid of this
191         suspend_net
192
193         # get rid of modules that prevent suspend due to bugs
194         modules="$(lsmod | awk '{print $1}' | xargs echo)"
195         blacklist="g_zero g_audio g_ether g_serial g_midi gadgetfs g_file_storage
196                 g_mass_storage g_printer g_cdc g_multi g_hid g_dbgp g_nokia g_webcam g_ncm g_acm_ms
197                 ehci_hcd bridgedriver"
198         restore_list=""
199         for mod in $modules; do
200                 if echo $blacklist | grep -q "\<$mod\>"; then
201                         restore_list="$restore_list $mod"
202                         rmmod $mod
203                         delay=1 # enough?
204                 fi
205         done
206
207         sleep $delay
208         sync
209         echo mem > /sys/power/state
210
211         # if we are here, either we already resumed or the suspend failed
212         if [ -n "$restore_list" ]; then
213                 for module in $restore_list; do
214                         modprobe $module
215                 done
216         fi
217
218         display_on
219         resume_net
220         echo 255 > /sys/class/leds/pandora\:\:power/brightness
221
222         # wait here a bit to prevent this script from running again (keep op_power.lock)
223         # in case user did resume using the power switch.
224         sleep 2
225
226         return 0
227 }
228
229 suspend_() {
230         # dim power LED
231         echo 16 > /sys/class/leds/pandora\:\:power/brightness
232
233         if suspend_real; then
234                 # resumed already
235                 powerstate="on"
236         else
237                 lowPowerOn
238         fi
239 }
240
241 resume() {
242         if [ "$powerstate" = "on" ]; then
243                 # nothing to do
244                 echo "resume called unexpectedly" >&2
245         else
246                 lowPowerOff
247         fi
248 }
249
250 shutdown(){ # warns the user and shuts the pandora down
251         xfceuser=$(ps u -C xfce4-session | tail -n1 | awk '{print $1}')
252         time=5
253         countdown () {
254                 for i in $(seq $time); do
255                         precentage=$(echo $i $time | awk '{ printf("%f\n", $1/$2*100) }')
256                         echo $precentage
257                         echo "# Shutdown in $(($time-$i))"
258                         sleep 1
259                 done
260         }
261         countdown | su -c 'DISPLAY=:0.0 zenity --progress --auto-close --text "Shutdown in X" --title "Shutdown"' $xfceuser
262         if [ $? -eq 0 ]; then
263         /sbin/shutdown -h now
264         else
265         su -c 'DISPLAY=:0.0 zenity --error --text "Shutdown aborted!"' $xfceuser
266         fi
267 }
268
269 if [[ "$2" == "" ]]; then
270         if [[ "$1" -le 2 ]]; then # power button was pressed 1-2sec, "suspend"
271                 if [[ "$powerstate" == "buttonlowpower" ]]; then
272                         (debug && echo "resume") || resume
273                         powerstate="on"
274                 elif [[ "$powerstate" == "on" ]]; then
275                         powerstate="buttonlowpower"
276                         (debug && echo "suspend") || suspend_
277                 elif [[ "$powerstate" == "liddisplayoff" ]]; then
278                         powerstate="buttonlowpower"
279                         (debug && echo "suspend") || suspend_
280                 fi
281         elif [[ "$1" -ge 3 ]]; then # power button was pressed 3 sec or longer, shutdown
282                 if [[ "$powerstate" == "on" ]]; then
283                         (debug && echo "shutdown") || shutdown
284                 fi
285         fi
286 elif [[ "$2" == "lid" ]]; then
287         if [[ "$1" == 0 ]]; then # lid was opened
288                 if [[ "$powerstate" == lid* ]]; then
289                         case "$lidconfig" in
290                                 "lowpower")
291                                         (debug && echo "resume") || resume
292                                         powerstate="on"
293                                 ;;
294                                 *)
295                                         (debug && echo "display_on") || display_on_with_checks
296                                         powerstate="on"
297                                 ;;
298                         esac
299                 fi
300         elif [[ "$1" == 1 ]]; then # lid was closed
301                 if [[ "$powerstate" == "on" ]]; then
302                         case "$lidconfig" in
303                                 "shutdown")
304                                         (debug && echo "shutdown") || shutdown
305                                 ;;
306                                 "lowpower")
307                                         powerstate="lidlowpower"
308                                         (debug && echo "suspend") || suspend_
309                                 ;;
310                                 *)
311                                         (debug && echo "display_off") || display_off
312                                         powerstate="liddisplayoff"
313                                 ;;
314                         esac
315                 fi
316         fi
317 elif [[ "$2" == "screensaver" ]]; then
318         # warning: don't try to interact with X or do real suspend here -
319         # will cause various deadlocks
320         unset DISPLAY
321
322         if [[ "$1" == 0 ]]; then # deactivate screensaver
323                 display_on_with_checks
324                 powerstate="on"
325         elif [[ "$1" == 1 ]]; then # activate screensaver
326                 display_off
327         fi
328 fi
329
330 debug && echo "powerstate=$powerstate"
331 echo "$powerstate" > /tmp/powerstate
332
333 rm -f /tmp/op_power.lock