[src/trunk]: src/usr.bin/make make(1): fix error handling on parse errors in ...

[rillig <rillig%NetBSD.org@localhost>]

details:   https://anonhg.NetBSD.org/src/rev/619c966263b6
branches:  trunk
changeset: 977851:619c966263b6
user:      rillig <rillig%NetBSD.org@localhost>
date:      Mon Nov 02 21:34:40 2020 +0000

description:
make(1): fix error handling on parse errors in variable expressions

This change doesn't change any of the unit tests since the error
handling code is not yet complete, see the many "handle errors" in the
code.  Nevertheless, the "out_FALSE_res = VPR_PARSE_MSG" was wrong since
the error message was only printed in lint mode, not in default mode.

diffstat:

 usr.bin/make/var.c |  18 ++++++++++--------
 1 files changed, 10 insertions(+), 8 deletions(-)

diffs (72 lines):

diff -r 200dd12a0047 -r 619c966263b6 usr.bin/make/var.c
--- a/usr.bin/make/var.c        Mon Nov 02 21:24:23 2020 +0000
+++ b/usr.bin/make/var.c        Mon Nov 02 21:34:40 2020 +0000
@@ -1,4 +1,4 @@
-/*     $NetBSD: var.c,v 1.651 2020/11/02 21:24:23 rillig Exp $ */
+/*     $NetBSD: var.c,v 1.652 2020/11/02 21:34:40 rillig Exp $ */
 
 /*
  * Copyright (c) 1988, 1989, 1990, 1993
@@ -130,7 +130,7 @@
 #include "metachar.h"
 
 /*     "@(#)var.c      8.3 (Berkeley) 3/19/94" */
-MAKE_RCSID("$NetBSD: var.c,v 1.651 2020/11/02 21:24:23 rillig Exp $");
+MAKE_RCSID("$NetBSD: var.c,v 1.652 2020/11/02 21:34:40 rillig Exp $");
 
 #define VAR_DEBUG1(fmt, arg1) DEBUG1(VAR, fmt, arg1)
 #define VAR_DEBUG2(fmt, arg1, arg2) DEBUG2(VAR, fmt, arg1, arg2)
@@ -3544,7 +3544,7 @@
     return Buf_Destroy(&buf, FALSE);
 }
 
-static Boolean
+static VarParseResult
 ValidShortVarname(char varname, const char *start)
 {
     switch (varname) {
@@ -3555,11 +3555,11 @@
     case '$':
        break;                  /* and continue below */
     default:
-       return TRUE;
+       return VPR_OK;
     }
 
     if (!DEBUG(LINT))
-       return FALSE;
+       return VPR_PARSE_SILENT;
 
     if (varname == '$')
        Parse_Error(PARSE_FATAL,
@@ -3570,7 +3570,7 @@
        Parse_Error(PARSE_FATAL,
                    "Invalid variable name '%c', at \"%s\"", varname, start);
 
-    return FALSE;
+    return VPR_PARSE_MSG;
 }
 
 /* Parse a single-character variable name such as $V or $@.
@@ -3587,6 +3587,7 @@
 ) {
     char name[2];
     Var *v;
+    VarParseResult vpr;
 
     /*
      * If it's not bounded by braces of some sort, life is much simpler.
@@ -3594,10 +3595,11 @@
      * value if it exists.
      */
 
-    if (!ValidShortVarname(startc, *pp)) {
+    vpr = ValidShortVarname(startc, *pp);
+    if (vpr != VPR_OK) {
        (*pp)++;
        *out_FALSE_val = var_Error;
-       *out_FALSE_res = VPR_PARSE_MSG;
+       *out_FALSE_res = vpr;
        return FALSE;
     }