Question

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

我使用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()

我在Pharo尝试了什么（但没有运气）

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的新手，所以我可能走错了路。我希望，描述很清楚，所以我可以看到我想做什么。对此的任何帮助都将受到高度赞赏。

提前致谢。

Answer 1

作为默认服务器，这应该有效：

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

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

尝试使用ZnServer进行GET和POST请求

1 个答案: