Added tag command to add tags to service images

Author: pjeby

CLI.md

@@ -23,6 +23,7 @@
   * [`jq`](#jq)
   * [`jqc`](#jqc)
   * [`sh`](#sh)
+  * [`tag` *[tag]*](#tag-tag)
 
 <!-- tocstop -->
 
@@ -301,3 +302,31 @@ doco.jqc() { compose-config; local JQ_CMD=(jq-tty); RUN_JQ "$@" <<<"$COMPOSED_JS
 doco.sh() { doco exec bash "$@"; }
 ```
 
+#### `tag` *[tag]*
+
+Tag the current service's `image` with *tag*.  If no *tag* is given, outputs the service's `image`.
+
+If *tag* contains a `:`, it is passed to the `docker tag` command as-is.  Otherwise, if it contains a `/`, `:latest` will be added to the end of it.  If it contains neither a `:` nor a `/`, it is appended to the base image with a `:`.
+
+That is, if a service `foo` has an `image` of `foo/bar:1.2` then:
+
+* `doco foo tag bar/baz:bing` will tag the image as `bar/baz:bing`
+* `doco foo tag bar/baz` will tag the image as `bar/baz:latest`
+* `doco foo tag latest` will tag the image as `foo/bar:latest`
+* `doco foo tag baz` will tag the image as `foo/bar:baz`
+
+Exactly one service must be selected, either explicitly or via the `--tag-default` or`--default` targets.  The service must have an `image` key, or the command will fail.
+
+```shell
+doco.tag() {
+    require-services 1 tag || return
+    REPLY="$(CLEAR_FILTERS; FILTER 'services[%s].image' "$REPLY"; RUN_JQ -r <"$DOCO_CONFIG")"
+    case ${1-} in
+    ?*:*) docker tag "$REPLY" "$1" ;;
+    */*)  docker tag "$REPLY" "$1:latest" ;;
+    '')   echo "$REPLY" ;;
+    *)    docker tag "$REPLY" "${REPLY%:*}:$1";;
+    esac
+}
+```
+

bin/doco

@@ -1033,6 +1033,16 @@ doco.foreach() { target @current foreach doco "$@"; }
 doco.jq() { local JQ_CMD=(jq-tty); RUN_JQ "$@" <"$DOCO_CONFIG"; }
 doco.jqc() { compose-config; local JQ_CMD=(jq-tty); RUN_JQ "$@" <<<"$COMPOSED_JSON"; }
 doco.sh() { doco exec bash "$@"; }
+doco.tag() {
+    require-services 1 tag || return
+    REPLY="$(CLEAR_FILTERS; FILTER 'services[%s].image' "$REPLY"; RUN_JQ -r <"$DOCO_CONFIG")"
+    case ${1-} in
+    ?*:*) docker tag "$REPLY" "$1" ;;
+    */*)  docker tag "$REPLY" "$1:latest" ;;
+    '')   echo "$REPLY" ;;
+    *)    docker tag "$REPLY" "${REPLY%:*}:$1";;
+    esac
+}
 #!/usr/bin/env bash
 
 jq-tty() { if isatty; then tty pager -- command jq  -C "$@"; else command jq "$@"; fi; }

specs/CLI-Commands.cram.md

@@ -237,3 +237,32 @@ If stdout is a TTY, the output is paged (using `$DOCO_PAGER` or `less -FRX`) and
     no services specified for sh
     [64]
 ~~~
+
+#### `tag` *[tag]*
+
+Tag the current service's `image` with *tag*.  If no *tag* is given, outputs the service's `image`.
+
+If *tag* contains a `:`, it is passed to the `docker tag` command as-is.  Otherwise, if it contains a `/`, `:latest` will be added to the end of it.  If it contains neither a `:` nor a `/`, it is appended to the base image with a `:`.
+
+That is, if a service `foo` has an `image` of `foo/bar:1.2` then:
+
+* `doco foo tag bar/baz:bing` will tag the image as `bar/baz:bing`
+* `doco foo tag bar/baz` will tag the image as `bar/baz:latest`
+* `doco foo tag latest` will tag the image as `foo/bar:latest`
+* `doco foo tag baz` will tag the image as `foo/bar:baz`
+
+Exactly one service must be selected, either explicitly or via the `--tag-default` or `--default` targets.  The service must have an `image` key, or the command will fail.
+
+~~~sh
+    $ doco example1 tag
+    bash
+
+    $ doco example1 tag bing/bang:boom
+    docker tag bash bing/bang:boom
+
+    $ doco example1 tag bing/bang
+    docker tag bash bing/bang:latest
+
+    $ doco example1 tag boom
+    docker tag bash bash:boom
+~~~

specs/cram-setup.sh

@@ -9,7 +9,7 @@ loco_site_config() { :;}
 doco.--dry-run
 
 # default empty compose file
-echo '{"version": "2.1", "services": {"example1":{}}}' >docker-compose.yml
+echo '{"version": "2.1", "services": {"example1":{"image":"bash"}}}' >docker-compose.yml
 
 # Initialize doco in-process when run without other initialization
 doco() { unset -f doco; loco_main "$@"; }