rhodes 2.0.3 → 2.1.0

data/spec/phone_spec/app/Spec/fixtures/object_values.txt

@@ -0,0 +1,90 @@
+source_name|attrib|object|value
+Case|status|41a4e1f1-2c0c-7e51-0495-4900dc4c072c|New|
+Case|assigned_user_id|41a4e1f1-2c0c-7e51-0495-4900dc4c072c|d64e9409-6445-db6f-e9eb-48fce5e9fb16|
+Case|created_by_name|41a4e1f1-2c0c-7e51-0495-4900dc4c072c|adam|
+Case|work_log|41a4e1f1-2c0c-7e51-0495-4900dc4c072c||
+Case|priority|41a4e1f1-2c0c-7e51-0495-4900dc4c072c|High|
+Case|case_number|41a4e1f1-2c0c-7e51-0495-4900dc4c072c|58|
+Case|account_id|41a4e1f1-2c0c-7e51-0495-4900dc4c072c|881be9cb-3879-9660-46be-48fceb82ea5f|
+Case|type|41a4e1f1-2c0c-7e51-0495-4900dc4c072c|Administration|
+Case|modified_user_id|41a4e1f1-2c0c-7e51-0495-4900dc4c072c|820ea7b3-d38a-2700-2ed9-4941aa91d86e|
+Case|name|41a4e1f1-2c0c-7e51-0495-4900dc4c072c|implement SugarCRM sample app|
+Case|assigned_user_name|41a4e1f1-2c0c-7e51-0495-4900dc4c072c|adam|
+Case|modified_by_name|41a4e1f1-2c0c-7e51-0495-4900dc4c072c|testuser|
+Case|description|41a4e1f1-2c0c-7e51-0495-4900dc4c072c|\t\t\n\tupdated|
+Case|date_modified|41a4e1f1-2c0c-7e51-0495-4900dc4c072c|2008-12-12 02:25:31|
+Case|date_entered|41a4e1f1-2c0c-7e51-0495-4900dc4c072c|2008-10-23 20:21:27|
+Case|resolution|41a4e1f1-2c0c-7e51-0495-4900dc4c072c|\t\t\n\t|
+Case|created_by|41a4e1f1-2c0c-7e51-0495-4900dc4c072c|d64e9409-6445-db6f-e9eb-48fce5e9fb16|
+Case|account_name|41a4e1f1-2c0c-7e51-0495-4900dc4c072c|Rhomobile|
+Account|billing_address_country|44e804f2-4933-4e20-271c-48fcecd9450d|India|
+Account|assigned_user_id|44e804f2-4933-4e20-271c-48fcecd9450d|1|
+Account|website|44e804f2-4933-4e20-271c-48fcecd9450d|mobio.in|
+Account|billing_address_street|44e804f2-4933-4e20-271c-48fcecd9450d||
+Account|assigned_user_name|44e804f2-4933-4e20-271c-48fcecd9450d|admin|
+Account|created_by|44e804f2-4933-4e20-271c-48fcecd9450d|1|
+Account|campaign_id|44e804f2-4933-4e20-271c-48fcecd9450d||
+Account|billing_address_city|44e804f2-4933-4e20-271c-48fcecd9450d|Gurgaon|
+Account|shipping_address_street|44e804f2-4933-4e20-271c-48fcecd9450d||
+Account|email|44e804f2-4933-4e20-271c-48fcecd9450d|ramneek@bhasin.com|
+Account|date_modified|44e804f2-4933-4e20-271c-48fcecd9450d|2008-10-21 18:07:11|
+Account|sic_code|44e804f2-4933-4e20-271c-48fcecd9450d||
+Account|industry|44e804f2-4933-4e20-271c-48fcecd9450d|Technology|
+Account|parent_name|44e804f2-4933-4e20-271c-48fcecd9450d||
+Account|name|44e804f2-4933-4e20-271c-48fcecd9450d|Mobio India|
+Account|annual_revenue|44e804f2-4933-4e20-271c-48fcecd9450d||
+Account|ticker_symbol|44e804f2-4933-4e20-271c-48fcecd9450d||
+Account|phone_fax|44e804f2-4933-4e20-271c-48fcecd9450d||
+Account|shipping_address_city|44e804f2-4933-4e20-271c-48fcecd9450d||
+Account|ownership|44e804f2-4933-4e20-271c-48fcecd9450d||
+Account|phone_office|44e804f2-4933-4e20-271c-48fcecd9450d||
+Account|phone_alternate|44e804f2-4933-4e20-271c-48fcecd9450d||
+Account|billing_address_state|44e804f2-4933-4e20-271c-48fcecd9450d||
+Account|modified_user_id|44e804f2-4933-4e20-271c-48fcecd9450d|1|
+Account|description|44e804f2-4933-4e20-271c-48fcecd9450d|Hello description!|
+Account|modified_by_name|44e804f2-4933-4e20-271c-48fcecd9450d|admin|
+Account|employees|44e804f2-4933-4e20-271c-48fcecd9450d||
+Account|shipping_address_postalcode|44e804f2-4933-4e20-271c-48fcecd9450d||
+Account|billing_address_postalcode|44e804f2-4933-4e20-271c-48fcecd9450d||
+Account|account_type|44e804f2-4933-4e20-271c-48fcecd9450d||
+Account|date_entered|44e804f2-4933-4e20-271c-48fcecd9450d|2008-10-20 20:40:42|
+Account|rating|44e804f2-4933-4e20-271c-48fcecd9450d||
+Account|parent_id|44e804f2-4933-4e20-271c-48fcecd9450d||
+Account|created_by_name|44e804f2-4933-4e20-271c-48fcecd9450d|admin|
+Account|shipping_address_state|44e804f2-4933-4e20-271c-48fcecd9450d||
+Account|phone_fax|63cf13da-cff4-99e7-f946-48fcec93f1cc||
+Account|description|63cf13da-cff4-99e7-f946-48fcec93f1cc||
+Account|ownership|63cf13da-cff4-99e7-f946-48fcec93f1cc||
+Account|date_modified|63cf13da-cff4-99e7-f946-48fcec93f1cc|2008-10-22 20:30:48|
+Account|billing_address_city|63cf13da-cff4-99e7-f946-48fcec93f1cc|Mountain View|
+Account|ticker_symbol|63cf13da-cff4-99e7-f946-48fcec93f1cc||
+Account|shipping_address_street|63cf13da-cff4-99e7-f946-48fcec93f1cc||
+Account|shipping_address_city|63cf13da-cff4-99e7-f946-48fcec93f1cc||
+Account|phone_alternate|63cf13da-cff4-99e7-f946-48fcec93f1cc||
+Account|email|63cf13da-cff4-99e7-f946-48fcec93f1cc|dan@aeroprise.com|
+Account|shipping_address_state|63cf13da-cff4-99e7-f946-48fcec93f1cc||
+Account|billing_address_state|63cf13da-cff4-99e7-f946-48fcec93f1cc|CA|
+Account|annual_revenue|63cf13da-cff4-99e7-f946-48fcec93f1cc||
+Account|billing_address_street|63cf13da-cff4-99e7-f946-48fcec93f1cc|1032 Shoreline Drive|
+Account|employees|63cf13da-cff4-99e7-f946-48fcec93f1cc||
+Account|phone_office|63cf13da-cff4-99e7-f946-48fcec93f1cc||
+Account|modified_user_id|63cf13da-cff4-99e7-f946-48fcec93f1cc|1|
+Account|modified_by_name|63cf13da-cff4-99e7-f946-48fcec93f1cc|admin|
+Account|campaign_id|63cf13da-cff4-99e7-f946-48fcec93f1cc||
+Account|created_by|63cf13da-cff4-99e7-f946-48fcec93f1cc|1|
+Account|parent_id|63cf13da-cff4-99e7-f946-48fcec93f1cc||
+Account|shipping_address_country|63cf13da-cff4-99e7-f946-48fcec93f1cc||
+Account|parent_name|63cf13da-cff4-99e7-f946-48fcec93f1cc||
+Account|billing_address_postalcode|63cf13da-cff4-99e7-f946-48fcec93f1cc|94024|
+Account|created_by_name|63cf13da-cff4-99e7-f946-48fcec93f1cc|admin|
+Account|name|63cf13da-cff4-99e7-f946-48fcec93f1cc|Aeroprise|
+Account|website|63cf13da-cff4-99e7-f946-48fcec93f1cc|aeroprise.com|
+Account|account_type|63cf13da-cff4-99e7-f946-48fcec93f1cc||
+Account|sic_code|63cf13da-cff4-99e7-f946-48fcec93f1cc||
+Account|date_entered|63cf13da-cff4-99e7-f946-48fcec93f1cc|2008-10-20 20:39:15|
+Account|industry|63cf13da-cff4-99e7-f946-48fcec93f1cc|Technology|
+Account|assigned_user_id|63cf13da-cff4-99e7-f946-48fcec93f1cc|1|
+Account|rating|63cf13da-cff4-99e7-f946-48fcec93f1cc||
+Account|assigned_user_name|63cf13da-cff4-99e7-f946-48fcec93f1cc|admin|
+Account|shipping_address_postalcode|63cf13da-cff4-99e7-f946-48fcec93f1cc||
+Account|billing_address_country|63cf13da-cff4-99e7-f946-48fcec93f1cc||

data/spec/phone_spec/app/Spec/json_spec.rb

@@ -1,62 +1,77 @@
-class JsonTest
-    def initialize
-    end
-
-    def parse_test
+describe "Json" do
+    it "should parse" do
         file_name = File.join(Rho::RhoApplication::get_model_path('app','Data'), 'test.json')
         content = File.read(file_name)
         parsed = Rho::JSON.parse(content)
         
-        Test_equal( parsed.is_a?(Array), true )
-        Test_equal( parsed.length(), 3 )
-        Test_equal( parsed[0]['count'], 6 )
-        Test_equal( parsed[1][0], 'item1' )
-        Test_equal( parsed[1][2], 3.2 )
-        Test_equal( parsed[2]['object_value'].is_a?(Hash), true )
-        Test_equal( parsed[2]['object_value']['attrib'], "xform" )
+        parsed.is_a?(Array).should == true
+        parsed.length().should ==  3
+        parsed[0]['count'].should ==  6 
+        parsed[1][0].should ==  'item1'
+        parsed[1][2].should ==  3.2
+        parsed[2]['object_value'].is_a?(Hash).should ==  true
+        parsed[2]['object_value']['attrib'].should ==  "xform"
     end
+    it "should parse big json" do
+        file_name = File.join(Rho::RhoApplication::get_model_path('app','Data'), 'big_test.json')
+        content = File.read(file_name)
+        
+        #GC.stress=true
+        parsed = nil
+        #(1..10).each do |i|
+            #puts "i : #{i}"
+            #GC.start
+            parsed = Rho::JSON.parse(content)
+            
+            #puts "#{parsed[0]['coupleName']}"
+        #end    
 
-    def circular_test
+        parsed.is_a?(Array).should == true
+        
+        #GC.stress=false
+    end
+
+    it "should parse circular" do
         file_name = File.join(Rho::RhoApplication::get_model_path('app','Data'), 'circtest.json')
         content = File.read(file_name)
         parsed = Rho::JSON.parse(content)
-        Test_equal( parsed.is_a?(Hash), true )
-        Test_equal( parsed.length(), 9 )
-        Test_equal( parsed['ObjectUrl'], "http://192.168.1.104:3000/mapi/trips/83.xml" )
-        Test_equal( parsed['Name'], "My New Trip" )
+        parsed.is_a?(Hash).should ==  true 
+        parsed.length().should ==  9 
+        parsed['ObjectUrl'].should ==  "http://192.168.1.104:3000/mapi/trips/83.xml" 
+        parsed['Name'].should ==  "My New Trip" 
 
         require 'json'
         
         gen_content = ::JSON.generate(parsed)
         parsed2 = Rho::JSON.parse(gen_content)
-        Test_equal( parsed, parsed2 )
+        parsed.should == parsed2
         
     end
     
-    def parseseparator_test
+    it "should parse with separator" do
         file_name = File.join(Rho::RhoApplication::get_model_path('app','Data'), 'septest.json')
         content = File.read(file_name)
         parsed = Rho::JSON.parse(content)
-        puts "parsed: #{parsed}"
+        #puts "parsed: #{parsed}"
         
-        Test_equal( parsed.is_a?(Hash), true )
-        Test_equal( parsed["Manufacturer List"].is_a?(Array), true )
-        Test_equal( parsed["Category List"].is_a?(Array), true )
+        parsed.is_a?(Hash).should ==  true 
+        parsed["Manufacturer List"].is_a?(Array).should ==  true 
+        parsed["Category List"].is_a?(Array).should ==  true 
     end
-    
-    def webservice_test
+
+    it "should webservice" do
         return unless $is_network_available
             
         res = Rho::AsyncHttp.get( :url => 'http://rhostore.heroku.com/products.json' )
-        puts "res : #{res}"  
-        Test_equal(res['status'],'ok')
+        #puts "res : #{res}"  
+        res['status'].should == 'ok'
         
         parsed = res['body']
-        Test_equal( parsed.is_a?(Array), true )
-        Test_equal( parsed[0].is_a?(Hash), true )    
+        parsed.is_a?(Array).should ==  true
+        parsed[0].is_a?(Hash).should ==  true 
     end
-    
-    def generate_test
+
+    it "should generate" do
         require 'json'
         
         file_name = File.join(Rho::RhoApplication::get_model_path('app','Data'), 'test.json')
@@ -65,9 +80,19 @@ class JsonTest
         
         gen_content = ::JSON.generate(parsed)
         parsed2 = Rho::JSON.parse(gen_content)
-        Test_equal( parsed, parsed2 )
+        parsed.should == parsed2
         
     end
+
+    it "should generate rhom object" do
+        require 'json'
+
+        prod = Product.create("test"=>"123")
+        parsed = Product.find(:all)
+        gen_content = ::JSON.generate(parsed)
+        gen_content.should == "[{\"source_id\":#{prod.source_id},\"object\":\"#{prod.object}\",\"test\":\"123\"}]"
+        
+    end    
     
 =begin
     def webservice2_test
@@ -75,28 +100,40 @@ class JsonTest
             
         res = Rho::AsyncHttp.get( :url => 'http://www.glutenfreechecklist.com/Mob_API/GetCat_MnfsList.aspx?checkListId=17&CategoryID=0&ManfName=&startindex=1&endindex=10' )
         puts "res : #{res}"  
-        Test_equal(res['status'],'ok')
+        res['status'].should == 'ok'
         
         parsed = res['body']
-        Test_equal( parsed.is_a?(Hash), true )
-        Test_equal( parsed["Manufacturer List"].is_a?(Array), true )    
+        parsed.is_a?(Hash).should ==  true
+        parsed["Manufacturer List"].is_a?(Array).should ==  true
         
         manf =  parsed["Manufacturer List"][10]["Manufacturer"]
         puts "manf : #{manf}"
         
-        url2 = "http://www.glutenfreechecklist.com/Mob_API/GetCat_MnfsList.aspx?checkListId=17&CategoryID=0&ManfName=" + 
-            Rho::RhoSupport.url_encode(manf) + "&startindex=1&endindex=10"
+        url2 = "http://www.glutenfreechecklist.com/Mob_API/GetCat_MnfsList.aspx?checkListId=17&CategoryID=0&ManfName=#{Rho::RhoSupport.url_encode(manf)}&startindex=1&endindex=10"
         
         res = Rho::AsyncHttp.get( :url => url2 )
         puts "res : #{res}"  
-        Test_equal(res['status'],'ok')
+        res['status'].should == 'ok'
         
         parsed = res['body']
-        Test_equal( parsed.is_a?(Hash), true )
-        Test_equal( parsed["Manufacturer List"].is_a?(Array), true )    
+        parsed.is_a?(Hash).should ==  true
+        parsed["Manufacturer List"].is_a?(Array).should ==  true
         
     end
-=end    
-    def clear
+
+    def webservice3_test
+        return unless $is_network_available
+            
+        res = Rho::AsyncHttp.get( :url => 'http://api.foursquare.com/v1/venues.json?geolat=37.331689&geolong=-122.030731' )
+        puts "res : #{res}"  
+        res['status'].should == 'ok'
+        
+        #@places = Array.new
+        #res['body'].each do |attributes|
+        #    puts "attributes : #{attributes}"
+        #    @places << Place.new(attributes)
+        #end        
     end
+=end    
+    
 end    

data/spec/phone_spec/app/Spec/mapview_spec.rb

@@ -1,30 +1,28 @@
 require 'rho/mapview'
 
-class MapViewTest
-  def initialize
-  end
+describe "MapView" do
 
-  def create_test
+  it "should create" do
     state = MapView.state
-    Test_equal( state, nil )
+    state.should be_nil
 
     MapView.create :settings => {:map_type => 'roadmap', :region => [37, -122, 10, 10]}
-    w = 2
-    w = 5 if System::get_property('platform') == 'ANDROID'
+    w = 5
+    #w = 5 if System::get_property('platform') == 'ANDROID'
     sleep w
 
     state = MapView.state
-    Test_not_equal( state, nil )
-    Test_equal( state.is_a?(Hash), true )
+    state.should_not be_nil
+    state.is_a?(Hash).should == true 
     delta = 0.001
-    Test_equal( (state[:center][:latitude] - 37.0).abs < delta, true )
-    Test_equal( (state[:center][:longitude] - (-122.0)).abs < delta, true )
+    (state[:center][:latitude] - 37.0).abs.should  < delta
+    (state[:center][:longitude] - (-122.0)).abs.should  < delta
 
     MapView.close
     sleep 2
 
     state = MapView.state
-    Test_equal( state, nil )
+    state.should be_nil
   end
 
 end

data/spec/phone_spec/app/Spec/nativebar_spec.rb

@@ -1,19 +1,17 @@
-class NativeBarTest
-  def initialize
-  end
+describe "NativeBar" do
 
-  def create_test
+  it "should create" do
     NativeBar.create Rho::RhoApplication::NOBAR_TYPE, []
     sleep 2
-    Test_equal( NativeBar.started, false )
+    NativeBar.started.should ==  false
 
     NativeBar.create Rho::RhoApplication::TOOLBAR_TYPE, [{:action => :back}]
     sleep 2
-    Test_equal( NativeBar.started, true )
+    NativeBar.started.should ==  true
 
     NativeBar.remove
     sleep 2
-    Test_equal( NativeBar.started, false )
+    NativeBar.started.should ==  false
 
   end
 

data/spec/phone_spec/app/Spec/navbar_spec.rb

@@ -1,9 +1,6 @@
-class NavBarTest
-  def initialize
-  end
-
-  def create_test
-    Test_equal( NavBar.started, false )
+describe "NavBar" do
+  it "should create" do
+    NavBar.started.should ==  false 
     
     begin
       NavBar.create
@@ -11,15 +8,15 @@ class NavBarTest
       # Nothing
     end
     sleep 2
-    Test_equal( NavBar.started, false )
+    NavBar.started.should ==  false 
 
     NavBar.create :title => "", :left => {:action => :back}
     sleep 2
-    Test_equal( NavBar.started, true )
+    NavBar.started.should ==  true
 
     NavBar.remove
     sleep 2
-    Test_equal( NavBar.started, false )
+    NavBar.started.should ==  false
 
   end
 

data/spec/phone_spec/app/Spec/pagination/fixtures/object_values.txt

@@ -0,0 +1,91 @@
+source_name|attrib|object|value
+Account|name|722182959|i6mu98hel8|
+Account|address|722182959|s8ganw9i49|
+Account|industry|722182959|v2zjhoetsk|
+Account|name|7480317731|79nqr7ekzr|
+Account|address|7480317731|emv1tezmdf|
+Account|industry|7480317731|1zg7f7q6ib|
+Account|name|9703256901|m9ibat6pln|
+Account|address|9703256901|ksoi86kwyc|
+Account|industry|9703256901|zl2zw45pn6|
+Account|name|3195084835|pjpl6sobl3|
+Account|address|3195084835|46kknwty4n|
+Account|industry|3195084835|96st4bu34a|
+Account|name|8219349185|cfcau6hu6q|
+Account|address|8219349185|5ubw1mbmou|
+Account|industry|8219349185|tmm1oniagk|
+Account|name|3788304956|c2z5izd8w9|
+Account|address|3788304956|6rd9nv8dml|
+Account|industry|3788304956|hxua4d6ttl|
+Account|name|8027894003|5h9na4kko4|
+Account|address|8027894003|ch5y19t1am|
+Account|industry|8027894003|andru1w2mh|
+Account|name|1624803503|uvwfd2wg9m|
+Account|address|1624803503|ugw28merrh|
+Account|industry|1624803503|xtu32wf5jz|
+Account|name|582939287|9o8eqtit6t|
+Account|address|582939287|gijtz958h5|
+Account|industry|582939287|u4ymg2m2zi|
+Account|name|8763523348|39afj8vbj6|
+Account|address|8763523348|x7jincp3xj|
+Account|industry|8763523348|sge128jo9o|
+Account|name|4177558452|n7v3cp7tv9|
+Account|address|4177558452|9xzm6x951r|
+Account|industry|4177558452|lcm13yye47|
+Account|name|9559781556|koelvv2o9b|
+Account|address|9559781556|a195i7az2q|
+Account|industry|9559781556|rikqunzzd1|
+Account|name|5440884324|a8ndhdim5d|
+Account|address|5440884324|xywggb3pjs|
+Account|industry|5440884324|xjaivb6tn4|
+Account|name|3286353653|uc7tak51ya|
+Account|address|3286353653|eu4dm28hnw|
+Account|industry|3286353653|nj3cjxsemo|
+Account|name|9897778878|n5qx54qcye|
+Account|address|9897778878|stzc1x7upn|
+Account|industry|9897778878|9kdinrjlcx|
+Account|name|1439722928|6ls8u98dfd|
+Account|address|1439722928|s28czydd5y|
+Account|industry|1439722928|uelsjlq4ps|
+Account|name|1715509841|doiwnygkz1|
+Account|address|1715509841|nu97261eix|
+Account|industry|1715509841|b3m4sswkg9|
+Account|name|532060249|bad8ei15oc|
+Account|address|532060249|fci62a3i2g|
+Account|industry|532060249|cz4n2udhp1|
+Account|name|892827894|igjernnrke|
+Account|address|892827894|8bhxhtd3qw|
+Account|industry|892827894|tp535844r8|
+Account|name|3119932988|9ayg49v9tx|
+Account|address|3119932988|go72f9az69|
+Account|industry|3119932988|rwyk7udigr|
+Account|name|5277763718|c1ekv44ald|
+Account|address|5277763718|kohrans65v|
+Account|industry|5277763718|ml2ghjs1yk|
+Account|name|4654600856|ushf7xcah6|
+Account|address|4654600856|4lfxmtllja|
+Account|industry|4654600856|o1b39qjvjr|
+Account|name|1655351781|4k2c5yfc8f|
+Account|address|1655351781|sczu2hfdyj|
+Account|industry|1655351781|ekctzoz4m8|
+Account|name|1309838006|e88yfcytke|
+Account|address|1309838006|booh7m2fit|
+Account|industry|1309838006|hl6vj2ax4e|
+Account|name|8903473873|lmptpbx53p|
+Account|address|8903473873|bxd7mermv5|
+Account|industry|8903473873|4r6zbfz99e|
+Account|name|9229834060|92zmxntghe|
+Account|address|9229834060|23gutsl1n3|
+Account|industry|9229834060|zyrwtn24je|
+Account|name|5736612273|7t7yepm6wb|
+Account|address|5736612273|pm6ybo5eoh|
+Account|industry|5736612273|xj3y2udqqd|
+Account|name|7529312408|test|
+Account|address|7529312408|8mr6hhd4ep|
+Account|industry|7529312408|7r56i8dkqd|
+Account|name|1553806230|test|
+Account|address|1553806230|n2jovgvmw9|
+Account|industry|1553806230|xusnhhgrgz|
+Account|name|527579259|test|
+Account|address|527579259|bcgi7t4e3e|
+Account|industry|527579259|ozjdrljgm2|

data/spec/phone_spec/app/Spec/rho_controller_spec.rb

@@ -0,0 +1,156 @@
+#
+#  rho_controller_spec.rb
+#  rhodes
+#
+#  Copyright (C) 2008 Rhomobile, Inc. All rights reserved.
+#
+#  This program is free software: you can redistribute it and/or modify
+#  it under the terms of the GNU General Public License as published by
+#  the Free Software Foundation, either version 3 of the License, or
+#  (at your option) any later version.
+#
+#  This program is distributed in the hope that it will be useful,
+#  but WITHOUT ANY WARRANTY; without even the implied warranty of
+#  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+#  GNU General Public License for more details.
+#
+#  You should have received a copy of the GNU General Public License
+#  along with this program.  If not, see <http://www.gnu.org/licenses/>.
+#
+#require 'spec/spec_helper'
+require 'rho/rhocontroller'
+
+module Rho
+  class RhoControllerStub < Rho::RhoController
+    def send(action)
+        render :string => "", :layout => false
+    end
+    
+    def index
+        render :string => "", :layout => false
+    end
+    
+  end
+end
+
+describe "url_for and link_to" do
+
+    before(:all) do
+        @application = AppApplication.new
+    end
+    
+    before do
+      @c = ::Rho::RhoControllerStub.new()
+      @c.serve(@application,nil,{'application' => 'application', 'model' => 'model', 'request-method' => 'GET', :modelpath => 'model', 'headers' => {} },{})
+    end
+
+    it "should generate urls for empty params" do
+      @c.url_for().should == '/application/model'
+    end
+
+    it "should generate urls for a url" do
+      @c.url_for('/some_url').should == '/some_url'
+    end
+
+    it "should generate urls for a symbol" do
+      @c.url_for(:new).should == 'new'
+    end
+
+    it "should generate urls for an action" do
+      @c.url_for(:action => :new).should == '/application/model/new'
+    end
+
+    it "should generate urls for an action and id" do
+      @c.url_for(:action => :show, :id => '{12}').should == '/application/model/{12}/show'
+    end
+
+    it "should generate urls for create or index actions" do
+      @c.url_for(:action => :index, :id => '{12}').should == '/application/model'
+      @c.url_for(:action => :create).should == '/application/model'
+    end
+
+    it "should generate urls for an model, action, and id" do
+      @c.url_for(:model => 'another_model', :action => :show, :id => '{12}').should == '/application/another_model/{12}/show'
+      @c.url_for(:model => :another_model, :action => :show, :id => '{12}').should == '/application/another_model/{12}/show'
+    end
+
+    it "should generate urls for an controller, action, and id" do
+      @c.url_for(:controller => 'another_controller', :action => :show, :id => '{12}').should == '/application/another_controller/{12}/show'
+      @c.url_for(:controller => :another_controller,  :action => :show, :id => '{12}').should == '/application/another_controller/{12}/show'
+    end
+
+    it "should generate urls for an application, model, action, and id" do
+      @c.url_for(:application => :another_app, :model => :another_model, 
+        :action => :show, :id => '{12}').should == '/another_app/another_model/{12}/show'
+    end
+
+    it "should generate urls with a query" do
+      @c.url_for(:action => :create, :query => {:name => 'John Smith', 
+        'address' => "http://john.smith.com"}).should == '/application/model?name=John%20Smith&address=http%3A%2F%2Fjohn.smith.com'
+    end
+
+    it "should generate urls with a fragment" do
+      @c.url_for(:action => :show, :id => '{12}', :fragment => "an-anchor").should == '/application/model/{12}/show#an-anchor'
+    end
+
+    it "should generate link for a url" do
+      @c.link_to("Visit Other Site", "http://www.rhomobile.com/").should == "<a href=\"http://www.rhomobile.com/\" >Visit Other Site</a>"
+    end
+
+    it "should generate link for an action" do
+      @c.link_to("Help", :action => "help").should == "<a href=\"/application/model/help\" >Help</a>"
+    end
+
+    it "should generate link for 'delete' action" do
+      @c.link_to("Delete", :action => "delete", :id => '{12}').should == "<a href=\"/application/model/{12}/delete\"  onclick=\"var f = document.createElement('form'); f.style.display = 'none';this.parentNode.appendChild(f); f.method = 'POST'; f.action = this.href;f.submit();return false;\">Delete</a>"
+    end
+
+    it "should generate link for an action and style it" do
+      @c.link_to("Show", { :action => "show", :id => '{12}'},"style=\"height:4px;width:7px;border-width:0px;\"").should == "<a href=\"/application/model/{12}/show\" style=\"height:4px;width:7px;border-width:0px;\">Show</a>"
+    end
+
+    it "should generate link for 'delete' action and style it" do
+      @c.link_to("Delete", { :action => "delete", :id => '{12}' }, "class=\"delete_link\"").should == "<a href=\"/application/model/{12}/delete\" class=\"delete_link\" onclick=\"var f = document.createElement('form'); f.style.display = 'none';this.parentNode.appendChild(f); f.method = 'POST'; f.action = this.href;f.submit();return false;\">Delete</a>"
+    end
+
+    it "should generate link with a query" do
+      @c.link_to("Invate",:action => :invite, :query => {:name => 'John Smith', 'address' => "http://john.smith.com"}).should == "<a href=\"/application/model/invite?name=John%20Smith&address=http%3A%2F%2Fjohn.smith.com\" >Invate</a>"
+    end
+
+end #describe "url_for and link_to"
+
+describe "redirect" do
+
+    before(:all) do
+        @application = AppApplication.new
+    end
+
+    before do
+      @response = Hash.new
+      @response['headers'] = {}
+      @c = Rho::RhoControllerStub.new
+      @c.serve(@application,nil,{'application' => 'application', 'model' => 'model', 'request-method' => 'GET', :modelpath => 'model', 'headers' => {} },@response)
+    end
+
+    it "should redirect to a url" do
+      @c.redirect "/start-page"
+      @response['headers']['Location'].should == "/start-page"
+      @response['status'].should == 302
+      @response['message'].should == 'Moved temporarily'
+    end
+
+    it "should redirect to an action" do
+      @c.redirect :action => :show, :id => '{12}'
+      @response['headers']['Location'].should == "/application/model/{12}/show"
+      @response['status'].should == 302
+      @response['message'].should == 'Moved temporarily'
+    end
+
+    it "should redirect to an action with 301 status code and status message" do
+      @c.redirect({:action => :show, :id => '{12}'}, {'status' => 301, 'message' => 'Moved permanently'})
+      @response['headers']['Location'].should == "/application/model/{12}/show"
+      @response['status'].should == 301
+      @response['message'].should == 'Moved permanently'
+    end
+
+end #describe "redirect"