2

很抱歉问了一个可能很愚蠢的问题，但是在阅读了文档、查看示例等之后，我仍然没有找到我想要做的事情的解决方案。

我使用 Pythons Web 服务器作为一个更大项目的一部分。它通过 do_GET 方法提供静态文件，并且可以通过 do_POST 方法处理 POST 请求（由客户端使用 XMLHTTPRequest 发送）。一切运作良好。

我正在尝试做的是在 Pharo 中实现 Web 服务器。我认为 ZnServer（Pharo 2.0 的一部分）是要走的路。它必须能够提供静态文件并处理 POST 请求。

一个非常简单的 http 服务器示例的 Python 代码

# httpd_test.py

# Imports
import os
import sys
import cgi
import json
from   BaseHTTPServer import BaseHTTPRequestHandler
from   BaseHTTPServer import HTTPServer

# HTTP Request Handler Class
class RequestHandler(BaseHTTPRequestHandler):

   # Process GET requests
   def do_GET(self):

      print(self.path)

      # Send response
      tex = 'GET: ' + self.path
      self.send_response(200)
      self.send_header('Content-type','text/plain')
      self.send_header('Content-length',str(len(tex)))
      self.end_headers()
      self.wfile.write(tex)
      self.wfile.flush()

   # Process POST requests
   def do_POST(self):

      # Read CGI data
      CgiData = cgi.FieldStorage(fp      = self.rfile,
                                 headers = self.headers,
                                 environ = {'REQUEST_METHOD':'POST',
                                            'CONTENT_TYPE':self.headers['Content-Type']})

      # Invoke action
      if self.path == '/handler':
         print(repr(CgiData))
      else:
         print('Unknown POST handler.')
         print(repr(CgiData))

      # Send response
      self.send_response(200)
      tex = repr(CgiData)
      self.send_header('Content-type','text/plain')
      self.send_header('Content-length',str(len(tex)))
      self.end_headers()
      self.wfile.write(tex)
      self.wfile.flush()

# Start Server
if __name__  == '__main__':
    server = HTTPServer(('127.0.0.1',8080),RequestHandler)
    server.serve_forever()

我在法罗尝试过的（但没有运气）

start
    "Start ZnServer default"

    | staticFileServerDelegate |

    ZnServer startDefaultOn: 8080.

    (ZnServer default) logToTranscript.

    (ZnServer default) authenticator: (ZnBasicAuthenticator username: 'foo' password: 'bar').

    staticFileServerDelegate := ZnStaticFileServerDelegate new.
    staticFileServerDelegate    prefixFromString: 'zn';
                                            directory: 'C:\Temp'.

"   (ZnServer default) delegate prefixMap
        at: 'zn'
        put:    [ :request | staticFileServerDelegate handleRequest: request ];
        at:  '/'
        put:    [ :request | ZnResponse redirect: 'C:\Temp' ]."

    (ZnServer default) delegate prefixMap
        at:  '/'
        put:    [ :request | Transcript cr; show:'1 '; show: request; cr. ];
        at: 'handler'
        put: [ :request | Transcript cr; show:'3 '; show: request; cr. ].

“start”是自己的类的类方法，没有基类。

我是Pharo的新手，所以我可能走错了路。我希望，描述足够清楚，所以人们可以看到我想要做什么。对此的任何帮助将不胜感激。

提前致谢。

4

1 回答 1

1

作为默认服务器，这应该可以工作：

(ZnServer startDefaultOn: 8080) 
    onRequestRespond: [ :request | 
        ZnResponse ok: (ZnEntity text: 'Hiya!') ].

然后您可以管理在 ZnResponse 上回答的文档。但是你为什么不使用像 Seaside 这样更强大的东西呢？http://seaside.st

于 2013-05-31T10:43:59.173 回答