jro_apps/redmine Files · vendor/plugins/ruby-net-ldap-0.0.4/tests/testber.rb

Merged r2280 from trunk (#2506)....

Merged r2280 from trunk (#2506). git-svn-id: svn+ssh://rubyforge.org/var/svn/redmine/branches/0.8-stable@2307 e93f8b46-1217-0410-a6f0-8f06a7374b81

Jean-Philippe Lang - - Load All Authors

File last commit:

r131:f50544bb156d


                r2305:1c1755d2783e

Download file

             testber.rb
        
                    42 lines
            
             | 945 B
            
                | text/x-ruby
            
             |
                RubyLexer
            
             / vendor / plugins / ruby-net-ldap-0.0.4 / tests / testber.rb
          
                    History
                
                 |
                  Annotation
                 | Raw
                 |Copy content
                 |Copy permalink

      # $Id: testber.rb 57 2006-04-18 00:18:48Z blackhedd $

      #

      #

      $:.unshift "lib"

      require 'net/ldap'

      require 'stringio'

      class TestBer < Test::Unit::TestCase

        def setup

        end

        # TODO: Add some much bigger numbers

        # 5000000000 is a Bignum, which hits different code.

        def test_ber_integers

          assert_equal( "\002\001\005", 5.to_ber )

          assert_equal( "\002\002\203t", 500.to_ber )

          assert_equal( "\002\003\203\206P", 50000.to_ber )

          assert_equal( "\002\005\222\320\227\344\000", 5000000000.to_ber )

        end

        def test_ber_parsing

          assert_equal( 6, "\002\001\006".read_ber( Net::LDAP::AsnSyntax ))

          assert_equal( "testing", "\004\007testing".read_ber( Net::LDAP::AsnSyntax ))

        end

        def test_ber_parser_on_ldap_bind_request

          s = StringIO.new "0$\002\001\001`\037\002\001\003\004\rAdministrator\200\vad_is_bogus"

          assert_equal( [1, [3, "Administrator", "ad_is_bogus"]], s.read_ber( Net::LDAP::AsnSyntax ))

        end

      end

	Site-wide shortcuts
/	Use quick search box
g h	Goto home page
g g	Goto my private gists page
g G	Goto my public gists page
g 0-9	Goto bookmarked items from 0-9
n r	New repository page
n g	New gist page

	Repositories
g s	Goto summary page
g c	Goto changelog page
g f	Goto files page
g F	Goto files page with file search activated
g p	Goto pull requests page
g o	Goto repository settings
g O	Goto repository access permissions settings
t s	Toggle sidebar on some pages

				# $Id: testber.rb 57 2006-04-18 00:18:48Z blackhedd $
				#
				#


				$:.unshift "lib"

				require 'net/ldap'
				require 'stringio'


				class TestBer < Test::Unit::TestCase

				def setup
				end

				# TODO: Add some much bigger numbers
				# 5000000000 is a Bignum, which hits different code.
				def test_ber_integers
				assert_equal( "\002\001\005", 5.to_ber )
				assert_equal( "\002\002\203t", 500.to_ber )
				assert_equal( "\002\003\203\206P", 50000.to_ber )
				assert_equal( "\002\005\222\320\227\344\000", 5000000000.to_ber )
				end

				def test_ber_parsing
				assert_equal( 6, "\002\001\006".read_ber( Net::LDAP::AsnSyntax ))
				assert_equal( "testing", "\004\007testing".read_ber( Net::LDAP::AsnSyntax ))
				end


				def test_ber_parser_on_ldap_bind_request
				s = StringIO.new "0$\002\001\001`\037\002\001\003\004\rAdministrator\200\vad_is_bogus"
				assert_equal( [1, [3, "Administrator", "ad_is_bogus"]], s.read_ber( Net::LDAP::AsnSyntax ))
				end




				end