From 897ee4b1b5675aee163c6c7b8022da62989356f5 Mon Sep 17 00:00:00 2001
From: "W. Trevor King" <wking@tremily.us>
Date: Fri, 13 Feb 2015 11:06:03 -0800
Subject: [PATCH] dotfiles.sh: Add a 'list' command

It's easier to debug odd configurations if there's and easy way to
list the current repositories.
---
 dotfiles.sh | 47 ++++++++++++++++++++++++++++++++++++++++++++++-
 1 file changed, 46 insertions(+), 1 deletion(-)

diff --git a/dotfiles.sh b/dotfiles.sh
index e51352c..8e5063c 100755
--- a/dotfiles.sh
+++ b/dotfiles.sh
@@ -3,7 +3,7 @@
 # Dotfiles management script.  For details, run
 #   $ dotfiles.sh --help
 #
-# Copyright (C) 2011-2013 W. Trevor King <wking@tremily.us>
+# Copyright (C) 2011-2015 W. Trevor King <wking@tremily.us>
 #
 # This program is free software: you can redistribute it and/or modify
 # it under the terms of the GNU General Public License as published by
@@ -172,6 +172,8 @@ function get_repo_source()
 		REPO_SOURCE_DATA['repo']="${REPO}"
 		if [ -d "${REPO}/.git" ]; then
 			REPO_SOURCE_DATA['transfer']='git'
+			REPO_SOURCE_DATA['url']=$(
+				git --git-dir "${REPO}/.git/" config remote.origin.url)
 		else
 			echo "ERROR: no source location found for ${REPO}" >&2
 			return 1
@@ -334,6 +336,49 @@ function clone()
 	fi
 }
 
+###
+# list command
+
+COMMANDS+=('list')
+
+function list_help()
+{
+	echo 'List current dotfiles repositories.'
+	if [ "${1}" = '--one-line' ]; then return; fi
+
+	cat <<-EOF
+
+		usage: $0 ${COMMAND} [REPO]
+
+		List information for 'REPO' in a form simular to the 'clone'
+		command's arguments.  If 'REPO' is not give, all repositories will
+		be listed.  Examples:
+
+		  $0 list public
+		  public wget http://example.com/public-dotfiles.tar.gz
+		  $0 list
+		  public wget http://example.com/public-dotfiles.tar.gz
+		  private git ssh://example.com/~/private-dotfiles.git
+	EOF
+}
+
+function list()
+{
+	# multi-repo case handled in main() by run_on_all_repos()
+	REPO=$(nonempty_option 'list' 'REPO' "${1}") || return 1
+	maxargs 'list' 1 "${@}" || return 1
+	if [ "${BASH_MAJOR}" -ge 4 ]; then
+		get_repo_source "${REPO}" || return 1
+		TRANSFER=$(nonempty_option 'list' 'TRANSFER' "${REPO_SOURCE_DATA['transfer']}") || return 1
+		URL=$(nonempty_option 'list' 'URL' "${REPO_SOURCE_DATA['url']}") || return 1
+	else
+		echo "WARNING: Bash version < 4.0, cannot use assuming all repos use git transfer" >&2
+		TRANSFER='git'
+		URL=$(git --git-dir "${REPO}/.git/" config remote.origin.url)
+	fi
+	echo "${REPO} ${TRANSFER} ${URL}"
+}
+
 ###
 # fetch command
 
-- 
2.26.2