DZone Snippets: tinyurl code

Create and lookup tinyurls with PHP

logankoester (Logan Koester) — Wed, 31 Oct 2007 05:42:45 GMT



        function reverse_tinyurl($url){

            // Resolves a TinyURL.com encoded url to it's source.

            $url = explode('.com/', $url);

            $url = 'http://preview.tinyurl.com/'.$url[1];

            $preview = file_get_contents($url);

            preg_match('/redirecturl" href="(.*)">/', $preview, $matches);

            return $matches[1];

        }

        

        function tinyurl($url){

        // Shortens a url

            $html = file_get_contents("http://tinyurl.com/create.php?url=".$url);

            preg_match('/http:\/\/preview\.tinyurl\.com\/(.*)<\/b>/', $html, $matches);

            return "http://tinyurl.com/".$matches[1];

        }

Reverse TinyURL

logankoester (Logan Koester) — Mon, 02 Jul 2007 07:04:25 GMT

// Resolves a TinyURL.com encoded url to it's source.
// Example: reverse_tinyurl('http://tinyurl.com/2ocfun') => "http://logankoester.com"



function reverse_tinyurl($url){

	$url = explode('.com/', $url);

	$url = 'http://preview.tinyurl.com/'.$url[1];

	$preview = file_get_contents($url);

	preg_match('/redirecturl" href="(.*)">/', $preview, $matches);

	return $matches[1];

}

tiny.py

mcandre (Andrew Pennebaker) — Fri, 22 Jun 2007 18:32:06 GMT



#!/usr/bin/env python



"""Converts long URLs to tiny URLs, with either tinyurl, urltea, or a custom url."""



__author__="Andrew Pennebaker (andrew.pennebaker@gmail.com)"

__date__="22 Jun 2007 - 24 Jun 2007"

__copyright__="Copyright 2007 Andrew Pennebaker"

__license__="GPL"

__version__="0.0.1"

__URL__="http://snippets.dzone.com/posts/show/4195"

__credits__="http://lateral.netmanagers.com.ar/weblog/2007/04/08.html#BB548"



import sys, getopt, urllib



import configreader



def tiny(url, settings):

	try:

		encodedurl=settings["posting url"]+urllib.urlencode({"url":url})

		instream=urllib.urlopen(encodedurl)

		tinyurl=instream.read()

		instream.close()



		if len(tinyurl)==0:

			return url



		if settings["service"]=="urltea" and len(settings["description"])>0:

				tinyurl+=settings["description delimeter"]+settings["description"]



		return tinyurl

	except IOError, e:

		raise "Could not connect."



def usage():

	print "Usage: %s [options]    ..." % (sys.argv[0])

	print "\nDefaults to urlTea unless specified in options or a config file."

	print "\n-s|--service [tinyurl|urltea]"

	print "-u|--custom-url "

	print "-d|--description  May only be used with urltea."

	print "-c|--config "

	print "-h|--help (usage)"



	sys.exit()



def main():

	systemArgs=sys.argv[1:]

	oplist, args=[], []



	settings={

		"config":"tiny.conf",

		"service":"urltea",

		"urltea url":"http://urltea.com/api/text/?url=",

		"tinyurl url":"http://tinyurl.com/api-create.php?",

		"description delimeter":"?",

		"description":""

	}



	try:

		optlist, args=getopt.getopt(systemArgs, "s:u:d:c:h", ["service=", "custom-url=", "description=", "config=", "help"])

	except:

		usage()



	for option, value in optlist:

		if option=="-c" or option=="--config":

			settings["config"]=value



	try:

		configreader.load(open(settings["config"], "r"), settings)

	except IOError, e:

		pass



	for option, value in optlist:

		if option=="-h" or option=="--help":

			usage()

		elif option=="-s" or option=="--service":

			settings["service"]=value

		elif option=="-d" or option=="--description":

			settings["description"]=value



	if settings["service"]!="urltea" and len(settings["description"])>0:

		usage()



	try:

		settings["posting url"]=settings[settings["service"]+" url"]

	except:

		usage()



	for option, value in optlist:

		if option=="-u" or option=="--custom-url":

			settings["posting url"]=value



	if len(args)<1:

		usage()



	for u in args:

		print tiny(u, settings)



if __name__=="__main__":

	try:

		main()

	except KeyboardInterrupt, e:

		pass

baseX converter

toxi (karsten schmidt) — Tue, 19 Jul 2005 19:55:29 GMT

you can use this function to convert an integer into any number system upto base36 (e.g. for TinyURL generation coupled with a global ID counter)

function int2baseX($val,$base=16) {

  if (0==$val) return 0;

  $symbols='0123456789abcdefgihjklmnopqrstuvwxyz';

  $result='';

  $exp=$oldpow=1;

  while($val>0 && $exp<10) {

    $pow=pow($base,$exp++);

    $mod=($val % $pow);

    $result=substr($symbols,$mod/$oldpow,1).$result;

    $val-=$mod;

    $oldpow=$pow;

  }

  return $result;

}