aboutsummaryrefslogtreecommitdiffstats
path: root/tests/asschk.c
diff options
context:
space:
mode:
authorWerner Koch <[email protected]>2002-08-09 18:16:02 +0000
committerWerner Koch <[email protected]>2002-08-09 18:16:02 +0000
commitbeb0fef1eef30923cb563c2a0efd38ce9847f53f (patch)
treec0b5d0cab49fb5642f3ca2e692eb17f324ac5544 /tests/asschk.c
parent* signal.c: New. Taken from GnuPG 1.1.91. (diff)
downloadgnupg-beb0fef1eef30923cb563c2a0efd38ce9847f53f.tar.gz
gnupg-beb0fef1eef30923cb563c2a0efd38ce9847f53f.zip
Tweaked the build system so that make distcheck finanly said Well
Done.
Diffstat (limited to 'tests/asschk.c')
-rw-r--r--tests/asschk.c22
1 files changed, 19 insertions, 3 deletions
diff --git a/tests/asschk.c b/tests/asschk.c
index 7b7321675..829c86273 100644
--- a/tests/asschk.c
+++ b/tests/asschk.c
@@ -30,8 +30,8 @@
a line is processed but after comment processing. Macros are only
expanded once and non existing macros expand to the empty string.
A macro is dereferenced by prefixing its name with a dollar sign;
- the end of the name is currently indicated by a white space. To
- use a dollor sign verbatim, double it.
+ the end of the name is currently indicated by a white space, a
+ dollar sign or a slash. To use a dollor sign verbatim, double it.
A macro is assigned by prefixing a statement with the macro name
and an equal sign. The value is assigned verbatim if it does not
@@ -96,6 +96,9 @@
cmpfiles <first> <second>
Returns true when the content of the files FIRST and SECOND match.
+ getenv <name>
+ Return the value of the environment variable NAME.
+
*/
#include <stdio.h>
@@ -571,7 +574,8 @@ expand_line (char *buffer)
line = p + 1;
continue;
}
- for (pend=p+1; *pend && !spacep (pend) && *pend != '$'; pend++)
+ for (pend=p+1; *pend && !spacep (pend)
+ && *pend != '$' && *pend != '/'; pend++)
;
if (*pend)
{
@@ -854,6 +858,17 @@ cmd_cmpfiles (const char *assign_to, char *arg)
fclose (fp2);
}
+static void
+cmd_getenv (const char *assign_to, char *arg)
+{
+ const char *s;
+ s = *arg? getenv (arg):"";
+ set_var (assign_to, s? s:"");
+}
+
+
+
+
/* Process the current script line LINE. */
static int
interpreter (char *line)
@@ -875,6 +890,7 @@ interpreter (char *line)
{ "quit-if" , cmd_quit_if },
{ "fail-if" , cmd_fail_if },
{ "cmpfiles" , cmd_cmpfiles },
+ { "getenv" , cmd_getenv },
{ NULL }
};
char *p, *save_p;