Add ur1.ca service.

This commit introduces ur1.ca support. Since ur1.ca is a simplistic
service which doesn't offer many interfaces, the shortened URL is
extracted by parsing the output HTML from the service. Suggestions for
better implementation welcome.

Signed-off-by: Joshua Roesslein <jroesslein@gmail.com>

Author: kumanna

imports.py

@@ -9,6 +9,7 @@
 from random import randint
 import base64
 from getpass import getpass
+import re
 
 try:
     import json

services/ur1ca.py

@@ -0,0 +1,17 @@
+## Shorty
+## Copyright 2009 Kumar Appaiah
+## See LICENSE
+
+## @url ur1.ca
+class Ur1ca(Service):
+
+    def shrink(self, bigurl):
+        resp = request('http://ur1.ca/',
+            post_data = urlencode({'longurl': bigurl, 'submit' : 'Make it an ur1!'}))
+        returned_data = resp.read()
+        matched_re = re.search('Your ur1 is: <a href="(http://ur1.ca/[^"]+)">\\1', returned_data)
+        if matched_re:
+            return matched_re.group(1)
+        else:
+            raise ShortyError('Failed to shrink url')
+