class ActiveModel::Type::Integer

def _limit
  limit || DEFAULT_LIMIT
end

def cast_value(value)
  value.to_i rescue nil
end

def deserialize(value)
  return if value.blank?
  value.to_i
end

def ensure_in_range(value)
  unless in_range?(value)
    raise ActiveModel::RangeError, "#{value} is out of range for #{self.class} with limit #{_limit} bytes"
  end
  value
end

def in_range?(value)
  !value || range.member?(value)
end

def initialize(**)
  super
  @range = min_value...max_value
end

def max_value
  1 << (_limit * 8 - 1) # 8 bits per byte with one bit for sign
end

def min_value
  -max_value
end

def serializable?(value)
  cast_value = cast(value)
  in_range?(cast_value) || begin
    yield cast_value if block_given?
    false
  end
end

def serialize(value)
  return if value.is_a?(::String) && non_numeric_string?(value)
  ensure_in_range(super)
end

def type
  :integer
end