fix(ro-crate): 🐛 use SPARQL target to select the candidate RO-Crate metadata descriptor

Author: kikkomep

rocrate_validator/profiles/ro-crate/must/1_file-descriptor_metadata.ttl

@@ -11,7 +11,6 @@
 # WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
 # See the License for the specific language governing permissions and
 # limitations under the License.
-
 @prefix ro: <./> .
 @prefix ro-crate: <https://github.com/crs4/rocrate-validator/profiles/ro-crate/> .
 @prefix dct: <http://purl.org/dc/terms/> .
@@ -20,22 +19,19 @@
 @prefix sh: <http://www.w3.org/ns/shacl#> .
 @prefix validator: <https://github.com/crs4/rocrate-validator/> .
 
-
-ro-crate:ROCrateMetadataFileDescriptorExistence
-    a sh:NodeShape ;
+ro-crate:ROCrateMetadataFileDescriptorExistence a sh:NodeShape ;
     sh:targetNode sh:Graph ;
     sh:name "RO-Crate Metadata File Descriptor entity existence" ;
-    sh:description "The RO-Crate JSON-LD MUST contain a Metadata File Descriptor entity named `ro-crate-metadata.json` and typed as `schema:CreativeWork`" ;
-    
+    sh:description """The RO-Crate JSON-LD MUST contain a Metadata File Descriptor entity named `ro-crate-metadata.json` and typed as `schema:CreativeWork`""" ;
     sh:sparql [
         a sh:SPARQLConstraint ;
         sh:name "RO-Crate Metadata File Descriptor entity existence" ;
         sh:description """Check if the RO-Crate Metadata File Descriptor entity exists,
             i.e., if there exists an entity with @id `ro-crate-metadata.json` and type `schema:CreativeWork`""" ;
-        sh:message "The root of the document MUST have an entity with @id `ro-crate-metadata.json`" ;
+        sh:message """The root of the document MUST have an entity with @id `ro-crate-metadata.json`, typed as `schema:CreativeWork` and with an `about` property referencing the Root Data Entity""" ;
         sh:prefixes ro-crate:sparqlPrefixes ;
         sh:select """
-            SELECT $this
+            SELECT ?this
             WHERE {
                 FILTER NOT EXISTS {
                     ?crate a schema:Dataset .
@@ -45,9 +41,9 @@ ro-crate:ROCrateMetadataFileDescriptorExistence
                 }
             }
         """ ;
-    ] .
+        ] .
 
-ro-crate:FindROCrateMetadataFileDescriptorEntity a sh:NodeShape, validator:HiddenShape;
+ro-crate:FindROCrateMetadataFileDescriptorEntity a sh:NodeShape, validator:HiddenShape ;
     sh:name "Identify the RO-Crate Metadata File Descriptor" ;
     sh:description """The RO-Crate Metadata File Descriptor entity describes the RO-Crate itself, and it is named as `ro-crate-metadata.json`.
         It can be identified by name according to the RO-Crate specification
@@ -76,10 +72,19 @@ ro-crate:FindROCrateMetadataFileDescriptorEntity a sh:NodeShape, validator:Hidde
 ro-crate:ROCrateMetadataFileDescriptorRecommendedProperties a sh:NodeShape ;
     sh:name "RO-Crate Metadata File Descriptor REQUIRED properties" ;
     sh:description """RO-Crate Metadata Descriptor MUST be defined
-    according with the requirements details defined in
-    [RO-Crate Metadata File Descriptor](https://www.researchobject.org/ro-crate/1.1/root-data-entity.html#ro-crate-metadata-file-descriptor)""";
-    sh:targetClass ro-crate:ROCrateMetadataFileDescriptor ;
-    sh:property [ 
+    according with the requirements details defined in [RO-Crate Metadata File Descriptor](https://www.researchobject.org/ro-crate/1.1/root-data-entity.html#ro-crate-metadata-file-descriptor)""" ;
+    sh:target [
+        a sh:SPARQLTarget ;
+        sh:prefixes ro-crate:sparqlPrefixes ;
+        sh:select """
+            SELECT ?this
+            WHERE {
+                ?this ?p ?o .
+                FILTER( STRENDS(STR(?this), "ro-crate-metadata.json") )
+            }
+        """ ;
+    ] ;
+    sh:property [
         a sh:PropertyShape ;
         sh:name "Metadata File Descriptor entity type" ;
         sh:description "Check if the RO-Crate Metadata File Descriptor has `@type` CreativeWork, as per schema.org" ;
@@ -89,11 +94,11 @@ ro-crate:ROCrateMetadataFileDescriptorRecommendedProperties a sh:NodeShape ;
         sh:hasValue schema_org:CreativeWork ;
         sh:message "The RO-Crate metadata file MUST be a CreativeWork, as per schema.org" ;
     ] ;
-    sh:property [ 
+    sh:property [
         a sh:PropertyShape ;
         sh:name "Metadata File Descriptor entity: `about` property" ;
         sh:description """Check if the RO-Crate Metadata File Descriptor has an `about` property referencing the Root Data Entity""" ;
-        sh:maxCount 1;
+        sh:maxCount 1 ;
         sh:minCount 1 ;
         sh:nodeKind sh:IRI ;
         sh:path schema_org:about ;