From: Eugene Crosser Date: Thu, 5 Jun 2014 16:38:35 +0000 (+0400) Subject: Scrap the plan to verify valid proto/port X-Git-Tag: 0.9.0.1^0 X-Git-Url: http://average.org/gitweb/?a=commitdiff_plain;h=ea1648a0a1a63ef82c0159864e5efa4fc6297a1d;p=pdns-pipe-nmc.git Scrap the plan to verify valid proto/port Desided that it is not up to the bridge to decide which values are valid for the proto and port and which are not (in SRV and TLSA RRs). --- diff --git a/NmcDom.hs b/NmcDom.hs index dac614b..505c543 100644 --- a/NmcDom.hs +++ b/NmcDom.hs @@ -120,7 +120,6 @@ takeTls o = where tmap2dmap :: Map String (Map String [NmcRRTlsa]) -> Parser (Maybe (Map String NmcDom)) - -- FIXME return parse error on invalid proto or port tmap2dmap m1 = return $ foldrWithKey addprotoelem (Just M.empty) m1 addprotoelem k1 m2 acc = protoelem k1 m2 `merge` acc protoelem k1 m2 = Just (M.singleton ("_" ++ k1) (pmap2dmap m2))