Line data Source code
1 : /*-------------------------------------------------------------------------
2 : *
3 : * pg_regress_ecpg --- regression test driver for ecpg
4 : *
5 : * This is a C implementation of the previous shell script for running
6 : * the regression tests, and should be mostly compatible with it.
7 : * Initial author of C translation: Magnus Hagander
8 : *
9 : * This code is released under the terms of the PostgreSQL License.
10 : *
11 : * Portions Copyright (c) 1996-2026, PostgreSQL Global Development Group
12 : * Portions Copyright (c) 1994, Regents of the University of California
13 : *
14 : * src/interfaces/ecpg/test/pg_regress_ecpg.c
15 : *
16 : *-------------------------------------------------------------------------
17 : */
18 :
19 : #include "postgres_fe.h"
20 :
21 : #include "common/string.h"
22 : #include "lib/stringinfo.h"
23 : #include "pg_regress.h"
24 :
25 :
26 : /*
27 : * Create a filtered copy of sourcefile, removing any path
28 : * appearing in #line directives; for example, replace
29 : * #line x "./../bla/foo.h" with #line x "foo.h".
30 : * This is needed because the path part can vary depending
31 : * on compiler, platform, build options, etc.
32 : */
33 : static void
34 131 : ecpg_filter_source(const char *sourcefile, const char *outfile)
35 : {
36 : FILE *s,
37 : *t;
38 : StringInfoData linebuf;
39 :
40 131 : s = fopen(sourcefile, "r");
41 131 : if (!s)
42 : {
43 0 : fprintf(stderr, "Could not open file %s for reading\n", sourcefile);
44 0 : exit(2);
45 : }
46 131 : t = fopen(outfile, "w");
47 131 : if (!t)
48 : {
49 0 : fprintf(stderr, "Could not open file %s for writing\n", outfile);
50 0 : exit(2);
51 : }
52 :
53 131 : initStringInfo(&linebuf);
54 :
55 34767 : while (pg_get_line_buf(s, &linebuf))
56 : {
57 : /* check for "#line " in the beginning */
58 34636 : if (strstr(linebuf.data, "#line ") == linebuf.data)
59 : {
60 5731 : char *p = strchr(linebuf.data, '"');
61 5731 : int plen = 1;
62 :
63 7209 : while (*p && (*(p + plen) == '.' || strchr(p + plen, '/') != NULL))
64 : {
65 1478 : plen++;
66 : }
67 : /* plen is one more than the number of . and / characters */
68 5731 : if (plen > 1)
69 : {
70 206 : memmove(p + 1, p + plen, strlen(p + plen) + 1);
71 : /* we don't bother to fix up linebuf.len */
72 : }
73 : }
74 34636 : fputs(linebuf.data, t);
75 : }
76 :
77 131 : pfree(linebuf.data);
78 131 : fclose(s);
79 131 : fclose(t);
80 131 : }
81 :
82 : /*
83 : * Remove the details of connection failure error messages
84 : * in a test result file, since the target host/pathname and/or port
85 : * can vary. Rewrite the result file in-place.
86 : *
87 : * At some point it might be interesting to unify this with
88 : * ecpg_filter_source, but building a general pattern matcher
89 : * is no fun, nor does it seem desirable to introduce a
90 : * dependency on an external one.
91 : */
92 : static void
93 131 : ecpg_filter_stderr(const char *resultfile, const char *tmpfile)
94 : {
95 : FILE *s,
96 : *t;
97 : StringInfoData linebuf;
98 :
99 131 : s = fopen(resultfile, "r");
100 131 : if (!s)
101 : {
102 0 : fprintf(stderr, "Could not open file %s for reading\n", resultfile);
103 0 : exit(2);
104 : }
105 131 : t = fopen(tmpfile, "w");
106 131 : if (!t)
107 : {
108 0 : fprintf(stderr, "Could not open file %s for writing\n", tmpfile);
109 0 : exit(2);
110 : }
111 :
112 131 : initStringInfo(&linebuf);
113 :
114 13622 : while (pg_get_line_buf(s, &linebuf))
115 : {
116 13491 : char *p1 = strstr(linebuf.data, "connection to server ");
117 :
118 13491 : if (p1)
119 : {
120 6 : char *p2 = strstr(p1, "failed: ");
121 :
122 6 : if (p2)
123 : {
124 6 : memmove(p1 + 21, p2, strlen(p2) + 1);
125 : /* we don't bother to fix up linebuf.len */
126 : }
127 : }
128 13491 : fputs(linebuf.data, t);
129 : }
130 :
131 131 : pfree(linebuf.data);
132 131 : fclose(s);
133 131 : fclose(t);
134 131 : if (rename(tmpfile, resultfile) != 0)
135 : {
136 0 : fprintf(stderr, "Could not overwrite file %s with %s\n",
137 : resultfile, tmpfile);
138 0 : exit(2);
139 : }
140 131 : }
141 :
142 : /*
143 : * start an ecpg test process for specified file (including redirection),
144 : * and return process ID
145 : */
146 :
147 : static PID_TYPE
148 131 : ecpg_start_test(const char *testname,
149 : _stringlist **resultfiles,
150 : _stringlist **expectfiles,
151 : _stringlist **tags)
152 : {
153 : PID_TYPE pid;
154 : char inprg[MAXPGPATH];
155 : char insource[MAXPGPATH];
156 : StringInfoData testname_dash;
157 : char outfile_stdout[MAXPGPATH],
158 : expectfile_stdout[MAXPGPATH];
159 : char outfile_stderr[MAXPGPATH],
160 : expectfile_stderr[MAXPGPATH];
161 : char outfile_source[MAXPGPATH],
162 : expectfile_source[MAXPGPATH];
163 : char cmd[MAXPGPATH * 3];
164 : char *appnameenv;
165 :
166 131 : snprintf(inprg, sizeof(inprg), "%s/%s", inputdir, testname);
167 131 : snprintf(insource, sizeof(insource), "%s/%s.c", inputdir, testname);
168 :
169 : /* make a version of the test name that has dashes in place of slashes */
170 131 : initStringInfo(&testname_dash);
171 131 : appendStringInfoString(&testname_dash, testname);
172 2180 : for (char *c = testname_dash.data; *c != '\0'; c++)
173 : {
174 2049 : if (*c == '/')
175 131 : *c = '-';
176 : }
177 :
178 131 : snprintf(expectfile_stdout, sizeof(expectfile_stdout),
179 : "%s/expected/%s.stdout",
180 : expecteddir, testname_dash.data);
181 131 : snprintf(expectfile_stderr, sizeof(expectfile_stderr),
182 : "%s/expected/%s.stderr",
183 : expecteddir, testname_dash.data);
184 131 : snprintf(expectfile_source, sizeof(expectfile_source),
185 : "%s/expected/%s.c",
186 : expecteddir, testname_dash.data);
187 :
188 131 : snprintf(outfile_stdout, sizeof(outfile_stdout),
189 : "%s/results/%s.stdout",
190 : outputdir, testname_dash.data);
191 131 : snprintf(outfile_stderr, sizeof(outfile_stderr),
192 : "%s/results/%s.stderr",
193 : outputdir, testname_dash.data);
194 131 : snprintf(outfile_source, sizeof(outfile_source),
195 : "%s/results/%s.c",
196 : outputdir, testname_dash.data);
197 :
198 131 : add_stringlist_item(resultfiles, outfile_stdout);
199 131 : add_stringlist_item(expectfiles, expectfile_stdout);
200 131 : add_stringlist_item(tags, "stdout");
201 :
202 131 : add_stringlist_item(resultfiles, outfile_stderr);
203 131 : add_stringlist_item(expectfiles, expectfile_stderr);
204 131 : add_stringlist_item(tags, "stderr");
205 :
206 131 : add_stringlist_item(resultfiles, outfile_source);
207 131 : add_stringlist_item(expectfiles, expectfile_source);
208 131 : add_stringlist_item(tags, "source");
209 :
210 131 : ecpg_filter_source(insource, outfile_source);
211 :
212 131 : snprintf(cmd, sizeof(cmd),
213 : "\"%s\" >\"%s\" 2>\"%s\"",
214 : inprg,
215 : outfile_stdout,
216 : outfile_stderr);
217 :
218 131 : appnameenv = psprintf("ecpg/%s", testname_dash.data);
219 131 : setenv("PGAPPNAME", appnameenv, 1);
220 131 : free(appnameenv);
221 :
222 131 : pid = spawn_process(cmd);
223 :
224 131 : if (pid == INVALID_PID)
225 : {
226 0 : fprintf(stderr, _("could not start process for test %s\n"),
227 : testname);
228 0 : exit(2);
229 : }
230 :
231 131 : unsetenv("PGAPPNAME");
232 :
233 131 : free(testname_dash.data);
234 :
235 131 : return pid;
236 : }
237 :
238 : static void
239 393 : ecpg_postprocess_result(const char *filename)
240 : {
241 393 : int nlen = strlen(filename);
242 :
243 : /* Only stderr files require filtering, at the moment */
244 393 : if (nlen > 7 && strcmp(filename + nlen - 7, ".stderr") == 0)
245 : {
246 131 : char *tmpfile = psprintf("%s.tmp", filename);
247 :
248 131 : ecpg_filter_stderr(filename, tmpfile);
249 131 : pfree(tmpfile);
250 : }
251 393 : }
252 :
253 : static void
254 2 : ecpg_init(int argc, char *argv[])
255 : {
256 : /* nothing to do here at the moment */
257 2 : }
258 :
259 : int
260 2 : main(int argc, char *argv[])
261 : {
262 2 : return regression_main(argc, argv,
263 : ecpg_init,
264 : ecpg_start_test,
265 : ecpg_postprocess_result);
266 : }
|
