From f34dd94166ecf92b981908153a02bd583bdff164 Mon Sep 17 00:00:00 2001
From: Todd Gamblin <tgamblin@llnl.gov>
Date: Tue, 6 Sep 2016 07:55:54 -0700
Subject: [PATCH] Add debug command for creating tarball of install DB.

---
 lib/spack/spack/cmd/debug.py | 84 ++++++++++++++++++++++++++++++++++++
 1 file changed, 84 insertions(+)
 create mode 100644 lib/spack/spack/cmd/debug.py

diff --git a/lib/spack/spack/cmd/debug.py b/lib/spack/spack/cmd/debug.py
new file mode 100644
index 0000000000..958eb829b4
--- /dev/null
+++ b/lib/spack/spack/cmd/debug.py
@@ -0,0 +1,84 @@
+##############################################################################
+# Copyright (c) 2013-2016, Lawrence Livermore National Security, LLC.
+# Produced at the Lawrence Livermore National Laboratory.
+#
+# This file is part of Spack.
+# Created by Todd Gamblin, tgamblin@llnl.gov, All rights reserved.
+# LLNL-CODE-647188
+#
+# For details, see https://github.com/llnl/spack
+# Please also see the LICENSE file for our notice and the LGPL.
+#
+# This program is free software; you can redistribute it and/or modify
+# it under the terms of the GNU Lesser General Public License (as
+# published by the Free Software Foundation) version 2.1, February 1999.
+#
+# This program is distributed in the hope that it will be useful, but
+# WITHOUT ANY WARRANTY; without even the IMPLIED WARRANTY OF
+# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the terms and
+# conditions of the GNU Lesser General Public License for more details.
+#
+# You should have received a copy of the GNU Lesser General Public
+# License along with this program; if not, write to the Free Software
+# Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
+##############################################################################
+import os
+from datetime import datetime
+from glob import glob
+
+import llnl.util.tty as tty
+from llnl.util.filesystem import working_dir
+
+import spack
+from spack.util.executable import which
+
+description = "Debugging commands for troubleshooting Spack."
+
+
+def setup_parser(subparser):
+    sp = subparser.add_subparsers(metavar='SUBCOMMAND', dest='debug_command')
+    sp.add_parser('create-db-tarball',
+                  help="Create a tarball of Spack's installation metadata.")
+
+
+def _debug_tarball_suffix():
+    now = datetime.now()
+    suffix = now.strftime('%Y-%m-%d-%H%M%S')
+
+    git = which('git')
+    if not git:
+        return 'nobranch-nogit-%s' % suffix
+
+    with working_dir(spack.spack_root):
+        if not os.path.isdir('.git'):
+            return 'nobranch.nogit.%s' % suffix
+
+        symbolic = git(
+            'rev-parse', '--abbrev-ref', '--short', 'HEAD', output=str).strip()
+        commit = git(
+            'rev-parse', '--short', 'HEAD', output=str).strip()
+
+        if symbolic == commit:
+            return "nobranch.%s.%s" % (commit, suffix)
+        else:
+            return "%s.%s.%s" % (symbolic, commit, suffix)
+
+
+def create_db_tarball(args):
+    tar = which('tar')
+    tarball_name = "spack-db.%s.tar.gz" % _debug_tarball_suffix()
+    tarball_path = os.path.abspath(tarball_name)
+
+    with working_dir(spack.spack_root):
+        files = [spack.installed_db._index_path]
+        files += glob('%s/*/*/*/.spack/spec.yaml' % spack.install_path)
+        files = [os.path.relpath(f) for f in files]
+
+        tar('-czf', tarball_path, *files)
+
+    tty.msg('Created %s' % tarball_name)
+
+
+def debug(parser, args):
+    action = {'create-db-tarball': create_db_tarball}
+    action[args.debug_command](args)