Mercurial > hgbook
annotate en/examples/run-example @ 78:a893de25bc24
Add -v option to run-example, to assist with debugging example scripts.
author | Bryan O'Sullivan <bos@serpentine.com> |
---|---|
date | Mon, 04 Sep 2006 14:20:05 -0700 |
parents | 773f4a9e7975 |
children | 53427f786a0f |
rev | line source |
---|---|
67
a2f0b010d6e3
Don't assume that python is in /usr/bin.
Bryan O'Sullivan <bos@serpentine.com>
parents:
45
diff
changeset
|
1 #!/usr/bin/env python |
4
33a2e7b9978d
Make it possible to include example input and output from real programs.
Bryan O'Sullivan <bos@serpentine.com>
parents:
3
diff
changeset
|
2 # |
33a2e7b9978d
Make it possible to include example input and output from real programs.
Bryan O'Sullivan <bos@serpentine.com>
parents:
3
diff
changeset
|
3 # This program takes something that resembles a shell script and runs |
33a2e7b9978d
Make it possible to include example input and output from real programs.
Bryan O'Sullivan <bos@serpentine.com>
parents:
3
diff
changeset
|
4 # it, spitting input (commands from the script) and output into text |
33a2e7b9978d
Make it possible to include example input and output from real programs.
Bryan O'Sullivan <bos@serpentine.com>
parents:
3
diff
changeset
|
5 # files, for use in examples. |
3
906d9021f9e5
Making progress on autogenerated example output.
Bryan O'Sullivan <bos@serpentine.com>
parents:
diff
changeset
|
6 |
906d9021f9e5
Making progress on autogenerated example output.
Bryan O'Sullivan <bos@serpentine.com>
parents:
diff
changeset
|
7 import cStringIO |
73
9604dd885616
Fix run-example script on Debian.
Bryan O'Sullivan <bos@serpentine.com>
parents:
72
diff
changeset
|
8 import errno |
78
a893de25bc24
Add -v option to run-example, to assist with debugging example scripts.
Bryan O'Sullivan <bos@serpentine.com>
parents:
77
diff
changeset
|
9 import getopt |
3
906d9021f9e5
Making progress on autogenerated example output.
Bryan O'Sullivan <bos@serpentine.com>
parents:
diff
changeset
|
10 import os |
906d9021f9e5
Making progress on autogenerated example output.
Bryan O'Sullivan <bos@serpentine.com>
parents:
diff
changeset
|
11 import pty |
906d9021f9e5
Making progress on autogenerated example output.
Bryan O'Sullivan <bos@serpentine.com>
parents:
diff
changeset
|
12 import re |
4
33a2e7b9978d
Make it possible to include example input and output from real programs.
Bryan O'Sullivan <bos@serpentine.com>
parents:
3
diff
changeset
|
13 import shutil |
6
69d90ab9fd80
Really run example command sequences under a single shell.
Bryan O'Sullivan <bos@serpentine.com>
parents:
4
diff
changeset
|
14 import signal |
36
5cee64874312
Require examples to be executable, so it's easier to see them with "ls".
Bryan O'Sullivan <bos@serpentine.com>
parents:
24
diff
changeset
|
15 import stat |
3
906d9021f9e5
Making progress on autogenerated example output.
Bryan O'Sullivan <bos@serpentine.com>
parents:
diff
changeset
|
16 import sys |
4
33a2e7b9978d
Make it possible to include example input and output from real programs.
Bryan O'Sullivan <bos@serpentine.com>
parents:
3
diff
changeset
|
17 import tempfile |
33a2e7b9978d
Make it possible to include example input and output from real programs.
Bryan O'Sullivan <bos@serpentine.com>
parents:
3
diff
changeset
|
18 import time |
3
906d9021f9e5
Making progress on autogenerated example output.
Bryan O'Sullivan <bos@serpentine.com>
parents:
diff
changeset
|
19 |
77
773f4a9e7975
Fix escaping of backslashes. Finally!
Bryan O'Sullivan <bos@serpentine.com>
parents:
75
diff
changeset
|
20 tex_subs = { |
773f4a9e7975
Fix escaping of backslashes. Finally!
Bryan O'Sullivan <bos@serpentine.com>
parents:
75
diff
changeset
|
21 '\\': '\\textbackslash{}', |
773f4a9e7975
Fix escaping of backslashes. Finally!
Bryan O'Sullivan <bos@serpentine.com>
parents:
75
diff
changeset
|
22 '{': '\\{', |
773f4a9e7975
Fix escaping of backslashes. Finally!
Bryan O'Sullivan <bos@serpentine.com>
parents:
75
diff
changeset
|
23 '}': '\\}', |
773f4a9e7975
Fix escaping of backslashes. Finally!
Bryan O'Sullivan <bos@serpentine.com>
parents:
75
diff
changeset
|
24 } |
773f4a9e7975
Fix escaping of backslashes. Finally!
Bryan O'Sullivan <bos@serpentine.com>
parents:
75
diff
changeset
|
25 |
773f4a9e7975
Fix escaping of backslashes. Finally!
Bryan O'Sullivan <bos@serpentine.com>
parents:
75
diff
changeset
|
26 def gensubs(s): |
773f4a9e7975
Fix escaping of backslashes. Finally!
Bryan O'Sullivan <bos@serpentine.com>
parents:
75
diff
changeset
|
27 start = 0 |
773f4a9e7975
Fix escaping of backslashes. Finally!
Bryan O'Sullivan <bos@serpentine.com>
parents:
75
diff
changeset
|
28 for i, c in enumerate(s): |
773f4a9e7975
Fix escaping of backslashes. Finally!
Bryan O'Sullivan <bos@serpentine.com>
parents:
75
diff
changeset
|
29 sub = tex_subs.get(c) |
773f4a9e7975
Fix escaping of backslashes. Finally!
Bryan O'Sullivan <bos@serpentine.com>
parents:
75
diff
changeset
|
30 if sub: |
773f4a9e7975
Fix escaping of backslashes. Finally!
Bryan O'Sullivan <bos@serpentine.com>
parents:
75
diff
changeset
|
31 yield s[start:i] |
773f4a9e7975
Fix escaping of backslashes. Finally!
Bryan O'Sullivan <bos@serpentine.com>
parents:
75
diff
changeset
|
32 start = i + 1 |
773f4a9e7975
Fix escaping of backslashes. Finally!
Bryan O'Sullivan <bos@serpentine.com>
parents:
75
diff
changeset
|
33 yield sub |
773f4a9e7975
Fix escaping of backslashes. Finally!
Bryan O'Sullivan <bos@serpentine.com>
parents:
75
diff
changeset
|
34 yield s[start:] |
773f4a9e7975
Fix escaping of backslashes. Finally!
Bryan O'Sullivan <bos@serpentine.com>
parents:
75
diff
changeset
|
35 |
4
33a2e7b9978d
Make it possible to include example input and output from real programs.
Bryan O'Sullivan <bos@serpentine.com>
parents:
3
diff
changeset
|
36 def tex_escape(s): |
77
773f4a9e7975
Fix escaping of backslashes. Finally!
Bryan O'Sullivan <bos@serpentine.com>
parents:
75
diff
changeset
|
37 return ''.join(gensubs(s)) |
4
33a2e7b9978d
Make it possible to include example input and output from real programs.
Bryan O'Sullivan <bos@serpentine.com>
parents:
3
diff
changeset
|
38 |
3
906d9021f9e5
Making progress on autogenerated example output.
Bryan O'Sullivan <bos@serpentine.com>
parents:
diff
changeset
|
39 class example: |
70
365b41b6a15e
bash is not necessarily in /bin.
Bryan O'Sullivan <bos@serpentine.com>
parents:
68
diff
changeset
|
40 shell = '/usr/bin/env bash' |
73
9604dd885616
Fix run-example script on Debian.
Bryan O'Sullivan <bos@serpentine.com>
parents:
72
diff
changeset
|
41 prompt = '__run_example_prompt__ ' |
71
ddf533d41c09
Propagate errors correctly.
Bryan O'Sullivan <bos@serpentine.com>
parents:
70
diff
changeset
|
42 pi_re = re.compile(r'#\$\s*(name):\s*(.*)$') |
4
33a2e7b9978d
Make it possible to include example input and output from real programs.
Bryan O'Sullivan <bos@serpentine.com>
parents:
3
diff
changeset
|
43 |
78
a893de25bc24
Add -v option to run-example, to assist with debugging example scripts.
Bryan O'Sullivan <bos@serpentine.com>
parents:
77
diff
changeset
|
44 def __init__(self, name, verbose): |
3
906d9021f9e5
Making progress on autogenerated example output.
Bryan O'Sullivan <bos@serpentine.com>
parents:
diff
changeset
|
45 self.name = name |
78
a893de25bc24
Add -v option to run-example, to assist with debugging example scripts.
Bryan O'Sullivan <bos@serpentine.com>
parents:
77
diff
changeset
|
46 self.verbose = verbose |
3
906d9021f9e5
Making progress on autogenerated example output.
Bryan O'Sullivan <bos@serpentine.com>
parents:
diff
changeset
|
47 |
906d9021f9e5
Making progress on autogenerated example output.
Bryan O'Sullivan <bos@serpentine.com>
parents:
diff
changeset
|
48 def parse(self): |
4
33a2e7b9978d
Make it possible to include example input and output from real programs.
Bryan O'Sullivan <bos@serpentine.com>
parents:
3
diff
changeset
|
49 '''yield each hunk of input from the file.''' |
3
906d9021f9e5
Making progress on autogenerated example output.
Bryan O'Sullivan <bos@serpentine.com>
parents:
diff
changeset
|
50 fp = open(self.name) |
906d9021f9e5
Making progress on autogenerated example output.
Bryan O'Sullivan <bos@serpentine.com>
parents:
diff
changeset
|
51 cfp = cStringIO.StringIO() |
906d9021f9e5
Making progress on autogenerated example output.
Bryan O'Sullivan <bos@serpentine.com>
parents:
diff
changeset
|
52 for line in fp: |
906d9021f9e5
Making progress on autogenerated example output.
Bryan O'Sullivan <bos@serpentine.com>
parents:
diff
changeset
|
53 cfp.write(line) |
906d9021f9e5
Making progress on autogenerated example output.
Bryan O'Sullivan <bos@serpentine.com>
parents:
diff
changeset
|
54 if not line.rstrip().endswith('\\'): |
906d9021f9e5
Making progress on autogenerated example output.
Bryan O'Sullivan <bos@serpentine.com>
parents:
diff
changeset
|
55 yield cfp.getvalue() |
906d9021f9e5
Making progress on autogenerated example output.
Bryan O'Sullivan <bos@serpentine.com>
parents:
diff
changeset
|
56 cfp.seek(0) |
906d9021f9e5
Making progress on autogenerated example output.
Bryan O'Sullivan <bos@serpentine.com>
parents:
diff
changeset
|
57 cfp.truncate() |
906d9021f9e5
Making progress on autogenerated example output.
Bryan O'Sullivan <bos@serpentine.com>
parents:
diff
changeset
|
58 |
906d9021f9e5
Making progress on autogenerated example output.
Bryan O'Sullivan <bos@serpentine.com>
parents:
diff
changeset
|
59 def status(self, s): |
906d9021f9e5
Making progress on autogenerated example output.
Bryan O'Sullivan <bos@serpentine.com>
parents:
diff
changeset
|
60 sys.stdout.write(s) |
906d9021f9e5
Making progress on autogenerated example output.
Bryan O'Sullivan <bos@serpentine.com>
parents:
diff
changeset
|
61 if not s.endswith('\n'): |
906d9021f9e5
Making progress on autogenerated example output.
Bryan O'Sullivan <bos@serpentine.com>
parents:
diff
changeset
|
62 sys.stdout.flush() |
906d9021f9e5
Making progress on autogenerated example output.
Bryan O'Sullivan <bos@serpentine.com>
parents:
diff
changeset
|
63 |
6
69d90ab9fd80
Really run example command sequences under a single shell.
Bryan O'Sullivan <bos@serpentine.com>
parents:
4
diff
changeset
|
64 def send(self, s): |
78
a893de25bc24
Add -v option to run-example, to assist with debugging example scripts.
Bryan O'Sullivan <bos@serpentine.com>
parents:
77
diff
changeset
|
65 if self.verbose: |
a893de25bc24
Add -v option to run-example, to assist with debugging example scripts.
Bryan O'Sullivan <bos@serpentine.com>
parents:
77
diff
changeset
|
66 print >> sys.stderr, '>', self.debugrepr(s) |
73
9604dd885616
Fix run-example script on Debian.
Bryan O'Sullivan <bos@serpentine.com>
parents:
72
diff
changeset
|
67 while s: |
9604dd885616
Fix run-example script on Debian.
Bryan O'Sullivan <bos@serpentine.com>
parents:
72
diff
changeset
|
68 count = os.write(self.cfd, s) |
9604dd885616
Fix run-example script on Debian.
Bryan O'Sullivan <bos@serpentine.com>
parents:
72
diff
changeset
|
69 s = s[count:] |
6
69d90ab9fd80
Really run example command sequences under a single shell.
Bryan O'Sullivan <bos@serpentine.com>
parents:
4
diff
changeset
|
70 |
78
a893de25bc24
Add -v option to run-example, to assist with debugging example scripts.
Bryan O'Sullivan <bos@serpentine.com>
parents:
77
diff
changeset
|
71 def debugrepr(self, s): |
a893de25bc24
Add -v option to run-example, to assist with debugging example scripts.
Bryan O'Sullivan <bos@serpentine.com>
parents:
77
diff
changeset
|
72 rs = repr(s) |
a893de25bc24
Add -v option to run-example, to assist with debugging example scripts.
Bryan O'Sullivan <bos@serpentine.com>
parents:
77
diff
changeset
|
73 limit = 60 |
a893de25bc24
Add -v option to run-example, to assist with debugging example scripts.
Bryan O'Sullivan <bos@serpentine.com>
parents:
77
diff
changeset
|
74 if len(rs) > limit: |
a893de25bc24
Add -v option to run-example, to assist with debugging example scripts.
Bryan O'Sullivan <bos@serpentine.com>
parents:
77
diff
changeset
|
75 return ('%s%s ... [%d bytes]' % (rs[:limit], rs[0], len(s))) |
a893de25bc24
Add -v option to run-example, to assist with debugging example scripts.
Bryan O'Sullivan <bos@serpentine.com>
parents:
77
diff
changeset
|
76 else: |
a893de25bc24
Add -v option to run-example, to assist with debugging example scripts.
Bryan O'Sullivan <bos@serpentine.com>
parents:
77
diff
changeset
|
77 return rs |
a893de25bc24
Add -v option to run-example, to assist with debugging example scripts.
Bryan O'Sullivan <bos@serpentine.com>
parents:
77
diff
changeset
|
78 |
6
69d90ab9fd80
Really run example command sequences under a single shell.
Bryan O'Sullivan <bos@serpentine.com>
parents:
4
diff
changeset
|
79 def receive(self): |
69d90ab9fd80
Really run example command sequences under a single shell.
Bryan O'Sullivan <bos@serpentine.com>
parents:
4
diff
changeset
|
80 out = cStringIO.StringIO() |
4
33a2e7b9978d
Make it possible to include example input and output from real programs.
Bryan O'Sullivan <bos@serpentine.com>
parents:
3
diff
changeset
|
81 while True: |
73
9604dd885616
Fix run-example script on Debian.
Bryan O'Sullivan <bos@serpentine.com>
parents:
72
diff
changeset
|
82 try: |
78
a893de25bc24
Add -v option to run-example, to assist with debugging example scripts.
Bryan O'Sullivan <bos@serpentine.com>
parents:
77
diff
changeset
|
83 if self.verbose: |
a893de25bc24
Add -v option to run-example, to assist with debugging example scripts.
Bryan O'Sullivan <bos@serpentine.com>
parents:
77
diff
changeset
|
84 sys.stderr.write('< ') |
73
9604dd885616
Fix run-example script on Debian.
Bryan O'Sullivan <bos@serpentine.com>
parents:
72
diff
changeset
|
85 s = os.read(self.cfd, 1024) |
9604dd885616
Fix run-example script on Debian.
Bryan O'Sullivan <bos@serpentine.com>
parents:
72
diff
changeset
|
86 except OSError, err: |
9604dd885616
Fix run-example script on Debian.
Bryan O'Sullivan <bos@serpentine.com>
parents:
72
diff
changeset
|
87 if err.errno == errno.EIO: |
9604dd885616
Fix run-example script on Debian.
Bryan O'Sullivan <bos@serpentine.com>
parents:
72
diff
changeset
|
88 return '' |
9604dd885616
Fix run-example script on Debian.
Bryan O'Sullivan <bos@serpentine.com>
parents:
72
diff
changeset
|
89 raise |
78
a893de25bc24
Add -v option to run-example, to assist with debugging example scripts.
Bryan O'Sullivan <bos@serpentine.com>
parents:
77
diff
changeset
|
90 if self.verbose: |
a893de25bc24
Add -v option to run-example, to assist with debugging example scripts.
Bryan O'Sullivan <bos@serpentine.com>
parents:
77
diff
changeset
|
91 print >> sys.stderr, self.debugrepr(s) |
6
69d90ab9fd80
Really run example command sequences under a single shell.
Bryan O'Sullivan <bos@serpentine.com>
parents:
4
diff
changeset
|
92 out.write(s) |
73
9604dd885616
Fix run-example script on Debian.
Bryan O'Sullivan <bos@serpentine.com>
parents:
72
diff
changeset
|
93 s = out.getvalue() |
9604dd885616
Fix run-example script on Debian.
Bryan O'Sullivan <bos@serpentine.com>
parents:
72
diff
changeset
|
94 if s.endswith(self.prompt): |
9604dd885616
Fix run-example script on Debian.
Bryan O'Sullivan <bos@serpentine.com>
parents:
72
diff
changeset
|
95 return s.replace('\r\n', '\n')[:-len(self.prompt)] |
4
33a2e7b9978d
Make it possible to include example input and output from real programs.
Bryan O'Sullivan <bos@serpentine.com>
parents:
3
diff
changeset
|
96 |
6
69d90ab9fd80
Really run example command sequences under a single shell.
Bryan O'Sullivan <bos@serpentine.com>
parents:
4
diff
changeset
|
97 def sendreceive(self, s): |
69d90ab9fd80
Really run example command sequences under a single shell.
Bryan O'Sullivan <bos@serpentine.com>
parents:
4
diff
changeset
|
98 self.send(s) |
69d90ab9fd80
Really run example command sequences under a single shell.
Bryan O'Sullivan <bos@serpentine.com>
parents:
4
diff
changeset
|
99 r = self.receive() |
69d90ab9fd80
Really run example command sequences under a single shell.
Bryan O'Sullivan <bos@serpentine.com>
parents:
4
diff
changeset
|
100 if r.startswith(s): |
69d90ab9fd80
Really run example command sequences under a single shell.
Bryan O'Sullivan <bos@serpentine.com>
parents:
4
diff
changeset
|
101 r = r[len(s):] |
69d90ab9fd80
Really run example command sequences under a single shell.
Bryan O'Sullivan <bos@serpentine.com>
parents:
4
diff
changeset
|
102 return r |
69d90ab9fd80
Really run example command sequences under a single shell.
Bryan O'Sullivan <bos@serpentine.com>
parents:
4
diff
changeset
|
103 |
3
906d9021f9e5
Making progress on autogenerated example output.
Bryan O'Sullivan <bos@serpentine.com>
parents:
diff
changeset
|
104 def run(self): |
906d9021f9e5
Making progress on autogenerated example output.
Bryan O'Sullivan <bos@serpentine.com>
parents:
diff
changeset
|
105 ofp = None |
4
33a2e7b9978d
Make it possible to include example input and output from real programs.
Bryan O'Sullivan <bos@serpentine.com>
parents:
3
diff
changeset
|
106 basename = os.path.basename(self.name) |
33a2e7b9978d
Make it possible to include example input and output from real programs.
Bryan O'Sullivan <bos@serpentine.com>
parents:
3
diff
changeset
|
107 self.status('running %s ' % basename) |
33a2e7b9978d
Make it possible to include example input and output from real programs.
Bryan O'Sullivan <bos@serpentine.com>
parents:
3
diff
changeset
|
108 tmpdir = tempfile.mkdtemp(prefix=basename) |
78
a893de25bc24
Add -v option to run-example, to assist with debugging example scripts.
Bryan O'Sullivan <bos@serpentine.com>
parents:
77
diff
changeset
|
109 |
a893de25bc24
Add -v option to run-example, to assist with debugging example scripts.
Bryan O'Sullivan <bos@serpentine.com>
parents:
77
diff
changeset
|
110 rcfile = os.path.join(tmpdir, '.hgrc') |
a893de25bc24
Add -v option to run-example, to assist with debugging example scripts.
Bryan O'Sullivan <bos@serpentine.com>
parents:
77
diff
changeset
|
111 rcfp = open(rcfile, 'w') |
a893de25bc24
Add -v option to run-example, to assist with debugging example scripts.
Bryan O'Sullivan <bos@serpentine.com>
parents:
77
diff
changeset
|
112 print >> rcfp, '[ui]' |
a893de25bc24
Add -v option to run-example, to assist with debugging example scripts.
Bryan O'Sullivan <bos@serpentine.com>
parents:
77
diff
changeset
|
113 print >> rcfp, "username = Bryan O'Sullivan <bos@serpentine.com>" |
a893de25bc24
Add -v option to run-example, to assist with debugging example scripts.
Bryan O'Sullivan <bos@serpentine.com>
parents:
77
diff
changeset
|
114 |
6
69d90ab9fd80
Really run example command sequences under a single shell.
Bryan O'Sullivan <bos@serpentine.com>
parents:
4
diff
changeset
|
115 rcfile = os.path.join(tmpdir, '.bashrc') |
69d90ab9fd80
Really run example command sequences under a single shell.
Bryan O'Sullivan <bos@serpentine.com>
parents:
4
diff
changeset
|
116 rcfp = open(rcfile, 'w') |
69d90ab9fd80
Really run example command sequences under a single shell.
Bryan O'Sullivan <bos@serpentine.com>
parents:
4
diff
changeset
|
117 print >> rcfp, 'PS1="%s"' % self.prompt |
69d90ab9fd80
Really run example command sequences under a single shell.
Bryan O'Sullivan <bos@serpentine.com>
parents:
4
diff
changeset
|
118 print >> rcfp, 'unset HISTFILE' |
19
187702df428b
Piles of new content for MQ chapter - cookbook stuff.
Bryan O'Sullivan <bos@serpentine.com>
parents:
6
diff
changeset
|
119 print >> rcfp, 'export EXAMPLE_DIR="%s"' % os.getcwd() |
6
69d90ab9fd80
Really run example command sequences under a single shell.
Bryan O'Sullivan <bos@serpentine.com>
parents:
4
diff
changeset
|
120 print >> rcfp, 'export LANG=C' |
69d90ab9fd80
Really run example command sequences under a single shell.
Bryan O'Sullivan <bos@serpentine.com>
parents:
4
diff
changeset
|
121 print >> rcfp, 'export LC_ALL=C' |
69d90ab9fd80
Really run example command sequences under a single shell.
Bryan O'Sullivan <bos@serpentine.com>
parents:
4
diff
changeset
|
122 print >> rcfp, 'export TZ=GMT' |
69d90ab9fd80
Really run example command sequences under a single shell.
Bryan O'Sullivan <bos@serpentine.com>
parents:
4
diff
changeset
|
123 print >> rcfp, 'export HGRC="%s/.hgrc"' % tmpdir |
69d90ab9fd80
Really run example command sequences under a single shell.
Bryan O'Sullivan <bos@serpentine.com>
parents:
4
diff
changeset
|
124 print >> rcfp, 'export HGRCPATH=$HGRC' |
69d90ab9fd80
Really run example command sequences under a single shell.
Bryan O'Sullivan <bos@serpentine.com>
parents:
4
diff
changeset
|
125 print >> rcfp, 'cd %s' % tmpdir |
69d90ab9fd80
Really run example command sequences under a single shell.
Bryan O'Sullivan <bos@serpentine.com>
parents:
4
diff
changeset
|
126 rcfp.close() |
68
c574ce277a2b
Mostly random attempt to see if fiddling with the child will help the parent.
Bryan O'Sullivan <bos@serpentine.com>
parents:
67
diff
changeset
|
127 sys.stdout.flush() |
c574ce277a2b
Mostly random attempt to see if fiddling with the child will help the parent.
Bryan O'Sullivan <bos@serpentine.com>
parents:
67
diff
changeset
|
128 sys.stderr.flush() |
73
9604dd885616
Fix run-example script on Debian.
Bryan O'Sullivan <bos@serpentine.com>
parents:
72
diff
changeset
|
129 pid, self.cfd = pty.fork() |
6
69d90ab9fd80
Really run example command sequences under a single shell.
Bryan O'Sullivan <bos@serpentine.com>
parents:
4
diff
changeset
|
130 if pid == 0: |
70
365b41b6a15e
bash is not necessarily in /bin.
Bryan O'Sullivan <bos@serpentine.com>
parents:
68
diff
changeset
|
131 cmdline = ['/usr/bin/env', 'bash', '--noediting', '--noprofile', |
365b41b6a15e
bash is not necessarily in /bin.
Bryan O'Sullivan <bos@serpentine.com>
parents:
68
diff
changeset
|
132 '--norc'] |
68
c574ce277a2b
Mostly random attempt to see if fiddling with the child will help the parent.
Bryan O'Sullivan <bos@serpentine.com>
parents:
67
diff
changeset
|
133 try: |
c574ce277a2b
Mostly random attempt to see if fiddling with the child will help the parent.
Bryan O'Sullivan <bos@serpentine.com>
parents:
67
diff
changeset
|
134 os.execv(cmdline[0], cmdline) |
c574ce277a2b
Mostly random attempt to see if fiddling with the child will help the parent.
Bryan O'Sullivan <bos@serpentine.com>
parents:
67
diff
changeset
|
135 except OSError, err: |
c574ce277a2b
Mostly random attempt to see if fiddling with the child will help the parent.
Bryan O'Sullivan <bos@serpentine.com>
parents:
67
diff
changeset
|
136 print >> sys.stderr, '%s: %s' % (cmdline[0], err.strerror) |
c574ce277a2b
Mostly random attempt to see if fiddling with the child will help the parent.
Bryan O'Sullivan <bos@serpentine.com>
parents:
67
diff
changeset
|
137 sys.stderr.flush() |
c574ce277a2b
Mostly random attempt to see if fiddling with the child will help the parent.
Bryan O'Sullivan <bos@serpentine.com>
parents:
67
diff
changeset
|
138 os._exit(0) |
4
33a2e7b9978d
Make it possible to include example input and output from real programs.
Bryan O'Sullivan <bos@serpentine.com>
parents:
3
diff
changeset
|
139 try: |
71
ddf533d41c09
Propagate errors correctly.
Bryan O'Sullivan <bos@serpentine.com>
parents:
70
diff
changeset
|
140 try: |
73
9604dd885616
Fix run-example script on Debian.
Bryan O'Sullivan <bos@serpentine.com>
parents:
72
diff
changeset
|
141 # eat first prompt string from shell |
9604dd885616
Fix run-example script on Debian.
Bryan O'Sullivan <bos@serpentine.com>
parents:
72
diff
changeset
|
142 os.read(self.cfd, 1024) |
71
ddf533d41c09
Propagate errors correctly.
Bryan O'Sullivan <bos@serpentine.com>
parents:
70
diff
changeset
|
143 # setup env and prompt |
73
9604dd885616
Fix run-example script on Debian.
Bryan O'Sullivan <bos@serpentine.com>
parents:
72
diff
changeset
|
144 self.sendreceive('source %s\n' % rcfile) |
71
ddf533d41c09
Propagate errors correctly.
Bryan O'Sullivan <bos@serpentine.com>
parents:
70
diff
changeset
|
145 for hunk in self.parse(): |
ddf533d41c09
Propagate errors correctly.
Bryan O'Sullivan <bos@serpentine.com>
parents:
70
diff
changeset
|
146 # is this line a processing instruction? |
ddf533d41c09
Propagate errors correctly.
Bryan O'Sullivan <bos@serpentine.com>
parents:
70
diff
changeset
|
147 m = self.pi_re.match(hunk) |
ddf533d41c09
Propagate errors correctly.
Bryan O'Sullivan <bos@serpentine.com>
parents:
70
diff
changeset
|
148 if m: |
ddf533d41c09
Propagate errors correctly.
Bryan O'Sullivan <bos@serpentine.com>
parents:
70
diff
changeset
|
149 pi, rest = m.groups() |
ddf533d41c09
Propagate errors correctly.
Bryan O'Sullivan <bos@serpentine.com>
parents:
70
diff
changeset
|
150 if pi == 'name': |
ddf533d41c09
Propagate errors correctly.
Bryan O'Sullivan <bos@serpentine.com>
parents:
70
diff
changeset
|
151 self.status('.') |
ddf533d41c09
Propagate errors correctly.
Bryan O'Sullivan <bos@serpentine.com>
parents:
70
diff
changeset
|
152 out = rest |
ddf533d41c09
Propagate errors correctly.
Bryan O'Sullivan <bos@serpentine.com>
parents:
70
diff
changeset
|
153 assert os.sep not in out |
ddf533d41c09
Propagate errors correctly.
Bryan O'Sullivan <bos@serpentine.com>
parents:
70
diff
changeset
|
154 if out: |
ddf533d41c09
Propagate errors correctly.
Bryan O'Sullivan <bos@serpentine.com>
parents:
70
diff
changeset
|
155 ofp = open('%s.%s.out' % (self.name, out), 'w') |
ddf533d41c09
Propagate errors correctly.
Bryan O'Sullivan <bos@serpentine.com>
parents:
70
diff
changeset
|
156 else: |
ddf533d41c09
Propagate errors correctly.
Bryan O'Sullivan <bos@serpentine.com>
parents:
70
diff
changeset
|
157 ofp = None |
ddf533d41c09
Propagate errors correctly.
Bryan O'Sullivan <bos@serpentine.com>
parents:
70
diff
changeset
|
158 elif hunk.strip(): |
ddf533d41c09
Propagate errors correctly.
Bryan O'Sullivan <bos@serpentine.com>
parents:
70
diff
changeset
|
159 # it's something we should execute |
ddf533d41c09
Propagate errors correctly.
Bryan O'Sullivan <bos@serpentine.com>
parents:
70
diff
changeset
|
160 output = self.sendreceive(hunk) |
ddf533d41c09
Propagate errors correctly.
Bryan O'Sullivan <bos@serpentine.com>
parents:
70
diff
changeset
|
161 if not ofp: |
ddf533d41c09
Propagate errors correctly.
Bryan O'Sullivan <bos@serpentine.com>
parents:
70
diff
changeset
|
162 continue |
ddf533d41c09
Propagate errors correctly.
Bryan O'Sullivan <bos@serpentine.com>
parents:
70
diff
changeset
|
163 # first, print the command we ran |
ddf533d41c09
Propagate errors correctly.
Bryan O'Sullivan <bos@serpentine.com>
parents:
70
diff
changeset
|
164 if not hunk.startswith('#'): |
ddf533d41c09
Propagate errors correctly.
Bryan O'Sullivan <bos@serpentine.com>
parents:
70
diff
changeset
|
165 nl = hunk.endswith('\n') |
ddf533d41c09
Propagate errors correctly.
Bryan O'Sullivan <bos@serpentine.com>
parents:
70
diff
changeset
|
166 hunk = ('$ \\textbf{%s}' % |
ddf533d41c09
Propagate errors correctly.
Bryan O'Sullivan <bos@serpentine.com>
parents:
70
diff
changeset
|
167 tex_escape(hunk.rstrip('\n'))) |
ddf533d41c09
Propagate errors correctly.
Bryan O'Sullivan <bos@serpentine.com>
parents:
70
diff
changeset
|
168 if nl: hunk += '\n' |
ddf533d41c09
Propagate errors correctly.
Bryan O'Sullivan <bos@serpentine.com>
parents:
70
diff
changeset
|
169 ofp.write(hunk) |
ddf533d41c09
Propagate errors correctly.
Bryan O'Sullivan <bos@serpentine.com>
parents:
70
diff
changeset
|
170 # then its output |
ddf533d41c09
Propagate errors correctly.
Bryan O'Sullivan <bos@serpentine.com>
parents:
70
diff
changeset
|
171 ofp.write(tex_escape(output)) |
ddf533d41c09
Propagate errors correctly.
Bryan O'Sullivan <bos@serpentine.com>
parents:
70
diff
changeset
|
172 self.status('\n') |
ddf533d41c09
Propagate errors correctly.
Bryan O'Sullivan <bos@serpentine.com>
parents:
70
diff
changeset
|
173 open(self.name + '.run', 'w') |
ddf533d41c09
Propagate errors correctly.
Bryan O'Sullivan <bos@serpentine.com>
parents:
70
diff
changeset
|
174 except: |
72
12df31afb4e1
Propagate exceptions more correctly.
Bryan O'Sullivan <bos@serpentine.com>
parents:
71
diff
changeset
|
175 print >> sys.stderr, '(killed)' |
12df31afb4e1
Propagate exceptions more correctly.
Bryan O'Sullivan <bos@serpentine.com>
parents:
71
diff
changeset
|
176 os.kill(pid, signal.SIGKILL) |
12df31afb4e1
Propagate exceptions more correctly.
Bryan O'Sullivan <bos@serpentine.com>
parents:
71
diff
changeset
|
177 pid, rc = os.wait() |
71
ddf533d41c09
Propagate errors correctly.
Bryan O'Sullivan <bos@serpentine.com>
parents:
70
diff
changeset
|
178 raise |
72
12df31afb4e1
Propagate exceptions more correctly.
Bryan O'Sullivan <bos@serpentine.com>
parents:
71
diff
changeset
|
179 else: |
71
ddf533d41c09
Propagate errors correctly.
Bryan O'Sullivan <bos@serpentine.com>
parents:
70
diff
changeset
|
180 try: |
ddf533d41c09
Propagate errors correctly.
Bryan O'Sullivan <bos@serpentine.com>
parents:
70
diff
changeset
|
181 output = self.sendreceive('exit\n') |
ddf533d41c09
Propagate errors correctly.
Bryan O'Sullivan <bos@serpentine.com>
parents:
70
diff
changeset
|
182 if ofp: |
ddf533d41c09
Propagate errors correctly.
Bryan O'Sullivan <bos@serpentine.com>
parents:
70
diff
changeset
|
183 ofp.write(output) |
73
9604dd885616
Fix run-example script on Debian.
Bryan O'Sullivan <bos@serpentine.com>
parents:
72
diff
changeset
|
184 os.close(self.cfd) |
71
ddf533d41c09
Propagate errors correctly.
Bryan O'Sullivan <bos@serpentine.com>
parents:
70
diff
changeset
|
185 except IOError: |
ddf533d41c09
Propagate errors correctly.
Bryan O'Sullivan <bos@serpentine.com>
parents:
70
diff
changeset
|
186 pass |
72
12df31afb4e1
Propagate exceptions more correctly.
Bryan O'Sullivan <bos@serpentine.com>
parents:
71
diff
changeset
|
187 os.kill(pid, signal.SIGTERM) |
12df31afb4e1
Propagate exceptions more correctly.
Bryan O'Sullivan <bos@serpentine.com>
parents:
71
diff
changeset
|
188 pid, rc = os.wait() |
12df31afb4e1
Propagate exceptions more correctly.
Bryan O'Sullivan <bos@serpentine.com>
parents:
71
diff
changeset
|
189 if rc: |
12df31afb4e1
Propagate exceptions more correctly.
Bryan O'Sullivan <bos@serpentine.com>
parents:
71
diff
changeset
|
190 if os.WIFEXITED(rc): |
12df31afb4e1
Propagate exceptions more correctly.
Bryan O'Sullivan <bos@serpentine.com>
parents:
71
diff
changeset
|
191 print >> sys.stderr, '(exit %s)' % os.WEXITSTATUS(rc) |
12df31afb4e1
Propagate exceptions more correctly.
Bryan O'Sullivan <bos@serpentine.com>
parents:
71
diff
changeset
|
192 elif os.WIFSIGNALED(rc): |
12df31afb4e1
Propagate exceptions more correctly.
Bryan O'Sullivan <bos@serpentine.com>
parents:
71
diff
changeset
|
193 print >> sys.stderr, '(signal %s)' % os.WTERMSIG(rc) |
12df31afb4e1
Propagate exceptions more correctly.
Bryan O'Sullivan <bos@serpentine.com>
parents:
71
diff
changeset
|
194 return rc |
12df31afb4e1
Propagate exceptions more correctly.
Bryan O'Sullivan <bos@serpentine.com>
parents:
71
diff
changeset
|
195 finally: |
4
33a2e7b9978d
Make it possible to include example input and output from real programs.
Bryan O'Sullivan <bos@serpentine.com>
parents:
3
diff
changeset
|
196 shutil.rmtree(tmpdir) |
3
906d9021f9e5
Making progress on autogenerated example output.
Bryan O'Sullivan <bos@serpentine.com>
parents:
diff
changeset
|
197 |
906d9021f9e5
Making progress on autogenerated example output.
Bryan O'Sullivan <bos@serpentine.com>
parents:
diff
changeset
|
198 def main(path='.'): |
78
a893de25bc24
Add -v option to run-example, to assist with debugging example scripts.
Bryan O'Sullivan <bos@serpentine.com>
parents:
77
diff
changeset
|
199 opts, args = getopt.getopt(sys.argv[1:], 'v', ['verbose']) |
a893de25bc24
Add -v option to run-example, to assist with debugging example scripts.
Bryan O'Sullivan <bos@serpentine.com>
parents:
77
diff
changeset
|
200 verbose = False |
a893de25bc24
Add -v option to run-example, to assist with debugging example scripts.
Bryan O'Sullivan <bos@serpentine.com>
parents:
77
diff
changeset
|
201 for o, a in opts: |
a893de25bc24
Add -v option to run-example, to assist with debugging example scripts.
Bryan O'Sullivan <bos@serpentine.com>
parents:
77
diff
changeset
|
202 if o in ('-v', '--verbose'): |
a893de25bc24
Add -v option to run-example, to assist with debugging example scripts.
Bryan O'Sullivan <bos@serpentine.com>
parents:
77
diff
changeset
|
203 verbose = True |
71
ddf533d41c09
Propagate errors correctly.
Bryan O'Sullivan <bos@serpentine.com>
parents:
70
diff
changeset
|
204 errs = 0 |
3
906d9021f9e5
Making progress on autogenerated example output.
Bryan O'Sullivan <bos@serpentine.com>
parents:
diff
changeset
|
205 if args: |
906d9021f9e5
Making progress on autogenerated example output.
Bryan O'Sullivan <bos@serpentine.com>
parents:
diff
changeset
|
206 for a in args: |
75
2bfa2499e971
Make run-example print better error messages when things go wrong.
Bryan O'Sullivan <bos@serpentine.com>
parents:
73
diff
changeset
|
207 try: |
2bfa2499e971
Make run-example print better error messages when things go wrong.
Bryan O'Sullivan <bos@serpentine.com>
parents:
73
diff
changeset
|
208 st = os.lstat(a) |
2bfa2499e971
Make run-example print better error messages when things go wrong.
Bryan O'Sullivan <bos@serpentine.com>
parents:
73
diff
changeset
|
209 except OSError, err: |
2bfa2499e971
Make run-example print better error messages when things go wrong.
Bryan O'Sullivan <bos@serpentine.com>
parents:
73
diff
changeset
|
210 print >> sys.stderr, '%s: %s' % (a, err.strerror) |
2bfa2499e971
Make run-example print better error messages when things go wrong.
Bryan O'Sullivan <bos@serpentine.com>
parents:
73
diff
changeset
|
211 errs += 1 |
2bfa2499e971
Make run-example print better error messages when things go wrong.
Bryan O'Sullivan <bos@serpentine.com>
parents:
73
diff
changeset
|
212 continue |
2bfa2499e971
Make run-example print better error messages when things go wrong.
Bryan O'Sullivan <bos@serpentine.com>
parents:
73
diff
changeset
|
213 if stat.S_ISREG(st.st_mode) and st.st_mode & 0111: |
78
a893de25bc24
Add -v option to run-example, to assist with debugging example scripts.
Bryan O'Sullivan <bos@serpentine.com>
parents:
77
diff
changeset
|
214 if example(a, verbose).run(): |
75
2bfa2499e971
Make run-example print better error messages when things go wrong.
Bryan O'Sullivan <bos@serpentine.com>
parents:
73
diff
changeset
|
215 errs += 1 |
2bfa2499e971
Make run-example print better error messages when things go wrong.
Bryan O'Sullivan <bos@serpentine.com>
parents:
73
diff
changeset
|
216 else: |
2bfa2499e971
Make run-example print better error messages when things go wrong.
Bryan O'Sullivan <bos@serpentine.com>
parents:
73
diff
changeset
|
217 print >> sys.stderr, '%s: not a file, or not executable' % a |
71
ddf533d41c09
Propagate errors correctly.
Bryan O'Sullivan <bos@serpentine.com>
parents:
70
diff
changeset
|
218 errs += 1 |
ddf533d41c09
Propagate errors correctly.
Bryan O'Sullivan <bos@serpentine.com>
parents:
70
diff
changeset
|
219 return errs |
3
906d9021f9e5
Making progress on autogenerated example output.
Bryan O'Sullivan <bos@serpentine.com>
parents:
diff
changeset
|
220 for name in os.listdir(path): |
906d9021f9e5
Making progress on autogenerated example output.
Bryan O'Sullivan <bos@serpentine.com>
parents:
diff
changeset
|
221 if name == 'run-example' or name.startswith('.'): continue |
906d9021f9e5
Making progress on autogenerated example output.
Bryan O'Sullivan <bos@serpentine.com>
parents:
diff
changeset
|
222 if name.endswith('.out') or name.endswith('~'): continue |
45
6b7b0339e7d6
Don't rerun examples unnecessarily.
Bryan O'Sullivan <bos@serpentine.com>
parents:
36
diff
changeset
|
223 if name.endswith('.run'): continue |
19
187702df428b
Piles of new content for MQ chapter - cookbook stuff.
Bryan O'Sullivan <bos@serpentine.com>
parents:
6
diff
changeset
|
224 pathname = os.path.join(path, name) |
36
5cee64874312
Require examples to be executable, so it's easier to see them with "ls".
Bryan O'Sullivan <bos@serpentine.com>
parents:
24
diff
changeset
|
225 st = os.lstat(pathname) |
5cee64874312
Require examples to be executable, so it's easier to see them with "ls".
Bryan O'Sullivan <bos@serpentine.com>
parents:
24
diff
changeset
|
226 if stat.S_ISREG(st.st_mode) and st.st_mode & 0111: |
78
a893de25bc24
Add -v option to run-example, to assist with debugging example scripts.
Bryan O'Sullivan <bos@serpentine.com>
parents:
77
diff
changeset
|
227 if example(pathname, verbose).run(): |
71
ddf533d41c09
Propagate errors correctly.
Bryan O'Sullivan <bos@serpentine.com>
parents:
70
diff
changeset
|
228 errs += 1 |
4
33a2e7b9978d
Make it possible to include example input and output from real programs.
Bryan O'Sullivan <bos@serpentine.com>
parents:
3
diff
changeset
|
229 print >> open(os.path.join(path, '.run'), 'w'), time.asctime() |
71
ddf533d41c09
Propagate errors correctly.
Bryan O'Sullivan <bos@serpentine.com>
parents:
70
diff
changeset
|
230 return errs |
3
906d9021f9e5
Making progress on autogenerated example output.
Bryan O'Sullivan <bos@serpentine.com>
parents:
diff
changeset
|
231 |
906d9021f9e5
Making progress on autogenerated example output.
Bryan O'Sullivan <bos@serpentine.com>
parents:
diff
changeset
|
232 if __name__ == '__main__': |
71
ddf533d41c09
Propagate errors correctly.
Bryan O'Sullivan <bos@serpentine.com>
parents:
70
diff
changeset
|
233 sys.exit(main()) |