[src/trunk]: src/usr.bin/make make(1): extract ForSubstBody from ForReadMore

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

details:   https://anonhg.NetBSD.org/src/rev/f3dfa484e263
branches:  trunk
changeset: 1017552:f3dfa484e263
user:      rillig <rillig%NetBSD.org@localhost>
date:      Thu Dec 31 04:31:36 2020 +0000

description:
make(1): extract ForSubstBody from ForReadMore

This leaves ForReadMore with the single responsibility of interfacing
with ReadMoreProc in Parse_SetInput.

diffstat:

 usr.bin/make/for.c |  61 +++++++++++++++++++++++++++++------------------------
 1 files changed, 33 insertions(+), 28 deletions(-)

diffs (98 lines):

diff -r 233a148efea3 -r f3dfa484e263 usr.bin/make/for.c
--- a/usr.bin/make/for.c        Thu Dec 31 04:07:37 2020 +0000
+++ b/usr.bin/make/for.c        Thu Dec 31 04:31:36 2020 +0000
@@ -1,4 +1,4 @@
-/*     $NetBSD: for.c,v 1.127 2020/12/31 03:49:36 rillig Exp $ */
+/*     $NetBSD: for.c,v 1.128 2020/12/31 04:31:36 rillig Exp $ */
 
 /*
  * Copyright (c) 1992, The Regents of the University of California.
@@ -58,7 +58,7 @@
 #include "make.h"
 
 /*     "@(#)for.c      8.1 (Berkeley) 6/6/93"  */
-MAKE_RCSID("$NetBSD: for.c,v 1.127 2020/12/31 03:49:36 rillig Exp $");
+MAKE_RCSID("$NetBSD: for.c,v 1.128 2020/12/31 04:31:36 rillig Exp $");
 
 static int forLevel = 0;       /* Nesting level */
 
@@ -427,6 +427,33 @@
 }
 
 /*
+ * Compute the body for the current iteration by copying the unexpanded body,
+ * replacing the expressions for the iteration variables on the way.
+ */
+static void
+ForSubstBody(For *f)
+{
+       const char *p;
+       const char *mark;       /* where the last replacement left off */
+
+       Buf_Empty(&f->curBody);
+
+       mark = f->body.data;
+       for (p = mark; (p = strchr(p, '$')) != NULL;) {
+               if (p[1] == '{' || p[1] == '(') {
+                       p += 2;
+                       SubstVarLong(f, &p, &mark, p[-1] == '{' ? '}' : ')');
+               } else if (p[1] != '\0') {
+                       p++;
+                       SubstVarShort(f, &p, &mark);
+               } else
+                       break;
+       }
+
+       Buf_AddBytesBetween(&f->curBody, mark, f->body.data + f->body.len);
+}
+
+/*
  * Scan the for loop body and replace references to the loop variables
  * with variable references that expand to the required text.
  *
@@ -443,10 +470,6 @@
 ForReadMore(void *v_arg, size_t *out_len)
 {
        For *f = v_arg;
-       const char *p;
-       const char *mark;       /* where the last replacement left off */
-       const char *body_end;
-       char *cmds_str;
 
        if (f->sub_next == f->items.len) {
                /* No more iterations */
@@ -454,30 +477,12 @@
                return NULL;
        }
 
-       Buf_Empty(&f->curBody);
-
-       mark = Buf_GetAll(&f->body, NULL);
-       body_end = mark + Buf_Len(&f->body);
-       for (p = mark; (p = strchr(p, '$')) != NULL;) {
-               if (p[1] == '{' || p[1] == '(') {
-                       p += 2;
-                       SubstVarLong(f, &p, &mark, p[-1] == '{' ? '}' : ')');
-               } else if (p[1] != '\0') {
-                       p++;
-                       SubstVarShort(f, &p, &mark);
-               } else
-                       break;
-
-       }
-       Buf_AddBytesBetween(&f->curBody, mark, body_end);
-
-       *out_len = Buf_Len(&f->curBody);
-       cmds_str = Buf_GetAll(&f->curBody, NULL);
-       DEBUG1(FOR, "For: loop body:\n%s", cmds_str);
-
+       ForSubstBody(f);
+       DEBUG1(FOR, "For: loop body:\n%s", f->curBody.data);
        f->sub_next += f->vars.len;
 
-       return cmds_str;
+       *out_len = f->curBody.len;
+       return f->curBody.data;
 }
 
 /* Run the .for loop, imitating the actions of an include file. */