hadolint-2.9.2: src/Hadolint/Rule/DL3005.hs

module Hadolint.Rule.DL3005 (rule) where

import Hadolint.Rule
import Hadolint.Shell (ParsedShell)
import qualified Hadolint.Shell as Shell
import Language.Docker.Syntax (Instruction (..), RunArgs (..))


rule :: Rule ParsedShell
rule = dl3005 <> onbuild dl3005
{-# INLINEABLE rule #-}

dl3005 :: Rule ParsedShell
dl3005 = simpleRule code severity message check
  where
    code = "DL3005"
    severity = DLErrorC
    message = "Do not use apt-get dist-upgrade"
    check (Run (RunArgs args _)) =
      foldArguments (Shell.noCommands (Shell.cmdHasArgs "apt-get" ["dist-upgrade"])) args
    check _ = True
{-# INLINEABLE dl3005 #-}