我试图从数据创建规范。我有非常复杂的数据结构 - 所有嵌套映射。
{:contexts
({:importer.datamodel/global-id "01b4e69f86e5dd1d816e91da27edc08e",
:importer.datamodel/type "province",
:name "a1",
:importer.datamodel/part-of "8cda1baed04b668a167d4ca28e3cef36"}
{:importer.datamodel/global-id "8cda1baed04b668a167d4ca28e3cef36",
:importer.datamodel/type "country",
:name "AAA"}
{:importer.datamodel/global-id "c78e5478e19f2d7c1b02088e53e8d8a4",
:importer.datamodel/type "location",
:importer.datamodel/center ["36." "2."],
:importer.datamodel/part-of "01b4e69f86e5dd1d816e91da27edc08e"}
{:importer.datamodel/global-id "88844f94f79c75acfcb957bb41386149",
:importer.datamodel/type "organisation",
:name "C"}
{:importer.datamodel/global-id "102e96468e5d13058ab85c734aa4a949",
:importer.datamodel/type "organisation",
:name "A"}),
:datasources
({:importer.datamodel/global-id "Source;ACLED",
:name "ACLED",
:url "https://www.acleddata.com"}),
:iois
({:importer.datamodel/global-id "item-set;ACLED",
:importer.datamodel/type "event",
:datasource "Source;ACLED",
:features
({:importer.datamodel/global-id
"c74257292f584502f9be02c98829d9fda532a492e7dd41e06c31bbccc76a7ba0",
:date "1997-01-04",
:fulltext
{:importer.datamodel/global-id "df5c7d6d075df3a7719ebdd39c6d4c7f",
:text "bla"},
:location-meanings
({:importer.datamodel/global-id
"e5611219971164a15f06e07228fb7b51",
:location "8cda1baed04b668a167d4ca28e3cef36",
:contexts (),
:importer.datamodel/type "position"}
{:importer.datamodel/global-id
"af36461d27ec1d8d28fd7f4a70ab7ce2",
:location "c78e5478e19f2d7c1b02088e53e8d8a4",
:contexts (),
:importer.datamodel/type "position"}),
:interaction-name "Violence",
:importer.datamodel/type "description",
:has-contexts
({:context "102e96468e5d13058ab85c734aa4a949",
:context-association-type "actor",
:context-association-name "actor-1",
:priority "none"}
{:context "88844f94f79c75acfcb957bb41386149",
:context-association-type "actor",
:context-association-name "actor-2",
:priority "none"}),
:facts
({:importer.datamodel/global-id
"c46802ce6dcf33ca02ce113ffd9a855e",
:importer.datamodel/type "integer",
:name "fatalities",
:value "16"}),
:attributes
({:name "description",
:importer.datamodel/type "string",
:value "Violence"})}),
:attributes (),
:ioi-slice "per-item"})}
什么工具可以为这样的结构创建规范?我正在尝试使用此工具:https://github.com/stathissideris/spec-provider
但它给了我这个:
(spec/def :importer.datamodel/data
(clojure.spec.alpha/coll-of
(clojure.spec.alpha/or
:collection
(clojure.spec.alpha/coll-of
(clojure.spec.alpha/keys
:req
[:importer.datamodel/global-id]
:opt
[:importer.datamodel/center
:importer.datamodel/part-of
:importer.datamodel/type]
:opt-un
[:importer.datamodel/attributes
:importer.datamodel/datasource
:importer.datamodel/features
:importer.datamodel/ioi-slice
:importer.datamodel/name
:importer.datamodel/url]))
:simple
clojure.core/keyword?)))
这不是完整的解决方案......我使用(sp/pprint-specs (sp/infer-specs data :importer.datamodel/data) 'data 's)
...什么工具可以为这样的结构创建规范?
spec-provider没有给你想要的结果,因为你的数据是一个复杂的嵌套/递归结构。其中一些地图最适合multi-specs,但规范提供商不会这样做;其文档中的一个警告说,没有尝试推断多规格。
正确规范这些地图的唯一方法是使用多规格,他们的规格将取决于他们的:importer.datamodel/type
值。
首先,让我们看看顶级键(假设地图位于名为data
的绑定中):
(keys data) => (:contexts :datasources :iois)
为最外面的地图创建s/keys
规范:
(s/def ::my-map
(s/keys :req-un [::contexts ::datasources ::iois]))
这些密钥是不合格的,但我们必须使用合格的关键字w / :req-un
来规范它们。我们可以使用REPL来查看嵌套映射的形状及其与:importer.datamodel/type
的关系,方法是遍历嵌套结构并收集数据:
(let [keysets (atom #{})]
(clojure.walk/postwalk
(fn [v]
(when (map? v)
(swap! keysets conj [(:importer.datamodel/type v) (keys v)]))
v)
data)
@keysets)
=>
#{...
["organisation" (:importer.datamodel/global-id :importer.datamodel/type :name)]
[nil (:context :context-association-type :context-association-name :priority)]
["description"
(:importer.datamodel/global-id :date :fulltext :location-meanings
:interaction-name :importer.datamodel/type :has-contexts :facts :attributes)]
["event" (:importer.datamodel/global-id :importer.datamodel/type :datasource :features :attributes :ioi-slice)]
...}
(即将推出的spec alpha应该可以更容易地从这些数据中以编程方式定义规范。)
我们可以看到有些地图形状没有:importer.datamodel/type
,但我们可以编写多规格。首先定义一个多方法来调度类型键:
(defmulti type-spec :importer.datamodel/type)
然后为每个defmethod
值写一个:importer.datamodel/type
。这里有一些例子:
(defmethod type-spec :default [_] (s/keys))
(defmethod type-spec "organisation" [_]
(s/keys :req [:importer.datamodel/global-id]
:req-un [::name]))
(defmethod type-spec "description" [_]
(s/keys :req [:importer.datamodel/global-id]
:req-un [::date ::fulltext ::location-meanings ::interaction-name
::has-contexts ::facts ::attributes]))
(defmethod type-spec "event" [_]
(s/keys :req-un [::features]))
然后定义s/multi-spec
:
(s/def ::datamodel
(s/multi-spec type-spec :importer.datamodel/type))
现在我们符合::datamodel
的任何地图都将根据其:importer.datamodel/type
值来解析规范。我们可以将该规范分配给规范将用于符合地图的关键字,例如最外面的键之一:
(s/def ::contexts (s/coll-of ::datamodel))
现在,如果您从我们在:contexts
下指定的某个地图中删除了所需的密钥,那么spec可以告诉您哪里出了问题。例如,从:name
地图中删除"organisation"
密钥:
(s/explain ::my-map data)
In: [:contexts 3]
val: #:importer.datamodel{:global-id "88844f94f79c75acfcb957bb41386149",
:type "organisation"}
fails spec: :playground.so/datamodel
at: [:contexts "organisation"]
predicate: (contains? % :name)
对于没有:importer.datamodel/type
的地图,您应该能够定义关键规范。例如,嵌套的:has-contexts
键有一组没有:importer.datamodel/type
的地图,但如果我们可以假设它们都相似,我们可以编写这个规范:
(s/def ::has-contexts
(s/coll-of (s/keys :req-un [::context ::context-association-type
::context-association-name ::priority])))
:has-contexts
在我们已经用上面的多规格覆盖的地图中,只需在此键上注册规范将使规范符合其值。包含此规范的最外面的键是:iois
所以我们也可以指定该键:
(s/def ::iois (s/coll-of ::datamodel))
现在,符合::my-map
规范的输入将自动覆盖更多数据。
什么工具可以为这样的结构创建规范?
正如您所看到的,为此结构编写完整的规范并非易事,但可能。我不知道任何现有的工具可以自动推断出这个结构的完整的“正确”规范。它本来不得不知道:importer.datamodel/type
是一个可以用来发送到不同的s/keys
规范的关键 - 它仍然会做出一个潜在的无效假设。在这种情况下,我认为工具辅助规范生成更加真实和实用。
为什么不使用在事务之前插入旧数据的触发器来创建历史表。
像这样的东西,
CREATE TRIGGER SNAPSHOT_TRIGGER BEFORE
INSERT ON MY_TABLE REFERENCING NEW ROW MYNEWROW
FOR EACH ROW
BEGIN
INSERT INTO "HISTORY_TABLE" VALUES(121,'','zzzz');
END;
(请检查语法)
使用HANA 2 SPS 03,您可以使用系统版本表功能。对于system-versioned tables,HANA会自动保留一个单独的旧记录版本表,可以从主表中独立访问。