Add query support for index

Signed-off-by: Christian Dupuis <cd@atomist.com>

query/repository_query.edn

@@ -0,0 +1,35 @@
+;; Copyright © 2022 Docker, Inc.
+;;
+;; Licensed under the Apache License, Version 2.0 (the "License");
+;; you may not use this file except in compliance with the License.
+;; You may obtain a copy of the License at
+;;
+;;     http://www.apache.org/licenses/LICENSE-2.0
+;;
+;; Unless required by applicable law or agreed to in writing, software
+;; distributed under the License is distributed on an "AS IS" BASIS,
+;; 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.
+
+[:find
+ ?repo
+ :in $ $before-db %% ?ctx
+ :where
+ [(ground "%s") ?name]
+ [(adb/query (quote [:find
+                     (pull ?repo [:atomist/team-id
+                                  :docker.repository/host
+                                  :docker.repository/badge
+                                  :docker.repository/supported-tags
+                                  (:docker.repository/repository :as :docker.repository/name)])
+                     :in $ $b %% ?ctx [?name]
+                     :where
+                     [?repo :docker.repository/repository ?name]
+                     [?repo :docker.repository/host "hub.docker.com"]
+                     ])
+    ?name)
+  ?results]
+ [(untuple ?results) [?result ...]]
+ [(untuple ?result) [?repo]]
+ ]