Class: Bignum

Inherits:
Object
  • Object
show all
Defined in:
lib/net/ber.rb

Instance Method Summary collapse

Instance Method Details

#to_ber ⇒ Object 



453
454
455
456
457
458
459
460
461
462
463
464
465
466
467
468
469
470
471
472
473
474
475
476
477
478
479
480
 
# File 'lib/net/ber.rb', line 453

def to_ber
  #i = [self].pack('w')
  #i.length > 126 and raise Net::BER::BerError.new( "range error in bignum" )
  #[2, i.length].pack("CC") + i

  # Ruby represents Bignums as two's-complement numbers so we may actually be
  # good as far as representing negatives goes.
  # I'm sure this implementation can be improved performance-wise if necessary.
  # Ruby's Bignum#size returns the number of bytes in the internal representation
  # of the number, but it can and will include leading zero bytes on at least
  # some implementations. Evidently Ruby stores these as sets of quadbytes.
  # It's not illegal in BER to encode all of the leading zeroes but let's strip
  # them out anyway.
  #
  sz = self.size
  out = "\000" * sz
  (sz*8).times {|bit|
	if self[bit] == 1
   out[bit/8] += (1 << (bit % 8))
	end
  }

  while out.length > 1 and out[-1] == 0
	out.slice!(-1,1)
  end

  [2, out.length].pack("CC") + out.reverse
end