DZone Snippets: Store, sort and share source code, with tag goodness

Forward XMPP messages using XMPP4R

jrobertson (James Robertson) — Sun, 12 Jul 2009 20:00:36 GMT

This script forwards received XMPP messages to james@jamesrobertson.eu. This allows messages to forward to an artificially intelligent bot, RSS creation service etc.



#!/usr/bin/ruby

#file: xmppserver_jeeves_forwarder.rb



require 'rubygems'  

require 'xmpp4r-simple'



def action_msg(messenger, buddy, message)

  username, body = message.match(/(.[^:]+): (.*)/).captures

  puts 'username : ' + username + ' - body : ' + body

  messenger.deliver('james@jamesrobertson.eu', message)

end



username = 'jeeves2'

password = 'secret'



puts "connecting to jabber server.."  

messenger = Jabber::Simple.new(username+'@jabber.com',password)  

puts "connected."  



while true

  messenger.received_messages do |msg|  

    buddy = msg.from

    #puts '-' + msg.from.to_s + ' ' + msg.body.to_s

    action_msg(messenger,buddy, msg.body)

  end  

  sleep 2

end

See the most recent dent from all your identi.ca friends.

jrobertson (James Robertson) — Sun, 12 Jul 2009 15:46:34 GMT



#!/usr/bin/ruby

#file: xmppserver_jeeves2b.rb



require 'rubygems'  

require 'xmpp4r-simple'



require 'rexml/document'

include REXML



def new_friend(doc, username)

xml =<    

      #{username}

      

      

    

XML

  friend = Document.new(xml).root

  doc.root.elements['records'].add_element friend

  friend

end



def update(friend, message)

  friend.elements['notice'].text = message

  friend.elements['date'].text = Time.now.strftime("%Y-%m-%dT%H:%M:%S%z")

end



  def action_msg(messenger, buddy, message)

    username, body = message.match(/(.[^:]+): (.*)/).captures

    puts 'username : ' + username + ' - body : ' + body

    doc = Document.new(File.open('identica_friends.xml','r').read)

    friend = doc.root.elements["records/friend[username='#{username}']"]



    friend = new_friend(doc, username) unless friend.is_a? Element

    update(friend, body) 

    File.open('identica_friends.xml','w'){|f| f.write doc.write}



  end





username = 'jeeves2'

password = 'secret'



puts "connecting to jabber server.."  

messenger = Jabber::Simple.new(username+'@jabber.com',password)  

puts "connected."  



while true

  messenger.received_messages do |msg|  

    buddy = msg.from

    #puts '-' + msg.from.to_s + ' ' + msg.body.to_s

    action_msg(messenger,buddy, msg.body)

  end  

  sleep 2

end

output extract:


      

      dantheman

      @lucy Fixed the license on the old site shedmusic.net, that contai

ns a lot more music and might be of more use at the moment :)

      2009-07-12T17:08:19+0100

    

    

      appropedia

      any horoscope seems ‘true’ if it tells you that you are highly att

ractive to the opposite sex and your worst fault is generosity. ~Orwell !qce>

      2009-07-12T17:00:50+0100

    

    

      mjray

      @noodles yes, but please run for www.spi-inc.org board all the sam

e

      2009-07-12T17:03:37+0100

    

    

      itnet7

      Heading off to Stardust Coffee and Video locate in Winterpark for 

a Florida Team !ubuntufl  !ubuntu Bug Jam!! Stop by if you want!

      2009-07-12T17:09:42+0100

Then use an XSLT file to transform the XML file to RSS:






	



	



			

		

		Identi.ca friends' most recent dents

		

		Identi.ca/jrobertson friends' most recent decents



  	en



	

          

        



		

		



	



	



	

		<xsl:value-of select="username"/>: <xsl:value-of select="notice"/>

		

		:

e.g.


james@felice:~/ruby$ xsltproc identica_friends.xsl identica_friends.xml > identica_friends.rss

Here's the final RSS file:






  

    Identi.ca friends' most recent dents

    

    Identi.ca/jrobertson friends' most recent decents

    en

    

      uberchick: uberchick is breathing deeply & trying to distract herself...she's sorry for boring update....

      

      uberchick: uberchick is breathing deeply & trying to distract herself...she's sorry for boring update....

      2009-07-12T17:14:07+0100

    

    

      dantheman: @lucy Fixed the license on the old site shedmusic.net, that contains a lot more music and might be of more use at the moment :)

      

      dantheman: @lucy Fixed the license on the old site shedmusic.net, that contains a lot more music and might be of more use at the moment :)

      2009-07-12T17:08:19+0100

    

    

      mjray: @noodles yes, but please run for www.spi-inc.org board all the same

      

      mjray: @noodles yes, but please run for www.spi-inc.org board all the same

      2009-07-12T17:03:37+0100

    

    

      appropedia: any horoscope seems ‘true’ if it tells you that you are highly attractive to the opposite sex and your worst fault is generosity. ~Orwell !q

      

      appropedia: any horoscope seems ‘true’ if it tells you that you are highly attractive to the opposite sex and your worst fault is generosity. ~Orwell !q

      2009-07-12T17:00:50+0100

Use the ISO 8601 Internet Date/Time Format

jrobertson (James Robertson) — Sun, 12 Jul 2009 14:54:23 GMT

This is an example of the format mask used to primarily display the UTC ISO 8601 Internet Date/Time Format in Ruby.


james@felice:~/ruby$ dfh "`date +"%Y-%m-%dT%H:%M:%S%z"`"

2009-07-12T15:39:11+0100

%Y-%m-%dT%H:%M:%S%z

It's worth noting that the Ruby Date and Time format is exactly the same as it is in the Bash shell.

Resources:
- Identi.ca public timeline [identi.ca]
- RFC 3339 - Date and Time on the Internet: Timestamps [ietf.org]
- How to format date for display or to use in a shell script [cyberciti.biz]
- Use a date format helper [dzone.com]

Print out the date of every Sunday between two dates

jrobertson (James Robertson) — Sun, 12 Jul 2009 13:03:31 GMT

Source: date: Ruby Standard Library Documentation [ruby-doc.org]



def print_sundays(d1, d2)

    d1 +=1 while (d1.wday != 0)

    d1.step(d2, 7) do |date|

        puts "#{Date::MONTHNAMES[date.mon]} #{date.day}"

    end

end



print_sundays(Date::civil(2003, 4, 8), Date::civil(2003, 5, 23))

output:

    

April 13

April 20

April 27

May 4

May 11

May 18

Use a date format helper

jrobertson (James Robertson) — Fri, 10 Jul 2009 20:28:55 GMT

This code makes it easier to format a date or time just by explicitly entering how you want it to look.



class String

  def to_strftime()

    switches = %w(%a %A %d %e %b %m %B %y %Y %M %H %I %p)

    masks = switches.map {|switch| [Time.now.strftime("#{switch}"), switch]}

    h = Hash[*masks.flatten]

  

    self.gsub(/[a-zA-Z0-9]+/) {|x| h[x]}

  end

end

examples:


"Fri 10 Jul, 20:27".to_strftime

=> "%a %e %b, %H:%M"

"Fri 10 Jul 2009, 20:28".to_strftime

=> "%a %e %b %Y, %H:%M"

"Friday 10 July 2009, 20:28".to_strftime

=> "%A %e %B %Y, %H:"

"Friday 10 July 2009, 20:29".to_strftime

=> "%A %e %B %Y, %H:%M"

"Fri 10-07-09 20:30".to_strftime

=> "%a %e-%m-%y %H:%M"

"09:25 PM".to_strftime

=> "%I:%M %p"

Resources:
- Date Time Format in RUBY [dzone.com]
- datetime.xml [rorbuilder.info]

*update @ 11-Jul-09 14:51*


alias dfh='rcscript //job:date_format_helper http://rorbuilder.info/r/datetime.rsf'

dfh '2009 July 11 Saturday'

#=> %Y %B %e %A

Format a date like 1st, 2nd, 3rd

jrobertson (James Robertson) — Fri, 10 Jul 2009 16:33:05 GMT

Source: Helper to print numbers as ordinals (1st, 2nd, 3rd...) [dzone.com]



class Numeric

  def ordinal

    self.to_s + ( (10...20).include?(self) ? 'th' : %w{ th st nd rd th th th th th th }[self % 10] )

  end

end



d = Time.now.day

puts 'today is the ' + d.ordinal

#=> today is the 10th

extract bounding box from a planet file

roondi (ondi.ro) — Fri, 10 Jul 2009 15:01:37 GMT

nothing fancy



osmosis --read-xml file=planet.osm --bounding-box left=$left bottom=$bottom right=$right top=$top --write-xml file=bbox.osm

Sql server date in format YYYYMMDD

deostroll (Arun Jayapal) — Fri, 10 Jul 2009 06:36:13 GMT

date in YYYYMMDD which is a string 8 CHARACTERS LONG



SELECT CONVERT(VARCHAR(8), GETDATE(), 112);

fixed 定位在 IE6 下的实现技巧一则

lotreal (lot) — Fri, 10 Jul 2009 02:07:42 GMT

// 1. position: absolute的元素，直接放在position:static的 body 中时，绝对定位的参考物是 body 的 viewport 部分。这使得元素 a 在窗口 resize 时，自动就能准确定位到右下角。注意：body 的 position 不能为 relative 等值，否则失效。
// 2. onscroll 时需要特殊处理一下，使得滚动时，也让绝对定位元素 a 的参考物能更新为当前的 viewport. 上面的a.className = a.className就是这样一个 hack: 使得 a 的定位参考物动态更新为当前的 viewport. 类似的 hack 还有a.style.background = 'red'. 这些 hack 会引发 reflow, 但反之不一定，进一步的规律没找到，不过有一个 hack，也就够用了。



test

Chaos Game with Python

sdiehl (Steve D.) — Thu, 09 Jul 2009 21:00:38 GMT



# 1) Pick three points A,B,C on a plane.

# 2) Choose a random point D

# 3) Roll a three-sided and if 1 is rolled draw another point E at the midpoint of A and D. 

#     Given by ( [Ax+Dx]/2, [Ay+Dy]/2 ), or if two is rolled draw a point at the midpoint between 

#     B and D, or if 3 is rolled draw a point between C and D.

# 4) Repeat step 3 except using the new point E instead of point D.



# See http://mathworld.wolfram.com/ChaosGame.html for more info.

# See http://i12.photobucket.com/albums/a237/Freyrs/100000.png for example output.



from random import random,randint

from pyx import *

from math import *



#This will generate a Sierpinski triangle.

n=3

r=0.5

iters = 50000



#Canvas size

size_x = 200

size_y = 200



radius = 0.01

points = []

c = canvas.canvas()



#Equilateral triangle - any arrangement will work

points.append((size_x/2,size_y/3))

points.append((size_x/3,size_y*2/3))

points.append((size_x*2/3,size_y*2/3))



#Draw random points

for i in range(1,iters):

	if i == 1:

		x_0,y_0 = random()*size_x,random()*size_y

	#Pick one of the initial points

	p = randint(0,n-1)

	x_0,y_0 = (x_0 + points[p][0])*r,(y_0 + points[p][1])*r

	c.fill(path.circle(x_0,y_0, radius))



d = document.document(pages = [document.page(c, paperformat=document.paperformat.A4, fittosize=1)])

d.writePSfile("chaos_game.ps")