| @@ -1,14 +1,14 @@ | | | @@ -1,14 +1,14 @@ |
1 | /* $NetBSD: var.c,v 1.158 2010/04/21 04:25:27 sjg Exp $ */ | | 1 | /* $NetBSD: var.c,v 1.159 2010/06/06 01:13:12 sjg Exp $ */ |
2 | | | 2 | |
3 | /* | | 3 | /* |
4 | * Copyright (c) 1988, 1989, 1990, 1993 | | 4 | * Copyright (c) 1988, 1989, 1990, 1993 |
5 | * The Regents of the University of California. All rights reserved. | | 5 | * The Regents of the University of California. All rights reserved. |
6 | * | | 6 | * |
7 | * This code is derived from software contributed to Berkeley by | | 7 | * This code is derived from software contributed to Berkeley by |
8 | * Adam de Boor. | | 8 | * Adam de Boor. |
9 | * | | 9 | * |
10 | * Redistribution and use in source and binary forms, with or without | | 10 | * Redistribution and use in source and binary forms, with or without |
11 | * modification, are permitted provided that the following conditions | | 11 | * modification, are permitted provided that the following conditions |
12 | * are met: | | 12 | * are met: |
13 | * 1. Redistributions of source code must retain the above copyright | | 13 | * 1. Redistributions of source code must retain the above copyright |
14 | * notice, this list of conditions and the following disclaimer. | | 14 | * notice, this list of conditions and the following disclaimer. |
| @@ -59,34 +59,34 @@ | | | @@ -59,34 +59,34 @@ |
59 | * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE | | 59 | * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE |
60 | * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE | | 60 | * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE |
61 | * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE | | 61 | * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE |
62 | * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL | | 62 | * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL |
63 | * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS | | 63 | * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS |
64 | * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) | | 64 | * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) |
65 | * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT | | 65 | * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT |
66 | * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY | | 66 | * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY |
67 | * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF | | 67 | * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF |
68 | * SUCH DAMAGE. | | 68 | * SUCH DAMAGE. |
69 | */ | | 69 | */ |
70 | | | 70 | |
71 | #ifndef MAKE_NATIVE | | 71 | #ifndef MAKE_NATIVE |
72 | static char rcsid[] = "$NetBSD: var.c,v 1.158 2010/04/21 04:25:27 sjg Exp $"; | | 72 | static char rcsid[] = "$NetBSD: var.c,v 1.159 2010/06/06 01:13:12 sjg Exp $"; |
73 | #else | | 73 | #else |
74 | #include <sys/cdefs.h> | | 74 | #include <sys/cdefs.h> |
75 | #ifndef lint | | 75 | #ifndef lint |
76 | #if 0 | | 76 | #if 0 |
77 | static char sccsid[] = "@(#)var.c 8.3 (Berkeley) 3/19/94"; | | 77 | static char sccsid[] = "@(#)var.c 8.3 (Berkeley) 3/19/94"; |
78 | #else | | 78 | #else |
79 | __RCSID("$NetBSD: var.c,v 1.158 2010/04/21 04:25:27 sjg Exp $"); | | 79 | __RCSID("$NetBSD: var.c,v 1.159 2010/06/06 01:13:12 sjg Exp $"); |
80 | #endif | | 80 | #endif |
81 | #endif /* not lint */ | | 81 | #endif /* not lint */ |
82 | #endif | | 82 | #endif |
83 | | | 83 | |
84 | /*- | | 84 | /*- |
85 | * var.c -- | | 85 | * var.c -- |
86 | * Variable-handling functions | | 86 | * Variable-handling functions |
87 | * | | 87 | * |
88 | * Interface: | | 88 | * Interface: |
89 | * Var_Set Set the value of a variable in the given | | 89 | * Var_Set Set the value of a variable in the given |
90 | * context. The variable is created if it doesn't | | 90 | * context. The variable is created if it doesn't |
91 | * yet exist. The value and variable name need not | | 91 | * yet exist. The value and variable name need not |
92 | * be preserved. | | 92 | * be preserved. |
| @@ -672,57 +672,64 @@ Var_ExportVars(void) | | | @@ -672,57 +672,64 @@ Var_ExportVars(void) |
672 | | | 672 | |
673 | /* | | 673 | /* |
674 | * This is called when .export is seen or | | 674 | * This is called when .export is seen or |
675 | * .MAKE.EXPORTED is modified. | | 675 | * .MAKE.EXPORTED is modified. |
676 | * It is also called when any exported var is modified. | | 676 | * It is also called when any exported var is modified. |
677 | */ | | 677 | */ |
678 | void | | 678 | void |
679 | Var_Export(char *str, int isExport) | | 679 | Var_Export(char *str, int isExport) |
680 | { | | 680 | { |
681 | char *name; | | 681 | char *name; |
682 | char *val; | | 682 | char *val; |
683 | char **av; | | 683 | char **av; |
684 | char *as; | | 684 | char *as; |
| | | 685 | int track; |
685 | int ac; | | 686 | int ac; |
686 | int i; | | 687 | int i; |
687 | | | 688 | |
688 | if (isExport && (!str || !str[0])) { | | 689 | if (isExport && (!str || !str[0])) { |
689 | var_exportedVars = VAR_EXPORTED_ALL; /* use with caution! */ | | 690 | var_exportedVars = VAR_EXPORTED_ALL; /* use with caution! */ |
690 | return; | | 691 | return; |
691 | } | | 692 | } |
692 | | | 693 | |
| | | 694 | if (strncmp(str, "-env", 4) == 0) { |
| | | 695 | track = 0; |
| | | 696 | str += 4; |
| | | 697 | } else { |
| | | 698 | track = VAR_EXPORT_PARENT; |
| | | 699 | } |
693 | val = Var_Subst(NULL, str, VAR_GLOBAL, 0); | | 700 | val = Var_Subst(NULL, str, VAR_GLOBAL, 0); |
694 | av = brk_string(val, &ac, FALSE, &as); | | 701 | av = brk_string(val, &ac, FALSE, &as); |
695 | for (i = 0; i < ac; i++) { | | 702 | for (i = 0; i < ac; i++) { |
696 | name = av[i]; | | 703 | name = av[i]; |
697 | if (!name[1]) { | | 704 | if (!name[1]) { |
698 | /* | | 705 | /* |
699 | * A single char. | | 706 | * A single char. |
700 | * If it is one of the vars that should only appear in | | 707 | * If it is one of the vars that should only appear in |
701 | * local context, skip it, else we can get Var_Subst | | 708 | * local context, skip it, else we can get Var_Subst |
702 | * into a loop. | | 709 | * into a loop. |
703 | */ | | 710 | */ |
704 | switch (name[0]) { | | 711 | switch (name[0]) { |
705 | case '@': | | 712 | case '@': |
706 | case '%': | | 713 | case '%': |
707 | case '*': | | 714 | case '*': |
708 | case '!': | | 715 | case '!': |
709 | continue; | | 716 | continue; |
710 | } | | 717 | } |
711 | } | | 718 | } |
712 | if (Var_Export1(name, VAR_EXPORT_PARENT)) { | | 719 | if (Var_Export1(name, track)) { |
713 | if (VAR_EXPORTED_ALL != var_exportedVars) | | 720 | if (VAR_EXPORTED_ALL != var_exportedVars) |
714 | var_exportedVars = VAR_EXPORTED_YES; | | 721 | var_exportedVars = VAR_EXPORTED_YES; |
715 | if (isExport) { | | 722 | if (isExport && track) { |
716 | Var_Append(MAKE_EXPORTED, name, VAR_GLOBAL); | | 723 | Var_Append(MAKE_EXPORTED, name, VAR_GLOBAL); |
717 | } | | 724 | } |
718 | } | | 725 | } |
719 | } | | 726 | } |
720 | free(val); | | 727 | free(val); |
721 | free(as); | | 728 | free(as); |
722 | free(av); | | 729 | free(av); |
723 | } | | 730 | } |
724 | | | 731 | |
725 | | | 732 | |
726 | /* | | 733 | /* |
727 | * This is called when .unexport[-env] is seen. | | 734 | * This is called when .unexport[-env] is seen. |
728 | */ | | 735 | */ |