class Async::HTTP::Cache::Response

def age
	Async::Clock.now - @generated_at
end

def cachable?
	if cache_control = @headers[CACHE_CONTROL]
		if cache_control.private? || !cache_control.public?
			return false
		end
	else
		# No cache control header...
		return false
	end
	
	if set_cookie = @headers[SET_COOKIE]
		Console.logger.warn(self) {"Cannot cache response with set-cookie header!"}
		return false
	end
	
	return true
end

def dup
	dup = super
	
	dup.body = @body.dup
	dup.headers = @headers.dup
	
	return dup
end

def etag
	@etag ||= @headers[ETAG]
end

def expired?
	if @max_age
		self.age > @max_age
	end
end

def initialize(response, body)
	@generated_at = Async::Clock.now
	
	super(
		response.version,
		response.status,
		response.headers.flatten,
		body,
		response.protocol
	)
	
	@max_age = @headers[CACHE_CONTROL]&.max_age
	@etag = nil
	
	@headers.set(X_CACHE, 'hit')
end