aboutsummaryrefslogtreecommitdiff
path: root/ratpoison/panel
diff options
context:
space:
mode:
Diffstat (limited to 'ratpoison/panel')
-rwxr-xr-xratpoison/panel/cpu3
-rwxr-xr-xratpoison/panel/load7
-rwxr-xr-xratpoison/panel/monce25
-rwxr-xr-xratpoison/panel/music38
-rwxr-xr-xratpoison/panel/panel5
-rwxr-xr-xratpoison/panel/panel_bar13
-rwxr-xr-xratpoison/panel/signal19
7 files changed, 98 insertions, 12 deletions
diff --git a/ratpoison/panel/cpu b/ratpoison/panel/cpu
deleted file mode 100755
index fe018a5..0000000
--- a/ratpoison/panel/cpu
+++ /dev/null
@@ -1,3 +0,0 @@
-while true; do
-mpstat -P ALL 2 1 | grep "Average.*all" | awk '{print "C"$3+$5}'
-done
diff --git a/ratpoison/panel/load b/ratpoison/panel/load
new file mode 100755
index 0000000..3977bee
--- /dev/null
+++ b/ratpoison/panel/load
@@ -0,0 +1,7 @@
+#!/bin/bash
+while true; do
+cpu=`mpstat -P ALL 2 1 | grep "Average.*all" | awk '{print $3+$5}'`
+mem=`free | grep Mem | awk '{print $3/$2 * 100.0}'`
+printf "C%.*f\n" 1 $cpu
+printf "R%.*f\n" 0 $mem
+done
diff --git a/ratpoison/panel/monce b/ratpoison/panel/monce
new file mode 100755
index 0000000..caa316c
--- /dev/null
+++ b/ratpoison/panel/monce
@@ -0,0 +1,25 @@
+#!/bin/sh
+
+
+f=1
+d=30 # width
+
+new=`mpc current`
+if [ "$old" != "$new" ];then
+f=1;
+old="$new"
+fi
+
+
+e=$(expr $f + $d)
+
+if mpc | grep -q playing; then
+symbol='p'
+else
+symbol='P'
+fi
+
+echo "$symbol`echo $new | cut --bytes $f-$e`"
+echo "K`mpc -h 127.0.0.1 volume | perl -pe 's/^volume://' | perl -pe 's/%$//' | perl -pe 's/^ //'`"
+
+
diff --git a/ratpoison/panel/music b/ratpoison/panel/music
index 6190dbc..a01ad03 100755
--- a/ratpoison/panel/music
+++ b/ratpoison/panel/music
@@ -1,11 +1,39 @@
+#!/bin/sh
+
+
+f=1
+d=30 # width
+
while true;do
+
+new=`mpc current`
+if [ "$old" != "$new" ];then
+f=1;
+old="$new"
+fi
+
+
+e=$(expr $f + $d)
+
+if [ $e -gt ${#new} ];then
+e=${#new}
+f=$(expr $e - $d)
+fi
+
if mpc | grep -q playing; then
-echo "p`mpc current`" | cut --bytes 1-40
-echo "K`mpc -h 127.0.0.1 volume | perl -pe 's/^volume://' | perl -pe 's/%$//' | perl -pe 's/^ //'`"
+symbol='p'
else
-echo "P`mpc current`" | cut --bytes 1-40
-sleep 1;
+symbol='P'
+fi
+
+echo "$symbol`echo $new | cut --bytes $f-$e`"
echo "K`mpc -h 127.0.0.1 volume | perl -pe 's/^volume://' | perl -pe 's/%$//' | perl -pe 's/^ //'`"
+
+f=$(expr $d / 2 + $f)
+
+if [ $e == ${#new} ];then
+f=1;
fi
-sleep 5;
+
+sleep 2;
done
diff --git a/ratpoison/panel/panel b/ratpoison/panel/panel
index 08c7df4..95b8aa4 100755
--- a/ratpoison/panel/panel
+++ b/ratpoison/panel/panel
@@ -12,9 +12,10 @@ xtitle -sf 'T%s' > "$PANEL_FIFO" &
essid -sf 'E%s' -i 3 -w wlp2s0 > "$PANEL_FIFO" &
volume -i 10 -sf 'V%i' > "$PANEL_FIFO" &
battery -i 5 -sf 'B%i' > "$PANEL_FIFO" &
-clock -sf 'S%d %a %H:%M' > "$PANEL_FIFO" &
+clock -sf 'Z%d %a %H:%M' > "$PANEL_FIFO" &
./music > "$PANEL_FIFO" &
-./cpu > "$PANEL_FIFO" &
+./load > "$PANEL_FIFO" &
+./signal > "$PANEL_FIFO" &
source ./panel_colors
diff --git a/ratpoison/panel/panel_bar b/ratpoison/panel/panel_bar
index 5015464..6ccf74b 100755
--- a/ratpoison/panel/panel_bar
+++ b/ratpoison/panel/panel_bar
@@ -12,6 +12,15 @@ source ./panel_colors
# playing mpc
cpu="%{F$COLOR_STATUS_FG}%{B$COLOR_STATUS_BG} C:${line#?} %{B-}%{F-}"
;;
+ R*)
+ # playing mpc
+ ram="%{F$COLOR_STATUS_FG}%{B$COLOR_STATUS_BG} R:${line#?} %{B-}%{F-}"
+ ;;
+
+ S*)
+ # playing mpc
+ signal="%{F$COLOR_STATUS_FG}%{B$COLOR_STATUS_BG} S:${line#?} %{B-}%{F-}"
+ ;;
p*)
# playing mpc
@@ -50,7 +59,7 @@ source ./panel_colors
fi
;;
- S*)
+ Z*)
# clock output
time_infos="%{F$COLOR_STATUS_FG}%{B$COLOR_STATUS_BG} ${line#?} %{B-}%{F-}"
;;
@@ -112,5 +121,5 @@ source ./panel_colors
done
;;
esac
- printf "%s\n" "%{l}${wm_infos}${title}%{r}${playing}${paused}${cpu}${essid}${volume}${musicvol}${battery}${time_infos} "
+ printf "%s\n" "%{l}${wm_infos}${title}%{r}${playing}${paused}${cpu}${ram}${essid}${signal}${volume}${musicvol}${battery}${time_infos} "
done
diff --git a/ratpoison/panel/signal b/ratpoison/panel/signal
new file mode 100755
index 0000000..75ec253
--- /dev/null
+++ b/ratpoison/panel/signal
@@ -0,0 +1,19 @@
+#!/bin/sh
+while true;do
+signal=`iwconfig wlp2s0 | grep Signal| perl -pe 's/.*level=//; s/ dBm.*//'`
+#convert to Quality
+
+ if [ $signal -le -100 ];then
+ quality=0;
+ elif [ $signal -ge -50 ];then
+ quality=100;
+ elif [ -z $signal ];then
+ quality=0;
+ else
+ quality=$(( 2 * ( $signal + 100 )));
+ fi
+
+echo "S$quality";
+sleep 3;
+done
+