Anforderungen  |   Konzepte  |   Entwurf  |   Entwicklung  |   Qualitätssicherung  |   Lebenszyklus  |   Steuerung
 
 
 
 


Quelle  test.lua   Sprache: unbekannt

 
#!/usr/bin/env lua

-- Licensed to the Apache Software Foundation (ASF) under one or more
-- contributor license agreements.  See the NOTICE file distributed with
-- this work for additional information regarding copyright ownership.
-- The ASF licenses this file to You under the Apache License, Version 2.0
-- (the "License"); you may not use this file except in compliance with
-- the License.  You may obtain a copy of the License at
--
-- http://www.apache.org/licenses/LICENSE-2.0
--
-- Unless required by applicable law or agreed to in writing, software
-- distributed under the License is distributed on an "AS IS" BASIS,
-- WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
-- See the License for the specific language governing permissions and
-- limitations under the License.

local mu = require "moonunit" 
local http = require "helpers"

http.base_url = "http://localhost:8008"

local test = mu.TestCase:new{}

function test:document_root()
  local b, c = http.get "/document_root.lua"
  assert(200 == c, "expected status code 200, got " .. c)
  assert(b:find("test"), "test not found in document root")
end

function test:basic_get()
  local b, c = http.get "/basic"
  assert(200 == c, "expected status code 200, got " .. c)
  assert(b:find("hello Lua world"), "'hello Lua world' not found in response")
end

function test:quietly()
  local b, c = http.get "/test_quietly"
  assert(200 == c, "unexpected response code " .. c)
  assert(b == 'hello!', "unexpected response body [" .. b .. "]")
end

function test.basic_post()
  local b, c = http.post "/basic" "hello=7&hello=1"
  assert(200 == c, "expected status code 200, got " .. c)
  assert(b:find("complex:%s+hello: 7, 1\n"), "didn't find complex post parsing")
  assert(b:find("simple:%s+hello: 7\n"), "didn't find simple post parsing")
end

function test.basic_post_alt()
  local b, c = http.post("/test_foo", "hello=7&hello=1")
  assert(201 == c, "expected status code 200, got " .. c)
  assert(b:find("Handler FOO!"), "unexpected output!")
end

function test.post_with_table()
  local b, c = http.post "/basic" { hello = "7" }
  assert(200 == c, "expected status code 200, got " .. c)
  assert(b:find("hello: 7"), "didn't get expected post data [" .. b .."]")
  
  b, c = http.post "/basic" { hello = "7", goodbye = "8" }
  
  assert(200 == c, "expected status code 200, got " .. c)
  assert(b:find("hello: 7"), "didn't get expected post data [" .. b .."]")
  assert(b:find("goodbye: 8"), "didn't get expected post data [" .. b .."]")
end

function test:simple_filter()
  local b, c = http.get "/filter/simple"
  assert(200 == c, "expected status code 200, got " .. c)
end

function test:request_attributes()
  local r, c = http.get "/test_attributes?yes=no"
  assert(201 == c, "expected status code 201, got " .. c)
  
  assert(r:find("status: 200\nstatus: 201"), "changing status code failed")
  assert(r:find("method: GET"), "method wasn't reported correctly")
  assert(r:find("protocol: HTTP/1.1"), "protocol reported incorrectly")
  assert(r:find("assbackwards: false"), "assbackwards reported incorrectly")
  assert(r:find("args: yes=no"), "args not reported correctly")
end

function test:map_regex()
  local r, c = http.get "/test_regex"
  assert(200 == c, "expected status code 200, got " .. c)
  assert(r:find("matched in handle_regex"), "didn't find 'matched in handle_regex'")  
end

function test:map_regex2()
  local r, c = http.get "/test_regex?a=8"
  assert(200 == c, "expected status code 200, got " .. c)
  assert(r:find("matched in handle_regex"), "didn't find 'matched in handle_regex'")  
end

function test:translate_name_hook()
  local r, c = http.get "/translate-name"
  assert(200 == c, "expected 200 got " .. c)
  assert(r:find("please find me"), "didn't get expected static file :-(, instead got " .. r)
end

function test:translate_name_hook2()
  local r, c = http.get "/translate-name2"
  assert(200 == c, "expected 200 got " .. c)
  assert(r:find("please find me"), "didn't get expected static file :-(, instead got " .. r)
end

function test:server_version()
  local r, c = http.get "/test_serverversion"
  assert(200 == c)
  assert(r:find("Apache/2"), "version isn't Apache/2, but is " .. r)
end

function test:fixups_hook()
  local r, c = http.get "/test_fixupstest"
  assert(201 == c, "incorrect status code returned, expected 201 got " .. c)
  assert(r:find("status is 201"), "handler sees incorrect status")
end

function test:simple()
    local r, c = http.get "/simple.lua"
    assert(200 == c, "incorrect status code returned, expected 200 got " .. c)
    assert(r:find("Hi"), "Didn't find 'Hi'")
end

test:run()

[ Dauer der Verarbeitung: 0.5 Sekunden  (vorverarbeitet)  ]

                                                                                                                                                                                                                                                                                                                                                                                                     


Neuigkeiten

     Aktuelles
     Motto des Tages

Software

     Produkte
     Quellcodebibliothek

Aktivitäten

     Artikel über Sicherheit
     Anleitung zur Aktivierung von SSL

Muße

     Gedichte
     Musik
     Bilder

Jenseits des Üblichen ....

Besucherstatistik

Besucherstatistik

Monitoring

Montastic status badge