1234567891011121314151617181920212223242526272829303132333435363738394041424344454647484950515253545556575859606162636465666768697071727374 |
- #
- #
- # The Nim Compiler
- # (c) Copyright 2017 Andreas Rumpf
- #
- # See the file "copying.txt", included in this
- # distribution, for details about the copyright.
- #
- ## Module that implements ``gorge`` for the compiler.
- import msgs, os, osproc, streams, options,
- lineinfos, pathutils
- when defined(nimPreviewSlimSystem):
- import std/syncio
- import ../dist/checksums/src/checksums/sha1
- proc readOutput(p: Process): (string, int) =
- result[0] = ""
- var output = p.outputStream
- while not output.atEnd:
- result[0].add(output.readLine)
- result[0].add("\n")
- if result[0].len > 0:
- result[0].setLen(result[0].len - "\n".len)
- result[1] = p.waitForExit
- proc opGorge*(cmd, input, cache: string, info: TLineInfo; conf: ConfigRef): (string, int) =
- let workingDir = parentDir(toFullPath(conf, info))
- result = ("", 0)
- if cache.len > 0:
- let h = secureHash(cmd & "\t" & input & "\t" & cache)
- let filename = toGeneratedFile(conf, AbsoluteFile("gorge_" & $h), "txt").string
- var f: File = default(File)
- if optForceFullMake notin conf.globalOptions and open(f, filename):
- result = (f.readAll, 0)
- f.close
- return
- var readSuccessful = false
- try:
- var p = startProcess(cmd, workingDir,
- options={poEvalCommand, poStdErrToStdOut})
- if input.len != 0:
- p.inputStream.write(input)
- p.inputStream.close()
- result = p.readOutput
- p.close()
- readSuccessful = true
- # only cache successful runs:
- if result[1] == 0:
- writeFile(filename, result[0])
- except IOError, OSError:
- if not readSuccessful:
- when defined(nimLegacyGorgeErrors):
- result = ("", -1)
- else:
- result = ("Error running startProcess: " & getCurrentExceptionMsg(), -1)
- else:
- try:
- var p = startProcess(cmd, workingDir,
- options={poEvalCommand, poStdErrToStdOut})
- if input.len != 0:
- p.inputStream.write(input)
- p.inputStream.close()
- result = p.readOutput
- p.close()
- except IOError, OSError:
- when defined(nimLegacyGorgeErrors):
- result = ("", -1)
- else:
- result = ("Error running startProcess: " & getCurrentExceptionMsg(), -1)
|