promptoglyph-vcs.d

module promptoglyph.vcs;

import std.getopt;
import std.range : empty;
import std.stdio : write;

import color;
import git;
import help;
import time;
import vcs;

struct StatusStringOptions {
	string prefix = "[";
	string suffix = "]";
	string indexedText = "✔";
	string modifiedText = "±";
	string untrackedText = "?";
}

void main(string[] args)
{
	markProgramStart();

	bool noColor;
	bool bash, zsh;
	StatusStringOptions stringOptions;

	try {
		getopt(args,
			config.caseSensitive,
			config.bundling,
			"help|h", { writeAndSucceed(helpString); },
			"version|v", { writeAndSucceed(versionString); },
			"prefix|p", &stringOptions.prefix,
			"indexed-text|i", &stringOptions.indexedText,
			"modified-text|m", &stringOptions.modifiedText,
			"untracked-text|u", &stringOptions.untrackedText,
			"suffix|s", &stringOptions.suffix,
			"no-color", &noColor,
			"bash|b", &bash,
			"zsh|z", &zsh);
	}
	catch (GetOptException ex) {
		writeAndFail(ex.msg, "\n", helpString);
	}

	if (bash && zsh)
		writeAndFail("Both --bash and --zsh specified. Wat.");

	Escapes escapesToUse;
	if (bash)
		escapesToUse = Escapes.bash;
	else if (zsh)
		escapesToUse = Escapes.zsh;
	else // Redundant (none is the default), but more explicit.
		escapesToUse = Escapes.none;

	const RepoStatus* status = getRepoStatus();

	string statusString = stringRepOfStatus(
		status, stringOptions,
		noColor ? UseColor.no : UseColor.yes,
		escapesToUse);

	write(statusString);
}

/**
 * Gets a string representation of the status of the Git repo
 *
 * Params:
 *   colors = Whether or not colored output is desired
 *   escapes = Whether or not ZSH escapes are needed. Ignored if no colors are desired.
 *
 */
string stringRepOfStatus(const RepoStatus* status, const ref StatusStringOptions stringOptions,
                         UseColor colors, Escapes escapes)
{
	import time;

	if (status is null)
		return "";

	// Local function that colors a source string if the colors flag is set.
	string colorText(string source,
	                 string function(Escapes) colorFunction)
	{
		if (!colors)
			return source;
		else
			return colorFunction(escapes) ~ source;
	}

	string head;

	if (!status.head.empty)
		head = colorText(status.head, &cyan);

	string flags = " ";

	if (status.flags.indexed)
		flags ~= colorText(stringOptions.indexedText, &green);
	if (status.flags.modified)
		flags ~= colorText(stringOptions.modifiedText, &yellow); // Yellow plus/minus
	if (status.flags.untracked)
		flags ~= colorText(stringOptions.untrackedText, &red); // Red quesiton mark

	// We don't want an extra space if there's nothing to show.
	if (flags == " ")
		flags = "";

	string ret = head ~ flags ~
	             colorText(stringOptions.suffix, &resetColor);

	return stringOptions.prefix ~ ret;
}

string versionString = q"EOS
promptoglyph-vcs by Matt Kline, version 0.5.2
Part of the promptoglyph tool set
EOS";

string helpString = q"EOS
usage: promptoglyph-vcs [-t <milliseconds>]

Options:

  --help, -h
    Display this help text

  --version, -v
    Display the version info

  --time-limit, -t <milliseconds>
    The maximum amount of time the program can run before exiting,
    in milliseconds. Defaults to 500 milliseconds.
    Running "git status" can take a long time for big or complex
    repositories, but since this program is for a prompt,
    we can't delay an arbitrary amount of time without annoying the user.
    If it takes longer than this amount of time to get the repo status,
    we prematurely kill "git status" and display whatever information
    was received so far. The hope is that in subsequent runs, "git status" will
    complete in time since your operating system caches recently-accessed
    files and directories.

  --no-color
    Disables colored output, which is on by default

  --prefix, -p <string>
    Text to prepend to the VCS information (if in a VCS directory)

  --untracked-text, -u <string>
    Text to display when the VCS indicates untracked files
    (if in a VCS directory)

  --modified-text, -m <string>
    Text to display when the VCS indicates files modified since the last commit
    (if in a VCS directory)

  --indexed-text, -i <string>
    Text to display when the VSC indicates files ready to commit
    (if in a VCS directory)

  --suffix, -s <string>
    Text to append to the VCS information (if in a VCS directory)

  --bash, -b
    Used to emit additional escapes needed for color sequences in Bash prompts.
    Ignored if --no-color is specified.

  --zsh, -z
    Used to emit additional escapes needed for color sequences in ZSH prompts.
    Ignored if --no-color is specified.

promptoglyph-vcs is designed to be part of a shell prompt.
It prints a quick, symbolic look at the status of a Git repository
if you are currently in one and nothing otherwise. Output looks like
    [master ✔±?]
where "master" is the current branch, ? indicates untracked files,
± indicates changed but unstaged files, and ✔ indicates files staged
in the index.
Future plans include additional info (like when merging),
and possibly Subversion and Mercurial support.
EOS";