Class: HaskellValidationHook

Inherits:
Mumukit::Hook
  • Object
show all
Defined in:
lib/validation_hook.rb

Instance Method Summary collapse

Instance Method Details

#unsafe?(request) ⇒ Boolean

Returns:

  • (Boolean)


6
7
8
9
10
11
12
13
# File 'lib/validation_hook.rb', line 6

def unsafe?(request)
  [
      request.content,
      request.test,
      request.extra,
      request.query
  ].compact.any? { |it| it.include? 'System.IO.Unsafe' }
end

#validate!(request) ⇒ Object

Raises:

  • (Mumukit::RequestValidationError)


2
3
4
# File 'lib/validation_hook.rb', line 2

def validate!(request)
  raise Mumukit::RequestValidationError, 'you can not use unsafe io' if unsafe?(request)
end