class ActiveModel::Type::Date

def cast_value(value)
  if value.is_a?(::String)
    return if value.empty?
    fast_string_to_date(value) || fallback_string_to_date(value)
  elsif value.respond_to?(:to_date)
    value.to_date
  else
    value
  end
end

def fallback_string_to_date(string)
  new_date(*::Date._parse(string, false).values_at(:year, :mon, :mday))
end

def fast_string_to_date(string)
  if string =~ ISO_DATE
    new_date $1.to_i, $2.to_i, $3.to_i
  end
end

def new_date(year, mon, mday)
  unless year.nil? || (year == 0 && mon == 0 && mday == 0)
    ::Date.new(year, mon, mday) rescue nil
  end
end

def type
  :date
end

def type_cast_for_schema(value)
  value.to_fs(:db).inspect
end

def value_from_multiparameter_assignment(*)
  time = super
  time && new_date(time.year, time.mon, time.mday)
end