POSIX path of (path to me) & "Contents/Resources" as string
-> "/Users/flepalaa/Desktop/Backup.app/Contents/Resources"
property myPath : POSIX path of (path to me) & "Contents/Resources" as string
set the result to myPath
-> "/Applications/AppleScript/Script Editor.app/Contents/Resources"

Apparently the latter is what path to me was "supposed" to mean before 10.5. AppleScript makes me want to smoke crack. :P

mail:~ file$ sudo serveradmin settings vpn:Servers:com.apple.ppp.pptp:IPv4:DestAddressRanges:_array_index:0 = \"10.64.200.200\"
vpn:Servers:com.apple.ppp.pptp:IPv4:DestAddressRanges:_array_index:0 = "10.64.200.200"
mail:~ file$ sudo serveradmin settings vpn:Servers:com.apple.ppp.pptp:IPv4:DestAddressRanges:_array_index:1 = \"10.64.200.254\"
Invalid index "1", must specifiy array elements in order
Index = 1, count = 0, currentArray = ()
for key: "vpn:Servers:com.apple.ppp.pptp:IPv4:DestAddressRanges:_array_index:1"

And actually the manpage doesn't say anything about how to work with numeric indices:

"When setting array values, special notation is needed. There are two types of arrays. Some arrays have special id keys that allow you to access individual array elements. These are accessed using the special key _array_id followed by the value of the id tag (eg. web:Mod-ules:_array_id:dav_module). To add a new element to such an array, you need to have a special line with a "create" value".

I struggled a lot with this trying to bring a dead VPN service back to life (it had lost all its settings). I finally ended up exprting the settings from another 10.4 server and importing them in, but then I discovered this workaround:

mail:~ file$ cat - | sudo serveradmin settings
vpn:Servers:com.apple.ppp.pptp:IPv4:DestAddressRanges:_array_index:0 = "10.64.200.200"
vpn:Servers:com.apple.ppp.pptp:IPv4:DestAddressRanges:_array_index:1 = "10.64.200.254"

and it worked. That's right - if you want to use numeric indices, you must provide the whole array every time you make a change. So basically dump the existing settings, append your new element and then set the whole array.

machine:~ root# serveradmin settings all > all.sabackup
2008-09-01 14:34:43.994 serveradmin[12811] Exception in doCommand: *** -[NSCFArray objectAtIndex:]: index (0) beyond bounds (0)
serveradmin(12811,0xa000ed88) malloc: ***  Deallocation of a pointer not malloced: 0x15c3bc0; This could be a double free(), or free() called with the middle of an allocated block; Try setting environment variable MallocHelp to see tools to help debug

But luckily it's easy to work around with a little bit of shell:

for s in $(serveradmin list); do serveradmin settings $s >> all.sabackup; done

Save that as a Bash function and you're good to go.

machine:~ root# serveradmin settings \
    vpn:Servers:com.apple.ppp.pptp:IPv4:DestAddressRanges:_array_index:0 = "192.168.2.200"
vpn:Servers:com.apple.ppp.pptp:IPv4:DestAddressRanges:_array_index:0 = 192.167999

Gross. Here's the "workaround":

machine:~ root# serveradmin settings \
    vpn:Servers:com.apple.ppp.pptp:IPv4:DestAddressRanges:_array_index:0 = \"192.168.2.200\"

In other words, shell is chomping the quotes and serveradmin gets confused with the dotted quad. I still think this is a bug with serveradmin, or with the documentation, at least. :-/

Oh, and BBEdit 9 is out

filipp@probook.local [~]  > gc 14 in in cm
14 in = 35.56 centimeters

Wait, but we already have units(1)! Yes, but can it do this:

filipp@probook.local [~]  > gc 14,9 usd in eur
14,9 U.S. dollars = 10,1650976 Euros

All a whopping 8 lines of PHP (the working man's language):

#!/usr/bin/env php
<?php

  array_shift ($argv);
  if (count ($argv) == 0) die ("Not enough arguments\n");
  $q = implode ("+", $argv);
  $c = file_get_contents ("http://www.google.com/search?q=$q");
  preg_match ('/<div id=res.+?<\/h2>/', $c, $r);
  $a = str_replace ('&nbsp;', '', strip_tags ($r[0]));
  if ($a == "Search Results") $a = "No results";
  printf ("%s\n", $a);

?>

:)

• Go to your last.fm > Listen
• File > Open in Dashboard
• Hover over the Flash player, click + Enter
• Flip the widget and uncheck "Only play audio in Dashboard"

The RSS should work, and an Apache Redirect makes sure the old RSS links still work, but previous links to old stories have not been remapped (the new system just uses the text file's mtime's timestamp as the ID, while the old one used a counter). Also direct links to posts are broken for now.

I don't even feel terribly bad about not having comments either - most of the stuff here is just inane technobabble anyways. If you do feel like commenting or sending a suggestion, then feel free to do so at filipp@mechmail.net.

The new blogging engine is about a whopping 30 lines of PHP.

# wikimove from to
SRC=$1; DST=$2
cd /Library/Collaboration/Groups

# Take a backup
cp -r $SRC $SRC.bak; cp -r $DST $DST.bak

# Transfer the old search indices
sqlite3 $SRC/wiki/index.db .dump | sed 's/groups\/$SRC\//groups\/$DST\//' | sqlite3 $DST/wiki/index.db
chown teamsserver $DST/wiki/index.db;
chmod 0750 $DST/wiki/index.db
sed 's/groups\/$SRC\//groups\/$DST\//' $SRC/extrainfo >> $DST/extrainfo

# Transfer the actual documents and metadata
mv $SRC/wiki/*.page $DST/wiki/
cd $DST/wiki
for p in *.page ; do sed -i '' 's/groups\/$SRC\//groups\/$DST\//g' $p/page.html; done
for p in *.page ; do sed -i '' 's/groups\/$SRC\//groups\/$DST\//g' $p/page.plist; done

Don't forget to clean those .bak directories or else wikid will not start due to permissions errors. You'll still have references to your old group wiki inside the revisions.db files which you can get rid of with:

for p in *.page ; 
    do sqlite3 $p/revisions.db .dump | sed 's/groups\/$SRC\//groups\/$DST\//g' > /tmp/revisions.sql
    rm $p/revisions.db
    sqlite3 $p/revisions.db < /tmp/revisions.sql
done

srm /tmp/revisions.sql

Disaster recovery

If you accidentally hose a group wiki's page.plist and page.html files, it's possible to recover the latest versions of the pages, if you still have the revisions.db files intact. Here's how I did it:

cd group/wiki
for p in *.page ;
    do sqlite3 $p/revisions.db "select content from revisions order by revision desc limit 1" > /tmp/wikitmp.plist
  defaults read /tmp/wikitmp content > $p/page.html;
    defaults delete /tmp/wikitmp content;
    defaults write /tmp/wikitmp 'modifiedDate' -date $(defaults read /tmp/wikitmp modifiedDate | cut -d . -f 1)
    plutil -convert xml1 /tmp/wikitmp.plist -o $p/page.plist;
    done

srm /tmp/wikitmp.plist

This breaks things like accented characters (replaced by codes returned from defaults), but it sure beats rewriting every single page. :P

spawn telnet smtpserver 25
expect "220 "
send "MAIL FROM:test@example.comr"
expect "250 Ok$"
send "RCPT TO:testuser@serverr"
expect "250 Ok$"
send "DATAr"
expect "354"
send "From: "SMTP Test" <test@example.com>
Subject: This is a test
Date: Wed, 02 Jul 2008 15:08:43 +0000
Body of test message r.r"
expect "250 Ok$"
send "QUITr"