I had installed some syntax highlighting plugins before but disabled them because I couldn’t get it to work properly. Now with the pretty new layout all posts with snippets of unhighlighted source code were a real eye-sore, so that needed to be fixed as wel.

For some unknown reason the SyntaxHighlighter Evolved plugin that I couldn’t get to do as I wanted before now works like a charm. The only difficult part was to get me some AppleScript highlighting. David Chambers has written a brush, so I only had to install that brush the proper way. Creating the plugin was easy:

<?php
/*
Plugin Name: SyntaxHighlighter Evolved: AppleScript Brush
Description: Adds support for the Applescript language to the SyntaxHighlighter Evolved plugin.
Author: Ronald Chu
Version: 1.0.0
Author URI: http://www.rchu.nl/
*/

// SyntaxHighlighter Evolved doesn't do anything until early in the "init" hook, so best to wait until after that
add_action( 'init', 'syntaxhighlighter_applescript_regscript' );

// Tell SyntaxHighlighter Evolved about this new language/brush
add_filter( 'syntaxhighlighter_brushes', 'syntaxhighlighter_applescript_addlang' );

// Register the brush file with WordPress
function syntaxhighlighter_applescript_regscript() {
 wp_register_script( 'syntaxhighlighter-brush-applescript', plugins_url( 'shBrushAppleScript.js', __FILE__ ), array('syntaxhighlighter-core'), '1.2.3' );
}

// Filter SyntaxHighlighter Evolved's language array
function syntaxhighlighter_applescript_addlang( $brushes ) {
 $brushes['applescript'] = 'applescript';
 $brushes['osascript'] = 'applescript';

 return $brushes;
}
?>

But at first the highlighting did not work on AppleScript snippets, and it took me quite some time to find out that I shouldn’t have copy-pasted the javascriptcode into Vim on my ssh shell. Some of the special characters in line 37 were transformed into in a question mark which broke the regular expression.

Now, as far as I know, only one thing is wrong; when I refresh quickly in Chrome (5.0.342.7 beta, OS X 10.6.2) some of the keywords do not light up. I do not know if it is a bug in Chome, SyntaxHighighter or the AppleScript brush, but it is something I can live with for now.

I started playing around with several scripts and GeekTool because it looked cool at first and it was fun to do some shell scripting. As the amount of information displayed on my desktop grew I started wondering why I was creating a lot of small processes taking up a little CPU time. I hardly ever look at my desktop because of all the windows in front of it. But the stats now on my desktop are easily accesable with one key (F11), and some starts are already displayed in either the menu bar or my iStat Pro widget. Removing it there gives me more room in the menu bar (which is starting grow full of icons) and saves some resources used by the widget.

Now I shall explain the GeekTool entries I created more detailed.

Battery

You can get a lot of information about your battery with the ioreg command. I found a battery status script which doesn’t work on leopard but with plenty of comment in the code to use it as a reference for the output of ioreg and write a little script of my own which prints the status, charge and time remaining. The code should be pretty self-explanatory.

#! /bin/sh
#
# Battery status script, writen by Ronald Chu for GeekTool usage. Free to
# use as you please.
#
# Prints the current charge, time remaining on battery power or the AC
# power status

# Create an array (Capacity, Voltage, Flags, Current, Amperage, Cycle Count)
# in 10.6 the order has changed to (Amperage, Flags, Capacity, Current, Voltage, Cycle Count) so we need to re-order
if [ -n '`sw_vers |grep ProductVersion:.10.6`' ]; then
  status=(`ioreg -w0 -l|grep LegacyBatteryInfo|sed -e 's/[^1234567890]/ /g'|awk '{print $3" "$5" "$2" "$4" "$1" "$6}'`)
else
  status=(`ioreg -w0 -l|grep LegacyBatteryInfo|sed -e 's/[^1234567890]/ /g'`)# Fix Amperage (convert large number to negative one)
  status[4]=$(expr ${status[4]} + 0)
fi

# if charger connected
if [ $((${status[2]} & 1)) == 1 ]; then
  #if battery is charging
  if [ $((${status[2]} & 2)) == 2 ]; then

    # Calculate minutes until  fullycharged
    if [ ${status[4]} -lt 0 ]; then
      mins=''
    else
      mins=`echo "(${status[0]}-${status[3]})*60/${status[4]}"|bc`
      if [ $mins -gt 59 ]; then
        mins=`printf ", %d:%02d until full" $(( mins / 60 )) $(( mins % 60 ))`
      else
        mins=`printf ", 0:%02d until full" $mins`
      fi
    fi
    echo `echo "${status[3]}*100/${status[0]}"|bc`"% (charging$mins)"
  else
    perc=`echo "${status[3]}*100/${status[0]}"|bc`
    if [ $prec -lt 100 ]; then
      echo "$perc% (not charging)"
    else
      echo "100% (charged)"
    fi
  fi

# if charger not connected
else
  # Calculate minutes until empty
  if [ ${status[4]} -ge 0 ]; then
    mins=''
  else
    mins=`echo "- ${status[3]}*60/${status[4]}"|bc`
    if [ $mins -gt 59 ]; then
      mins=`printf "(%d:%02d remaining)" $(( mins / 60 )) $(( mins % 60 ))`
    else
      mins=`printf (0:%02d remaining)" $mins`
    fi
  fi

  echo `echo "${status[3]}*100/${status[0]}"|bc`"%$mins"
fi

Hard disk

I only care about the free space on my main hard disk and not at all in what other drives, shares, disk images and so forth are mounted. So I filter and reformat output of df to show just that.

df -h | grep 'disk0s2' | awk '{print $4" free ("$5" of "$2" used)"}'

Memory

Calling top and extracting the memory usage is pretty simple. I am planning to extract much more information from top (like the load en processes using the most CPU time) later.

top -l 1 | awk '/PhysMem/ {print $8 " used, " $10 " free"}'

Network

I’ve written a bash script that takes the name of a network interface as a parameter and returns its status, IP address, the SSID if it is an airport connection and last but not least the amount of data sent and recieved. The comment in the code should explain everything.

#! /bin/sh
#
# Network status script, writen by Ronald Chu for GeekTool usage. Free to
# use as you please.
#
# Prints status, ip, trafic and (if aplicable) SSID name of the airport and
# ethernet connection. Network IO is stored with timestamp in milliseconds
# in a text file so with the difference in time and bytes the IO in bytes
# per second can be calculated.

workdir="/Users/ronaldchu/Applications/Scripts/GeekTool/"

# parameter is a number of bytes * 100 (for float precision)
function formatBytes()
{
  if [ $1 -lt 102400 ]; then echo `echo "scale=2; $1/100"|bc` b; else
    if [ $1 -lt 104857600 ]; then echo `echo "scale=2; $1/102400"|bc` Kb; else
      echo `echo "scale=2; $1/104857600"|bc` Mb;
    fi
  fi
}

# The script takes the name of the interface as a parameter
if [ $# -lt 1 ]; then
  echo "Parameter missing"
  exit 1
fi

# Check if interface exists
ifconfig $1 > /dev/null 2>&1
if [ $? -ne 0 ]; then
  echo "Interface \"$1\" does not exist"
  exit 2
fi

#Extract ip adress
ip=`ifconfig $1 | grep "inet " | grep -v 127.0.0.1 | awk '{print $2}'`

if [ $ip ]; then

  # Make IO info string "
  IO_now="`${workdir}milliseconds` `netstat -ib | grep -e "$1" -m 1 | awk '{print $7" "$10}'`"

  # If there is an old IO info file
  if [ -f "${workdir}NetworkStatus_$1_IO.txt" ]; then
    IO_old=`cat ${workdir}NetworkStatus_${1}_IO.txt`

  # else create one and sleep for a second
  else
    echo $IO_now > ${workdir}NetworkStatus_${1}_IO.txt
    IO_old=$IO_now
    sleep 1
    IO_now="`${workdir}milliseconds` `netstat -ib | grep -e "$1" -m 1 | awk '{print $7" "$10}'`"
  fi

  #calculate IO trafic in Kb/s
  IO_in=`echo $IO_old $IO_now|awk '{print "scale=0; (100*("$5"-"$2"))/("$4"-"$1")"}'|bc`
  IO_out=`echo $IO_old $IO_now|awk '{print "scale=0; (100*("$6"-"$3"))/("$4"-"$1")"}'|bc`

  # Write current IO info
  echo $IO_now > ${workdir}NetworkStatus_${1}_IO.txt

  # Echo network status (with SSID iff the network interface is the airport)
  if [ $1 == "en1" ]; then
    SSID=`/System/Library/PrivateFrameworks/Apple80211.framework/Versions/Current/Resources/airport -I|grep '[^B]SSID' |sed -e 's/^[^:]*: //'`
    echo "$ip ($SSID) `formatBytes $IO_in`/s down `formatBytes $IO_out`/s up"
  else
    echo "$ip `formatBytes $IO_in`/s down `formatBytes $IO_out`/s up"
  fi

else
  echo "Disconnected"
fi

To obtain the timestamp for the network data readings using date isn’t accurate enough, so I use the following little C program to get a more accurate timestamp.

#include <stdlib.h>
#include <sys/time.h>

main()
{
  struct timeval tv;
  gettimeofday(&tv, NULL);
  printf("%d.%d\n", tv.tv_sec, tv.tv_usec);
}

Twitter

What else can I do? Well, whenever you want add something fancy you can always do something with Twitter! It makes you modern and Web 2.0, and stuff like that. Also it was extremely easy to add the latest tweets from my friends to my desktop with only one single command.

curl -u username:password http://twitter.com/statuses/friends_timeline.rss?count=20| \
grep title|\
tail -n 20 |\
sed -e 's/.*\(.*\)<\/title>/\1/'

iTunes

For information on the track currently playing in iTunes I’ve combined several scripts and ideas from others and myself to create an applescript which extracts the album art and returns the artist, title and album of the current song. Add another entry in GeekTool to show the image, which is a PNG file in a fixed location. In my case, this is located at file:///Users/ronaldchu/artwork.png

# iTunesCurrentSong.scpt
#
# An applescript which returns the title, artist, album and player
# status of iTunes and writes the current album art (or blank if
# iTunes not running, or a default image if no art available) to a
# png file
#
# Network status script, writen by Ronald Chu for GeekTool usage. Free to
# use as you please.

# folders specs
set artworkFolder to ((path to home folder) as text) & "Applications:Scripts:GeekTool:"
set artworkFile to artworkFolder & "artwork.png"
set artworkiTunes to artworkFolder & "artwork.pict"
set artworkBlank to artworkFolder & "blank.png"
set artworkDefault to artworkFolder & "default.png"
set unixArtworkFile to the quoted form of POSIX path of artworkFile
set unixArtworkiTunes to the quoted form of POSIX path of artworkiTunes
set unixArtworkBlank to the quoted form of POSIX path of artworkBlank
set unixArtworkDefault to the quoted form of POSIX path of artworkDefault

# Check if iTunes is running
tell application "System Events"
	set powerCheck to ((application processes whose (name is equal to "iTunes")) count)
	if powerCheck = 0 then
		# If there's no iTunes running use the Blank Arwork
		do shell script "cp " & unixArtworkBlank & " " & unixArtworkFile
		return ""
	end if
end tell

tell application "iTunes"

	# Get current track name and status
	try
		set playerstate to (get player state)
	end try
	if playerstate = paused then
		set trackPaused to "
"
	else
		set trackPaused to ""
	end if
	if playerstate = stopped then
		# If there's iTunes use the default Arwork.
		do shell script "cp " & unixArtworkDefault & " " & unixArtworkFile
		return "

"
	end if

	set trackID to the current track
	set trackName to the name of trackID
	set artistName to the artist of trackID
	set albumName to the album of trackID

	(* Is there any Artwork? *)
	if (count of artwork of trackID) ≥ 1 then
		set artworkData to data of artwork 1 of trackID
		set fileRef to (open for access artworkiTunes with write permission)
		try
			set eof fileRef to 512
			write artworkData to fileRef starting at 513
			close access fileRef
		on error errorMsg
			try
				close access fileRef
			end try
			error errorMsg
		end try

		tell application "Image Events"
			launch
			set theimg to open artworkiTunes
			scale theimg to size 100
			save theimg as PNG in artworkFile with replacing
			close
		end tell

	else
		(* If there's no Artwork use the default artwork. *)
		do shell script "cp " & unixArtworkDefault & " " & unixArtworkFile
	end if

	return trackPaused & "
" & artistName & "
" & trackName & "
" & albumName
end tell

For some reason the code contains html code for special character like < and &. I’ll look into this later, for now you just have to change that when copying the code. Also I’m having lot’s of difficulty with getting syntax highlighting working right, damnit…

Update 07/06/09: Changed the battery script so it will show “100% (charged)” instead of “100% (not charging)”.

Update 23/06/09: Please leave a comment if you like my scripts, or if you don’t. I’d love to get some feedback and know how many of the visitors google analytics reports to me are actualy using the scripts

Update 24/08/09: Updated the battery script, changed > to -gt to actualy do a greater-than comparisation instead of dumping into a file called 59.

Update 27/11/09: Added a version check to the BatteryStatus script because the order of the battery info has changed since 10.6

SVN_CURR_REV=`svn info|grep 'Last Changed Rev'|awk '{ print $4 }'`; \
svn up; \
svn log -r $SVN_CURR_REV:HEAD

Now I just have to remember tot type svnup instead of svn up.