module Samba::Encrypt::Private

Constants

LM_MAGIC

Public Instance Methods

convert_encoding(to, from, str) click to toggle source
# File lib/samba/encrypt.rb, line 32
def convert_encoding(to, from, str)
  if same_encoding?(to, from)
    str
  else
    require 'iconv'
    Iconv.iconv(to, from, str).join
  end
end
des_crypt56(input, key_str, forward_only) click to toggle source
# File lib/samba/encrypt.rb, line 69
def des_crypt56(input, key_str, forward_only)
  key = str_to_key(key_str)
  encoder = OpenSSL::Cipher::DES.new
  encoder.encrypt
  encoder.key = key
  encoder.update(input)
end
encrypt_14characters(chars) click to toggle source
# File lib/samba/encrypt.rb, line 78
def encrypt_14characters(chars)
  raise ArgumentError.new("must be <= 14 characters") if chars.size > 14
  chars = chars.to_s.ljust(14, "\000")
  des_crypt56(LM_MAGIC, chars[0, 7], true) +
    des_crypt56(LM_MAGIC, chars[7, 7], true)
end
normalize_encoding(encoding) click to toggle source
# File lib/samba/encrypt.rb, line 41
def normalize_encoding(encoding)
  encoding.downcase.gsub(/-/, "_")
end
same_encoding?(a, b) click to toggle source
# File lib/samba/encrypt.rb, line 45
def same_encoding?(a, b)
  na = normalize_encoding(a)
  nb = normalize_encoding(b)
  na == nb or na.gsub(/_/, '') == nb.gsub(/_/, '')
end
str_to_key(str) click to toggle source
# File lib/samba/encrypt.rb, line 51
def str_to_key(str)
  key = "\000" * 8
  key[0] = str[0] >> 1;
  key[1] = ((str[0] & 0x01) << 6) | (str[1] >> 2);
  key[2] = ((str[1] & 0x03) << 5) | (str[2] >> 3);
  key[3] = ((str[2] & 0x07) << 4) | (str[3] >> 4);
  key[4] = ((str[3] & 0x0F) << 3) | (str[4] >> 5);
  key[5] = ((str[4] & 0x1F) << 2) | (str[5] >> 6);
  key[6] = ((str[5] & 0x3F) << 1) | (str[6] >> 7);
  key[7] = str[6] & 0x7F;

  key.size.times do |i|
    key[i] = (key[i] << 1);
  end

  key
end