Skip to Content »
online discount medstore
advair diskus for sale
buy advair diskus without prescription
allegra for sale
buy allegra without prescription
aristocort for sale
buy aristocort without prescription
astelin for sale
buy astelin without prescription
atarax for sale
buy atarax without prescription
benadryl for sale
buy benadryl without prescription
buy clarinex without prescription
clarinex for sale
buy claritin without prescription
claritin for sale
buy flonase without prescription
flonase for sale
buy ventolin without prescription
ventolin for sale
amoxil for sale
buy amoxil without prescription
augmentin for sale
buy augmentin without prescription
bactrim for sale
buy bactrim without prescription
biaxin for sale
buy biaxin without prescription
buy cipro without prescription
cipro for sale
buy cleocin without prescription
cleocin for sale
buy dexone without prescription
dexone for sale
buy flagyl without prescription
flagyl for sale
buy levaquin without prescription
levaquin for sale
buy omnicef without prescription
omnicef for sale
amaryl for sale
buy amaryl without prescription
buy cozaar without prescription
cozaar for sale
buy diabecon without prescription
diabecon for sale
buy glucophage without prescription
glucophage for sale
buy glucotrol without prescription
glucotrol for sale
buy glucovance without prescription
glucovance for sale
buy micronase without prescription
micronase for sale
buy prandin without prescription
prandin for sale
buy precose without prescription
precose for sale
buy cialis professional without prescription
cialis professional for sale
buy cialis soft without prescription
cialis soft for sale
buy cialis super active without prescription
cialis super active for sale
buy cialis without prescription
cialis for sale
buy levitra without prescription
levitra for sale
buy viagra professional without prescription
viagra professional for sale
buy viagra soft without prescription
viagra soft for sale
buy viagra super active without prescription
viagra super active for sale
buy viagra super force without prescription
viagra super force for sale
buy viagra without prescription
viagra for sale
buy celebrex without prescription
celebrex for sale
buy colcrys without prescription
colcrys for sale
buy feldene without prescription
feldene for sale
buy imitrex without prescription
imitrex for sale
buy inderal without prescription
inderal for sale
buy indocin without prescription
indocin for sale
buy naprosyn without prescription
naprosyn for sale
buy pletal without prescription
pletal for sale
buy robaxin without prescription
robaxin for sale
buy voltaren without prescription
voltaren for sale

Tech Life of Recht » archive for 'xmonad'

 Gnome Do in XMonad

  • December 2nd, 2009
  • 10:15 pm

I recently started using Gnome Do as a launcher in xmonad – not to replace the good old XMonad.Prompt, but because it integrates quite nicely into some other OS features. For example, suspending is a matter of pressing Ctrl-Alt-space and entering susp. There are a lot of other nice features like that. I still use the regular XMonad.Prompt to start programs, as it works just fine for that.

To use Gnome Do with xmonad, I changed two things: I made sure that the Gnome Do window is ignored by xmonad, and I bound the popup key to Ctrl-Alt-space instead of the default mod4-space, which I use to switch layouts in xmonad.

Ignoring the window is simply a matter of adding a condition to the manageHook:

[code]
main = do din <- spawnPipe statusBarCmd xmonad $ defaultConfig { manageHook = composeAll . concat $ [ [ className =? "Do" --> doIgnore ]
]
}
[/code]

To assign a new shortcut for the popup, simply press mod4-space to bring it up, and then click on the small arrow in the top right corner. Under Preferences->Keyboard, a new shortcut can be assigned.

 Karmic Koala

  • October 29th, 2009
  • 9:50 pm

Ubuntu 9.10 (Karmic Koala) is out, so I decided to upgrade. The upgrade process itself went fine, but it seems there were some other changes to the system, which affected me.

I’m running on a MacBook Pro Santa Rosa with 4 GB mem, which means that if I use the standard 32 bit kernel, I cannot use all of the memory. That’s not really a problem, I just recompile the kernel to support PAE.
However, I also use XMonad (because it’s the best window manager available), and previously I launched it from ~/.xsession. However, the new version of GDM doesn’t support that anymore, so now you have to drop a file in /usr/share/xsessions/xmonad.desktop – mine contains this:

[code]
[Desktop Entry]
Encoding=UTF-8
Name=xmonad
Comment=xmonad
Exec=/pack/haskell/bin/runxmonad.sh
Type=Application
[/code]

Other than that, simply follow this little guide to make the keyboard and touchpad work properly.

 xmonad upgrade

  • May 1st, 2009
  • 9:10 am

Yesterday, I decided to upgrade my xmonad installation to the latest from the Darcs repository. There were no problems compiling the new version, but when I restarted X, xmonad wouldn’t start. After digging in the log files, I found this error:

xmonad-i386-linux: getProcessStatus: does not exist

Very strange, and not much help on Google either. After fiddling around a little, I remembered that xmonad compiles the ~/.xmonad/xmonad.hs config file into a new executable, which is called xmonad-i386-linux, and is placed in ~/.xmonad. Remove the file and everything will work again.

The problem seems to be that a new patch in the repository changes the way xmonad launches child processes, but xmonad does not automatically detect that the configuration should also be recompiled.

 2008 wishes

  • December 29th, 2007
  • 3:02 pm

The coming of a new year usually attracts a number of predictions, some more accurate than others. I’m no good at predicting, so I’ll give my wishes for the new year instead:

  • Get my Macbook Pro to work with the DVI-VGA adapter (done)
  • I’d like to be convinced that the dynamic languages are really the way forward. I see that they can do smart stuff, but I sorely miss some kind of help using whatever APIs are developed, besides the source code, and I can’t get used to working without a proper editor. I can probably live without the editor, but having methods like def initialize (options = {}) just hurts my eyes. I haven’t used Ruby/Rails that much, but I’ve already dug around more source code than I care to in order to find out what the legal options were.
  • Release Java 7 with proper closures. This probably won’t happen, and even when it does, it will take a couple of years before it’s adopted.
  • Already, I know that I’m going to spend a good part of my time fiddling around with huge WSDLs and schemas. Could somebody find a way to stop the black hole that is Web Services?
  • As for Linux on the desktop, that will still not happen, even though it should, especially when you look at the new distributions such as Ubuntu. However, I’m pretty satisfied, now I just need xmonad to support dynamic twinview, so I can add a monitor without restarting X
  • And to Apple: please take corporate customers seriously and make a docking station for the Macbook (Pro). I’m getting tired of plugging and unplugging 5 different cables every time I have to move my laptop.
  • Less focus on creating big monolithic systems, more on distributing across autonomous nodes.
  • Finally, it would be great with a proper vi-mode for Eclipse – like vimperator for Firefox.

 xmonad 0.5

  • December 16th, 2007
  • 12:57 am

xmonad 0.5 is out, and I haven’t upgraded my installation in a while. It’s pretty nice that configuration is now done in /.xmonad/xmonad.hs, then there’s no need to recompile xmonad all the time. The configuration change did require a reorganisation of my old Config.hs, so I took a look at some of the samples to see what other people did.
I ended up with something which looks like this:

xmonad

This is my xmonad.hs:
[code]
— XMonad Core
import XMonad
import XMonad.Layout
import XMonad.Operations
import qualified XMonad.StackSet as W

— GHC hierarchical libraries
import Data.Bits ((.|.))
import qualified Data.Map as M
import Graphics.X11
import Graphics.X11.Xlib
import Graphics.X11.Xlib.Extras
import System.IO

— Contribs
import XMonad.Actions.CycleWS
import XMonad.Actions.SwapWorkspaces
import XMonad.Actions.Submap
import XMonad.Actions.WindowBringer
import XMonad.Actions.FloatKeys

import XMonad.Hooks.UrgencyHook
import XMonad.Layout.NoBorders
import XMonad.Layout.Tabbed
import XMonad.Layout.WindowNavigation
import XMonad.Layout.Grid
import XMonad.Layout.LayoutHints
import XMonad.Layout.Dishes
import XMonad.Util.EZConfig
import XMonad.Util.Run

import XMonad.Prompt.Shell
import XMonad.Prompt

import XMonad.Hooks.DynamicLog ( PP(..), dynamicLogWithPP, dzenColor, wrap, defaultPP )

myfont = “\”-xos4-terminus-medium-r-normal–12-120-72-72-c-60-iso8859-1\””
fgcolor = “black”
bgcolor = “white”

statusBarCmd= “dzen2 -e ” -w 660 -h 15 -ta l -xs 1 -fg ” ++ fgcolor ++ ” -bg ” ++ bgcolor ++ ” -fn ” ++ myfont

— Get ready!
main = do din <- spawnPipe statusBarCmd xmonad $ withUrgencyHook dzenUrgencyHook { args = ["-bg", "darkgreen", "-xs", "1"] } $ defaultConfig { workspaces = workspaces' , modMask = modMask' , numlockMask = 0 , layoutHook = layoutHook' , terminal = "urxvtc || urxvt" , normalBorderColor = "#dddddd" , focusedBorderColor = "#3499dd" , defaultGaps = [(15,0,0,0)] , logHook = dynamicLogWithPP $ myPP din } `additionalKeys` keys' modMask' = mod4Mask workspaces' = map show [1] ++ ["web", "mail", "chat", "code"] ++ map show [6 .. 9 :: Int] layoutHook' = configurableNavigation noNavigateBorders $ layouts layouts = Mirror tiled ||| tiled ||| Grid ||| layoutHints Full ||| Dishes 2 (1/5) ||| noBorders (tabbed shrinkText defaultTConf { fontName = myfont }) where tiled = Tall nmaster delta ratio nmaster = 2 -- The default number of windows in the master pane ratio = 1/2 -- Default proportion of screen occupied by master pane delta = 3/100 -- Percent of screen to increment by when resizing panes noFollow CrossingEvent {} = return False noFollow _ = return True keys' = [ ((modMask' .|. shiftMask, xK_d ), spawn "date | dzen2 -p 2 -xs 1") -- %! Print current date , ((modMask', xK_p), shellPrompt defaultXPConfig) ] ++ -- modMask'-[1..0] %! Switch to workspace N -- modMask'-shift-[1..0] %! Move client to workspace N [((m .|. modMask', k), windows $ f i) | (i, k) <- zip workspaces' $ [xK_1 .. xK_9] ++ [xK_0] , (f, m) <- [(W.greedyView, 0), (W.shift, shiftMask)]] ++ -- modMask'-{e,r} %! Switch to physical/Xinerama screens 1 or 2 -- modMask'-shift-{e,r} %! Move client to screen 1 or 2 [((m .|. modMask', key), screenWorkspace sc >>= flip whenJust (windows . f))
| (key, sc) <- zip [xK_e, xK_w] [0..] , (f, m) <- [(W.view, 0), (W.shift, shiftMask)]] ++ [((modMask' .|. mod1Mask, k), windows $ swapWithCurrent i) | (i, k) <- zip workspaces' $ [xK_1 .. xK_9] ++ [xK_0]] -- float keys ++ [ ((modMask', xK_d ), withFocused (keysResizeWindow (-10,-10) (1,1))) , ((modMask', xK_s ), withFocused (keysResizeWindow (10,10) (1,1))) , ((modMask', xK_a ), withFocused (keysMoveWindowTo (512,384) (1, 0))) ] myPP h = defaultPP { ppCurrent = dzenColor "white" "#cd8b00" . pad , ppVisible = dzenColor "white" "#666666" . pad , ppHidden = dzenColor "black" "#cccccc" . pad , ppHiddenNoWindows = dzenColor "#999999" "#cccccc" . pad , ppWsSep = dzenColor "#bbbbbb" "#cccccc" "^r(1x18)" , ppSep = dzenColor "#bbbbbb" "#cccccc" "^r(1x18)" , ppLayout = dzenColor "black" "#cccccc" . (\ x -> case x of
“TilePrime Horizontal” ->
” ^i(/home/emertens/images/tile_horz.xpm) ”
“TilePrime Vertical” ->
” ^i(/home/emertens/images/tile_vert.xpm) ”
“Hinted Full” ->
” ^i(/home/emertens/images/fullscreen.xpm) ”
_ -> pad x
)
, ppTitle = (‘ ‘:) . escape
, ppOutput = hPutStrLn h
}
where
escape = concatMap (\x -> if x == ‘^’ then “^^” else [x])
pad = wrap ” ” ” ”
[/code]

I use a simple shell script for starting xmonad:

[code]
ssh-add ~/.ssh/id_dsa /dev/null
Esetroot /usr/share/backgrounds/warty-final-ubuntu.png
unclutter -idle 2 &
urxvtd -f -o
irxevent -d

gnome-settings-daemon &
gnome-volume-manager &

export PATH=$PATH:`dirname $0`
`dirname $0`/status &

xmonad
[/code]

Finally, the dzen2 status bar is run using this script:
[code]
#!/bin/sh

BG=white
FG=black
FONT=”-xos4-terminus-medium-r-normal–12-120-72-72-c-60-iso8859-1″

BFG=”#444″

gcpubar -i 2 -fg ‘#444’ -w 30 -h 10 | dzen2 -e ” -x 1360 -fg $FG \
-bg $BG -fn $FONT -h 15 -xs 1 &

while :; do
MEM=`memstatus.awk /proc/meminfo`
CPU=`cpustatus.awk`
DATE=`date +”%d-%m %k:%M”`

REM=`awk ‘/remaining capacity/ { print $3 }’ /proc/acpi/battery/BAT0/state`
LAST=`awk ‘/last full/ { print $4}’ /proc/acpi/battery/BAT0/info`
STATE=`awk ‘{print $2}’ /proc/acpi/ac_adapter/ADP1/state`
if [ “$STATE” = “on-line” ]; then
BAT=$(echo $REM $LAST | awk ‘{printf “Bat: %.1f%%, AC”, ($1/$2)*100’})
else
PRESENT=`awk ‘/present rate/ { print $3}’ /proc/acpi/battery/BAT0/state`
BAT=$(echo $REM $LAST $PRESENT | \
awk ‘{printf “Bat: %.1f%%, %d min”, ($1/$2)*100, ($1/$3)*60}’)
fi

LOAD=`awk ‘{print $1 ” ” $2 ” ” $3}’ /proc/loadavg`

echo “$CPU $MEM | $DATE | $BAT | $LOAD”
sleep 5
done | dzen2 -e ” -x 660 -w 700 -fg $FG -bg $BG -fn $FONT -h 15 -xs 1
[/code]

Two awk scripts are used – one for the memory usage and one for CPU frequencies. Why awk? No idea, it just seemed like a good choice at the time.

memstatus.awk:
[code]
#!/usr/bin/awk -f
BEGIN {
BG=”darkgrey”;
FG=”#444″;
WIDTH=30;
HEIGHT=10;
}

/MemTotal/ {t=$2};
/MemFree/ {f=$2};
/SwapTotal/ {st=$2};
/SwapFree/ {sf=$2};

END {
mw=int(WIDTH*(t-f)/t);
fw=WIDTH-mw;
sw=int(WIDTH*(st-sf)/st);

printf(“Mem: ^ib(1)^fg(%s)^r(%dx%d)^fg(%s)^r(%dx%d)” \
“^fg(%s)^r(2x%d)^fg(%s)^r(%dx%d)^fg(%s)^r(%dx%d)^ib(0)^fg()\n”,
FG, mw, HEIGHT,
BG, fw, HEIGHT,
“black”,
HEIGHT, BG, WIDTH-sw,
HEIGHT, FG, sw, HEIGHT);
}
[/code]

[code]
#!/usr/bin/awk -f
BEGIN {
BG=”darkgrey”
FG=”#444″
WIDTH=30
HEIGHT=10
CPUS=0

cmd = “ls /sys/devices/system/cpu”
while ((cmd | getline) > 0) {
if ($1 ~ /cpu/) {
CPUS++
}
}
close(cmd)

printf “CPU: ”
for (i=0; i < CPUS; i++) { cfn="/sys/devices/system/cpu/cpu" i "/cpufreq/scaling_cur_freq" mfn="/sys/devices/system/cpu/cpu" i "/cpufreq/scaling_max_freq" getline cf < cfn getline mf < mfn cw=int(WIDTH*(mf-cf)/mf) printf("^ib(1)^fg(%s)^r(%dx%d)^fg(%s)^r(%dx%d)^ib(0)^fg()", FG, cw, HEIGHT, BG, WIDTH-cw, HEIGHT) close(cfn) close(mfn) if (i < CPUS - 1) { printf("^ib(0)^fg()^r(5x0)^ib(1)") } } printf("\n"); } [/code]

 My xmonad start script

  • October 25th, 2007
  • 10:54 pm

After reinstalling xmonad on my laptop using Ubuntu as the base distribution, I’ve finally got a setup I like, so I thought I’d share it. So, here is my script which starts xmonad:

[code]
ssh-add ~/.ssh/id_dsa /dev/null

Esetroot /usr/share/backgrounds/warty-final-ubuntu.png
unclutter -idle 2 &

urxvtd -f -o

gnome-settings-daemon &
gnome-power-manager
gnome-volume-manager &

BG=white
FG=black
FONT=”-xos4-terminus-medium-r-normal–12-120-72-72-c-60-iso8859-1″

export PATH=$PATH:`dirname $0`

# create a pipe for xmonad to talk to
PIPE=$HOME/.xmonad-status
rm -f $PIPE
mkfifo -m 600 $PIPE
[ -p $PIPE ] || exit

# and a workspace status bar, reading’s xmonad’s stdout
dzen2 -e ” -w 680 -ta l -fg $FG -bg $BG -fn $FONT -h 15 < $PIPE & `dirname $0`/status & xmonad > $PIPE &
wait $!

pkill -HUP dzen2

wait
[/code]

This script is launched from ~/.xsession. It uses dzen and some of the dzen gadgets (which must be compiled separately from dzen/gadgets). It also starts some of the Gnome daemons which normally run under Ubuntu. This means that power management and sound volume goes through Gnome, and devices are mounted automatically when they are added to the system.

Two dzens are launched: One for displaying workspaces and one for general status. The general status script looks like this:

[code]
#!/bin/sh

BG=white
FG=black
FONT=”-xos4-terminus-medium-r-normal–12-120-72-72-c-60-iso8859-1″

while :; do
MEM=`awk ‘/MemTotal/ {t=$2}; /MemFree/ {f=$2}; END {print t-f ” ” t}’ \
/proc/meminfo | dbar -s ‘:’ -l ‘Mem:’ -w 10`
CF0=$(echo `cat /sys/devices/system/cpu/cpu0/cpufreq/scaling_cur_freq` \
`cat /sys/devices/system/cpu/cpu0/cpufreq/scaling_max_freq` | dbar -w 7 -l ‘CPU0:’)
CF1=$(echo `cat /sys/devices/system/cpu/cpu1/cpufreq/scaling_cur_freq` \
`cat /sys/devices/system/cpu/cpu1/cpufreq/scaling_max_freq` | dbar -w 7 -l ‘CPU1:’)
DATE=`date +”%d-%m %k:%M”`

REM=`grep ‘remaining capacity’ /proc/acpi/battery/BAT0/state | awk ‘{print $3}’`
LAST=`grep ‘last full’ /proc/acpi/battery/BAT0/info |awk ‘{print $4}’`
STATE=`awk ‘{print $2}’ /proc/acpi/ac_adapter/ADP1/state`
if [ “$STATE” = “on-line” ]; then
BAT=$(echo $REM $LAST | awk ‘{printf “Bat: %.1f%%, AC”, ($1/$2)*100’})
else
PRESENT=`grep ‘present rate’ /proc/acpi/battery/BAT0/state | awk ‘{print $3}’`
BAT=$(echo $REM $LAST $PRESENT | awk ‘{printf “Bat: %.1f%%, %d min”, ($1/$2)*100, ($1/$3)*60}’)
fi

LOAD=`awk ‘{print $1 ” ” $2 ” ” $3}’ /proc/loadavg`

echo “$CF0 $CF1 $MEM | $DATE | $BAT | $LOAD”
sleep 5
done | dzen2 -e ” -x 440 -w 1000 -fg $FG -bg $BG -fn $FONT -h 15

[/code]

The script is made for a MacBook Pro with a two core processor and acpi. It displays the CPU frequencies in a dbar, memory usage, battery status, and load. I would like to display network status too, but I can’t figure out how to dig around in dbus efficiently, so that’s still missing.

 MacBook Pro

  • October 24th, 2007
  • 11:04 pm

Last week, we had some of the local drugheads come into the office at night, and they ran off with my laptop, and 6 other laptops. I had a trusty Lenovo Thinkpad z61m with Ubuntu (and xmonad, of course), which is now gone, together with whatever I had on it. Naturally, I didn’t have backup of everything, but at least all of my code was checked into Subversion, so the most critical I’m missing now are some course material.
Luckily, it didn’t take long before we got permission to go out and buy some new laptops (this is one of the great things when you’re working for a small company: no company procedures which have to be followed). We were told that we should probably go for a IBM, HP or Apple laptop. Now, I don’t know about you, but when I buy new hardware, I can’t just decide. It takes a couple of days (or even weeks), so deciding what to buy and live with for the next couple of years in half an hour certainly wasn’t easy. In the end, I got a MacBook Pro with a 15″ display – but only after confirming that it could run Linux, in case OS X got on my nerves too much.
Having lived with xmonad for a couple of months, it didn’t take long before I decided that OS X might be pretty nice, but there’s just too much focus on the looks, so I installed rEFIt, downloaded the new Ubuntu 7.10 and installed it.

I had anticipated some problems installing, as some of the experience reports on the net indicated that some things might go wrong, but that didn’t really happen. Everything just installed ™ – almost: The wireless driver had to be compiled from Subversion. Other than that, everything works: X, accellerated graphics, Xinerama/TwinView, sound, webcam, temp. sensors, keyboard lights, and touchpad with different zones. Only two things aren’t working: The remote control and suspend to ram.
I can live without the remote control (actually, I can’t really imagine what I should use it for if it worked), but the missing software suspend is not exactly optimal. It doesn’t help that it’s not consistent: Sometimes it can actually suspend and resume correctly. Using ‘pm-suspend –quirk-post-vbe’ seems to increase the number of times it works.
At other times, it doesn’t suspend. Sometimes, it just blanks the screen, and nothing else happend. It can also switch to console with a blinking cursor, and then nothing else happend. Sometimes bliking the cursor is so hard it has to turn on the fans. No matter what, a cold boot is the only way forward.
If it manages to suspend, resume often fails. When this happens, the disk turns on, but the screen doesn’t, and there’s no response to any keypresses. Again, cold boot is the way forward.
I haven’t managed to identify why software suspend doesn’t work. The only hint I have is that if the network cable is unplugged when I suspend, it seems to suspend successfully more often than else. Acpid should unload the network drivers before suspend, so I can’t see why this has anything to do with it. I’m hoping a kernel upgrade will fix it at some point.

 The xmonad experience

  • October 1st, 2007
  • 6:28 pm

I’ve been running xmonad on both my desktop computer at home and my laptop at work, and overall I’m pretty happy about it. However, I’ve had to work around some stuff:

  • There’s no fancy graphical tools like the default Ubuntu desktop. This means no network-manager, no battery monitor, and so on. For the network manager (nm-applet), I’ve used knetworkmanager – almost the same, but it works a little better. I usually just run knetworkmanager, connects to the right network, and closes it again.
  • Battery is monitored through dzen
  • For mounting and unmounting devices, something that Ubuntu did automatically, I use pmount directly.
  • I use mplayer through kplayer, a KDE mplayer wrapper, which makes it possible to run movies in a large window with the ratio preserved, something I’ve not been able to with the command line directly.

Other than that, there’s not much to it. It does attract some interest, though. Today, I held a course on Java and Web services, and someone asked me what type of Linux I ran. Not regarding the wrongness of the question, I answered “xmonad” – and there was 5 seconds silence, followed by a vague “ah…”.