hsec-core 0.4.0.0 → 0.5.0.0
raw patch · 4 files changed
+16/−3 lines, 4 filesPVP ok
version bump matches the API change (PVP)
API changes (from Hackage documentation)
+ Security.Advisories.Core.Advisory: AffectedApi :: Text -> Text -> AffectedApi
+ Security.Advisories.Core.Advisory: [affectedApiModule] :: AffectedApi -> Text
+ Security.Advisories.Core.Advisory: [affectedApiName] :: AffectedApi -> Text
+ Security.Advisories.Core.Advisory: [affectedApi] :: Affected -> [AffectedApi]
+ Security.Advisories.Core.Advisory: data AffectedApi
+ Security.Advisories.Core.Advisory: instance GHC.Classes.Eq Security.Advisories.Core.Advisory.AffectedApi
+ Security.Advisories.Core.Advisory: instance GHC.Show.Show Security.Advisories.Core.Advisory.AffectedApi
- Security.Advisories.Core.Advisory: Affected :: ComponentIdentifier -> CVSS -> [AffectedVersionRange] -> Maybe [Architecture] -> Maybe [OS] -> [(Text, VersionRange)] -> Affected
+ Security.Advisories.Core.Advisory: Affected :: ComponentIdentifier -> CVSS -> [AffectedVersionRange] -> Maybe [Architecture] -> Maybe [OS] -> [(Text, VersionRange)] -> [AffectedApi] -> Affected
Files
- CHANGELOG.md +4/−0
- hsec-core.cabal +1/−1
- src/Security/Advisories/Core/Advisory.hs +9/−1
- test/Spec/QueriesSpec.hs +2/−1
CHANGELOG.md view
@@ -1,3 +1,7 @@+## 0.5.0.0++* Add `AffectedApi` type and `affectedApi` field in `Affected`+ ## 0.4.0.0 * Introduce `OsvId` and use it in `Advisory.{aliases,related}`
hsec-core.cabal view
@@ -1,6 +1,6 @@ cabal-version: 2.4 name: hsec-core-version: 0.4.0.0+version: 0.5.0.0 -- A short (one-line) description of the package. synopsis: Core package representing Haskell advisories
src/Security/Advisories/Core/Advisory.hs view
@@ -13,6 +13,7 @@ AffectedVersionRange (..), OS (..), Keyword (..),+ AffectedApi (..), ComponentIdentifier (..), GHCComponent (..), RepositoryURL (..),@@ -123,7 +124,8 @@ affectedVersions :: [AffectedVersionRange], affectedArchitectures :: Maybe [Architecture], affectedOS :: Maybe [OS],- affectedDeclarations :: [(Text, VersionRange)]+ affectedDeclarations :: [(Text, VersionRange)],+ affectedApi :: [AffectedApi] } deriving stock (Eq, Show) @@ -174,6 +176,12 @@ newtype Keyword = Keyword {unKeyword :: Text} deriving stock (Eq, Ord) deriving (Show) via Text++data AffectedApi = AffectedApi+ { affectedApiModule :: Text,+ affectedApiName :: Text+ }+ deriving stock (Eq, Show) data AffectedVersionRange = AffectedVersionRange { affectedVersionRangeIntroduced :: Version,
test/Spec/QueriesSpec.hs view
@@ -122,7 +122,8 @@ affectedVersions = mkAffectedVersions versionRange, affectedArchitectures = Nothing, affectedOS = Nothing,- affectedDeclarations = []+ affectedDeclarations = [],+ affectedApi = [] } ], advisoryReferences = [],