janet/examples/echoserve.janet

(defn handler
  "Simple handler for connections."
  [stream]
  (defer (:close stream)
    (def id (gensym))
    (def b @"")
    (print "Connection " id "!")
    (while (:read stream 1024 b)
      (printf " %v -> %v" id b)
      (:write stream b)
      (buffer/clear b))
    (printf "Done %v!" id)
    (ev/sleep 0.5)))

(net/server "127.0.0.1" "8000" handler)
Get socket reads and writes working with IOCP. 2020-11-08 10:38:28 -06:00			`(defn handler`
			`"Simple handler for connections."`
			`[stream]`
			`(defer (:close stream)`
			`(def id (gensym))`
			`(def b @"")`
			`(print "Connection " id "!")`
			`(while (:read stream 1024 b)`
			`(printf " %v -> %v" id b)`
			`(:write stream b)`
			`(buffer/clear b))`
Get windows IOCP working for accept. This also changes the api of servers slightly - in light of having support for ev tasks, it is probably better to remove the "simple" server code and replace it with some Janet or remove it all together. While convenient, it has issues with error handling and rigidity. 2020-11-08 18:56:13 -06:00			`(printf "Done %v!" id)`
			`(ev/sleep 0.5)))`
Get socket reads and writes working with IOCP. 2020-11-08 10:38:28 -06:00
			`(net/server "127.0.0.1" "8000" handler)`