Refactor color functions to provide a unified interface for fore/back ground.

Nim's `terminal` library provides ANSI terminal escape support, but
only when writing directly to a File handle. This commit adds the
`term{FG,BG}` procedures and `termReset` constant to help with embedding
ANSI escape codes in string data.

cliutils.nim

@@ -1,11 +1,15 @@
-import docopt, json, osproc, posix, nre, streams, strutils, strtabs
+import docopt, json, osproc, posix, nre, streams, strtabs, terminal, unicode
 import os except sleep
+import strutils except toUpper, toLower
+
 
 type
   CombinedConfig* = object
     docopt*: Table[string, Value]
     json*: JsonNode
 
+  TermColor = ForegroundColor or BackgroundColor
+
 proc getVal*(cfg: CombinedConfig, key, default: string): string =
   let argKey = "--" & key
   let envKey = key.replace('-', '_').toUpper
@@ -13,7 +17,16 @@ proc getVal*(cfg: CombinedConfig, key, default: string): string =
 
   if cfg.docopt[argKey]: return $cfg.docopt[argKey]
   elif existsEnv(envKey): return getEnv(envKey)
-  elif cfg.json.hasKey(jsonKey): return cfg.json[jsonKey].getStr
+  elif cfg.json.hasKey(jsonKey):
+    let node = cfg.json[jsonKey]
+    case node.kind
+    of JString: return node.getStr
+    of JInt: return $node.getInt
+    of JFloat: return $node.getFloat
+    of JBool: return $node.getBool
+    of JNull: return ""
+    of JObject: return $node
+    of JArray: return $node
   else: return default
 
 
@@ -31,48 +44,15 @@ proc sendMsg*(h: HandleProcMsgCB, outMsg: TaintedString,
               errMsg: TaintedString = nil, cmd: string = ""): void =
   if h != nil: h(outMsg, errMsg, cmd)
 
-proc waitForWithOutput*(p: Process, msgCB: HandleProcMsgCB,
-                        procCmd: string = ""):
-      tuple[output: TaintedString, error: TaintedString, exitCode: int] =
-
-  var pout = outputStream(p)
-  var perr = errorStream(p)
-
-  result = (TaintedString"", TaintedString"", -1)
-  var line = newStringOfCap(120).TaintedString
-  while true:
-    if pout.readLine(line):
-      msgCB.sendMsg(line, nil, procCmd)
-      result[0].string.add(line.string)
-      result[0].string.add("\n")
-    elif perr.readLine(line):
-      msgCB.sendMsg(nil, line, procCmd)
-      result[1].string.add(line.string)
-      result[1].string.add("\n")
-    else:
-      result[2] = peekExitCode(p)
-      if result[2] != -1: break
-  close(p)
-
-proc exec*(command: string, workingDir: string = "",
-           args: openArray[string] = [], env: StringTableRef = nil,
-           options: set[ProcessOption] = {poUsePath},
-           msgCB: HandleProcMsgCB = nil):
-    tuple[output: TaintedString, error: TaintedString, exitCode: int]
-    {.tags: [ExecIOEffect, ReadIOEffect], gcsafe.} =
-
-  var p = startProcess(command, workingDir, args, env, options)
-  result = waitForWithOutput(p, msgCb, command)
-
-proc makeProcMsgHandler*(outSink, errSink: File): HandleProcMsgCB =
+proc makeProcMsgHandler*(outSink, errSink: File, prefixCmd: bool = true): HandleProcMsgCB =
   result = proc(outMsg, errMsg: TaintedString, cmd: string): void {.closure.} =
-    let prefix = if cmd != nil: cmd & ": " else: ""
+    let prefix = if cmd == nil or not prefixCmd: "" else: cmd & ": "
     if outMsg != nil: outSink.writeLine(prefix & outMsg)
     if errMsg != nil: errSink.writeLine(prefix & errMsg)
 
-proc makeProcMsgHandler*(outSink, errSink: Stream): HandleProcMsgCB =
+proc makeProcMsgHandler*(outSink, errSink: Stream, prefixCmd: bool = true): HandleProcMsgCB =
   result = proc(outMsg, errMsg: TaintedString, cmd: string): void {.closure.} =
-    let prefix = if cmd != nil: cmd & ": " else: ""
+    let prefix = if cmd == nil or not prefixCmd: "" else: cmd & ": "
     if outMsg != nil: outSink.writeLine(prefix & outMsg)
     if errMsg != nil: errSink.writeLine(prefix & errMsg)
 
@@ -84,6 +64,48 @@ proc combineProcMsgHandlers*(a, b: HandleProcMsgCB): HandleProcMsgCB =
       a(cmd, outMsg, errMsg)
       b(cmd, outMsg, errMsg)
 
+proc waitFor*(p: Process, msgCB: HandleProcMsgCB, procCmd: string = ""): int =
+
+  var pout = outputStream(p)
+  var perr = errorStream(p)
+
+  var line = newStringOfCap(120).TaintedString
+  while true:
+    if pout.readLine(line):
+      msgCB.sendMsg(line, nil, procCmd)
+    elif perr.readLine(line):
+      msgCB.sendMsg(nil, line, procCmd)
+    else:
+      result = peekExitCode(p)
+      if result != -1: break
+  close(p)
+
+proc exec*(command: string, workingDir: string = "",
+           args: openArray[string] = [], env: StringTableRef = nil,
+           options: set[ProcessOption] = {poUsePath},
+           msgCB: HandleProcMsgCB = nil): int
+    {.tags: [ExecIOEffect, ReadIOEffect, RootEffect], gcsafe.} =
+
+  var p = startProcess(command, workingDir, args, env, options)
+  result = waitFor(p, msgCB, command)
+
+proc execWithOutput*(command: string, workingDir:string = "",
+           args: openArray[string] = [], env: StringTableRef = nil,
+           options: set[ProcessOption] = {poUsePath},
+           msgCB: HandleProcMsgCB = nil):
+    tuple[output: TaintedString, error: TaintedString, exitCode: int] =
+
+  result = (TaintedString"", TaintedString"", -1)
+  var outSeq, errSeq: seq[TaintedString]
+  outSeq = @[]; errSeq = @[]
+  var outputCollector = combineProcMsgHandlers(msgCB,
+    proc(outMsg, errMsg: TaintedString, cmd: string): void {.closure.} =
+      if outMsg != nil: outSeq.add(outMsg)
+      if errMsg != nil: errSeq.add(errMsg))
+
+  result[2] = exec(command, workingDir, args, env, options, outputCollector)
+  result[0] = outSeq.join("\n")
+  result[1] = errSeq.join("\n")
 
 ## Daemonize
 
@@ -99,7 +121,7 @@ proc onStop(sig: cint) {.noconv.} =
 
   quit(QuitSuccess)
 
-proc daemonize*(pidfile, si, so, se: string, daemonMain: proc(): void): int =
+proc daemonize*(pidfile, si, so, se: string, daemonMain: proc(): void): Pid =
 
   if fileExists(pidfile):
     raise newException(IOError, "pidfile " & pidfile & " already exists, daemon already running?")
@@ -151,3 +173,13 @@ proc daemonize*(pidfile, si, so, se: string, daemonMain: proc(): void): int =
     daemonMain()
 
   return pid1
+
+const termReset* = "\e[0;m"
+
+proc termColor*(color: TermColor, bright, bold = false): string =
+  var colorVal = ord(color)
+  if bright: inc(colorVal, 60)
+  return "\e[" & $colorVal & (if bold: ";1" else: "") & "m"
+
+proc withColor*(str: string, color: TermColor, bright, bold = false): string =
+  return termColor(color, bright, bold) & str

cliutils.nimble

@@ -1,11 +1,11 @@
 # Package
 
-version       = "0.2.1"
+version       = "0.4.1"
 author        = "Jonathan Bernard"
 description   = "Helper functions for writing command line interfaces."
 license       = "MIT"
 
 # Dependencies
 
-requires @["nim >= 0.15.3", "docopt"]
+requires @["nim >= 0.18.0", "docopt"]