From 91cc571b2d6947acd70717157cd1b24819202997 Mon Sep 17 00:00:00 2001 From: FĂ©lix Sipma Date: Mon, 29 Feb 2016 18:05:24 +0100 Subject: Firewall: add TCPSyn to Rules (cherry picked from commit 864bff7743bd3a77f1bfdb37bdeeea49e31e1f52) --- src/Propellor/Property/Firewall.hs | 2 ++ 1 file changed, 2 insertions(+) (limited to 'src/Propellor') diff --git a/src/Propellor/Property/Firewall.hs b/src/Propellor/Property/Firewall.hs index bf41cf20..c4d2ee1b 100644 --- a/src/Propellor/Property/Firewall.hs +++ b/src/Propellor/Property/Firewall.hs @@ -77,6 +77,7 @@ toIpTableArg (TCPFlags m c) = , intercalate "," (map show m) , intercalate "," (map show c) ] +toIpTableArg TCPSyn = ["--syn"] toIpTableArg (Source ipwm) = [ "-s" , intercalate "," (map fromIPWithMask ipwm) @@ -216,6 +217,7 @@ data Rules | ICMPType ICMPTypeMatch | RateLimit Frequency | TCPFlags TCPFlagMask TCPFlagComp + | TCPSyn | Source [ IPWithMask ] | Destination [ IPWithMask ] | Rules :- Rules -- ^Combine two rules -- cgit v1.2.3