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
|
(* Test for sysctl lens *)
module Test_sysctl =
let default_sysctl = "# Kernel sysctl configuration file
# Controls IP packet forwarding
net.ipv4.ip_forward = 0
net.ipv4.conf.default.rp_filter = 1
net.ipv4.conf.default.accept_source_route = \t0
kernel.sysrq = 0
; Semicolon comments are also allowed
net.ipv4.tcp_mem = \t393216 524288 786432
"
test Sysctl.lns get default_sysctl =
{ "#comment" = "Kernel sysctl configuration file" }
{ "#comment" = "Controls IP packet forwarding"}
{ "net.ipv4.ip_forward" = "0" }
{ }
{ "net.ipv4.conf.default.rp_filter" = "1" }
{ "net.ipv4.conf.default.accept_source_route" = "0" }
{ "kernel.sysrq" = "0" }
{ }
{ "#comment" = "Semicolon comments are also allowed" }
{ "net.ipv4.tcp_mem" = "393216 524288 786432" }
test Sysctl.lns put default_sysctl after
set "net.ipv4.ip_forward" "1" ;
rm "net.ipv4.conf.default.rp_filter" ;
rm "net.ipv4.conf.default.accept_source_route" ;
rm "kernel.sysrq"
= "# Kernel sysctl configuration file
# Controls IP packet forwarding
net.ipv4.ip_forward = 1
; Semicolon comments are also allowed
net.ipv4.tcp_mem = \t393216 524288 786432
"
(* Local Variables: *)
(* mode: caml *)
(* End: *)
|