summaryrefslogtreecommitdiff
path: root/test/test-index-cgi.rb
blob: b942cb89de4292f86ac74fc129c22e6cde83e60b (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
##
## $Release:$
## $Copyright$
##

require "#{File.dirname(__FILE__)}/test.rb"

require 'stringio'

load "#{File.dirname(__FILE__)}/../contrib/index.cgi"


def spec(desc)
  yield
end


def dummy_env(request_method='GET', request_uri='/', opts={})
  if request_method.is_a?(Hash)
    opts = request_method
    request_method = 'GET'
    request_uri = '/'
  elsif request_uri.is_a?(Hash)
    opts = request_uri
    request_uri = '/'
  end
  env = {
    'REQUEST_METHOD' => request_method.to_s,
    'REQUEST_URI'    => request_uri.to_s,
    'DOCUMENT_ROOT'  => Dir.pwd,
  }
  opts.each {|k, v| env[k.to_s.upcase] = v }
  env.update(opts)
  return env
end


def dummy_template(filename, content)
  begin
    File.open(filename, 'wb') {|f| f.write(content) }
    return yield
  ensure
    [filename, filename + '.cache'].each do |fname|
      File.unlink(fname) if File.exist?(fname)
    end
  end
end


class ErubisHandlerTest < Test::Unit::TestCase

  def test_initialize

    spec "sets @encoding and @layout" do
      encoding_bkup = $ENCODING
      layout_bkup   = $LAYOUT
      begin
        $ENCODING = 'cp932'
        $LAYOUT   = 'site.rhtml'
        obj = ErubisHandler.new
        assert_equal 'cp932', obj.encoding
        assert_equal 'site.rhtml', obj.layout
      ensure
        $ENCODING = encoding_bkup
        $LAYOUT   = layout_bkup
      end
    end

  end

  def test_handle

    spec "renders requested template file." do
      base = "_test_handle"
      env = dummy_env('GET', "/#{base}.html")
      handler = ErubisHandler.new
      input = <<'END'
<h1><%= '<b>SOS</b>' %></h1>
<ul>
  <% for item in %w[Haruhi Mikuru Yuki] %>
  <li><%= item %></li>
  <% end %>
</ul>
END
      expected = <<'END'
<h1><b>SOS</b></h1>
<ul>
  <li>Haruhi</li>
  <li>Mikuru</li>
  <li>Yuki</li>
</ul>
END
      out = dummy_template("#{base}.rhtml", input) do
        handler.handle(env)
      end
      assert_equal expected, out
    end

    spec "raises 404 error when requested file not found." do
      req_url = "/_test_handle.html"
      env = dummy_env('GET', req_url)
      handler = ErubisHandler.new
      ex = assert_raise HttpError do
        handler.handle(env)
      end
      assert_equal 404, ex.status
      assert_equal "#{req_url}: not found.", ex.message
    end

  end

end


class ErubisApplicationTest < Test::Unit::TestCase

  def test_handle_request

    spec "handles request by handler object and returns response data." do
      app = ErubisApplication.new()
      def app.get_handler
        return Class.new {
          def handle(env); "<p>Hello SOS</p>"; end
          def encoding; "euc_jp"; end
        }.new
      end
      expected = [
        200,
        [["Content-Type", "text/html;charset=euc_jp"]],
        ["<p>Hello SOS</p>"],
      ]
      env = dummy_env('GET', '/')
      ret = app.call(env)
      assert_equal expected, ret
    end

  end

  def test_handle_http_error

    spec "renders error page." do
      req_path = '/HaruhiSuzumiya.html'
      app = ErubisApplication.new()
      env = dummy_env('GET', req_path)
      expected = [
        404,
        [["Content-Type", "text/html"]],
        ["<h2>404 Not Found</h2>\n<p>#{req_path}: not found.</p>\n"],
      ]
      ret = app.call(env)
      assert_equal expected, ret
    end

  end

  def test_run

    spec "prints to $stdout" do
      input = "<p>Hello SOS</p>"
      app = ErubisApplication.new
      base = "SOS"
      env = dummy_env("GET", "/#{base}.html")
      sio = StringIO.new
      output = dummy_template("#{base}.rhtml", input) do
        app.run(env, sio)
        sio.string
      end
      expected = ""
      expected << "Content-Type: text/html\r\n"
      expected << "\r\n"
      expected << "<p>Hello SOS</p>"
      assert_equal expected, output
    end

    spec "prints 'Status:' header if status code is not 200." do
      req_path = "/SOS.html"
      env = dummy_env("GET", req_path)
      app = ErubisApplication.new
      sio = StringIO.new
      app.run(env, sio)
      expected = "Status: 404 Not Found\r\n"
      expected << "Content-Type: text/html\r\n"
      expected << "\r\n"
      expected << "<h2>404 Not Found</h2>\n"
      expected << "<p>#{req_path}: not found.</p>\n"
      assert_equal expected, sio.string
    end

  end

end