python - Xilinx TCL shell 在哪里发出结果？

Question

我正在尝试围绕 Xilinx ISE TCL shell xtclsh.exe 开发一个基于 Python 的包装器。如果它有效，我将添加对 PlanAhead 或 Vivado 等其他 shell 的支持...

那么大局是怎样的呢？我有一个 VHDL 源文件列表，它们构成了一个 IP 核。我想打开现有的 ISE 项目，搜索丢失的 VHDL 文件并在必要时添加它们。由于 IP 核具有重叠的文件依赖性，因此项目可能已包含一些文件，因此我只查找丢失的文件。

示例用户 Python 3.x 和带有管道的 subprocess。 xtclsh.exe 启动，命令逐行发送到 shell。监视输出的结果。为了简化示例，我将 STDERR 重定向到 STDOUT。虚拟输出 POC_BOUNDARY 被插入到命令流中，以指示已完成的命令。

可以通过设置示例 ISE 项目来测试所附的示例代码，该项目包含一些 VHDL 源文件。

我的问题是显示了 INFO、WARNING 和 ERROR 消息，但脚本无法读取 TCL 命令的结果。

在 xtclsh.exe 中手动执行搜索 *.vhdl 类型文件会导致:

% search *.vhdl -type file
D:/git/PoC/src/common/config.vhdl
D:/git/PoC/src/common/utils.vhdl
D:/git/PoC/src/common/vectors.vhdl

执行脚本的结果是:

....
press ENTER for the next step
sending 'search *.vhdl -type file'
stdoutLine='POC_BOUNDARY
'
output consumed until boundary string
....

问题:

• xtclsh 写入哪里？
• 如何读取 TCL 命令的结果？

顺便说一句:提示符号 % 对我的脚本也不可见。

<小时/>

重现该行为的 Python 代码:

import subprocess

class XilinxTCLShellProcess(object):
  # executable = "sortnet_BitonicSort_tb.exe"
  executable = r"C:\Xilinx\14.7\ISE_DS\ISE\bin\nt64\xtclsh.exe"
  boundarString = "POC_BOUNDARY"
  boundarCommand = bytearray("puts {0}\n".format(boundarString), "ascii")

  def create(self, arguments):
    sysargs = []
    sysargs.append(self.executable)

    self.proc = subprocess.Popen(sysargs, stdin=subprocess.PIPE, stdout=subprocess.PIPE, stderr=subprocess.STDOUT)
    self.sendBoundardCommand()

    while(True):
      stdoutLine = self.proc.stdout.readline().decode()
      if (self.boundarString in stdoutLine):
        break
    print("found boundary string")

  def terminate(self):
    self.proc.terminate()

  def sendBoundardCommand(self):
    self.proc.stdin.write(self.boundarCommand)
    self.proc.stdin.flush()

  def sendCommand(self, line):
    command = bytearray("{0}\n".format(line), "ascii")
    self.proc.stdin.write(command)
    self.sendBoundardCommand()

  def sendLine(self, line):
    self.sendCommand(line)

    while(True):
      stdoutLine = self.proc.stdout.readline().decode()
      print("stdoutLine='{0}'".format(stdoutLine))
      if (stdoutLine == ""):
        print("reached EOF in stdout")
        break
      elif ("vhdl" in stdoutLine):
        print("found a file name")
      elif (self.boundarString in stdoutLine):
        print("output consumed until boundary string")
        break

def main():
  print("creating 'XilinxTCLShellProcess' instance")
  xtcl = XilinxTCLShellProcess()

  print("launching process")
  arguments = []
  xtcl.create(arguments)

  i = 1
  while True:
    print("press ENTER for the next step")
    from msvcrt import getch
    from time import sleep
    sleep(0.1)  # 0.1 seconds

    key = ord(getch())
    if key == 27:    # ESC
      print("aborting")
      print("sending 'exit'")
      xtcl.sendLine("exit")
      break
    elif key == 13: # ENTER
      if (i == 1):
        #print("sending 'project new test.xise'")
        #xtcl.sendLine("project new test.xise")
        print("sending 'project open PoCTest.xise'")
        xtcl.sendLine("project open PoCTest.xise")
        i += 1
      elif (i == 2):
        print("sending 'lib_vhdl get PoC files'")
        xtcl.sendLine("lib_vhdl get PoC files")
        i += 1
      elif (i == 3):
        print("sending 'search *.vhdl -type file'")
        xtcl.sendLine("search *.vhdl -type file")
        i += 1
      elif (i == 4):
        print("sending 'xfile add ../../src/common/strings.vhdl -lib_vhdl PoC -view ALL'")
        xtcl.sendLine("xfile add ../../src/common/strings.vhdl -lib_vhdl PoC -view ALL")
        i += 16
      elif (i == 20):
        print("sending 'project close'")
        xtcl.sendLine("project close")
        i += 1
      elif (i == 21):
        print("sending 'exit'")
        xtcl.sendCommand("exit")
        break

  print("exit main()")
  xtcl.terminate()

  print("the end!")

# entry point
if __name__ == "__main__":
  main()

Answer 1

我在 Linux 上尝试了几种方法，但 xtclsh 似乎会检测标准输入是否连接到管道或(伪)终端。如果它连接到管道，xtclsh 会抑制通常写入标准输出的任何输出(提示输出、命令结果)。我认为，这同样适用于 Windows。

即使输入连接到管道，在标准错误上打印的消息(无论是信息性的、警告性的还是错误性的)仍然会出现。

要在标准输出上打印消息，您可以使用 puts tcl 命令始终在标准输出上打印。即puts [command]接受标准输出 command并始终将其打印到标准输出。

示例:假设我们有 test.xise具有两个文件的项目: test.vhd 中的顶级实体以及 test_tb.vhd 中的测试平台。并且，我们希望使用此 tcl 脚本列出项目中的所有文件 ( commands.tcl ):

puts [project open test]
puts "-----------------------------------------------------------------------"
puts [search *.vhd]
exit

然后调用xtclsh < commands.tcl 2> error.log在标准输出上打印此内容:

test
-----------------------------------------------------------------------
/home/zabel/tmp/test/test.vhd
/home/zabel/tmp/test/test_tb.vhd

这会打印在标准错误上(到文件 error.log 中):

INFO:HDLCompiler:1061 - Parsing VHDL file "/home/zabel/tmp/test/test.vhd" into
   library work
INFO:ProjectMgmt - Parsing design hierarchy completed successfully.