73 lines
1.8 KiB
Ruby
73 lines
1.8 KiB
Ruby
# -*- ruby encoding: utf-8 -*-
|
|
require 'stringio'
|
|
|
|
##
|
|
# BER extensions to the String class.
|
|
module Net::BER::Extensions::String
|
|
##
|
|
# Converts a string to a BER string. Universal octet-strings are tagged
|
|
# with 0x04, but other values are possible depending on the context, so we
|
|
# let the caller give us one.
|
|
#
|
|
# User code should call either #to_ber_application_string or
|
|
# #to_ber_contextspecific.
|
|
def to_ber(code = 0x04)
|
|
raw_string = raw_utf8_encoded
|
|
[code].pack('C') + raw_string.length.to_ber_length_encoding + raw_string
|
|
end
|
|
|
|
##
|
|
# Converts a string to a BER string but does *not* encode to UTF-8 first.
|
|
# This is required for proper representation of binary data for Microsoft
|
|
# Active Directory
|
|
def to_ber_bin(code = 0x04)
|
|
[code].pack('C') + length.to_ber_length_encoding + self
|
|
end
|
|
|
|
def raw_utf8_encoded
|
|
if self.respond_to?(:encode)
|
|
# Strings should be UTF-8 encoded according to LDAP.
|
|
# However, the BER code is not necessarily valid UTF-8
|
|
self.encode('UTF-8').force_encoding('ASCII-8BIT')
|
|
else
|
|
self
|
|
end
|
|
end
|
|
private :raw_utf8_encoded
|
|
|
|
##
|
|
# Creates an application-specific BER string encoded value with the
|
|
# provided syntax code value.
|
|
def to_ber_application_string(code)
|
|
to_ber(0x40 + code)
|
|
end
|
|
|
|
##
|
|
# Creates a context-specific BER string encoded value with the provided
|
|
# syntax code value.
|
|
def to_ber_contextspecific(code)
|
|
to_ber(0x80 + code)
|
|
end
|
|
|
|
##
|
|
# Nondestructively reads a BER object from this string.
|
|
def read_ber(syntax = nil)
|
|
StringIO.new(self).read_ber(syntax)
|
|
end
|
|
|
|
##
|
|
# Destructively reads a BER object from the string.
|
|
def read_ber!(syntax = nil)
|
|
io = StringIO.new(self)
|
|
|
|
result = io.read_ber(syntax)
|
|
self.slice!(0...io.pos)
|
|
|
|
return result
|
|
end
|
|
|
|
def reject_empty_ber_arrays
|
|
self.gsub(/0\000/n,'')
|
|
end
|
|
end
|