mirror of
https://github.com/c-cube/tiny_httpd.git
synced 2025-12-06 11:15:35 -05:00
107 lines
1.9 KiB
Text
107 lines
1.9 KiB
Text
(executable
|
|
(name sse_server)
|
|
(modules sse_server)
|
|
(libraries tiny_httpd logs unix ptime ptime.clock.os))
|
|
|
|
(executable
|
|
(name sse_client)
|
|
(modules sse_client)
|
|
(libraries unix))
|
|
|
|
(executable
|
|
(name echo)
|
|
(flags :standard -warn-error -a+8)
|
|
(modules echo)
|
|
(libraries
|
|
tiny_httpd
|
|
logs
|
|
echo_vfs
|
|
tiny_httpd_camlzip
|
|
tiny_httpd.multipart-form-data))
|
|
|
|
(executable
|
|
(name echo_eio)
|
|
(flags :standard -warn-error -a+8)
|
|
(modules echo_eio)
|
|
(libraries
|
|
tiny_httpd
|
|
tiny_httpd_eio
|
|
eio
|
|
eio_main
|
|
logs
|
|
echo_vfs
|
|
trace.core
|
|
trace-tef
|
|
tiny_httpd_camlzip
|
|
tiny_httpd.multipart-form-data))
|
|
|
|
(executable
|
|
(name writer)
|
|
(flags :standard -warn-error -a+8)
|
|
(modules writer)
|
|
(libraries tiny_httpd logs))
|
|
|
|
(executable
|
|
(name echo_ws)
|
|
(flags :standard -warn-error -a+8)
|
|
(modules echo_ws)
|
|
(libraries tiny_httpd tiny_httpd.ws logs))
|
|
|
|
(rule
|
|
(targets test_output.txt)
|
|
(deps
|
|
(:script ./run_test.sh)
|
|
./sse_client.exe
|
|
./sse_server.exe)
|
|
(enabled_if
|
|
(= %{system} "linux"))
|
|
(package tiny_httpd)
|
|
(action
|
|
(with-stdout-to
|
|
%{targets}
|
|
(run %{script}))))
|
|
|
|
(rule
|
|
(alias runtest)
|
|
(package tiny_httpd)
|
|
(enabled_if
|
|
(= %{system} "linux"))
|
|
(deps test_output.txt)
|
|
(action
|
|
(diff test_output.txt.expected test_output.txt)))
|
|
|
|
; produce an embedded FS
|
|
|
|
(library
|
|
(name echo_vfs)
|
|
(modules vfs)
|
|
(wrapped false)
|
|
(libraries tiny_httpd))
|
|
|
|
(rule
|
|
(targets vfs.ml)
|
|
(deps
|
|
(source_tree files)
|
|
(:out test_output.txt.expected))
|
|
(enabled_if
|
|
(= %{system} "linux"))
|
|
(action
|
|
(run
|
|
%{bin:tiny-httpd-vfs-pack}
|
|
-o
|
|
%{targets}
|
|
--mirror=files/
|
|
--file=test_out.txt,%{out}
|
|
; --url=example_dot_com,http://example.com ; this breaks tests in opam sandbox 😢
|
|
)))
|
|
|
|
(rule
|
|
(targets vfs.ml)
|
|
(enabled_if
|
|
(<> %{system} "linux"))
|
|
(action
|
|
(with-stdout-to
|
|
%{targets}
|
|
(progn
|
|
(echo "let embedded_fs = Tiny_httpd_dir.Embedded_fs.create ~mtime:0. ()")
|
|
(echo "let vfs = Tiny_httpd_dir.Embedded_fs.to_vfs embedded_fs")))))
|