1684 lines
180 KiB
HTML
1684 lines
180 KiB
HTML
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN">
|
|
|
|
<html lang="en">
|
|
|
|
<head>
|
|
<meta http-equiv="Content-Type" content="text/html; charset=UTF-8">
|
|
<title>LCOV - cov-sh.info - bash-4.4.23/print_cmd.c</title>
|
|
<link rel="stylesheet" type="text/css" href="../gcov.css">
|
|
</head>
|
|
|
|
<body>
|
|
|
|
<table width="100%" border=0 cellspacing=0 cellpadding=0>
|
|
<tr><td class="title">LCOV - code coverage report</td></tr>
|
|
<tr><td class="ruler"><img src="../glass.png" width=3 height=3 alt=""></td></tr>
|
|
|
|
<tr>
|
|
<td width="100%">
|
|
<table cellpadding=1 border=0 width="100%">
|
|
<tr>
|
|
<td width="10%" class="headerItem">Current view:</td>
|
|
<td width="35%" class="headerValue"><a href="../index.html">top level</a> - <a href="index.html">bash-4.4.23</a> - print_cmd.c<span style="font-size: 80%;"> (source / <a href="print_cmd.c.func-sort-c.html">functions</a>)</span></td>
|
|
<td width="5%"></td>
|
|
<td width="15%"></td>
|
|
<td width="10%" class="headerCovTableHead">Hit</td>
|
|
<td width="10%" class="headerCovTableHead">Total</td>
|
|
<td width="15%" class="headerCovTableHead">Coverage</td>
|
|
</tr>
|
|
<tr>
|
|
<td class="headerItem">Test:</td>
|
|
<td class="headerValue">cov-sh.info</td>
|
|
<td></td>
|
|
<td class="headerItem">Lines:</td>
|
|
<td class="headerCovTableEntry">347</td>
|
|
<td class="headerCovTableEntry">786</td>
|
|
<td class="headerCovTableEntryLo">44.1 %</td>
|
|
</tr>
|
|
<tr>
|
|
<td class="headerItem">Date:</td>
|
|
<td class="headerValue">2020-10-29 14:49:55</td>
|
|
<td></td>
|
|
<td class="headerItem">Functions:</td>
|
|
<td class="headerCovTableEntry">22</td>
|
|
<td class="headerCovTableEntry">49</td>
|
|
<td class="headerCovTableEntryLo">44.9 %</td>
|
|
</tr>
|
|
<tr><td><img src="../glass.png" width=3 height=3 alt=""></td></tr>
|
|
</table>
|
|
</td>
|
|
</tr>
|
|
|
|
<tr><td class="ruler"><img src="../glass.png" width=3 height=3 alt=""></td></tr>
|
|
</table>
|
|
|
|
<table cellpadding=0 cellspacing=0 border=0>
|
|
<tr>
|
|
<td><br></td>
|
|
</tr>
|
|
<tr>
|
|
<td>
|
|
<pre class="sourceHeading"> Line data Source code</pre>
|
|
<pre class="source">
|
|
<a name="1"><span class="lineNum"> 1 </span> : /* print_command -- A way to make readable commands from a command tree. */</a>
|
|
<a name="2"><span class="lineNum"> 2 </span> : </a>
|
|
<a name="3"><span class="lineNum"> 3 </span> : /* Copyright (C) 1989-2016 Free Software Foundation, Inc.</a>
|
|
<a name="4"><span class="lineNum"> 4 </span> : </a>
|
|
<a name="5"><span class="lineNum"> 5 </span> : This file is part of GNU Bash, the Bourne Again SHell.</a>
|
|
<a name="6"><span class="lineNum"> 6 </span> : </a>
|
|
<a name="7"><span class="lineNum"> 7 </span> : Bash is free software: you can redistribute it and/or modify</a>
|
|
<a name="8"><span class="lineNum"> 8 </span> : it under the terms of the GNU General Public License as published by</a>
|
|
<a name="9"><span class="lineNum"> 9 </span> : the Free Software Foundation, either version 3 of the License, or</a>
|
|
<a name="10"><span class="lineNum"> 10 </span> : (at your option) any later version.</a>
|
|
<a name="11"><span class="lineNum"> 11 </span> : </a>
|
|
<a name="12"><span class="lineNum"> 12 </span> : Bash is distributed in the hope that it will be useful,</a>
|
|
<a name="13"><span class="lineNum"> 13 </span> : but WITHOUT ANY WARRANTY; without even the implied warranty of</a>
|
|
<a name="14"><span class="lineNum"> 14 </span> : MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the</a>
|
|
<a name="15"><span class="lineNum"> 15 </span> : GNU General Public License for more details.</a>
|
|
<a name="16"><span class="lineNum"> 16 </span> : </a>
|
|
<a name="17"><span class="lineNum"> 17 </span> : You should have received a copy of the GNU General Public License</a>
|
|
<a name="18"><span class="lineNum"> 18 </span> : along with Bash. If not, see <http://www.gnu.org/licenses/>.</a>
|
|
<a name="19"><span class="lineNum"> 19 </span> : */</a>
|
|
<a name="20"><span class="lineNum"> 20 </span> : </a>
|
|
<a name="21"><span class="lineNum"> 21 </span> : #include "config.h"</a>
|
|
<a name="22"><span class="lineNum"> 22 </span> : </a>
|
|
<a name="23"><span class="lineNum"> 23 </span> : #include <stdio.h></a>
|
|
<a name="24"><span class="lineNum"> 24 </span> : </a>
|
|
<a name="25"><span class="lineNum"> 25 </span> : #if defined (HAVE_UNISTD_H)</a>
|
|
<a name="26"><span class="lineNum"> 26 </span> : # ifdef _MINIX</a>
|
|
<a name="27"><span class="lineNum"> 27 </span> : # include <sys/types.h></a>
|
|
<a name="28"><span class="lineNum"> 28 </span> : # endif</a>
|
|
<a name="29"><span class="lineNum"> 29 </span> : # include <unistd.h></a>
|
|
<a name="30"><span class="lineNum"> 30 </span> : #endif</a>
|
|
<a name="31"><span class="lineNum"> 31 </span> : </a>
|
|
<a name="32"><span class="lineNum"> 32 </span> : #if defined (PREFER_STDARG)</a>
|
|
<a name="33"><span class="lineNum"> 33 </span> : # include <stdarg.h></a>
|
|
<a name="34"><span class="lineNum"> 34 </span> : #else</a>
|
|
<a name="35"><span class="lineNum"> 35 </span> : # include <varargs.h></a>
|
|
<a name="36"><span class="lineNum"> 36 </span> : #endif</a>
|
|
<a name="37"><span class="lineNum"> 37 </span> : </a>
|
|
<a name="38"><span class="lineNum"> 38 </span> : #include "bashansi.h"</a>
|
|
<a name="39"><span class="lineNum"> 39 </span> : #include "bashintl.h"</a>
|
|
<a name="40"><span class="lineNum"> 40 </span> : </a>
|
|
<a name="41"><span class="lineNum"> 41 </span> : #include "shell.h"</a>
|
|
<a name="42"><span class="lineNum"> 42 </span> : #include "flags.h"</a>
|
|
<a name="43"><span class="lineNum"> 43 </span> : #include <y.tab.h> /* use <...> so we pick it up from the build directory */</a>
|
|
<a name="44"><span class="lineNum"> 44 </span> : #include "input.h"</a>
|
|
<a name="45"><span class="lineNum"> 45 </span> : </a>
|
|
<a name="46"><span class="lineNum"> 46 </span> : #include "shmbutil.h"</a>
|
|
<a name="47"><span class="lineNum"> 47 </span> : </a>
|
|
<a name="48"><span class="lineNum"> 48 </span> : #include "builtins/common.h"</a>
|
|
<a name="49"><span class="lineNum"> 49 </span> : </a>
|
|
<a name="50"><span class="lineNum"> 50 </span> : #if !HAVE_DECL_PRINTF</a>
|
|
<a name="51"><span class="lineNum"> 51 </span> : extern int printf __P((const char *, ...)); /* Yuck. Double yuck. */</a>
|
|
<a name="52"><span class="lineNum"> 52 </span> : #endif</a>
|
|
<a name="53"><span class="lineNum"> 53 </span> : </a>
|
|
<a name="54"><span class="lineNum"> 54 </span> : extern int indirection_level;</a>
|
|
<a name="55"><span class="lineNum"> 55 </span> : extern int posixly_correct;</a>
|
|
<a name="56"><span class="lineNum"> 56 </span> : </a>
|
|
<a name="57"><span class="lineNum"> 57 </span> : static int indentation;</a>
|
|
<a name="58"><span class="lineNum"> 58 </span> : static int indentation_amount = 4;</a>
|
|
<a name="59"><span class="lineNum"> 59 </span> : </a>
|
|
<a name="60"><span class="lineNum"> 60 </span> : #if defined (PREFER_STDARG)</a>
|
|
<a name="61"><span class="lineNum"> 61 </span> : typedef void PFUNC __P((const char *, ...));</a>
|
|
<a name="62"><span class="lineNum"> 62 </span> : </a>
|
|
<a name="63"><span class="lineNum"> 63 </span> : static void cprintf __P((const char *, ...)) __attribute__((__format__ (printf, 1, 2)));</a>
|
|
<a name="64"><span class="lineNum"> 64 </span> : static void xprintf __P((const char *, ...)) __attribute__((__format__ (printf, 1, 2)));</a>
|
|
<a name="65"><span class="lineNum"> 65 </span> : #else</a>
|
|
<a name="66"><span class="lineNum"> 66 </span> : #define PFUNC VFunction</a>
|
|
<a name="67"><span class="lineNum"> 67 </span> : static void cprintf ();</a>
|
|
<a name="68"><span class="lineNum"> 68 </span> : static void xprintf ();</a>
|
|
<a name="69"><span class="lineNum"> 69 </span> : #endif</a>
|
|
<a name="70"><span class="lineNum"> 70 </span> : </a>
|
|
<a name="71"><span class="lineNum"> 71 </span> : static void reset_locals __P((void));</a>
|
|
<a name="72"><span class="lineNum"> 72 </span> : static void newline __P((char *));</a>
|
|
<a name="73"><span class="lineNum"> 73 </span> : static void indent __P((int));</a>
|
|
<a name="74"><span class="lineNum"> 74 </span> : static void semicolon __P((void));</a>
|
|
<a name="75"><span class="lineNum"> 75 </span> : static void the_printed_command_resize __P((int));</a>
|
|
<a name="76"><span class="lineNum"> 76 </span> : </a>
|
|
<a name="77"><span class="lineNum"> 77 </span> : static void make_command_string_internal __P((COMMAND *));</a>
|
|
<a name="78"><span class="lineNum"> 78 </span> : static void _print_word_list __P((WORD_LIST *, char *, PFUNC *));</a>
|
|
<a name="79"><span class="lineNum"> 79 </span> : static void command_print_word_list __P((WORD_LIST *, char *));</a>
|
|
<a name="80"><span class="lineNum"> 80 </span> : static void print_case_clauses __P((PATTERN_LIST *));</a>
|
|
<a name="81"><span class="lineNum"> 81 </span> : static void print_redirection_list __P((REDIRECT *));</a>
|
|
<a name="82"><span class="lineNum"> 82 </span> : static void print_redirection __P((REDIRECT *));</a>
|
|
<a name="83"><span class="lineNum"> 83 </span> : static void print_heredoc_header __P((REDIRECT *));</a>
|
|
<a name="84"><span class="lineNum"> 84 </span> : static void print_heredoc_body __P((REDIRECT *));</a>
|
|
<a name="85"><span class="lineNum"> 85 </span> : static void print_heredocs __P((REDIRECT *));</a>
|
|
<a name="86"><span class="lineNum"> 86 </span> : static void print_deferred_heredocs __P((const char *));</a>
|
|
<a name="87"><span class="lineNum"> 87 </span> : </a>
|
|
<a name="88"><span class="lineNum"> 88 </span> : static void print_for_command __P((FOR_COM *));</a>
|
|
<a name="89"><span class="lineNum"> 89 </span> : #if defined (ARITH_FOR_COMMAND)</a>
|
|
<a name="90"><span class="lineNum"> 90 </span> : static void print_arith_for_command __P((ARITH_FOR_COM *));</a>
|
|
<a name="91"><span class="lineNum"> 91 </span> : #endif</a>
|
|
<a name="92"><span class="lineNum"> 92 </span> : #if defined (SELECT_COMMAND)</a>
|
|
<a name="93"><span class="lineNum"> 93 </span> : static void print_select_command __P((SELECT_COM *));</a>
|
|
<a name="94"><span class="lineNum"> 94 </span> : #endif</a>
|
|
<a name="95"><span class="lineNum"> 95 </span> : static void print_group_command __P((GROUP_COM *));</a>
|
|
<a name="96"><span class="lineNum"> 96 </span> : static void print_case_command __P((CASE_COM *));</a>
|
|
<a name="97"><span class="lineNum"> 97 </span> : static void print_while_command __P((WHILE_COM *));</a>
|
|
<a name="98"><span class="lineNum"> 98 </span> : static void print_until_command __P((WHILE_COM *));</a>
|
|
<a name="99"><span class="lineNum"> 99 </span> : static void print_until_or_while __P((WHILE_COM *, char *));</a>
|
|
<a name="100"><span class="lineNum"> 100 </span> : static void print_if_command __P((IF_COM *));</a>
|
|
<a name="101"><span class="lineNum"> 101 </span> : #if defined (COND_COMMAND)</a>
|
|
<a name="102"><span class="lineNum"> 102 </span> : static void print_cond_node __P((COND_COM *));</a>
|
|
<a name="103"><span class="lineNum"> 103 </span> : #endif</a>
|
|
<a name="104"><span class="lineNum"> 104 </span> : static void print_function_def __P((FUNCTION_DEF *));</a>
|
|
<a name="105"><span class="lineNum"> 105 </span> : </a>
|
|
<a name="106"><span class="lineNum"> 106 </span> : #define PRINTED_COMMAND_INITIAL_SIZE 64</a>
|
|
<a name="107"><span class="lineNum"> 107 </span> : #define PRINTED_COMMAND_GROW_SIZE 128</a>
|
|
<a name="108"><span class="lineNum"> 108 </span> : </a>
|
|
<a name="109"><span class="lineNum"> 109 </span> : char *the_printed_command = (char *)NULL;</a>
|
|
<a name="110"><span class="lineNum"> 110 </span> : int the_printed_command_size = 0;</a>
|
|
<a name="111"><span class="lineNum"> 111 </span> : int command_string_index = 0;</a>
|
|
<a name="112"><span class="lineNum"> 112 </span> : </a>
|
|
<a name="113"><span class="lineNum"> 113 </span> : int xtrace_fd = -1;</a>
|
|
<a name="114"><span class="lineNum"> 114 </span> : FILE *xtrace_fp = 0;</a>
|
|
<a name="115"><span class="lineNum"> 115 </span> : </a>
|
|
<a name="116"><span class="lineNum"> 116 </span> : #define CHECK_XTRACE_FP xtrace_fp = (xtrace_fp ? xtrace_fp : stderr)</a>
|
|
<a name="117"><span class="lineNum"> 117 </span> : </a>
|
|
<a name="118"><span class="lineNum"> 118 </span> : /* shell expansion characters: used in print_redirection_list */</a>
|
|
<a name="119"><span class="lineNum"> 119 </span> : #define EXPCHAR(c) ((c) == '{' || (c) == '~' || (c) == '$' || (c) == '`')</a>
|
|
<a name="120"><span class="lineNum"> 120 </span> : </a>
|
|
<a name="121"><span class="lineNum"> 121 </span> : #define PRINT_DEFERRED_HEREDOCS(x) \</a>
|
|
<a name="122"><span class="lineNum"> 122 </span> : do { \</a>
|
|
<a name="123"><span class="lineNum"> 123 </span> : if (deferred_heredocs) \</a>
|
|
<a name="124"><span class="lineNum"> 124 </span> : print_deferred_heredocs (x); \</a>
|
|
<a name="125"><span class="lineNum"> 125 </span> : } while (0)</a>
|
|
<a name="126"><span class="lineNum"> 126 </span> : </a>
|
|
<a name="127"><span class="lineNum"> 127 </span> : /* Non-zero means the stuff being printed is inside of a function def. */</a>
|
|
<a name="128"><span class="lineNum"> 128 </span> : static int inside_function_def;</a>
|
|
<a name="129"><span class="lineNum"> 129 </span> : static int skip_this_indent;</a>
|
|
<a name="130"><span class="lineNum"> 130 </span> : static int was_heredoc;</a>
|
|
<a name="131"><span class="lineNum"> 131 </span> : static int printing_connection;</a>
|
|
<a name="132"><span class="lineNum"> 132 </span> : static REDIRECT *deferred_heredocs;</a>
|
|
<a name="133"><span class="lineNum"> 133 </span> : </a>
|
|
<a name="134"><span class="lineNum"> 134 </span> : /* The depth of the group commands that we are currently printing. This</a>
|
|
<a name="135"><span class="lineNum"> 135 </span> : includes the group command that is a function body. */</a>
|
|
<a name="136"><span class="lineNum"> 136 </span> : static int group_command_nesting;</a>
|
|
<a name="137"><span class="lineNum"> 137 </span> : </a>
|
|
<a name="138"><span class="lineNum"> 138 </span> : /* A buffer to indicate the indirection level (PS4) when set -x is enabled. */</a>
|
|
<a name="139"><span class="lineNum"> 139 </span> : static char *indirection_string = 0;</a>
|
|
<a name="140"><span class="lineNum"> 140 </span> : static int indirection_stringsiz = 0;</a>
|
|
<a name="141"><span class="lineNum"> 141 </span> : </a>
|
|
<a name="142"><span class="lineNum"> 142 </span> : /* Print COMMAND (a command tree) on standard output. */</a>
|
|
<a name="143"><span class="lineNum"> 143 </span> : void</a>
|
|
<a name="144"><span class="lineNum"> 144 </span><span class="lineNoCov"> 0 : print_command (command)</span></a>
|
|
<a name="145"><span class="lineNum"> 145 </span> : COMMAND *command;</a>
|
|
<a name="146"><span class="lineNum"> 146 </span> : {</a>
|
|
<a name="147"><span class="lineNum"> 147 </span><span class="lineNoCov"> 0 : command_string_index = 0;</span></a>
|
|
<a name="148"><span class="lineNum"> 148 </span><span class="lineNoCov"> 0 : printf ("%s", make_command_string (command));</span></a>
|
|
<a name="149"><span class="lineNum"> 149 </span><span class="lineNoCov"> 0 : }</span></a>
|
|
<a name="150"><span class="lineNum"> 150 </span> : </a>
|
|
<a name="151"><span class="lineNum"> 151 </span> : /* Make a string which is the printed representation of the command</a>
|
|
<a name="152"><span class="lineNum"> 152 </span> : tree in COMMAND. We return this string. However, the string is</a>
|
|
<a name="153"><span class="lineNum"> 153 </span> : not consed, so you have to do that yourself if you want it to</a>
|
|
<a name="154"><span class="lineNum"> 154 </span> : remain around. */</a>
|
|
<a name="155"><span class="lineNum"> 155 </span> : char *</a>
|
|
<a name="156"><span class="lineNum"> 156 </span><span class="lineCov"> 3601 : make_command_string (command)</span></a>
|
|
<a name="157"><span class="lineNum"> 157 </span> : COMMAND *command;</a>
|
|
<a name="158"><span class="lineNum"> 158 </span> : {</a>
|
|
<a name="159"><span class="lineNum"> 159 </span><span class="lineCov"> 3601 : command_string_index = was_heredoc = 0;</span></a>
|
|
<a name="160"><span class="lineNum"> 160 </span><span class="lineCov"> 3601 : deferred_heredocs = 0;</span></a>
|
|
<a name="161"><span class="lineNum"> 161 </span><span class="lineCov"> 3601 : make_command_string_internal (command);</span></a>
|
|
<a name="162"><span class="lineNum"> 162 </span><span class="lineNoCov"> 0 : return (the_printed_command);</span></a>
|
|
<a name="163"><span class="lineNum"> 163 </span> : }</a>
|
|
<a name="164"><span class="lineNum"> 164 </span> : </a>
|
|
<a name="165"><span class="lineNum"> 165 </span> : /* The internal function. This is the real workhorse. */</a>
|
|
<a name="166"><span class="lineNum"> 166 </span> : static void</a>
|
|
<a name="167"><span class="lineNum"> 167 </span><span class="lineCov"> 19715 : make_command_string_internal (command)</span></a>
|
|
<a name="168"><span class="lineNum"> 168 </span> : COMMAND *command;</a>
|
|
<a name="169"><span class="lineNum"> 169 </span> : {</a>
|
|
<a name="170"><span class="lineNum"> 170 </span><span class="lineCov"> 19715 : char s[3];</span></a>
|
|
<a name="171"><span class="lineNum"> 171 </span> : </a>
|
|
<a name="172"><span class="lineNum"> 172 </span><span class="lineCov"> 19715 : if (command == 0)</span></a>
|
|
<a name="173"><span class="lineNum"> 173 </span><span class="lineCov"> 41 : cprintf ("");</span></a>
|
|
<a name="174"><span class="lineNum"> 174 </span> : else</a>
|
|
<a name="175"><span class="lineNum"> 175 </span> : {</a>
|
|
<a name="176"><span class="lineNum"> 176 </span><span class="lineCov"> 19674 : if (skip_this_indent)</span></a>
|
|
<a name="177"><span class="lineNum"> 177 </span><span class="lineCov"> 11061 : skip_this_indent--;</span></a>
|
|
<a name="178"><span class="lineNum"> 178 </span> : else</a>
|
|
<a name="179"><span class="lineNum"> 179 </span><span class="lineCov"> 8613 : indent (indentation);</span></a>
|
|
<a name="180"><span class="lineNum"> 180 </span> : </a>
|
|
<a name="181"><span class="lineNum"> 181 </span><span class="lineCov"> 19674 : if (command->flags & CMD_TIME_PIPELINE)</span></a>
|
|
<a name="182"><span class="lineNum"> 182 </span> : {</a>
|
|
<a name="183"><span class="lineNum"> 183 </span><span class="lineNoCov"> 0 : cprintf ("time ");</span></a>
|
|
<a name="184"><span class="lineNum"> 184 </span><span class="lineNoCov"> 0 : if (command->flags & CMD_TIME_POSIX)</span></a>
|
|
<a name="185"><span class="lineNum"> 185 </span><span class="lineNoCov"> 0 : cprintf ("-p ");</span></a>
|
|
<a name="186"><span class="lineNum"> 186 </span> : }</a>
|
|
<a name="187"><span class="lineNum"> 187 </span> : </a>
|
|
<a name="188"><span class="lineNum"> 188 </span><span class="lineCov"> 19674 : if (command->flags & CMD_INVERT_RETURN)</span></a>
|
|
<a name="189"><span class="lineNum"> 189 </span><span class="lineNoCov"> 0 : cprintf ("! ");</span></a>
|
|
<a name="190"><span class="lineNum"> 190 </span> : </a>
|
|
<a name="191"><span class="lineNum"> 191 </span><span class="lineCov"> 19674 : switch (command->type)</span></a>
|
|
<a name="192"><span class="lineNum"> 192 </span> : {</a>
|
|
<a name="193"><span class="lineNum"> 193 </span><span class="lineNoCov"> 0 : case cm_for:</span></a>
|
|
<a name="194"><span class="lineNum"> 194 </span><span class="lineNoCov"> 0 : print_for_command (command->value.For);</span></a>
|
|
<a name="195"><span class="lineNum"> 195 </span><span class="lineNoCov"> 0 : break;</span></a>
|
|
<a name="196"><span class="lineNum"> 196 </span> : </a>
|
|
<a name="197"><span class="lineNum"> 197 </span> : #if defined (ARITH_FOR_COMMAND)</a>
|
|
<a name="198"><span class="lineNum"> 198 </span><span class="lineNoCov"> 0 : case cm_arith_for:</span></a>
|
|
<a name="199"><span class="lineNum"> 199 </span><span class="lineNoCov"> 0 : print_arith_for_command (command->value.ArithFor);</span></a>
|
|
<a name="200"><span class="lineNum"> 200 </span><span class="lineNoCov"> 0 : break;</span></a>
|
|
<a name="201"><span class="lineNum"> 201 </span> : #endif</a>
|
|
<a name="202"><span class="lineNum"> 202 </span> : </a>
|
|
<a name="203"><span class="lineNum"> 203 </span> : #if defined (SELECT_COMMAND)</a>
|
|
<a name="204"><span class="lineNum"> 204 </span><span class="lineNoCov"> 0 : case cm_select:</span></a>
|
|
<a name="205"><span class="lineNum"> 205 </span><span class="lineNoCov"> 0 : print_select_command (command->value.Select);</span></a>
|
|
<a name="206"><span class="lineNum"> 206 </span><span class="lineNoCov"> 0 : break;</span></a>
|
|
<a name="207"><span class="lineNum"> 207 </span> : #endif</a>
|
|
<a name="208"><span class="lineNum"> 208 </span> : </a>
|
|
<a name="209"><span class="lineNum"> 209 </span><span class="lineCov"> 123 : case cm_case:</span></a>
|
|
<a name="210"><span class="lineNum"> 210 </span><span class="lineCov"> 123 : print_case_command (command->value.Case);</span></a>
|
|
<a name="211"><span class="lineNum"> 211 </span><span class="lineCov"> 123 : break;</span></a>
|
|
<a name="212"><span class="lineNum"> 212 </span> : </a>
|
|
<a name="213"><span class="lineNum"> 213 </span><span class="lineCov"> 2938 : case cm_while:</span></a>
|
|
<a name="214"><span class="lineNum"> 214 </span><span class="lineCov"> 2938 : print_while_command (command->value.While);</span></a>
|
|
<a name="215"><span class="lineNum"> 215 </span><span class="lineCov"> 2938 : break;</span></a>
|
|
<a name="216"><span class="lineNum"> 216 </span> : </a>
|
|
<a name="217"><span class="lineNum"> 217 </span><span class="lineNoCov"> 0 : case cm_until:</span></a>
|
|
<a name="218"><span class="lineNum"> 218 </span><span class="lineNoCov"> 0 : print_until_command (command->value.While);</span></a>
|
|
<a name="219"><span class="lineNum"> 219 </span><span class="lineNoCov"> 0 : break;</span></a>
|
|
<a name="220"><span class="lineNum"> 220 </span> : </a>
|
|
<a name="221"><span class="lineNum"> 221 </span><span class="lineCov"> 155 : case cm_if:</span></a>
|
|
<a name="222"><span class="lineNum"> 222 </span><span class="lineCov"> 155 : print_if_command (command->value.If);</span></a>
|
|
<a name="223"><span class="lineNum"> 223 </span><span class="lineCov"> 155 : break;</span></a>
|
|
<a name="224"><span class="lineNum"> 224 </span> : </a>
|
|
<a name="225"><span class="lineNum"> 225 </span> : #if defined (DPAREN_ARITHMETIC)</a>
|
|
<a name="226"><span class="lineNum"> 226 </span><span class="lineNoCov"> 0 : case cm_arith:</span></a>
|
|
<a name="227"><span class="lineNum"> 227 </span><span class="lineNoCov"> 0 : print_arith_command (command->value.Arith->exp);</span></a>
|
|
<a name="228"><span class="lineNum"> 228 </span><span class="lineNoCov"> 0 : break;</span></a>
|
|
<a name="229"><span class="lineNum"> 229 </span> : #endif</a>
|
|
<a name="230"><span class="lineNum"> 230 </span> : </a>
|
|
<a name="231"><span class="lineNum"> 231 </span> : #if defined (COND_COMMAND)</a>
|
|
<a name="232"><span class="lineNum"> 232 </span><span class="lineNoCov"> 0 : case cm_cond:</span></a>
|
|
<a name="233"><span class="lineNum"> 233 </span><span class="lineNoCov"> 0 : print_cond_command (command->value.Cond);</span></a>
|
|
<a name="234"><span class="lineNum"> 234 </span><span class="lineNoCov"> 0 : break;</span></a>
|
|
<a name="235"><span class="lineNum"> 235 </span> : #endif</a>
|
|
<a name="236"><span class="lineNum"> 236 </span> : </a>
|
|
<a name="237"><span class="lineNum"> 237 </span><span class="lineCov"> 11772 : case cm_simple:</span></a>
|
|
<a name="238"><span class="lineNum"> 238 </span><span class="lineCov"> 11772 : print_simple_command (command->value.Simple);</span></a>
|
|
<a name="239"><span class="lineNum"> 239 </span><span class="lineCov"> 11772 : break;</span></a>
|
|
<a name="240"><span class="lineNum"> 240 </span> : </a>
|
|
<a name="241"><span class="lineNum"> 241 </span><span class="lineCov"> 4269 : case cm_connection:</span></a>
|
|
<a name="242"><span class="lineNum"> 242 </span> : </a>
|
|
<a name="243"><span class="lineNum"> 243 </span><span class="lineCov"> 4269 : skip_this_indent++;</span></a>
|
|
<a name="244"><span class="lineNum"> 244 </span><span class="lineCov"> 4269 : printing_connection++;</span></a>
|
|
<a name="245"><span class="lineNum"> 245 </span><span class="lineCov"> 4269 : make_command_string_internal (command->value.Connection->first);</span></a>
|
|
<a name="246"><span class="lineNum"> 246 </span> : </a>
|
|
<a name="247"><span class="lineNum"> 247 </span><span class="lineCov"> 4269 : switch (command->value.Connection->connector)</span></a>
|
|
<a name="248"><span class="lineNum"> 248 </span> : {</a>
|
|
<a name="249"><span class="lineNum"> 249 </span><span class="lineCov"> 73 : case '&':</span></a>
|
|
<a name="250"><span class="lineNum"> 250 </span> : case '|':</a>
|
|
<a name="251"><span class="lineNum"> 251 </span> : {</a>
|
|
<a name="252"><span class="lineNum"> 252 </span><span class="lineCov"> 73 : char c = command->value.Connection->connector;</span></a>
|
|
<a name="253"><span class="lineNum"> 253 </span> : </a>
|
|
<a name="254"><span class="lineNum"> 254 </span><span class="lineCov"> 73 : s[0] = ' ';</span></a>
|
|
<a name="255"><span class="lineNum"> 255 </span><span class="lineCov"> 73 : s[1] = c;</span></a>
|
|
<a name="256"><span class="lineNum"> 256 </span><span class="lineCov"> 73 : s[2] = '\0';</span></a>
|
|
<a name="257"><span class="lineNum"> 257 </span> : </a>
|
|
<a name="258"><span class="lineNum"> 258 </span><span class="lineCov"> 73 : print_deferred_heredocs (s);</span></a>
|
|
<a name="259"><span class="lineNum"> 259 </span> : </a>
|
|
<a name="260"><span class="lineNum"> 260 </span><span class="lineCov"> 73 : if (c != '&' || command->value.Connection->second)</span></a>
|
|
<a name="261"><span class="lineNum"> 261 </span> : {</a>
|
|
<a name="262"><span class="lineNum"> 262 </span><span class="lineCov"> 73 : cprintf (" ");</span></a>
|
|
<a name="263"><span class="lineNum"> 263 </span><span class="lineCov"> 73 : skip_this_indent++;</span></a>
|
|
<a name="264"><span class="lineNum"> 264 </span> : }</a>
|
|
<a name="265"><span class="lineNum"> 265 </span> : }</a>
|
|
<a name="266"><span class="lineNum"> 266 </span> : break;</a>
|
|
<a name="267"><span class="lineNum"> 267 </span> : </a>
|
|
<a name="268"><span class="lineNum"> 268 </span><span class="lineNoCov"> 0 : case AND_AND:</span></a>
|
|
<a name="269"><span class="lineNum"> 269 </span><span class="lineNoCov"> 0 : print_deferred_heredocs (" && ");</span></a>
|
|
<a name="270"><span class="lineNum"> 270 </span><span class="lineNoCov"> 0 : if (command->value.Connection->second)</span></a>
|
|
<a name="271"><span class="lineNum"> 271 </span><span class="lineNoCov"> 0 : skip_this_indent++;</span></a>
|
|
<a name="272"><span class="lineNum"> 272 </span> : break;</a>
|
|
<a name="273"><span class="lineNum"> 273 </span> : </a>
|
|
<a name="274"><span class="lineNum"> 274 </span><span class="lineCov"> 3115 : case OR_OR:</span></a>
|
|
<a name="275"><span class="lineNum"> 275 </span><span class="lineCov"> 3115 : print_deferred_heredocs (" || ");</span></a>
|
|
<a name="276"><span class="lineNum"> 276 </span><span class="lineCov"> 3115 : if (command->value.Connection->second)</span></a>
|
|
<a name="277"><span class="lineNum"> 277 </span><span class="lineCov"> 3115 : skip_this_indent++;</span></a>
|
|
<a name="278"><span class="lineNum"> 278 </span> : break;</a>
|
|
<a name="279"><span class="lineNum"> 279 </span> : </a>
|
|
<a name="280"><span class="lineNum"> 280 </span><span class="lineCov"> 1081 : case ';':</span></a>
|
|
<a name="281"><span class="lineNum"> 281 </span><span class="lineCov"> 1081 : if (deferred_heredocs == 0)</span></a>
|
|
<a name="282"><span class="lineNum"> 282 </span> : {</a>
|
|
<a name="283"><span class="lineNum"> 283 </span><span class="lineCov"> 1081 : if (was_heredoc == 0)</span></a>
|
|
<a name="284"><span class="lineNum"> 284 </span><span class="lineCov"> 1081 : cprintf (";");</span></a>
|
|
<a name="285"><span class="lineNum"> 285 </span> : else</a>
|
|
<a name="286"><span class="lineNum"> 286 </span><span class="lineNoCov"> 0 : was_heredoc = 0;</span></a>
|
|
<a name="287"><span class="lineNum"> 287 </span> : }</a>
|
|
<a name="288"><span class="lineNum"> 288 </span> : else</a>
|
|
<a name="289"><span class="lineNum"> 289 </span><span class="lineNoCov"> 0 : print_deferred_heredocs (inside_function_def ? "" : ";");</span></a>
|
|
<a name="290"><span class="lineNum"> 290 </span> : </a>
|
|
<a name="291"><span class="lineNum"> 291 </span><span class="lineCov"> 1081 : if (inside_function_def)</span></a>
|
|
<a name="292"><span class="lineNum"> 292 </span><span class="lineCov"> 684 : cprintf ("\n");</span></a>
|
|
<a name="293"><span class="lineNum"> 293 </span> : else</a>
|
|
<a name="294"><span class="lineNum"> 294 </span> : {</a>
|
|
<a name="295"><span class="lineNum"> 295 </span><span class="lineCov"> 397 : cprintf (" ");</span></a>
|
|
<a name="296"><span class="lineNum"> 296 </span><span class="lineCov"> 397 : if (command->value.Connection->second)</span></a>
|
|
<a name="297"><span class="lineNum"> 297 </span><span class="lineCov"> 397 : skip_this_indent++;</span></a>
|
|
<a name="298"><span class="lineNum"> 298 </span> : }</a>
|
|
<a name="299"><span class="lineNum"> 299 </span> : break;</a>
|
|
<a name="300"><span class="lineNum"> 300 </span> : </a>
|
|
<a name="301"><span class="lineNum"> 301 </span><span class="lineNoCov"> 0 : default:</span></a>
|
|
<a name="302"><span class="lineNum"> 302 </span><span class="lineNoCov"> 0 : cprintf (_("print_command: bad connector `%d'"),</span></a>
|
|
<a name="303"><span class="lineNum"> 303 </span> : command->value.Connection->connector);</a>
|
|
<a name="304"><span class="lineNum"> 304 </span><span class="lineNoCov"> 0 : break;</span></a>
|
|
<a name="305"><span class="lineNum"> 305 </span> : }</a>
|
|
<a name="306"><span class="lineNum"> 306 </span> : </a>
|
|
<a name="307"><span class="lineNum"> 307 </span><span class="lineCov"> 4269 : make_command_string_internal (command->value.Connection->second);</span></a>
|
|
<a name="308"><span class="lineNum"> 308 </span><span class="lineCov"> 4269 : PRINT_DEFERRED_HEREDOCS ("");</span></a>
|
|
<a name="309"><span class="lineNum"> 309 </span><span class="lineCov"> 4269 : printing_connection--; </span></a>
|
|
<a name="310"><span class="lineNum"> 310 </span><span class="lineCov"> 4269 : break;</span></a>
|
|
<a name="311"><span class="lineNum"> 311 </span> : </a>
|
|
<a name="312"><span class="lineNum"> 312 </span><span class="lineCov"> 303 : case cm_function_def:</span></a>
|
|
<a name="313"><span class="lineNum"> 313 </span><span class="lineCov"> 303 : print_function_def (command->value.Function_def);</span></a>
|
|
<a name="314"><span class="lineNum"> 314 </span><span class="lineCov"> 303 : break;</span></a>
|
|
<a name="315"><span class="lineNum"> 315 </span> : </a>
|
|
<a name="316"><span class="lineNum"> 316 </span><span class="lineCov"> 9 : case cm_group:</span></a>
|
|
<a name="317"><span class="lineNum"> 317 </span><span class="lineCov"> 9 : print_group_command (command->value.Group);</span></a>
|
|
<a name="318"><span class="lineNum"> 318 </span><span class="lineCov"> 9 : break;</span></a>
|
|
<a name="319"><span class="lineNum"> 319 </span> : </a>
|
|
<a name="320"><span class="lineNum"> 320 </span><span class="lineCov"> 105 : case cm_subshell:</span></a>
|
|
<a name="321"><span class="lineNum"> 321 </span><span class="lineCov"> 105 : cprintf ("( ");</span></a>
|
|
<a name="322"><span class="lineNum"> 322 </span><span class="lineCov"> 105 : skip_this_indent++;</span></a>
|
|
<a name="323"><span class="lineNum"> 323 </span><span class="lineCov"> 105 : make_command_string_internal (command->value.Subshell->command);</span></a>
|
|
<a name="324"><span class="lineNum"> 324 </span><span class="lineCov"> 105 : PRINT_DEFERRED_HEREDOCS ("");</span></a>
|
|
<a name="325"><span class="lineNum"> 325 </span><span class="lineCov"> 105 : cprintf (" )");</span></a>
|
|
<a name="326"><span class="lineNum"> 326 </span><span class="lineCov"> 105 : break;</span></a>
|
|
<a name="327"><span class="lineNum"> 327 </span> : </a>
|
|
<a name="328"><span class="lineNum"> 328 </span><span class="lineNoCov"> 0 : case cm_coproc:</span></a>
|
|
<a name="329"><span class="lineNum"> 329 </span><span class="lineNoCov"> 0 : cprintf ("coproc %s ", command->value.Coproc->name);</span></a>
|
|
<a name="330"><span class="lineNum"> 330 </span><span class="lineNoCov"> 0 : skip_this_indent++;</span></a>
|
|
<a name="331"><span class="lineNum"> 331 </span><span class="lineNoCov"> 0 : make_command_string_internal (command->value.Coproc->command);</span></a>
|
|
<a name="332"><span class="lineNum"> 332 </span><span class="lineNoCov"> 0 : break;</span></a>
|
|
<a name="333"><span class="lineNum"> 333 </span> : </a>
|
|
<a name="334"><span class="lineNum"> 334 </span><span class="lineNoCov"> 0 : default:</span></a>
|
|
<a name="335"><span class="lineNum"> 335 </span><span class="lineNoCov"> 0 : command_error ("print_command", CMDERR_BADTYPE, command->type, 0);</span></a>
|
|
<a name="336"><span class="lineNum"> 336 </span><span class="lineNoCov"> 0 : break;</span></a>
|
|
<a name="337"><span class="lineNum"> 337 </span> : }</a>
|
|
<a name="338"><span class="lineNum"> 338 </span> : </a>
|
|
<a name="339"><span class="lineNum"> 339 </span> : </a>
|
|
<a name="340"><span class="lineNum"> 340 </span><span class="lineCov"> 19674 : if (command->redirects)</span></a>
|
|
<a name="341"><span class="lineNum"> 341 </span> : {</a>
|
|
<a name="342"><span class="lineNum"> 342 </span><span class="lineNoCov"> 0 : cprintf (" ");</span></a>
|
|
<a name="343"><span class="lineNum"> 343 </span><span class="lineNoCov"> 0 : print_redirection_list (command->redirects);</span></a>
|
|
<a name="344"><span class="lineNum"> 344 </span> : }</a>
|
|
<a name="345"><span class="lineNum"> 345 </span> : }</a>
|
|
<a name="346"><span class="lineNum"> 346 </span><span class="lineCov"> 19715 : }</span></a>
|
|
<a name="347"><span class="lineNum"> 347 </span> : </a>
|
|
<a name="348"><span class="lineNum"> 348 </span> : static void</a>
|
|
<a name="349"><span class="lineNum"> 349 </span> : _print_word_list (list, separator, pfunc)</a>
|
|
<a name="350"><span class="lineNum"> 350 </span> : WORD_LIST *list;</a>
|
|
<a name="351"><span class="lineNum"> 351 </span> : char *separator;</a>
|
|
<a name="352"><span class="lineNum"> 352 </span> : PFUNC *pfunc;</a>
|
|
<a name="353"><span class="lineNum"> 353 </span> : {</a>
|
|
<a name="354"><span class="lineNum"> 354 </span><span class="lineCov"> 86316420 : WORD_LIST *w;</span></a>
|
|
<a name="355"><span class="lineNum"> 355 </span> : </a>
|
|
<a name="356"><span class="lineNum"> 356 </span><span class="lineCov"> 284601743 : for (w = list; w; w = w->next)</span></a>
|
|
<a name="357"><span class="lineNum"> 357 </span><span class="lineCov"> 284600805 : (*pfunc) ("%s%s", w->word->word, w->next ? separator : "");</span></a>
|
|
<a name="358"><span class="lineNum"> 358 </span> : }</a>
|
|
<a name="359"><span class="lineNum"> 359 </span> : </a>
|
|
<a name="360"><span class="lineNum"> 360 </span> : void</a>
|
|
<a name="361"><span class="lineNum"> 361 </span><span class="lineNoCov"> 0 : print_word_list (list, separator)</span></a>
|
|
<a name="362"><span class="lineNum"> 362 </span> : WORD_LIST *list;</a>
|
|
<a name="363"><span class="lineNum"> 363 </span> : char *separator;</a>
|
|
<a name="364"><span class="lineNum"> 364 </span> : {</a>
|
|
<a name="365"><span class="lineNum"> 365 </span><span class="lineNoCov"> 0 : _print_word_list (list, separator, xprintf);</span></a>
|
|
<a name="366"><span class="lineNum"> 366 </span><span class="lineNoCov"> 0 : }</span></a>
|
|
<a name="367"><span class="lineNum"> 367 </span> : </a>
|
|
<a name="368"><span class="lineNum"> 368 </span> : void</a>
|
|
<a name="369"><span class="lineNum"> 369 </span><span class="lineCov"> 9542957 : xtrace_set (fd, fp)</span></a>
|
|
<a name="370"><span class="lineNum"> 370 </span> : int fd;</a>
|
|
<a name="371"><span class="lineNum"> 371 </span> : FILE *fp;</a>
|
|
<a name="372"><span class="lineNum"> 372 </span> : {</a>
|
|
<a name="373"><span class="lineNum"> 373 </span><span class="lineCov"> 9542957 : if (fd >= 0 && sh_validfd (fd) == 0)</span></a>
|
|
<a name="374"><span class="lineNum"> 374 </span> : {</a>
|
|
<a name="375"><span class="lineNum"> 375 </span><span class="lineNoCov"> 0 : internal_error (_("xtrace_set: %d: invalid file descriptor"), fd);</span></a>
|
|
<a name="376"><span class="lineNum"> 376 </span><span class="lineNoCov"> 0 : return;</span></a>
|
|
<a name="377"><span class="lineNum"> 377 </span> : }</a>
|
|
<a name="378"><span class="lineNum"> 378 </span><span class="lineCov"> 9542957 : if (fp == 0)</span></a>
|
|
<a name="379"><span class="lineNum"> 379 </span> : {</a>
|
|
<a name="380"><span class="lineNum"> 380 </span><span class="lineNoCov"> 0 : internal_error (_("xtrace_set: NULL file pointer"));</span></a>
|
|
<a name="381"><span class="lineNum"> 381 </span><span class="lineNoCov"> 0 : return;</span></a>
|
|
<a name="382"><span class="lineNum"> 382 </span> : }</a>
|
|
<a name="383"><span class="lineNum"> 383 </span><span class="lineCov"> 9542957 : if (fd >= 0 && fileno (fp) != fd)</span></a>
|
|
<a name="384"><span class="lineNum"> 384 </span><span class="lineNoCov"> 0 : internal_warning (_("xtrace fd (%d) != fileno xtrace fp (%d)"), fd, fileno (fp));</span></a>
|
|
<a name="385"><span class="lineNum"> 385 </span> : </a>
|
|
<a name="386"><span class="lineNum"> 386 </span><span class="lineCov"> 9542957 : xtrace_fd = fd;</span></a>
|
|
<a name="387"><span class="lineNum"> 387 </span><span class="lineCov"> 9542957 : xtrace_fp = fp;</span></a>
|
|
<a name="388"><span class="lineNum"> 388 </span> : }</a>
|
|
<a name="389"><span class="lineNum"> 389 </span> : </a>
|
|
<a name="390"><span class="lineNum"> 390 </span> : void</a>
|
|
<a name="391"><span class="lineNum"> 391 </span><span class="lineCov"> 9542957 : xtrace_init ()</span></a>
|
|
<a name="392"><span class="lineNum"> 392 </span> : {</a>
|
|
<a name="393"><span class="lineNum"> 393 </span><span class="lineCov"> 9542957 : xtrace_set (-1, stderr);</span></a>
|
|
<a name="394"><span class="lineNum"> 394 </span><span class="lineCov"> 9542957 : }</span></a>
|
|
<a name="395"><span class="lineNum"> 395 </span> : </a>
|
|
<a name="396"><span class="lineNum"> 396 </span> : void</a>
|
|
<a name="397"><span class="lineNum"> 397 </span><span class="lineNoCov"> 0 : xtrace_reset ()</span></a>
|
|
<a name="398"><span class="lineNum"> 398 </span> : {</a>
|
|
<a name="399"><span class="lineNum"> 399 </span><span class="lineNoCov"> 0 : if (xtrace_fd >= 0 && xtrace_fp)</span></a>
|
|
<a name="400"><span class="lineNum"> 400 </span> : {</a>
|
|
<a name="401"><span class="lineNum"> 401 </span><span class="lineNoCov"> 0 : fflush (xtrace_fp);</span></a>
|
|
<a name="402"><span class="lineNum"> 402 </span><span class="lineNoCov"> 0 : fclose (xtrace_fp);</span></a>
|
|
<a name="403"><span class="lineNum"> 403 </span> : }</a>
|
|
<a name="404"><span class="lineNum"> 404 </span><span class="lineNoCov"> 0 : else if (xtrace_fd >= 0)</span></a>
|
|
<a name="405"><span class="lineNum"> 405 </span><span class="lineNoCov"> 0 : close (xtrace_fd);</span></a>
|
|
<a name="406"><span class="lineNum"> 406 </span> : </a>
|
|
<a name="407"><span class="lineNum"> 407 </span><span class="lineNoCov"> 0 : xtrace_fd = -1;</span></a>
|
|
<a name="408"><span class="lineNum"> 408 </span><span class="lineNoCov"> 0 : xtrace_fp = stderr;</span></a>
|
|
<a name="409"><span class="lineNum"> 409 </span><span class="lineNoCov"> 0 : }</span></a>
|
|
<a name="410"><span class="lineNum"> 410 </span> : </a>
|
|
<a name="411"><span class="lineNum"> 411 </span> : void</a>
|
|
<a name="412"><span class="lineNum"> 412 </span><span class="lineCov"> 699 : xtrace_fdchk (fd)</span></a>
|
|
<a name="413"><span class="lineNum"> 413 </span> : int fd;</a>
|
|
<a name="414"><span class="lineNum"> 414 </span> : {</a>
|
|
<a name="415"><span class="lineNum"> 415 </span><span class="lineCov"> 699 : if (fd == xtrace_fd)</span></a>
|
|
<a name="416"><span class="lineNum"> 416 </span><span class="lineNoCov"> 0 : xtrace_reset ();</span></a>
|
|
<a name="417"><span class="lineNum"> 417 </span><span class="lineCov"> 699 : }</span></a>
|
|
<a name="418"><span class="lineNum"> 418 </span> : </a>
|
|
<a name="419"><span class="lineNum"> 419 </span> : /* Return a string denoting what our indirection level is. */</a>
|
|
<a name="420"><span class="lineNum"> 420 </span> : </a>
|
|
<a name="421"><span class="lineNum"> 421 </span> : char *</a>
|
|
<a name="422"><span class="lineNum"> 422 </span><span class="lineNoCov"> 0 : indirection_level_string ()</span></a>
|
|
<a name="423"><span class="lineNum"> 423 </span> : {</a>
|
|
<a name="424"><span class="lineNum"> 424 </span><span class="lineNoCov"> 0 : register int i, j;</span></a>
|
|
<a name="425"><span class="lineNum"> 425 </span><span class="lineNoCov"> 0 : char *ps4;</span></a>
|
|
<a name="426"><span class="lineNum"> 426 </span><span class="lineNoCov"> 0 : char ps4_firstc[MB_LEN_MAX+1];</span></a>
|
|
<a name="427"><span class="lineNum"> 427 </span><span class="lineNoCov"> 0 : int ps4_firstc_len, ps4_len, ineed, old;</span></a>
|
|
<a name="428"><span class="lineNum"> 428 </span> : </a>
|
|
<a name="429"><span class="lineNum"> 429 </span><span class="lineNoCov"> 0 : ps4 = get_string_value ("PS4");</span></a>
|
|
<a name="430"><span class="lineNum"> 430 </span><span class="lineNoCov"> 0 : if (indirection_string == 0)</span></a>
|
|
<a name="431"><span class="lineNum"> 431 </span><span class="lineNoCov"> 0 : indirection_string = xmalloc (indirection_stringsiz = 100);</span></a>
|
|
<a name="432"><span class="lineNum"> 432 </span><span class="lineNoCov"> 0 : indirection_string[0] = '\0';</span></a>
|
|
<a name="433"><span class="lineNum"> 433 </span> : </a>
|
|
<a name="434"><span class="lineNum"> 434 </span><span class="lineNoCov"> 0 : if (ps4 == 0 || *ps4 == '\0')</span></a>
|
|
<a name="435"><span class="lineNum"> 435 </span> : return (indirection_string);</a>
|
|
<a name="436"><span class="lineNum"> 436 </span> : </a>
|
|
<a name="437"><span class="lineNum"> 437 </span><span class="lineNoCov"> 0 : old = change_flag ('x', FLAG_OFF);</span></a>
|
|
<a name="438"><span class="lineNum"> 438 </span><span class="lineNoCov"> 0 : ps4 = decode_prompt_string (ps4);</span></a>
|
|
<a name="439"><span class="lineNum"> 439 </span><span class="lineNoCov"> 0 : if (old)</span></a>
|
|
<a name="440"><span class="lineNum"> 440 </span><span class="lineNoCov"> 0 : change_flag ('x', FLAG_ON);</span></a>
|
|
<a name="441"><span class="lineNum"> 441 </span> : </a>
|
|
<a name="442"><span class="lineNum"> 442 </span><span class="lineNoCov"> 0 : if (ps4 == 0 || *ps4 == '\0')</span></a>
|
|
<a name="443"><span class="lineNum"> 443 </span><span class="lineNoCov"> 0 : return (indirection_string);</span></a>
|
|
<a name="444"><span class="lineNum"> 444 </span> : </a>
|
|
<a name="445"><span class="lineNum"> 445 </span> : #if defined (HANDLE_MULTIBYTE)</a>
|
|
<a name="446"><span class="lineNum"> 446 </span><span class="lineNoCov"> 0 : ps4_len = strnlen (ps4, MB_CUR_MAX);</span></a>
|
|
<a name="447"><span class="lineNum"> 447 </span><span class="lineNoCov"> 0 : ps4_firstc_len = MBLEN (ps4, ps4_len);</span></a>
|
|
<a name="448"><span class="lineNum"> 448 </span><span class="lineNoCov"> 0 : if (ps4_firstc_len == 1 || ps4_firstc_len == 0 || ps4_firstc_len < 0)</span></a>
|
|
<a name="449"><span class="lineNum"> 449 </span> : {</a>
|
|
<a name="450"><span class="lineNum"> 450 </span><span class="lineNoCov"> 0 : ps4_firstc[0] = ps4[0];</span></a>
|
|
<a name="451"><span class="lineNum"> 451 </span><span class="lineNoCov"> 0 : ps4_firstc[ps4_firstc_len = 1] = '\0';</span></a>
|
|
<a name="452"><span class="lineNum"> 452 </span> : }</a>
|
|
<a name="453"><span class="lineNum"> 453 </span> : else</a>
|
|
<a name="454"><span class="lineNum"> 454 </span><span class="lineNoCov"> 0 : memcpy (ps4_firstc, ps4, ps4_firstc_len);</span></a>
|
|
<a name="455"><span class="lineNum"> 455 </span> : #else</a>
|
|
<a name="456"><span class="lineNum"> 456 </span> : ps4_firstc[0] = ps4[0];</a>
|
|
<a name="457"><span class="lineNum"> 457 </span> : ps4_firstc[ps4_firstc_len = 1] = '\0';</a>
|
|
<a name="458"><span class="lineNum"> 458 </span> : #endif</a>
|
|
<a name="459"><span class="lineNum"> 459 </span> : </a>
|
|
<a name="460"><span class="lineNum"> 460 </span> : /* Dynamically resize indirection_string so we have room for everything</a>
|
|
<a name="461"><span class="lineNum"> 461 </span> : and we don't have to truncate ps4 */</a>
|
|
<a name="462"><span class="lineNum"> 462 </span><span class="lineNoCov"> 0 : ineed = (ps4_firstc_len * indirection_level) + strlen (ps4);</span></a>
|
|
<a name="463"><span class="lineNum"> 463 </span><span class="lineNoCov"> 0 : if (ineed > indirection_stringsiz - 1)</span></a>
|
|
<a name="464"><span class="lineNum"> 464 </span> : {</a>
|
|
<a name="465"><span class="lineNum"> 465 </span><span class="lineNoCov"> 0 : indirection_stringsiz = ineed + 1;</span></a>
|
|
<a name="466"><span class="lineNum"> 466 </span><span class="lineNoCov"> 0 : indirection_string = xrealloc (indirection_string, indirection_stringsiz);</span></a>
|
|
<a name="467"><span class="lineNum"> 467 </span> : }</a>
|
|
<a name="468"><span class="lineNum"> 468 </span> : </a>
|
|
<a name="469"><span class="lineNum"> 469 </span><span class="lineNoCov"> 0 : for (i = j = 0; ps4_firstc[0] && j < indirection_level && i < indirection_stringsiz - 1; i += ps4_firstc_len, j++)</span></a>
|
|
<a name="470"><span class="lineNum"> 470 </span> : {</a>
|
|
<a name="471"><span class="lineNum"> 471 </span><span class="lineNoCov"> 0 : if (ps4_firstc_len == 1)</span></a>
|
|
<a name="472"><span class="lineNum"> 472 </span><span class="lineNoCov"> 0 : indirection_string[i] = ps4_firstc[0];</span></a>
|
|
<a name="473"><span class="lineNum"> 473 </span> : else</a>
|
|
<a name="474"><span class="lineNum"> 474 </span><span class="lineNoCov"> 0 : memcpy (indirection_string+i, ps4_firstc, ps4_firstc_len);</span></a>
|
|
<a name="475"><span class="lineNum"> 475 </span> : } </a>
|
|
<a name="476"><span class="lineNum"> 476 </span> : </a>
|
|
<a name="477"><span class="lineNum"> 477 </span><span class="lineNoCov"> 0 : for (j = ps4_firstc_len; *ps4 && ps4[j] && i < indirection_stringsiz - 1; i++, j++)</span></a>
|
|
<a name="478"><span class="lineNum"> 478 </span><span class="lineNoCov"> 0 : indirection_string[i] = ps4[j];</span></a>
|
|
<a name="479"><span class="lineNum"> 479 </span> : </a>
|
|
<a name="480"><span class="lineNum"> 480 </span><span class="lineNoCov"> 0 : indirection_string[i] = '\0';</span></a>
|
|
<a name="481"><span class="lineNum"> 481 </span><span class="lineNoCov"> 0 : free (ps4);</span></a>
|
|
<a name="482"><span class="lineNum"> 482 </span><span class="lineNoCov"> 0 : return (indirection_string);</span></a>
|
|
<a name="483"><span class="lineNum"> 483 </span> : }</a>
|
|
<a name="484"><span class="lineNum"> 484 </span> : </a>
|
|
<a name="485"><span class="lineNum"> 485 </span> : void</a>
|
|
<a name="486"><span class="lineNum"> 486 </span><span class="lineNoCov"> 0 : xtrace_print_assignment (name, value, assign_list, xflags)</span></a>
|
|
<a name="487"><span class="lineNum"> 487 </span> : char *name, *value;</a>
|
|
<a name="488"><span class="lineNum"> 488 </span> : int assign_list, xflags;</a>
|
|
<a name="489"><span class="lineNum"> 489 </span> : {</a>
|
|
<a name="490"><span class="lineNum"> 490 </span><span class="lineNoCov"> 0 : char *nval;</span></a>
|
|
<a name="491"><span class="lineNum"> 491 </span> : </a>
|
|
<a name="492"><span class="lineNum"> 492 </span><span class="lineNoCov"> 0 : CHECK_XTRACE_FP;</span></a>
|
|
<a name="493"><span class="lineNum"> 493 </span> : </a>
|
|
<a name="494"><span class="lineNum"> 494 </span><span class="lineNoCov"> 0 : if (xflags)</span></a>
|
|
<a name="495"><span class="lineNum"> 495 </span><span class="lineNoCov"> 0 : fprintf (xtrace_fp, "%s", indirection_level_string ());</span></a>
|
|
<a name="496"><span class="lineNum"> 496 </span> : </a>
|
|
<a name="497"><span class="lineNum"> 497 </span> : /* VALUE should not be NULL when this is called. */</a>
|
|
<a name="498"><span class="lineNum"> 498 </span><span class="lineNoCov"> 0 : if (*value == '\0' || assign_list)</span></a>
|
|
<a name="499"><span class="lineNum"> 499 </span> : nval = value;</a>
|
|
<a name="500"><span class="lineNum"> 500 </span><span class="lineNoCov"> 0 : else if (sh_contains_shell_metas (value))</span></a>
|
|
<a name="501"><span class="lineNum"> 501 </span><span class="lineNoCov"> 0 : nval = sh_single_quote (value);</span></a>
|
|
<a name="502"><span class="lineNum"> 502 </span><span class="lineNoCov"> 0 : else if (ansic_shouldquote (value))</span></a>
|
|
<a name="503"><span class="lineNum"> 503 </span><span class="lineNoCov"> 0 : nval = ansic_quote (value, 0, (int *)0);</span></a>
|
|
<a name="504"><span class="lineNum"> 504 </span> : else</a>
|
|
<a name="505"><span class="lineNum"> 505 </span> : nval = value;</a>
|
|
<a name="506"><span class="lineNum"> 506 </span> : </a>
|
|
<a name="507"><span class="lineNum"> 507 </span><span class="lineNoCov"> 0 : if (assign_list)</span></a>
|
|
<a name="508"><span class="lineNum"> 508 </span><span class="lineNoCov"> 0 : fprintf (xtrace_fp, "%s=(%s)\n", name, nval);</span></a>
|
|
<a name="509"><span class="lineNum"> 509 </span> : else</a>
|
|
<a name="510"><span class="lineNum"> 510 </span><span class="lineNoCov"> 0 : fprintf (xtrace_fp, "%s=%s\n", name, nval);</span></a>
|
|
<a name="511"><span class="lineNum"> 511 </span> : </a>
|
|
<a name="512"><span class="lineNum"> 512 </span><span class="lineNoCov"> 0 : if (nval != value)</span></a>
|
|
<a name="513"><span class="lineNum"> 513 </span><span class="lineNoCov"> 0 : FREE (nval);</span></a>
|
|
<a name="514"><span class="lineNum"> 514 </span> : </a>
|
|
<a name="515"><span class="lineNum"> 515 </span><span class="lineNoCov"> 0 : fflush (xtrace_fp);</span></a>
|
|
<a name="516"><span class="lineNum"> 516 </span><span class="lineNoCov"> 0 : }</span></a>
|
|
<a name="517"><span class="lineNum"> 517 </span> : </a>
|
|
<a name="518"><span class="lineNum"> 518 </span> : /* A function to print the words of a simple command when set -x is on. Also</a>
|
|
<a name="519"><span class="lineNum"> 519 </span> : used to print the word list in a for or select command header; in that case,</a>
|
|
<a name="520"><span class="lineNum"> 520 </span> : we suppress quoting the words because they haven't been expanded yet.</a>
|
|
<a name="521"><span class="lineNum"> 521 </span> : XTFLAGS&1 means to print $PS4; XTFLAGS&2 means to suppress quoting the</a>
|
|
<a name="522"><span class="lineNum"> 522 </span> : words in LIST. */</a>
|
|
<a name="523"><span class="lineNum"> 523 </span> : void</a>
|
|
<a name="524"><span class="lineNum"> 524 </span><span class="lineNoCov"> 0 : xtrace_print_word_list (list, xtflags)</span></a>
|
|
<a name="525"><span class="lineNum"> 525 </span> : WORD_LIST *list;</a>
|
|
<a name="526"><span class="lineNum"> 526 </span> : int xtflags;</a>
|
|
<a name="527"><span class="lineNum"> 527 </span> : {</a>
|
|
<a name="528"><span class="lineNum"> 528 </span><span class="lineNoCov"> 0 : WORD_LIST *w;</span></a>
|
|
<a name="529"><span class="lineNum"> 529 </span><span class="lineNoCov"> 0 : char *t, *x;</span></a>
|
|
<a name="530"><span class="lineNum"> 530 </span> : </a>
|
|
<a name="531"><span class="lineNum"> 531 </span><span class="lineNoCov"> 0 : CHECK_XTRACE_FP;</span></a>
|
|
<a name="532"><span class="lineNum"> 532 </span> : </a>
|
|
<a name="533"><span class="lineNum"> 533 </span><span class="lineNoCov"> 0 : if (xtflags&1)</span></a>
|
|
<a name="534"><span class="lineNum"> 534 </span><span class="lineNoCov"> 0 : fprintf (xtrace_fp, "%s", indirection_level_string ());</span></a>
|
|
<a name="535"><span class="lineNum"> 535 </span> : </a>
|
|
<a name="536"><span class="lineNum"> 536 </span><span class="lineNoCov"> 0 : for (w = list; w; w = w->next)</span></a>
|
|
<a name="537"><span class="lineNum"> 537 </span> : {</a>
|
|
<a name="538"><span class="lineNum"> 538 </span><span class="lineNoCov"> 0 : t = w->word->word;</span></a>
|
|
<a name="539"><span class="lineNum"> 539 </span><span class="lineNoCov"> 0 : if (t == 0 || *t == '\0')</span></a>
|
|
<a name="540"><span class="lineNum"> 540 </span><span class="lineNoCov"> 0 : fprintf (xtrace_fp, "''%s", w->next ? " " : "");</span></a>
|
|
<a name="541"><span class="lineNum"> 541 </span><span class="lineNoCov"> 0 : else if (xtflags & 2)</span></a>
|
|
<a name="542"><span class="lineNum"> 542 </span><span class="lineNoCov"> 0 : fprintf (xtrace_fp, "%s%s", t, w->next ? " " : "");</span></a>
|
|
<a name="543"><span class="lineNum"> 543 </span><span class="lineNoCov"> 0 : else if (sh_contains_shell_metas (t))</span></a>
|
|
<a name="544"><span class="lineNum"> 544 </span> : {</a>
|
|
<a name="545"><span class="lineNum"> 545 </span><span class="lineNoCov"> 0 : x = sh_single_quote (t);</span></a>
|
|
<a name="546"><span class="lineNum"> 546 </span><span class="lineNoCov"> 0 : fprintf (xtrace_fp, "%s%s", x, w->next ? " " : "");</span></a>
|
|
<a name="547"><span class="lineNum"> 547 </span><span class="lineNoCov"> 0 : free (x);</span></a>
|
|
<a name="548"><span class="lineNum"> 548 </span> : }</a>
|
|
<a name="549"><span class="lineNum"> 549 </span><span class="lineNoCov"> 0 : else if (ansic_shouldquote (t))</span></a>
|
|
<a name="550"><span class="lineNum"> 550 </span> : {</a>
|
|
<a name="551"><span class="lineNum"> 551 </span><span class="lineNoCov"> 0 : x = ansic_quote (t, 0, (int *)0);</span></a>
|
|
<a name="552"><span class="lineNum"> 552 </span><span class="lineNoCov"> 0 : fprintf (xtrace_fp, "%s%s", x, w->next ? " " : "");</span></a>
|
|
<a name="553"><span class="lineNum"> 553 </span><span class="lineNoCov"> 0 : free (x);</span></a>
|
|
<a name="554"><span class="lineNum"> 554 </span> : }</a>
|
|
<a name="555"><span class="lineNum"> 555 </span> : else</a>
|
|
<a name="556"><span class="lineNum"> 556 </span><span class="lineNoCov"> 0 : fprintf (xtrace_fp, "%s%s", t, w->next ? " " : "");</span></a>
|
|
<a name="557"><span class="lineNum"> 557 </span> : }</a>
|
|
<a name="558"><span class="lineNum"> 558 </span><span class="lineNoCov"> 0 : fprintf (xtrace_fp, "\n");</span></a>
|
|
<a name="559"><span class="lineNum"> 559 </span><span class="lineNoCov"> 0 : fflush (xtrace_fp);</span></a>
|
|
<a name="560"><span class="lineNum"> 560 </span><span class="lineNoCov"> 0 : }</span></a>
|
|
<a name="561"><span class="lineNum"> 561 </span> : </a>
|
|
<a name="562"><span class="lineNum"> 562 </span> : static void</a>
|
|
<a name="563"><span class="lineNum"> 563 </span><span class="lineCov"> 86316420 : command_print_word_list (list, separator)</span></a>
|
|
<a name="564"><span class="lineNum"> 564 </span> : WORD_LIST *list;</a>
|
|
<a name="565"><span class="lineNum"> 565 </span> : char *separator;</a>
|
|
<a name="566"><span class="lineNum"> 566 </span> : {</a>
|
|
<a name="567"><span class="lineNum"> 567 </span><span class="lineCov"> 86316420 : _print_word_list (list, separator, cprintf);</span></a>
|
|
<a name="568"><span class="lineNum"> 568 </span><span class="lineCov"> 86316420 : }</span></a>
|
|
<a name="569"><span class="lineNum"> 569 </span> : </a>
|
|
<a name="570"><span class="lineNum"> 570 </span> : void</a>
|
|
<a name="571"><span class="lineNum"> 571 </span><span class="lineNoCov"> 0 : print_for_command_head (for_command)</span></a>
|
|
<a name="572"><span class="lineNum"> 572 </span> : FOR_COM *for_command;</a>
|
|
<a name="573"><span class="lineNum"> 573 </span> : {</a>
|
|
<a name="574"><span class="lineNum"> 574 </span><span class="lineNoCov"> 0 : cprintf ("for %s in ", for_command->name->word);</span></a>
|
|
<a name="575"><span class="lineNum"> 575 </span><span class="lineNoCov"> 0 : command_print_word_list (for_command->map_list, " ");</span></a>
|
|
<a name="576"><span class="lineNum"> 576 </span><span class="lineNoCov"> 0 : }</span></a>
|
|
<a name="577"><span class="lineNum"> 577 </span> : </a>
|
|
<a name="578"><span class="lineNum"> 578 </span> : void</a>
|
|
<a name="579"><span class="lineNum"> 579 </span><span class="lineNoCov"> 0 : xtrace_print_for_command_head (for_command)</span></a>
|
|
<a name="580"><span class="lineNum"> 580 </span> : FOR_COM *for_command;</a>
|
|
<a name="581"><span class="lineNum"> 581 </span> : {</a>
|
|
<a name="582"><span class="lineNum"> 582 </span><span class="lineNoCov"> 0 : CHECK_XTRACE_FP;</span></a>
|
|
<a name="583"><span class="lineNum"> 583 </span><span class="lineNoCov"> 0 : fprintf (xtrace_fp, "%s", indirection_level_string ());</span></a>
|
|
<a name="584"><span class="lineNum"> 584 </span><span class="lineNoCov"> 0 : fprintf (xtrace_fp, "for %s in ", for_command->name->word);</span></a>
|
|
<a name="585"><span class="lineNum"> 585 </span><span class="lineNoCov"> 0 : xtrace_print_word_list (for_command->map_list, 2);</span></a>
|
|
<a name="586"><span class="lineNum"> 586 </span><span class="lineNoCov"> 0 : }</span></a>
|
|
<a name="587"><span class="lineNum"> 587 </span> : </a>
|
|
<a name="588"><span class="lineNum"> 588 </span> : static void</a>
|
|
<a name="589"><span class="lineNum"> 589 </span><span class="lineNoCov"> 0 : print_for_command (for_command)</span></a>
|
|
<a name="590"><span class="lineNum"> 590 </span> : FOR_COM *for_command;</a>
|
|
<a name="591"><span class="lineNum"> 591 </span> : {</a>
|
|
<a name="592"><span class="lineNum"> 592 </span><span class="lineNoCov"> 0 : print_for_command_head (for_command);</span></a>
|
|
<a name="593"><span class="lineNum"> 593 </span><span class="lineNoCov"> 0 : cprintf (";");</span></a>
|
|
<a name="594"><span class="lineNum"> 594 </span><span class="lineNoCov"> 0 : newline ("do\n");</span></a>
|
|
<a name="595"><span class="lineNum"> 595 </span> : </a>
|
|
<a name="596"><span class="lineNum"> 596 </span><span class="lineNoCov"> 0 : indentation += indentation_amount;</span></a>
|
|
<a name="597"><span class="lineNum"> 597 </span><span class="lineNoCov"> 0 : make_command_string_internal (for_command->action);</span></a>
|
|
<a name="598"><span class="lineNum"> 598 </span><span class="lineNoCov"> 0 : PRINT_DEFERRED_HEREDOCS ("");</span></a>
|
|
<a name="599"><span class="lineNum"> 599 </span><span class="lineNoCov"> 0 : semicolon ();</span></a>
|
|
<a name="600"><span class="lineNum"> 600 </span><span class="lineNoCov"> 0 : indentation -= indentation_amount;</span></a>
|
|
<a name="601"><span class="lineNum"> 601 </span> : </a>
|
|
<a name="602"><span class="lineNum"> 602 </span><span class="lineNoCov"> 0 : newline ("done");</span></a>
|
|
<a name="603"><span class="lineNum"> 603 </span><span class="lineNoCov"> 0 : }</span></a>
|
|
<a name="604"><span class="lineNum"> 604 </span> : </a>
|
|
<a name="605"><span class="lineNum"> 605 </span> : #if defined (ARITH_FOR_COMMAND)</a>
|
|
<a name="606"><span class="lineNum"> 606 </span> : static void</a>
|
|
<a name="607"><span class="lineNum"> 607 </span><span class="lineNoCov"> 0 : print_arith_for_command (arith_for_command)</span></a>
|
|
<a name="608"><span class="lineNum"> 608 </span> : ARITH_FOR_COM *arith_for_command;</a>
|
|
<a name="609"><span class="lineNum"> 609 </span> : {</a>
|
|
<a name="610"><span class="lineNum"> 610 </span><span class="lineNoCov"> 0 : cprintf ("for ((");</span></a>
|
|
<a name="611"><span class="lineNum"> 611 </span><span class="lineNoCov"> 0 : command_print_word_list (arith_for_command->init, " ");</span></a>
|
|
<a name="612"><span class="lineNum"> 612 </span><span class="lineNoCov"> 0 : cprintf ("; ");</span></a>
|
|
<a name="613"><span class="lineNum"> 613 </span><span class="lineNoCov"> 0 : command_print_word_list (arith_for_command->test, " ");</span></a>
|
|
<a name="614"><span class="lineNum"> 614 </span><span class="lineNoCov"> 0 : cprintf ("; ");</span></a>
|
|
<a name="615"><span class="lineNum"> 615 </span><span class="lineNoCov"> 0 : command_print_word_list (arith_for_command->step, " ");</span></a>
|
|
<a name="616"><span class="lineNum"> 616 </span><span class="lineNoCov"> 0 : cprintf ("))");</span></a>
|
|
<a name="617"><span class="lineNum"> 617 </span><span class="lineNoCov"> 0 : newline ("do\n");</span></a>
|
|
<a name="618"><span class="lineNum"> 618 </span><span class="lineNoCov"> 0 : indentation += indentation_amount;</span></a>
|
|
<a name="619"><span class="lineNum"> 619 </span><span class="lineNoCov"> 0 : make_command_string_internal (arith_for_command->action);</span></a>
|
|
<a name="620"><span class="lineNum"> 620 </span><span class="lineNoCov"> 0 : PRINT_DEFERRED_HEREDOCS ("");</span></a>
|
|
<a name="621"><span class="lineNum"> 621 </span><span class="lineNoCov"> 0 : semicolon ();</span></a>
|
|
<a name="622"><span class="lineNum"> 622 </span><span class="lineNoCov"> 0 : indentation -= indentation_amount;</span></a>
|
|
<a name="623"><span class="lineNum"> 623 </span><span class="lineNoCov"> 0 : newline ("done");</span></a>
|
|
<a name="624"><span class="lineNum"> 624 </span><span class="lineNoCov"> 0 : }</span></a>
|
|
<a name="625"><span class="lineNum"> 625 </span> : #endif /* ARITH_FOR_COMMAND */</a>
|
|
<a name="626"><span class="lineNum"> 626 </span> : </a>
|
|
<a name="627"><span class="lineNum"> 627 </span> : #if defined (SELECT_COMMAND)</a>
|
|
<a name="628"><span class="lineNum"> 628 </span> : void</a>
|
|
<a name="629"><span class="lineNum"> 629 </span><span class="lineNoCov"> 0 : print_select_command_head (select_command)</span></a>
|
|
<a name="630"><span class="lineNum"> 630 </span> : SELECT_COM *select_command;</a>
|
|
<a name="631"><span class="lineNum"> 631 </span> : {</a>
|
|
<a name="632"><span class="lineNum"> 632 </span><span class="lineNoCov"> 0 : cprintf ("select %s in ", select_command->name->word);</span></a>
|
|
<a name="633"><span class="lineNum"> 633 </span><span class="lineNoCov"> 0 : command_print_word_list (select_command->map_list, " ");</span></a>
|
|
<a name="634"><span class="lineNum"> 634 </span><span class="lineNoCov"> 0 : }</span></a>
|
|
<a name="635"><span class="lineNum"> 635 </span> : </a>
|
|
<a name="636"><span class="lineNum"> 636 </span> : void</a>
|
|
<a name="637"><span class="lineNum"> 637 </span><span class="lineNoCov"> 0 : xtrace_print_select_command_head (select_command)</span></a>
|
|
<a name="638"><span class="lineNum"> 638 </span> : SELECT_COM *select_command;</a>
|
|
<a name="639"><span class="lineNum"> 639 </span> : {</a>
|
|
<a name="640"><span class="lineNum"> 640 </span><span class="lineNoCov"> 0 : CHECK_XTRACE_FP;</span></a>
|
|
<a name="641"><span class="lineNum"> 641 </span><span class="lineNoCov"> 0 : fprintf (xtrace_fp, "%s", indirection_level_string ());</span></a>
|
|
<a name="642"><span class="lineNum"> 642 </span><span class="lineNoCov"> 0 : fprintf (xtrace_fp, "select %s in ", select_command->name->word);</span></a>
|
|
<a name="643"><span class="lineNum"> 643 </span><span class="lineNoCov"> 0 : xtrace_print_word_list (select_command->map_list, 2);</span></a>
|
|
<a name="644"><span class="lineNum"> 644 </span><span class="lineNoCov"> 0 : }</span></a>
|
|
<a name="645"><span class="lineNum"> 645 </span> : </a>
|
|
<a name="646"><span class="lineNum"> 646 </span> : static void</a>
|
|
<a name="647"><span class="lineNum"> 647 </span><span class="lineNoCov"> 0 : print_select_command (select_command)</span></a>
|
|
<a name="648"><span class="lineNum"> 648 </span> : SELECT_COM *select_command;</a>
|
|
<a name="649"><span class="lineNum"> 649 </span> : {</a>
|
|
<a name="650"><span class="lineNum"> 650 </span><span class="lineNoCov"> 0 : print_select_command_head (select_command);</span></a>
|
|
<a name="651"><span class="lineNum"> 651 </span> : </a>
|
|
<a name="652"><span class="lineNum"> 652 </span><span class="lineNoCov"> 0 : cprintf (";");</span></a>
|
|
<a name="653"><span class="lineNum"> 653 </span><span class="lineNoCov"> 0 : newline ("do\n");</span></a>
|
|
<a name="654"><span class="lineNum"> 654 </span><span class="lineNoCov"> 0 : indentation += indentation_amount;</span></a>
|
|
<a name="655"><span class="lineNum"> 655 </span><span class="lineNoCov"> 0 : make_command_string_internal (select_command->action);</span></a>
|
|
<a name="656"><span class="lineNum"> 656 </span><span class="lineNoCov"> 0 : PRINT_DEFERRED_HEREDOCS ("");</span></a>
|
|
<a name="657"><span class="lineNum"> 657 </span><span class="lineNoCov"> 0 : semicolon ();</span></a>
|
|
<a name="658"><span class="lineNum"> 658 </span><span class="lineNoCov"> 0 : indentation -= indentation_amount;</span></a>
|
|
<a name="659"><span class="lineNum"> 659 </span><span class="lineNoCov"> 0 : newline ("done");</span></a>
|
|
<a name="660"><span class="lineNum"> 660 </span><span class="lineNoCov"> 0 : }</span></a>
|
|
<a name="661"><span class="lineNum"> 661 </span> : #endif /* SELECT_COMMAND */</a>
|
|
<a name="662"><span class="lineNum"> 662 </span> : </a>
|
|
<a name="663"><span class="lineNum"> 663 </span> : static void</a>
|
|
<a name="664"><span class="lineNum"> 664 </span><span class="lineNoCov"> 0 : print_group_command (group_command)</span></a>
|
|
<a name="665"><span class="lineNum"> 665 </span> : GROUP_COM *group_command;</a>
|
|
<a name="666"><span class="lineNum"> 666 </span> : {</a>
|
|
<a name="667"><span class="lineNum"> 667 </span><span class="lineNoCov"> 0 : group_command_nesting++;</span></a>
|
|
<a name="668"><span class="lineNum"> 668 </span><span class="lineNoCov"> 0 : cprintf ("{ ");</span></a>
|
|
<a name="669"><span class="lineNum"> 669 </span> : </a>
|
|
<a name="670"><span class="lineNum"> 670 </span><span class="lineNoCov"> 0 : if (inside_function_def == 0)</span></a>
|
|
<a name="671"><span class="lineNum"> 671 </span><span class="lineNoCov"> 0 : skip_this_indent++;</span></a>
|
|
<a name="672"><span class="lineNum"> 672 </span> : else</a>
|
|
<a name="673"><span class="lineNum"> 673 </span> : {</a>
|
|
<a name="674"><span class="lineNum"> 674 </span> : /* This is a group command { ... } inside of a function</a>
|
|
<a name="675"><span class="lineNum"> 675 </span> : definition, and should be printed as a multiline group</a>
|
|
<a name="676"><span class="lineNum"> 676 </span> : command, using the current indentation. */</a>
|
|
<a name="677"><span class="lineNum"> 677 </span><span class="lineNoCov"> 0 : cprintf ("\n");</span></a>
|
|
<a name="678"><span class="lineNum"> 678 </span><span class="lineNoCov"> 0 : indentation += indentation_amount;</span></a>
|
|
<a name="679"><span class="lineNum"> 679 </span> : }</a>
|
|
<a name="680"><span class="lineNum"> 680 </span> : </a>
|
|
<a name="681"><span class="lineNum"> 681 </span><span class="lineNoCov"> 0 : make_command_string_internal (group_command->command);</span></a>
|
|
<a name="682"><span class="lineNum"> 682 </span><span class="lineNoCov"> 0 : PRINT_DEFERRED_HEREDOCS ("");</span></a>
|
|
<a name="683"><span class="lineNum"> 683 </span> : </a>
|
|
<a name="684"><span class="lineNum"> 684 </span><span class="lineNoCov"> 0 : if (inside_function_def)</span></a>
|
|
<a name="685"><span class="lineNum"> 685 </span> : {</a>
|
|
<a name="686"><span class="lineNum"> 686 </span><span class="lineNoCov"> 0 : cprintf ("\n");</span></a>
|
|
<a name="687"><span class="lineNum"> 687 </span><span class="lineNoCov"> 0 : indentation -= indentation_amount;</span></a>
|
|
<a name="688"><span class="lineNum"> 688 </span><span class="lineNoCov"> 0 : indent (indentation);</span></a>
|
|
<a name="689"><span class="lineNum"> 689 </span> : }</a>
|
|
<a name="690"><span class="lineNum"> 690 </span> : else</a>
|
|
<a name="691"><span class="lineNum"> 691 </span> : {</a>
|
|
<a name="692"><span class="lineNum"> 692 </span><span class="lineNoCov"> 0 : semicolon ();</span></a>
|
|
<a name="693"><span class="lineNum"> 693 </span><span class="lineNoCov"> 0 : cprintf (" ");</span></a>
|
|
<a name="694"><span class="lineNum"> 694 </span> : }</a>
|
|
<a name="695"><span class="lineNum"> 695 </span> : </a>
|
|
<a name="696"><span class="lineNum"> 696 </span><span class="lineNoCov"> 0 : cprintf ("}");</span></a>
|
|
<a name="697"><span class="lineNum"> 697 </span> : </a>
|
|
<a name="698"><span class="lineNum"> 698 </span><span class="lineNoCov"> 0 : group_command_nesting--;</span></a>
|
|
<a name="699"><span class="lineNum"> 699 </span><span class="lineNoCov"> 0 : }</span></a>
|
|
<a name="700"><span class="lineNum"> 700 </span> : </a>
|
|
<a name="701"><span class="lineNum"> 701 </span> : void</a>
|
|
<a name="702"><span class="lineNum"> 702 </span><span class="lineCov"> 5643926 : print_case_command_head (case_command)</span></a>
|
|
<a name="703"><span class="lineNum"> 703 </span> : CASE_COM *case_command;</a>
|
|
<a name="704"><span class="lineNum"> 704 </span> : {</a>
|
|
<a name="705"><span class="lineNum"> 705 </span><span class="lineCov"> 5643926 : cprintf ("case %s in ", case_command->word->word);</span></a>
|
|
<a name="706"><span class="lineNum"> 706 </span><span class="lineCov"> 5643926 : }</span></a>
|
|
<a name="707"><span class="lineNum"> 707 </span> : </a>
|
|
<a name="708"><span class="lineNum"> 708 </span> : void</a>
|
|
<a name="709"><span class="lineNum"> 709 </span><span class="lineNoCov"> 0 : xtrace_print_case_command_head (case_command)</span></a>
|
|
<a name="710"><span class="lineNum"> 710 </span> : CASE_COM *case_command;</a>
|
|
<a name="711"><span class="lineNum"> 711 </span> : {</a>
|
|
<a name="712"><span class="lineNum"> 712 </span><span class="lineNoCov"> 0 : CHECK_XTRACE_FP;</span></a>
|
|
<a name="713"><span class="lineNum"> 713 </span><span class="lineNoCov"> 0 : fprintf (xtrace_fp, "%s", indirection_level_string ());</span></a>
|
|
<a name="714"><span class="lineNum"> 714 </span><span class="lineNoCov"> 0 : fprintf (xtrace_fp, "case %s in\n", case_command->word->word);</span></a>
|
|
<a name="715"><span class="lineNum"> 715 </span><span class="lineNoCov"> 0 : }</span></a>
|
|
<a name="716"><span class="lineNum"> 716 </span> : </a>
|
|
<a name="717"><span class="lineNum"> 717 </span> : static void</a>
|
|
<a name="718"><span class="lineNum"> 718 </span><span class="lineNoCov"> 0 : print_case_command (case_command)</span></a>
|
|
<a name="719"><span class="lineNum"> 719 </span> : CASE_COM *case_command;</a>
|
|
<a name="720"><span class="lineNum"> 720 </span> : {</a>
|
|
<a name="721"><span class="lineNum"> 721 </span><span class="lineNoCov"> 0 : print_case_command_head (case_command);</span></a>
|
|
<a name="722"><span class="lineNum"> 722 </span> : </a>
|
|
<a name="723"><span class="lineNum"> 723 </span><span class="lineNoCov"> 0 : if (case_command->clauses)</span></a>
|
|
<a name="724"><span class="lineNum"> 724 </span><span class="lineNoCov"> 0 : print_case_clauses (case_command->clauses);</span></a>
|
|
<a name="725"><span class="lineNum"> 725 </span><span class="lineNoCov"> 0 : newline ("esac");</span></a>
|
|
<a name="726"><span class="lineNum"> 726 </span><span class="lineNoCov"> 0 : }</span></a>
|
|
<a name="727"><span class="lineNum"> 727 </span> : </a>
|
|
<a name="728"><span class="lineNum"> 728 </span> : static void</a>
|
|
<a name="729"><span class="lineNum"> 729 </span><span class="lineCov"> 123 : print_case_clauses (clauses)</span></a>
|
|
<a name="730"><span class="lineNum"> 730 </span> : PATTERN_LIST *clauses;</a>
|
|
<a name="731"><span class="lineNum"> 731 </span> : {</a>
|
|
<a name="732"><span class="lineNum"> 732 </span><span class="lineCov"> 123 : indentation += indentation_amount;</span></a>
|
|
<a name="733"><span class="lineNum"> 733 </span><span class="lineCov"> 943 : while (clauses)</span></a>
|
|
<a name="734"><span class="lineNum"> 734 </span> : {</a>
|
|
<a name="735"><span class="lineNum"> 735 </span><span class="lineCov"> 820 : newline ("");</span></a>
|
|
<a name="736"><span class="lineNum"> 736 </span><span class="lineCov"> 820 : command_print_word_list (clauses->patterns, " | ");</span></a>
|
|
<a name="737"><span class="lineNum"> 737 </span><span class="lineCov"> 820 : cprintf (")\n");</span></a>
|
|
<a name="738"><span class="lineNum"> 738 </span><span class="lineCov"> 820 : indentation += indentation_amount;</span></a>
|
|
<a name="739"><span class="lineNum"> 739 </span><span class="lineCov"> 820 : make_command_string_internal (clauses->action);</span></a>
|
|
<a name="740"><span class="lineNum"> 740 </span><span class="lineCov"> 820 : indentation -= indentation_amount;</span></a>
|
|
<a name="741"><span class="lineNum"> 741 </span><span class="lineCov"> 820 : PRINT_DEFERRED_HEREDOCS ("");</span></a>
|
|
<a name="742"><span class="lineNum"> 742 </span><span class="lineCov"> 820 : if (clauses->flags & CASEPAT_FALLTHROUGH)</span></a>
|
|
<a name="743"><span class="lineNum"> 743 </span><span class="lineNoCov"> 0 : newline (";&");</span></a>
|
|
<a name="744"><span class="lineNum"> 744 </span><span class="lineCov"> 820 : else if (clauses->flags & CASEPAT_TESTNEXT)</span></a>
|
|
<a name="745"><span class="lineNum"> 745 </span><span class="lineNoCov"> 0 : newline (";;&");</span></a>
|
|
<a name="746"><span class="lineNum"> 746 </span> : else</a>
|
|
<a name="747"><span class="lineNum"> 747 </span><span class="lineCov"> 820 : newline (";;");</span></a>
|
|
<a name="748"><span class="lineNum"> 748 </span><span class="lineCov"> 820 : clauses = clauses->next;</span></a>
|
|
<a name="749"><span class="lineNum"> 749 </span> : }</a>
|
|
<a name="750"><span class="lineNum"> 750 </span><span class="lineCov"> 123 : indentation -= indentation_amount;</span></a>
|
|
<a name="751"><span class="lineNum"> 751 </span><span class="lineCov"> 123 : }</span></a>
|
|
<a name="752"><span class="lineNum"> 752 </span> : </a>
|
|
<a name="753"><span class="lineNum"> 753 </span> : static void</a>
|
|
<a name="754"><span class="lineNum"> 754 </span><span class="lineCov"> 2938 : print_while_command (while_command)</span></a>
|
|
<a name="755"><span class="lineNum"> 755 </span> : WHILE_COM *while_command;</a>
|
|
<a name="756"><span class="lineNum"> 756 </span> : {</a>
|
|
<a name="757"><span class="lineNum"> 757 </span><span class="lineCov"> 2938 : print_until_or_while (while_command, "while");</span></a>
|
|
<a name="758"><span class="lineNum"> 758 </span><span class="lineCov"> 2938 : }</span></a>
|
|
<a name="759"><span class="lineNum"> 759 </span> : </a>
|
|
<a name="760"><span class="lineNum"> 760 </span> : static void</a>
|
|
<a name="761"><span class="lineNum"> 761 </span><span class="lineNoCov"> 0 : print_until_command (while_command)</span></a>
|
|
<a name="762"><span class="lineNum"> 762 </span> : WHILE_COM *while_command;</a>
|
|
<a name="763"><span class="lineNum"> 763 </span> : {</a>
|
|
<a name="764"><span class="lineNum"> 764 </span><span class="lineNoCov"> 0 : print_until_or_while (while_command, "until");</span></a>
|
|
<a name="765"><span class="lineNum"> 765 </span><span class="lineNoCov"> 0 : }</span></a>
|
|
<a name="766"><span class="lineNum"> 766 </span> : </a>
|
|
<a name="767"><span class="lineNum"> 767 </span> : static void</a>
|
|
<a name="768"><span class="lineNum"> 768 </span><span class="lineNoCov"> 0 : print_until_or_while (while_command, which)</span></a>
|
|
<a name="769"><span class="lineNum"> 769 </span> : WHILE_COM *while_command;</a>
|
|
<a name="770"><span class="lineNum"> 770 </span> : char *which;</a>
|
|
<a name="771"><span class="lineNum"> 771 </span> : {</a>
|
|
<a name="772"><span class="lineNum"> 772 </span><span class="lineNoCov"> 0 : cprintf ("%s ", which);</span></a>
|
|
<a name="773"><span class="lineNum"> 773 </span><span class="lineNoCov"> 0 : skip_this_indent++;</span></a>
|
|
<a name="774"><span class="lineNum"> 774 </span><span class="lineNoCov"> 0 : make_command_string_internal (while_command->test);</span></a>
|
|
<a name="775"><span class="lineNum"> 775 </span><span class="lineNoCov"> 0 : PRINT_DEFERRED_HEREDOCS ("");</span></a>
|
|
<a name="776"><span class="lineNum"> 776 </span><span class="lineNoCov"> 0 : semicolon ();</span></a>
|
|
<a name="777"><span class="lineNum"> 777 </span><span class="lineNoCov"> 0 : cprintf (" do\n"); /* was newline ("do\n"); */</span></a>
|
|
<a name="778"><span class="lineNum"> 778 </span><span class="lineNoCov"> 0 : indentation += indentation_amount;</span></a>
|
|
<a name="779"><span class="lineNum"> 779 </span><span class="lineNoCov"> 0 : make_command_string_internal (while_command->action);</span></a>
|
|
<a name="780"><span class="lineNum"> 780 </span><span class="lineNoCov"> 0 : PRINT_DEFERRED_HEREDOCS ("");</span></a>
|
|
<a name="781"><span class="lineNum"> 781 </span><span class="lineNoCov"> 0 : indentation -= indentation_amount;</span></a>
|
|
<a name="782"><span class="lineNum"> 782 </span><span class="lineNoCov"> 0 : semicolon ();</span></a>
|
|
<a name="783"><span class="lineNum"> 783 </span><span class="lineNoCov"> 0 : newline ("done");</span></a>
|
|
<a name="784"><span class="lineNum"> 784 </span><span class="lineNoCov"> 0 : }</span></a>
|
|
<a name="785"><span class="lineNum"> 785 </span> : </a>
|
|
<a name="786"><span class="lineNum"> 786 </span> : static void</a>
|
|
<a name="787"><span class="lineNum"> 787 </span><span class="lineCov"> 155 : print_if_command (if_command)</span></a>
|
|
<a name="788"><span class="lineNum"> 788 </span> : IF_COM *if_command;</a>
|
|
<a name="789"><span class="lineNum"> 789 </span> : {</a>
|
|
<a name="790"><span class="lineNum"> 790 </span><span class="lineCov"> 155 : cprintf ("if ");</span></a>
|
|
<a name="791"><span class="lineNum"> 791 </span><span class="lineCov"> 155 : skip_this_indent++;</span></a>
|
|
<a name="792"><span class="lineNum"> 792 </span><span class="lineCov"> 155 : make_command_string_internal (if_command->test);</span></a>
|
|
<a name="793"><span class="lineNum"> 793 </span><span class="lineCov"> 155 : semicolon ();</span></a>
|
|
<a name="794"><span class="lineNum"> 794 </span><span class="lineCov"> 155 : cprintf (" then\n");</span></a>
|
|
<a name="795"><span class="lineNum"> 795 </span><span class="lineCov"> 155 : indentation += indentation_amount;</span></a>
|
|
<a name="796"><span class="lineNum"> 796 </span><span class="lineCov"> 155 : make_command_string_internal (if_command->true_case);</span></a>
|
|
<a name="797"><span class="lineNum"> 797 </span><span class="lineCov"> 155 : PRINT_DEFERRED_HEREDOCS ("");</span></a>
|
|
<a name="798"><span class="lineNum"> 798 </span><span class="lineCov"> 155 : indentation -= indentation_amount;</span></a>
|
|
<a name="799"><span class="lineNum"> 799 </span> : </a>
|
|
<a name="800"><span class="lineNum"> 800 </span><span class="lineCov"> 155 : if (if_command->false_case)</span></a>
|
|
<a name="801"><span class="lineNum"> 801 </span> : {</a>
|
|
<a name="802"><span class="lineNum"> 802 </span><span class="lineCov"> 10 : semicolon ();</span></a>
|
|
<a name="803"><span class="lineNum"> 803 </span><span class="lineCov"> 10 : newline ("else\n");</span></a>
|
|
<a name="804"><span class="lineNum"> 804 </span><span class="lineCov"> 10 : indentation += indentation_amount;</span></a>
|
|
<a name="805"><span class="lineNum"> 805 </span><span class="lineCov"> 10 : make_command_string_internal (if_command->false_case);</span></a>
|
|
<a name="806"><span class="lineNum"> 806 </span><span class="lineCov"> 10 : PRINT_DEFERRED_HEREDOCS ("");</span></a>
|
|
<a name="807"><span class="lineNum"> 807 </span><span class="lineCov"> 10 : indentation -= indentation_amount;</span></a>
|
|
<a name="808"><span class="lineNum"> 808 </span> : }</a>
|
|
<a name="809"><span class="lineNum"> 809 </span><span class="lineCov"> 155 : semicolon ();</span></a>
|
|
<a name="810"><span class="lineNum"> 810 </span><span class="lineCov"> 155 : newline ("fi");</span></a>
|
|
<a name="811"><span class="lineNum"> 811 </span><span class="lineCov"> 155 : }</span></a>
|
|
<a name="812"><span class="lineNum"> 812 </span> : </a>
|
|
<a name="813"><span class="lineNum"> 813 </span> : #if defined (DPAREN_ARITHMETIC) || defined (ARITH_FOR_COMMAND)</a>
|
|
<a name="814"><span class="lineNum"> 814 </span> : void</a>
|
|
<a name="815"><span class="lineNum"> 815 </span><span class="lineNoCov"> 0 : print_arith_command (arith_cmd_list)</span></a>
|
|
<a name="816"><span class="lineNum"> 816 </span> : WORD_LIST *arith_cmd_list;</a>
|
|
<a name="817"><span class="lineNum"> 817 </span> : {</a>
|
|
<a name="818"><span class="lineNum"> 818 </span><span class="lineNoCov"> 0 : cprintf ("((");</span></a>
|
|
<a name="819"><span class="lineNum"> 819 </span><span class="lineNoCov"> 0 : command_print_word_list (arith_cmd_list, " ");</span></a>
|
|
<a name="820"><span class="lineNum"> 820 </span><span class="lineNoCov"> 0 : cprintf ("))");</span></a>
|
|
<a name="821"><span class="lineNum"> 821 </span><span class="lineNoCov"> 0 : }</span></a>
|
|
<a name="822"><span class="lineNum"> 822 </span> : #endif</a>
|
|
<a name="823"><span class="lineNum"> 823 </span> : </a>
|
|
<a name="824"><span class="lineNum"> 824 </span> : #if defined (COND_COMMAND)</a>
|
|
<a name="825"><span class="lineNum"> 825 </span> : static void</a>
|
|
<a name="826"><span class="lineNum"> 826 </span><span class="lineNoCov"> 0 : print_cond_node (cond)</span></a>
|
|
<a name="827"><span class="lineNum"> 827 </span> : COND_COM *cond;</a>
|
|
<a name="828"><span class="lineNum"> 828 </span> : {</a>
|
|
<a name="829"><span class="lineNum"> 829 </span><span class="lineNoCov"> 0 : if (cond->flags & CMD_INVERT_RETURN)</span></a>
|
|
<a name="830"><span class="lineNum"> 830 </span><span class="lineNoCov"> 0 : cprintf ("! ");</span></a>
|
|
<a name="831"><span class="lineNum"> 831 </span> : </a>
|
|
<a name="832"><span class="lineNum"> 832 </span><span class="lineNoCov"> 0 : if (cond->type == COND_EXPR)</span></a>
|
|
<a name="833"><span class="lineNum"> 833 </span> : {</a>
|
|
<a name="834"><span class="lineNum"> 834 </span><span class="lineNoCov"> 0 : cprintf ("( ");</span></a>
|
|
<a name="835"><span class="lineNum"> 835 </span><span class="lineNoCov"> 0 : print_cond_node (cond->left);</span></a>
|
|
<a name="836"><span class="lineNum"> 836 </span><span class="lineNoCov"> 0 : cprintf (" )");</span></a>
|
|
<a name="837"><span class="lineNum"> 837 </span> : }</a>
|
|
<a name="838"><span class="lineNum"> 838 </span><span class="lineNoCov"> 0 : else if (cond->type == COND_AND)</span></a>
|
|
<a name="839"><span class="lineNum"> 839 </span> : {</a>
|
|
<a name="840"><span class="lineNum"> 840 </span><span class="lineNoCov"> 0 : print_cond_node (cond->left);</span></a>
|
|
<a name="841"><span class="lineNum"> 841 </span><span class="lineNoCov"> 0 : cprintf (" && ");</span></a>
|
|
<a name="842"><span class="lineNum"> 842 </span><span class="lineNoCov"> 0 : print_cond_node (cond->right);</span></a>
|
|
<a name="843"><span class="lineNum"> 843 </span> : }</a>
|
|
<a name="844"><span class="lineNum"> 844 </span><span class="lineNoCov"> 0 : else if (cond->type == COND_OR)</span></a>
|
|
<a name="845"><span class="lineNum"> 845 </span> : {</a>
|
|
<a name="846"><span class="lineNum"> 846 </span><span class="lineNoCov"> 0 : print_cond_node (cond->left);</span></a>
|
|
<a name="847"><span class="lineNum"> 847 </span><span class="lineNoCov"> 0 : cprintf (" || ");</span></a>
|
|
<a name="848"><span class="lineNum"> 848 </span><span class="lineNoCov"> 0 : print_cond_node (cond->right);</span></a>
|
|
<a name="849"><span class="lineNum"> 849 </span> : }</a>
|
|
<a name="850"><span class="lineNum"> 850 </span><span class="lineNoCov"> 0 : else if (cond->type == COND_UNARY)</span></a>
|
|
<a name="851"><span class="lineNum"> 851 </span> : {</a>
|
|
<a name="852"><span class="lineNum"> 852 </span><span class="lineNoCov"> 0 : cprintf ("%s", cond->op->word);</span></a>
|
|
<a name="853"><span class="lineNum"> 853 </span><span class="lineNoCov"> 0 : cprintf (" ");</span></a>
|
|
<a name="854"><span class="lineNum"> 854 </span><span class="lineNoCov"> 0 : print_cond_node (cond->left);</span></a>
|
|
<a name="855"><span class="lineNum"> 855 </span> : }</a>
|
|
<a name="856"><span class="lineNum"> 856 </span><span class="lineNoCov"> 0 : else if (cond->type == COND_BINARY)</span></a>
|
|
<a name="857"><span class="lineNum"> 857 </span> : {</a>
|
|
<a name="858"><span class="lineNum"> 858 </span><span class="lineNoCov"> 0 : print_cond_node (cond->left);</span></a>
|
|
<a name="859"><span class="lineNum"> 859 </span><span class="lineNoCov"> 0 : cprintf (" ");</span></a>
|
|
<a name="860"><span class="lineNum"> 860 </span><span class="lineNoCov"> 0 : cprintf ("%s", cond->op->word);</span></a>
|
|
<a name="861"><span class="lineNum"> 861 </span><span class="lineNoCov"> 0 : cprintf (" ");</span></a>
|
|
<a name="862"><span class="lineNum"> 862 </span><span class="lineNoCov"> 0 : print_cond_node (cond->right);</span></a>
|
|
<a name="863"><span class="lineNum"> 863 </span> : }</a>
|
|
<a name="864"><span class="lineNum"> 864 </span><span class="lineNoCov"> 0 : else if (cond->type == COND_TERM)</span></a>
|
|
<a name="865"><span class="lineNum"> 865 </span> : {</a>
|
|
<a name="866"><span class="lineNum"> 866 </span><span class="lineNoCov"> 0 : cprintf ("%s", cond->op->word); /* need to add quoting here */</span></a>
|
|
<a name="867"><span class="lineNum"> 867 </span> : }</a>
|
|
<a name="868"><span class="lineNum"> 868 </span><span class="lineNoCov"> 0 : }</span></a>
|
|
<a name="869"><span class="lineNum"> 869 </span> : </a>
|
|
<a name="870"><span class="lineNum"> 870 </span> : void</a>
|
|
<a name="871"><span class="lineNum"> 871 </span><span class="lineNoCov"> 0 : print_cond_command (cond)</span></a>
|
|
<a name="872"><span class="lineNum"> 872 </span> : COND_COM *cond;</a>
|
|
<a name="873"><span class="lineNum"> 873 </span> : {</a>
|
|
<a name="874"><span class="lineNum"> 874 </span><span class="lineNoCov"> 0 : cprintf ("[[ ");</span></a>
|
|
<a name="875"><span class="lineNum"> 875 </span><span class="lineNoCov"> 0 : print_cond_node (cond);</span></a>
|
|
<a name="876"><span class="lineNum"> 876 </span><span class="lineNoCov"> 0 : cprintf (" ]]");</span></a>
|
|
<a name="877"><span class="lineNum"> 877 </span><span class="lineNoCov"> 0 : }</span></a>
|
|
<a name="878"><span class="lineNum"> 878 </span> : </a>
|
|
<a name="879"><span class="lineNum"> 879 </span> : #ifdef DEBUG</a>
|
|
<a name="880"><span class="lineNum"> 880 </span> : void</a>
|
|
<a name="881"><span class="lineNum"> 881 </span> : debug_print_word_list (s, list, sep)</a>
|
|
<a name="882"><span class="lineNum"> 882 </span> : char *s;</a>
|
|
<a name="883"><span class="lineNum"> 883 </span> : WORD_LIST *list;</a>
|
|
<a name="884"><span class="lineNum"> 884 </span> : char *sep;</a>
|
|
<a name="885"><span class="lineNum"> 885 </span> : {</a>
|
|
<a name="886"><span class="lineNum"> 886 </span> : WORD_LIST *w;</a>
|
|
<a name="887"><span class="lineNum"> 887 </span> : </a>
|
|
<a name="888"><span class="lineNum"> 888 </span> : if (s)</a>
|
|
<a name="889"><span class="lineNum"> 889 </span> : fprintf (stderr, "%s: ", s);</a>
|
|
<a name="890"><span class="lineNum"> 890 </span> : for (w = list; w; w = w->next)</a>
|
|
<a name="891"><span class="lineNum"> 891 </span> : fprintf (stderr, "%s%s", w->word->word, w->next ? sep : "");</a>
|
|
<a name="892"><span class="lineNum"> 892 </span> : fprintf (stderr, "\n");</a>
|
|
<a name="893"><span class="lineNum"> 893 </span> : }</a>
|
|
<a name="894"><span class="lineNum"> 894 </span> : </a>
|
|
<a name="895"><span class="lineNum"> 895 </span> : void</a>
|
|
<a name="896"><span class="lineNum"> 896 </span> : debug_print_cond_command (cond)</a>
|
|
<a name="897"><span class="lineNum"> 897 </span> : COND_COM *cond;</a>
|
|
<a name="898"><span class="lineNum"> 898 </span> : {</a>
|
|
<a name="899"><span class="lineNum"> 899 </span> : fprintf (stderr, "DEBUG: ");</a>
|
|
<a name="900"><span class="lineNum"> 900 </span> : command_string_index = 0;</a>
|
|
<a name="901"><span class="lineNum"> 901 </span> : print_cond_command (cond);</a>
|
|
<a name="902"><span class="lineNum"> 902 </span> : fprintf (stderr, "%s\n", the_printed_command);</a>
|
|
<a name="903"><span class="lineNum"> 903 </span> : }</a>
|
|
<a name="904"><span class="lineNum"> 904 </span> : #endif</a>
|
|
<a name="905"><span class="lineNum"> 905 </span> : </a>
|
|
<a name="906"><span class="lineNum"> 906 </span> : void</a>
|
|
<a name="907"><span class="lineNum"> 907 </span><span class="lineNoCov"> 0 : xtrace_print_cond_term (type, invert, op, arg1, arg2)</span></a>
|
|
<a name="908"><span class="lineNum"> 908 </span> : int type, invert;</a>
|
|
<a name="909"><span class="lineNum"> 909 </span> : WORD_DESC *op;</a>
|
|
<a name="910"><span class="lineNum"> 910 </span> : char *arg1, *arg2;</a>
|
|
<a name="911"><span class="lineNum"> 911 </span> : {</a>
|
|
<a name="912"><span class="lineNum"> 912 </span><span class="lineNoCov"> 0 : CHECK_XTRACE_FP;</span></a>
|
|
<a name="913"><span class="lineNum"> 913 </span><span class="lineNoCov"> 0 : command_string_index = 0;</span></a>
|
|
<a name="914"><span class="lineNum"> 914 </span><span class="lineNoCov"> 0 : fprintf (xtrace_fp, "%s", indirection_level_string ());</span></a>
|
|
<a name="915"><span class="lineNum"> 915 </span><span class="lineNoCov"> 0 : fprintf (xtrace_fp, "[[ ");</span></a>
|
|
<a name="916"><span class="lineNum"> 916 </span><span class="lineNoCov"> 0 : if (invert)</span></a>
|
|
<a name="917"><span class="lineNum"> 917 </span><span class="lineNoCov"> 0 : fprintf (xtrace_fp, "! ");</span></a>
|
|
<a name="918"><span class="lineNum"> 918 </span> : </a>
|
|
<a name="919"><span class="lineNum"> 919 </span><span class="lineNoCov"> 0 : if (type == COND_UNARY)</span></a>
|
|
<a name="920"><span class="lineNum"> 920 </span> : {</a>
|
|
<a name="921"><span class="lineNum"> 921 </span><span class="lineNoCov"> 0 : fprintf (xtrace_fp, "%s ", op->word);</span></a>
|
|
<a name="922"><span class="lineNum"> 922 </span><span class="lineNoCov"> 0 : fprintf (xtrace_fp, "%s", (arg1 && *arg1) ? arg1 : "''");</span></a>
|
|
<a name="923"><span class="lineNum"> 923 </span> : }</a>
|
|
<a name="924"><span class="lineNum"> 924 </span><span class="lineNoCov"> 0 : else if (type == COND_BINARY)</span></a>
|
|
<a name="925"><span class="lineNum"> 925 </span> : {</a>
|
|
<a name="926"><span class="lineNum"> 926 </span><span class="lineNoCov"> 0 : fprintf (xtrace_fp, "%s", (arg1 && *arg1) ? arg1 : "''");</span></a>
|
|
<a name="927"><span class="lineNum"> 927 </span><span class="lineNoCov"> 0 : fprintf (xtrace_fp, " %s ", op->word);</span></a>
|
|
<a name="928"><span class="lineNum"> 928 </span><span class="lineNoCov"> 0 : fprintf (xtrace_fp, "%s", (arg2 && *arg2) ? arg2 : "''");</span></a>
|
|
<a name="929"><span class="lineNum"> 929 </span> : }</a>
|
|
<a name="930"><span class="lineNum"> 930 </span> : </a>
|
|
<a name="931"><span class="lineNum"> 931 </span><span class="lineNoCov"> 0 : fprintf (xtrace_fp, " ]]\n");</span></a>
|
|
<a name="932"><span class="lineNum"> 932 </span> : </a>
|
|
<a name="933"><span class="lineNum"> 933 </span><span class="lineNoCov"> 0 : fflush (xtrace_fp);</span></a>
|
|
<a name="934"><span class="lineNum"> 934 </span><span class="lineNoCov"> 0 : } </span></a>
|
|
<a name="935"><span class="lineNum"> 935 </span> : #endif /* COND_COMMAND */</a>
|
|
<a name="936"><span class="lineNum"> 936 </span> : </a>
|
|
<a name="937"><span class="lineNum"> 937 </span> : #if defined (DPAREN_ARITHMETIC) || defined (ARITH_FOR_COMMAND)</a>
|
|
<a name="938"><span class="lineNum"> 938 </span> : /* A function to print the words of an arithmetic command when set -x is on. */</a>
|
|
<a name="939"><span class="lineNum"> 939 </span> : void</a>
|
|
<a name="940"><span class="lineNum"> 940 </span><span class="lineNoCov"> 0 : xtrace_print_arith_cmd (list)</span></a>
|
|
<a name="941"><span class="lineNum"> 941 </span> : WORD_LIST *list;</a>
|
|
<a name="942"><span class="lineNum"> 942 </span> : {</a>
|
|
<a name="943"><span class="lineNum"> 943 </span><span class="lineNoCov"> 0 : WORD_LIST *w;</span></a>
|
|
<a name="944"><span class="lineNum"> 944 </span> : </a>
|
|
<a name="945"><span class="lineNum"> 945 </span><span class="lineNoCov"> 0 : CHECK_XTRACE_FP;</span></a>
|
|
<a name="946"><span class="lineNum"> 946 </span><span class="lineNoCov"> 0 : fprintf (xtrace_fp, "%s", indirection_level_string ());</span></a>
|
|
<a name="947"><span class="lineNum"> 947 </span><span class="lineNoCov"> 0 : fprintf (xtrace_fp, "(( ");</span></a>
|
|
<a name="948"><span class="lineNum"> 948 </span><span class="lineNoCov"> 0 : for (w = list; w; w = w->next)</span></a>
|
|
<a name="949"><span class="lineNum"> 949 </span><span class="lineNoCov"> 0 : fprintf (xtrace_fp, "%s%s", w->word->word, w->next ? " " : "");</span></a>
|
|
<a name="950"><span class="lineNum"> 950 </span><span class="lineNoCov"> 0 : fprintf (xtrace_fp, " ))\n");</span></a>
|
|
<a name="951"><span class="lineNum"> 951 </span> : </a>
|
|
<a name="952"><span class="lineNum"> 952 </span><span class="lineNoCov"> 0 : fflush (xtrace_fp);</span></a>
|
|
<a name="953"><span class="lineNum"> 953 </span><span class="lineNoCov"> 0 : }</span></a>
|
|
<a name="954"><span class="lineNum"> 954 </span> : #endif</a>
|
|
<a name="955"><span class="lineNum"> 955 </span> : </a>
|
|
<a name="956"><span class="lineNum"> 956 </span> : void</a>
|
|
<a name="957"><span class="lineNum"> 957 </span><span class="lineCov"> 86315600 : print_simple_command (simple_command)</span></a>
|
|
<a name="958"><span class="lineNum"> 958 </span> : SIMPLE_COM *simple_command;</a>
|
|
<a name="959"><span class="lineNum"> 959 </span> : {</a>
|
|
<a name="960"><span class="lineNum"> 960 </span><span class="lineCov"> 86315600 : command_print_word_list (simple_command->words, " ");</span></a>
|
|
<a name="961"><span class="lineNum"> 961 </span> : </a>
|
|
<a name="962"><span class="lineNum"> 962 </span><span class="lineCov"> 86315600 : if (simple_command->redirects)</span></a>
|
|
<a name="963"><span class="lineNum"> 963 </span> : {</a>
|
|
<a name="964"><span class="lineNum"> 964 </span><span class="lineCov"> 154770 : cprintf (" ");</span></a>
|
|
<a name="965"><span class="lineNum"> 965 </span><span class="lineCov"> 154770 : print_redirection_list (simple_command->redirects);</span></a>
|
|
<a name="966"><span class="lineNum"> 966 </span> : }</a>
|
|
<a name="967"><span class="lineNum"> 967 </span><span class="lineCov"> 86315600 : }</span></a>
|
|
<a name="968"><span class="lineNum"> 968 </span> : </a>
|
|
<a name="969"><span class="lineNum"> 969 </span> : static void</a>
|
|
<a name="970"><span class="lineNum"> 970 </span><span class="lineCov"> 146 : print_heredocs (heredocs)</span></a>
|
|
<a name="971"><span class="lineNum"> 971 </span> : REDIRECT *heredocs;</a>
|
|
<a name="972"><span class="lineNum"> 972 </span> : {</a>
|
|
<a name="973"><span class="lineNum"> 973 </span><span class="lineCov"> 146 : REDIRECT *hdtail;</span></a>
|
|
<a name="974"><span class="lineNum"> 974 </span> : </a>
|
|
<a name="975"><span class="lineNum"> 975 </span><span class="lineCov"> 146 : cprintf (" "); </span></a>
|
|
<a name="976"><span class="lineNum"> 976 </span><span class="lineCov"> 292 : for (hdtail = heredocs; hdtail; hdtail = hdtail->next)</span></a>
|
|
<a name="977"><span class="lineNum"> 977 </span> : {</a>
|
|
<a name="978"><span class="lineNum"> 978 </span><span class="lineCov"> 146 : print_redirection (hdtail);</span></a>
|
|
<a name="979"><span class="lineNum"> 979 </span><span class="lineCov"> 146 : cprintf ("\n");</span></a>
|
|
<a name="980"><span class="lineNum"> 980 </span> : }</a>
|
|
<a name="981"><span class="lineNum"> 981 </span><span class="lineCov"> 146 : was_heredoc = 1;</span></a>
|
|
<a name="982"><span class="lineNum"> 982 </span><span class="lineCov"> 146 : }</span></a>
|
|
<a name="983"><span class="lineNum"> 983 </span> : </a>
|
|
<a name="984"><span class="lineNum"> 984 </span> : /* Print heredocs that are attached to the command before the connector</a>
|
|
<a name="985"><span class="lineNum"> 985 </span> : represented by CSTRING. The parsing semantics require us to print the</a>
|
|
<a name="986"><span class="lineNum"> 986 </span> : here-doc delimiters, then the connector (CSTRING), then the here-doc</a>
|
|
<a name="987"><span class="lineNum"> 987 </span> : bodies. We don't print the connector if it's a `;', but we use it to</a>
|
|
<a name="988"><span class="lineNum"> 988 </span> : note not to print an extra space after the last heredoc body and</a>
|
|
<a name="989"><span class="lineNum"> 989 </span> : newline. */</a>
|
|
<a name="990"><span class="lineNum"> 990 </span> : static void</a>
|
|
<a name="991"><span class="lineNum"> 991 </span><span class="lineCov"> 3188 : print_deferred_heredocs (cstring)</span></a>
|
|
<a name="992"><span class="lineNum"> 992 </span> : const char *cstring;</a>
|
|
<a name="993"><span class="lineNum"> 993 </span> : {</a>
|
|
<a name="994"><span class="lineNum"> 994 </span><span class="lineCov"> 3188 : REDIRECT *hdtail; </span></a>
|
|
<a name="995"><span class="lineNum"> 995 </span> : </a>
|
|
<a name="996"><span class="lineNum"> 996 </span><span class="lineCov"> 3188 : for (hdtail = deferred_heredocs; hdtail; hdtail = hdtail->next)</span></a>
|
|
<a name="997"><span class="lineNum"> 997 </span> : {</a>
|
|
<a name="998"><span class="lineNum"> 998 </span><span class="lineNoCov"> 0 : cprintf (" ");</span></a>
|
|
<a name="999"><span class="lineNum"> 999 </span><span class="lineNoCov"> 0 : print_heredoc_header (hdtail);</span></a>
|
|
<a name="1000"><span class="lineNum"> 1000 </span> : }</a>
|
|
<a name="1001"><span class="lineNum"> 1001 </span><span class="lineCov"> 3188 : if (cstring && cstring[0] && (cstring[0] != ';' || cstring[1]))</span></a>
|
|
<a name="1002"><span class="lineNum"> 1002 </span><span class="lineCov"> 3188 : cprintf ("%s", cstring); </span></a>
|
|
<a name="1003"><span class="lineNum"> 1003 </span><span class="lineCov"> 3188 : if (deferred_heredocs)</span></a>
|
|
<a name="1004"><span class="lineNum"> 1004 </span><span class="lineNoCov"> 0 : cprintf ("\n");</span></a>
|
|
<a name="1005"><span class="lineNum"> 1005 </span><span class="lineCov"> 3188 : for (hdtail = deferred_heredocs; hdtail; hdtail = hdtail->next)</span></a>
|
|
<a name="1006"><span class="lineNum"> 1006 </span> : {</a>
|
|
<a name="1007"><span class="lineNum"> 1007 </span><span class="lineNoCov"> 0 : print_heredoc_body (hdtail);</span></a>
|
|
<a name="1008"><span class="lineNum"> 1008 </span><span class="lineNoCov"> 0 : cprintf ("\n");</span></a>
|
|
<a name="1009"><span class="lineNum"> 1009 </span> : }</a>
|
|
<a name="1010"><span class="lineNum"> 1010 </span><span class="lineCov"> 3188 : if (deferred_heredocs)</span></a>
|
|
<a name="1011"><span class="lineNum"> 1011 </span> : {</a>
|
|
<a name="1012"><span class="lineNum"> 1012 </span><span class="lineNoCov"> 0 : if (cstring && cstring[0] && (cstring[0] != ';' || cstring[1]))</span></a>
|
|
<a name="1013"><span class="lineNum"> 1013 </span><span class="lineNoCov"> 0 : cprintf (" "); /* make sure there's at least one space */</span></a>
|
|
<a name="1014"><span class="lineNum"> 1014 </span><span class="lineNoCov"> 0 : dispose_redirects (deferred_heredocs);</span></a>
|
|
<a name="1015"><span class="lineNum"> 1015 </span><span class="lineNoCov"> 0 : was_heredoc = 1;</span></a>
|
|
<a name="1016"><span class="lineNum"> 1016 </span> : }</a>
|
|
<a name="1017"><span class="lineNum"> 1017 </span><span class="lineCov"> 3188 : deferred_heredocs = (REDIRECT *)NULL;</span></a>
|
|
<a name="1018"><span class="lineNum"> 1018 </span><span class="lineCov"> 3188 : }</span></a>
|
|
<a name="1019"><span class="lineNum"> 1019 </span> : </a>
|
|
<a name="1020"><span class="lineNum"> 1020 </span> : static void</a>
|
|
<a name="1021"><span class="lineNum"> 1021 </span><span class="lineCov"> 154770 : print_redirection_list (redirects)</span></a>
|
|
<a name="1022"><span class="lineNum"> 1022 </span> : REDIRECT *redirects;</a>
|
|
<a name="1023"><span class="lineNum"> 1023 </span> : {</a>
|
|
<a name="1024"><span class="lineNum"> 1024 </span><span class="lineCov"> 154770 : REDIRECT *heredocs, *hdtail, *newredir;</span></a>
|
|
<a name="1025"><span class="lineNum"> 1025 </span><span class="lineCov"> 154770 : char *rw;</span></a>
|
|
<a name="1026"><span class="lineNum"> 1026 </span> : </a>
|
|
<a name="1027"><span class="lineNum"> 1027 </span><span class="lineCov"> 154770 : heredocs = (REDIRECT *)NULL;</span></a>
|
|
<a name="1028"><span class="lineNum"> 1028 </span><span class="lineCov"> 154770 : hdtail = heredocs;</span></a>
|
|
<a name="1029"><span class="lineNum"> 1029 </span> : </a>
|
|
<a name="1030"><span class="lineNum"> 1030 </span><span class="lineCov"> 154770 : was_heredoc = 0;</span></a>
|
|
<a name="1031"><span class="lineNum"> 1031 </span><span class="lineCov"> 393234 : while (redirects)</span></a>
|
|
<a name="1032"><span class="lineNum"> 1032 </span> : {</a>
|
|
<a name="1033"><span class="lineNum"> 1033 </span> : /* Defer printing the here documents until we've printed the</a>
|
|
<a name="1034"><span class="lineNum"> 1034 </span> : rest of the redirections. */</a>
|
|
<a name="1035"><span class="lineNum"> 1035 </span><span class="lineCov"> 238464 : if (redirects->instruction == r_reading_until || redirects->instruction == r_deblank_reading_until)</span></a>
|
|
<a name="1036"><span class="lineNum"> 1036 </span> : {</a>
|
|
<a name="1037"><span class="lineNum"> 1037 </span><span class="lineCov"> 146 : newredir = copy_redirect (redirects);</span></a>
|
|
<a name="1038"><span class="lineNum"> 1038 </span><span class="lineCov"> 146 : newredir->next = (REDIRECT *)NULL;</span></a>
|
|
<a name="1039"><span class="lineNum"> 1039 </span><span class="lineCov"> 146 : if (heredocs)</span></a>
|
|
<a name="1040"><span class="lineNum"> 1040 </span> : {</a>
|
|
<a name="1041"><span class="lineNum"> 1041 </span><span class="lineNoCov"> 0 : hdtail->next = newredir;</span></a>
|
|
<a name="1042"><span class="lineNum"> 1042 </span><span class="lineNoCov"> 0 : hdtail = newredir;</span></a>
|
|
<a name="1043"><span class="lineNum"> 1043 </span> : }</a>
|
|
<a name="1044"><span class="lineNum"> 1044 </span> : else</a>
|
|
<a name="1045"><span class="lineNum"> 1045 </span> : hdtail = heredocs = newredir;</a>
|
|
<a name="1046"><span class="lineNum"> 1046 </span> : }</a>
|
|
<a name="1047"><span class="lineNum"> 1047 </span><span class="lineCov"> 238318 : else if (redirects->instruction == r_duplicating_output_word && (redirects->flags & REDIR_VARASSIGN) == 0 && redirects->redirector.dest == 1)</span></a>
|
|
<a name="1048"><span class="lineNum"> 1048 </span> : {</a>
|
|
<a name="1049"><span class="lineNum"> 1049 </span> : /* Temporarily translate it as the execution code does. */</a>
|
|
<a name="1050"><span class="lineNum"> 1050 </span><span class="lineCov"> 25 : rw = redirects->redirectee.filename->word;</span></a>
|
|
<a name="1051"><span class="lineNum"> 1051 </span><span class="lineCov"> 25 : if (rw && *rw != '-' && DIGIT (*rw) == 0 && EXPCHAR (*rw) == 0)</span></a>
|
|
<a name="1052"><span class="lineNum"> 1052 </span><span class="lineCov"> 25 : redirects->instruction = r_err_and_out;</span></a>
|
|
<a name="1053"><span class="lineNum"> 1053 </span><span class="lineCov"> 25 : print_redirection (redirects);</span></a>
|
|
<a name="1054"><span class="lineNum"> 1054 </span><span class="lineCov"> 25 : redirects->instruction = r_duplicating_output_word;</span></a>
|
|
<a name="1055"><span class="lineNum"> 1055 </span> : }</a>
|
|
<a name="1056"><span class="lineNum"> 1056 </span> : else</a>
|
|
<a name="1057"><span class="lineNum"> 1057 </span><span class="lineCov"> 238293 : print_redirection (redirects);</span></a>
|
|
<a name="1058"><span class="lineNum"> 1058 </span> : </a>
|
|
<a name="1059"><span class="lineNum"> 1059 </span><span class="lineCov"> 238464 : redirects = redirects->next;</span></a>
|
|
<a name="1060"><span class="lineNum"> 1060 </span><span class="lineCov"> 238464 : if (redirects)</span></a>
|
|
<a name="1061"><span class="lineNum"> 1061 </span><span class="lineCov"> 83694 : cprintf (" ");</span></a>
|
|
<a name="1062"><span class="lineNum"> 1062 </span> : }</a>
|
|
<a name="1063"><span class="lineNum"> 1063 </span> : </a>
|
|
<a name="1064"><span class="lineNum"> 1064 </span> : /* Now that we've printed all the other redirections (on one line),</a>
|
|
<a name="1065"><span class="lineNum"> 1065 </span> : print the here documents. */</a>
|
|
<a name="1066"><span class="lineNum"> 1066 </span><span class="lineCov"> 154770 : if (heredocs && printing_connection)</span></a>
|
|
<a name="1067"><span class="lineNum"> 1067 </span><span class="lineNoCov"> 0 : deferred_heredocs = heredocs;</span></a>
|
|
<a name="1068"><span class="lineNum"> 1068 </span><span class="lineCov"> 154770 : else if (heredocs)</span></a>
|
|
<a name="1069"><span class="lineNum"> 1069 </span> : {</a>
|
|
<a name="1070"><span class="lineNum"> 1070 </span><span class="lineCov"> 146 : print_heredocs (heredocs);</span></a>
|
|
<a name="1071"><span class="lineNum"> 1071 </span><span class="lineCov"> 146 : dispose_redirects (heredocs);</span></a>
|
|
<a name="1072"><span class="lineNum"> 1072 </span> : }</a>
|
|
<a name="1073"><span class="lineNum"> 1073 </span><span class="lineCov"> 154770 : }</span></a>
|
|
<a name="1074"><span class="lineNum"> 1074 </span> : </a>
|
|
<a name="1075"><span class="lineNum"> 1075 </span> : static void</a>
|
|
<a name="1076"><span class="lineNum"> 1076 </span><span class="lineCov"> 146 : print_heredoc_header (redirect)</span></a>
|
|
<a name="1077"><span class="lineNum"> 1077 </span> : REDIRECT *redirect;</a>
|
|
<a name="1078"><span class="lineNum"> 1078 </span> : {</a>
|
|
<a name="1079"><span class="lineNum"> 1079 </span><span class="lineCov"> 146 : int kill_leading;</span></a>
|
|
<a name="1080"><span class="lineNum"> 1080 </span><span class="lineCov"> 146 : char *x;</span></a>
|
|
<a name="1081"><span class="lineNum"> 1081 </span> : </a>
|
|
<a name="1082"><span class="lineNum"> 1082 </span><span class="lineCov"> 146 : kill_leading = redirect->instruction == r_deblank_reading_until;</span></a>
|
|
<a name="1083"><span class="lineNum"> 1083 </span> : </a>
|
|
<a name="1084"><span class="lineNum"> 1084 </span> : /* Here doc header */</a>
|
|
<a name="1085"><span class="lineNum"> 1085 </span><span class="lineCov"> 146 : if (redirect->rflags & REDIR_VARASSIGN)</span></a>
|
|
<a name="1086"><span class="lineNum"> 1086 </span><span class="lineNoCov"> 0 : cprintf ("{%s}", redirect->redirector.filename->word);</span></a>
|
|
<a name="1087"><span class="lineNum"> 1087 </span><span class="lineCov"> 146 : else if (redirect->redirector.dest != 0)</span></a>
|
|
<a name="1088"><span class="lineNum"> 1088 </span><span class="lineNoCov"> 0 : cprintf ("%d", redirect->redirector.dest);</span></a>
|
|
<a name="1089"><span class="lineNum"> 1089 </span> : </a>
|
|
<a name="1090"><span class="lineNum"> 1090 </span> : /* If the here document delimiter is quoted, single-quote it. */</a>
|
|
<a name="1091"><span class="lineNum"> 1091 </span><span class="lineCov"> 146 : if (redirect->redirectee.filename->flags & W_QUOTED)</span></a>
|
|
<a name="1092"><span class="lineNum"> 1092 </span> : {</a>
|
|
<a name="1093"><span class="lineNum"> 1093 </span><span class="lineCov"> 49 : x = sh_single_quote (redirect->here_doc_eof);</span></a>
|
|
<a name="1094"><span class="lineNum"> 1094 </span><span class="lineCov"> 98 : cprintf ("<<%s%s", kill_leading ? "-" : "", x);</span></a>
|
|
<a name="1095"><span class="lineNum"> 1095 </span><span class="lineCov"> 49 : free (x);</span></a>
|
|
<a name="1096"><span class="lineNum"> 1096 </span> : }</a>
|
|
<a name="1097"><span class="lineNum"> 1097 </span> : else</a>
|
|
<a name="1098"><span class="lineNum"> 1098 </span><span class="lineCov"> 194 : cprintf ("<<%s%s", kill_leading ? "-" : "", redirect->here_doc_eof);</span></a>
|
|
<a name="1099"><span class="lineNum"> 1099 </span><span class="lineCov"> 146 : }</span></a>
|
|
<a name="1100"><span class="lineNum"> 1100 </span> : </a>
|
|
<a name="1101"><span class="lineNum"> 1101 </span> : static void</a>
|
|
<a name="1102"><span class="lineNum"> 1102 </span><span class="lineNoCov"> 0 : print_heredoc_body (redirect)</span></a>
|
|
<a name="1103"><span class="lineNum"> 1103 </span> : REDIRECT *redirect;</a>
|
|
<a name="1104"><span class="lineNum"> 1104 </span> : {</a>
|
|
<a name="1105"><span class="lineNum"> 1105 </span> : /* Here doc body */</a>
|
|
<a name="1106"><span class="lineNum"> 1106 </span><span class="lineNoCov"> 0 : cprintf ("%s%s", redirect->redirectee.filename->word, redirect->here_doc_eof);</span></a>
|
|
<a name="1107"><span class="lineNum"> 1107 </span><span class="lineNoCov"> 0 : }</span></a>
|
|
<a name="1108"><span class="lineNum"> 1108 </span> : </a>
|
|
<a name="1109"><span class="lineNum"> 1109 </span> : static void</a>
|
|
<a name="1110"><span class="lineNum"> 1110 </span><span class="lineCov"> 238464 : print_redirection (redirect)</span></a>
|
|
<a name="1111"><span class="lineNum"> 1111 </span> : REDIRECT *redirect;</a>
|
|
<a name="1112"><span class="lineNum"> 1112 </span> : {</a>
|
|
<a name="1113"><span class="lineNum"> 1113 </span><span class="lineCov"> 238464 : int redirector, redir_fd;</span></a>
|
|
<a name="1114"><span class="lineNum"> 1114 </span><span class="lineCov"> 238464 : WORD_DESC *redirectee, *redir_word;</span></a>
|
|
<a name="1115"><span class="lineNum"> 1115 </span> : </a>
|
|
<a name="1116"><span class="lineNum"> 1116 </span><span class="lineCov"> 238464 : redirectee = redirect->redirectee.filename;</span></a>
|
|
<a name="1117"><span class="lineNum"> 1117 </span><span class="lineCov"> 238464 : redir_fd = redirect->redirectee.dest;</span></a>
|
|
<a name="1118"><span class="lineNum"> 1118 </span> : </a>
|
|
<a name="1119"><span class="lineNum"> 1119 </span><span class="lineCov"> 238464 : redir_word = redirect->redirector.filename;</span></a>
|
|
<a name="1120"><span class="lineNum"> 1120 </span><span class="lineCov"> 238464 : redirector = redirect->redirector.dest;</span></a>
|
|
<a name="1121"><span class="lineNum"> 1121 </span> : </a>
|
|
<a name="1122"><span class="lineNum"> 1122 </span><span class="lineCov"> 238464 : switch (redirect->instruction)</span></a>
|
|
<a name="1123"><span class="lineNum"> 1123 </span> : {</a>
|
|
<a name="1124"><span class="lineNum"> 1124 </span><span class="lineCov"> 36526 : case r_input_direction:</span></a>
|
|
<a name="1125"><span class="lineNum"> 1125 </span><span class="lineCov"> 36526 : if (redirect->rflags & REDIR_VARASSIGN)</span></a>
|
|
<a name="1126"><span class="lineNum"> 1126 </span><span class="lineNoCov"> 0 : cprintf ("{%s}", redir_word->word);</span></a>
|
|
<a name="1127"><span class="lineNum"> 1127 </span><span class="lineCov"> 36526 : else if (redirector != 0)</span></a>
|
|
<a name="1128"><span class="lineNum"> 1128 </span><span class="lineCov"> 24 : cprintf ("%d", redirector);</span></a>
|
|
<a name="1129"><span class="lineNum"> 1129 </span><span class="lineCov"> 36526 : cprintf ("< %s", redirectee->word);</span></a>
|
|
<a name="1130"><span class="lineNum"> 1130 </span><span class="lineCov"> 36526 : break;</span></a>
|
|
<a name="1131"><span class="lineNum"> 1131 </span> : </a>
|
|
<a name="1132"><span class="lineNum"> 1132 </span><span class="lineCov"> 121683 : case r_output_direction:</span></a>
|
|
<a name="1133"><span class="lineNum"> 1133 </span><span class="lineCov"> 121683 : if (redirect->rflags & REDIR_VARASSIGN)</span></a>
|
|
<a name="1134"><span class="lineNum"> 1134 </span><span class="lineNoCov"> 0 : cprintf ("{%s}", redir_word->word);</span></a>
|
|
<a name="1135"><span class="lineNum"> 1135 </span><span class="lineCov"> 121683 : else if (redirector != 1)</span></a>
|
|
<a name="1136"><span class="lineNum"> 1136 </span><span class="lineCov"> 39237 : cprintf ("%d", redirector);</span></a>
|
|
<a name="1137"><span class="lineNum"> 1137 </span><span class="lineCov"> 121683 : cprintf ("> %s", redirectee->word);</span></a>
|
|
<a name="1138"><span class="lineNum"> 1138 </span><span class="lineCov"> 121683 : break;</span></a>
|
|
<a name="1139"><span class="lineNum"> 1139 </span> : </a>
|
|
<a name="1140"><span class="lineNum"> 1140 </span><span class="lineNoCov"> 0 : case r_inputa_direction: /* Redirection created by the shell. */</span></a>
|
|
<a name="1141"><span class="lineNum"> 1141 </span><span class="lineNoCov"> 0 : cprintf ("&");</span></a>
|
|
<a name="1142"><span class="lineNum"> 1142 </span><span class="lineNoCov"> 0 : break;</span></a>
|
|
<a name="1143"><span class="lineNum"> 1143 </span> : </a>
|
|
<a name="1144"><span class="lineNum"> 1144 </span><span class="lineCov"> 9 : case r_output_force:</span></a>
|
|
<a name="1145"><span class="lineNum"> 1145 </span><span class="lineCov"> 9 : if (redirect->rflags & REDIR_VARASSIGN)</span></a>
|
|
<a name="1146"><span class="lineNum"> 1146 </span><span class="lineNoCov"> 0 : cprintf ("{%s}", redir_word->word);</span></a>
|
|
<a name="1147"><span class="lineNum"> 1147 </span><span class="lineCov"> 9 : else if (redirector != 1)</span></a>
|
|
<a name="1148"><span class="lineNum"> 1148 </span><span class="lineNoCov"> 0 : cprintf ("%d", redirector);</span></a>
|
|
<a name="1149"><span class="lineNum"> 1149 </span><span class="lineCov"> 9 : cprintf (">| %s", redirectee->word);</span></a>
|
|
<a name="1150"><span class="lineNum"> 1150 </span><span class="lineCov"> 9 : break;</span></a>
|
|
<a name="1151"><span class="lineNum"> 1151 </span> : </a>
|
|
<a name="1152"><span class="lineNum"> 1152 </span><span class="lineCov"> 59556 : case r_appending_to:</span></a>
|
|
<a name="1153"><span class="lineNum"> 1153 </span><span class="lineCov"> 59556 : if (redirect->rflags & REDIR_VARASSIGN)</span></a>
|
|
<a name="1154"><span class="lineNum"> 1154 </span><span class="lineNoCov"> 0 : cprintf ("{%s}", redir_word->word);</span></a>
|
|
<a name="1155"><span class="lineNum"> 1155 </span><span class="lineCov"> 59556 : else if (redirector != 1)</span></a>
|
|
<a name="1156"><span class="lineNum"> 1156 </span><span class="lineCov"> 9 : cprintf ("%d", redirector);</span></a>
|
|
<a name="1157"><span class="lineNum"> 1157 </span><span class="lineCov"> 59556 : cprintf (">> %s", redirectee->word);</span></a>
|
|
<a name="1158"><span class="lineNum"> 1158 </span><span class="lineCov"> 59556 : break;</span></a>
|
|
<a name="1159"><span class="lineNum"> 1159 </span> : </a>
|
|
<a name="1160"><span class="lineNum"> 1160 </span><span class="lineCov"> 68 : case r_input_output:</span></a>
|
|
<a name="1161"><span class="lineNum"> 1161 </span><span class="lineCov"> 68 : if (redirect->rflags & REDIR_VARASSIGN)</span></a>
|
|
<a name="1162"><span class="lineNum"> 1162 </span><span class="lineNoCov"> 0 : cprintf ("{%s}", redir_word->word);</span></a>
|
|
<a name="1163"><span class="lineNum"> 1163 </span><span class="lineCov"> 68 : else if (redirector != 1)</span></a>
|
|
<a name="1164"><span class="lineNum"> 1164 </span><span class="lineCov"> 68 : cprintf ("%d", redirector);</span></a>
|
|
<a name="1165"><span class="lineNum"> 1165 </span><span class="lineCov"> 68 : cprintf ("<> %s", redirectee->word);</span></a>
|
|
<a name="1166"><span class="lineNum"> 1166 </span><span class="lineCov"> 68 : break;</span></a>
|
|
<a name="1167"><span class="lineNum"> 1167 </span> : </a>
|
|
<a name="1168"><span class="lineNum"> 1168 </span><span class="lineCov"> 146 : case r_deblank_reading_until:</span></a>
|
|
<a name="1169"><span class="lineNum"> 1169 </span> : case r_reading_until:</a>
|
|
<a name="1170"><span class="lineNum"> 1170 </span><span class="lineCov"> 146 : print_heredoc_header (redirect);</span></a>
|
|
<a name="1171"><span class="lineNum"> 1171 </span><span class="lineCov"> 146 : cprintf ("\n");</span></a>
|
|
<a name="1172"><span class="lineNum"> 1172 </span><span class="lineCov"> 146 : print_heredoc_body (redirect);</span></a>
|
|
<a name="1173"><span class="lineNum"> 1173 </span> : break;</a>
|
|
<a name="1174"><span class="lineNum"> 1174 </span> : </a>
|
|
<a name="1175"><span class="lineNum"> 1175 </span><span class="lineCov"> 20 : case r_reading_string:</span></a>
|
|
<a name="1176"><span class="lineNum"> 1176 </span><span class="lineCov"> 20 : if (redirect->rflags & REDIR_VARASSIGN)</span></a>
|
|
<a name="1177"><span class="lineNum"> 1177 </span><span class="lineNoCov"> 0 : cprintf ("{%s}", redir_word->word);</span></a>
|
|
<a name="1178"><span class="lineNum"> 1178 </span><span class="lineCov"> 20 : else if (redirector != 0)</span></a>
|
|
<a name="1179"><span class="lineNum"> 1179 </span><span class="lineNoCov"> 0 : cprintf ("%d", redirector);</span></a>
|
|
<a name="1180"><span class="lineNum"> 1180 </span> : #if 0</a>
|
|
<a name="1181"><span class="lineNum"> 1181 </span> : /* Don't need to check whether or not to requote, since original quotes</a>
|
|
<a name="1182"><span class="lineNum"> 1182 </span> : are still intact. The only thing that has happened is that $'...'</a>
|
|
<a name="1183"><span class="lineNum"> 1183 </span> : has been replaced with 'expanded ...'. */</a>
|
|
<a name="1184"><span class="lineNum"> 1184 </span> : if (ansic_shouldquote (redirect->redirectee.filename->word))</a>
|
|
<a name="1185"><span class="lineNum"> 1185 </span> : {</a>
|
|
<a name="1186"><span class="lineNum"> 1186 </span> : char *x;</a>
|
|
<a name="1187"><span class="lineNum"> 1187 </span> : x = ansic_quote (redirect->redirectee.filename->word, 0, (int *)0);</a>
|
|
<a name="1188"><span class="lineNum"> 1188 </span> : cprintf ("<<< %s", x);</a>
|
|
<a name="1189"><span class="lineNum"> 1189 </span> : free (x);</a>
|
|
<a name="1190"><span class="lineNum"> 1190 </span> : }</a>
|
|
<a name="1191"><span class="lineNum"> 1191 </span> : else</a>
|
|
<a name="1192"><span class="lineNum"> 1192 </span> : #endif</a>
|
|
<a name="1193"><span class="lineNum"> 1193 </span><span class="lineCov"> 20 : cprintf ("<<< %s", redirect->redirectee.filename->word);</span></a>
|
|
<a name="1194"><span class="lineNum"> 1194 </span><span class="lineCov"> 20 : break;</span></a>
|
|
<a name="1195"><span class="lineNum"> 1195 </span> : </a>
|
|
<a name="1196"><span class="lineNum"> 1196 </span><span class="lineNoCov"> 0 : case r_duplicating_input:</span></a>
|
|
<a name="1197"><span class="lineNum"> 1197 </span><span class="lineNoCov"> 0 : if (redirect->rflags & REDIR_VARASSIGN)</span></a>
|
|
<a name="1198"><span class="lineNum"> 1198 </span><span class="lineNoCov"> 0 : cprintf ("{%s}<&%d", redir_word->word, redir_fd);</span></a>
|
|
<a name="1199"><span class="lineNum"> 1199 </span> : else</a>
|
|
<a name="1200"><span class="lineNum"> 1200 </span><span class="lineNoCov"> 0 : cprintf ("%d<&%d", redirector, redir_fd);</span></a>
|
|
<a name="1201"><span class="lineNum"> 1201 </span> : break;</a>
|
|
<a name="1202"><span class="lineNum"> 1202 </span> : </a>
|
|
<a name="1203"><span class="lineNum"> 1203 </span><span class="lineCov"> 20407 : case r_duplicating_output:</span></a>
|
|
<a name="1204"><span class="lineNum"> 1204 </span><span class="lineCov"> 20407 : if (redirect->rflags & REDIR_VARASSIGN)</span></a>
|
|
<a name="1205"><span class="lineNum"> 1205 </span><span class="lineNoCov"> 0 : cprintf ("{%s}>&%d", redir_word->word, redir_fd);</span></a>
|
|
<a name="1206"><span class="lineNum"> 1206 </span> : else</a>
|
|
<a name="1207"><span class="lineNum"> 1207 </span><span class="lineCov"> 20407 : cprintf ("%d>&%d", redirector, redir_fd);</span></a>
|
|
<a name="1208"><span class="lineNum"> 1208 </span> : break;</a>
|
|
<a name="1209"><span class="lineNum"> 1209 </span> : </a>
|
|
<a name="1210"><span class="lineNum"> 1210 </span><span class="lineNoCov"> 0 : case r_duplicating_input_word:</span></a>
|
|
<a name="1211"><span class="lineNum"> 1211 </span><span class="lineNoCov"> 0 : if (redirect->rflags & REDIR_VARASSIGN)</span></a>
|
|
<a name="1212"><span class="lineNum"> 1212 </span><span class="lineNoCov"> 0 : cprintf ("{%s}<&%s", redir_word->word, redirectee->word);</span></a>
|
|
<a name="1213"><span class="lineNum"> 1213 </span> : else</a>
|
|
<a name="1214"><span class="lineNum"> 1214 </span><span class="lineNoCov"> 0 : cprintf ("%d<&%s", redirector, redirectee->word);</span></a>
|
|
<a name="1215"><span class="lineNum"> 1215 </span> : break;</a>
|
|
<a name="1216"><span class="lineNum"> 1216 </span> : </a>
|
|
<a name="1217"><span class="lineNum"> 1217 </span><span class="lineNoCov"> 0 : case r_duplicating_output_word:</span></a>
|
|
<a name="1218"><span class="lineNum"> 1218 </span><span class="lineNoCov"> 0 : if (redirect->rflags & REDIR_VARASSIGN)</span></a>
|
|
<a name="1219"><span class="lineNum"> 1219 </span><span class="lineNoCov"> 0 : cprintf ("{%s}>&%s", redir_word->word, redirectee->word);</span></a>
|
|
<a name="1220"><span class="lineNum"> 1220 </span> : else</a>
|
|
<a name="1221"><span class="lineNum"> 1221 </span><span class="lineNoCov"> 0 : cprintf ("%d>&%s", redirector, redirectee->word);</span></a>
|
|
<a name="1222"><span class="lineNum"> 1222 </span> : break;</a>
|
|
<a name="1223"><span class="lineNum"> 1223 </span> : </a>
|
|
<a name="1224"><span class="lineNum"> 1224 </span><span class="lineNoCov"> 0 : case r_move_input:</span></a>
|
|
<a name="1225"><span class="lineNum"> 1225 </span><span class="lineNoCov"> 0 : if (redirect->rflags & REDIR_VARASSIGN)</span></a>
|
|
<a name="1226"><span class="lineNum"> 1226 </span><span class="lineNoCov"> 0 : cprintf ("{%s}<&%d-", redir_word->word, redir_fd);</span></a>
|
|
<a name="1227"><span class="lineNum"> 1227 </span> : else</a>
|
|
<a name="1228"><span class="lineNum"> 1228 </span><span class="lineNoCov"> 0 : cprintf ("%d<&%d-", redirector, redir_fd);</span></a>
|
|
<a name="1229"><span class="lineNum"> 1229 </span> : break;</a>
|
|
<a name="1230"><span class="lineNum"> 1230 </span> : </a>
|
|
<a name="1231"><span class="lineNum"> 1231 </span><span class="lineNoCov"> 0 : case r_move_output:</span></a>
|
|
<a name="1232"><span class="lineNum"> 1232 </span><span class="lineNoCov"> 0 : if (redirect->rflags & REDIR_VARASSIGN)</span></a>
|
|
<a name="1233"><span class="lineNum"> 1233 </span><span class="lineNoCov"> 0 : cprintf ("{%s}>&%d-", redir_word->word, redir_fd);</span></a>
|
|
<a name="1234"><span class="lineNum"> 1234 </span> : else</a>
|
|
<a name="1235"><span class="lineNum"> 1235 </span><span class="lineNoCov"> 0 : cprintf ("%d>&%d-", redirector, redir_fd);</span></a>
|
|
<a name="1236"><span class="lineNum"> 1236 </span> : break;</a>
|
|
<a name="1237"><span class="lineNum"> 1237 </span> : </a>
|
|
<a name="1238"><span class="lineNum"> 1238 </span><span class="lineNoCov"> 0 : case r_move_input_word:</span></a>
|
|
<a name="1239"><span class="lineNum"> 1239 </span><span class="lineNoCov"> 0 : if (redirect->rflags & REDIR_VARASSIGN)</span></a>
|
|
<a name="1240"><span class="lineNum"> 1240 </span><span class="lineNoCov"> 0 : cprintf ("{%s}<&%s-", redir_word->word, redirectee->word);</span></a>
|
|
<a name="1241"><span class="lineNum"> 1241 </span> : else</a>
|
|
<a name="1242"><span class="lineNum"> 1242 </span><span class="lineNoCov"> 0 : cprintf ("%d<&%s-", redirector, redirectee->word);</span></a>
|
|
<a name="1243"><span class="lineNum"> 1243 </span> : break;</a>
|
|
<a name="1244"><span class="lineNum"> 1244 </span> : </a>
|
|
<a name="1245"><span class="lineNum"> 1245 </span><span class="lineNoCov"> 0 : case r_move_output_word:</span></a>
|
|
<a name="1246"><span class="lineNum"> 1246 </span><span class="lineNoCov"> 0 : if (redirect->rflags & REDIR_VARASSIGN)</span></a>
|
|
<a name="1247"><span class="lineNum"> 1247 </span><span class="lineNoCov"> 0 : cprintf ("{%s}>&%s-", redir_word->word, redirectee->word);</span></a>
|
|
<a name="1248"><span class="lineNum"> 1248 </span> : else</a>
|
|
<a name="1249"><span class="lineNum"> 1249 </span><span class="lineNoCov"> 0 : cprintf ("%d>&%s-", redirector, redirectee->word);</span></a>
|
|
<a name="1250"><span class="lineNum"> 1250 </span> : break;</a>
|
|
<a name="1251"><span class="lineNum"> 1251 </span> : </a>
|
|
<a name="1252"><span class="lineNum"> 1252 </span><span class="lineNoCov"> 0 : case r_close_this:</span></a>
|
|
<a name="1253"><span class="lineNum"> 1253 </span><span class="lineNoCov"> 0 : if (redirect->rflags & REDIR_VARASSIGN)</span></a>
|
|
<a name="1254"><span class="lineNum"> 1254 </span><span class="lineNoCov"> 0 : cprintf ("{%s}>&-", redir_word->word);</span></a>
|
|
<a name="1255"><span class="lineNum"> 1255 </span> : else</a>
|
|
<a name="1256"><span class="lineNum"> 1256 </span><span class="lineNoCov"> 0 : cprintf ("%d>&-", redirector);</span></a>
|
|
<a name="1257"><span class="lineNum"> 1257 </span> : break;</a>
|
|
<a name="1258"><span class="lineNum"> 1258 </span> : </a>
|
|
<a name="1259"><span class="lineNum"> 1259 </span><span class="lineCov"> 49 : case r_err_and_out:</span></a>
|
|
<a name="1260"><span class="lineNum"> 1260 </span><span class="lineCov"> 49 : cprintf ("&> %s", redirectee->word);</span></a>
|
|
<a name="1261"><span class="lineNum"> 1261 </span><span class="lineCov"> 49 : break;</span></a>
|
|
<a name="1262"><span class="lineNum"> 1262 </span> : </a>
|
|
<a name="1263"><span class="lineNum"> 1263 </span><span class="lineNoCov"> 0 : case r_append_err_and_out:</span></a>
|
|
<a name="1264"><span class="lineNum"> 1264 </span><span class="lineNoCov"> 0 : cprintf ("&>> %s", redirectee->word);</span></a>
|
|
<a name="1265"><span class="lineNum"> 1265 </span><span class="lineNoCov"> 0 : break;</span></a>
|
|
<a name="1266"><span class="lineNum"> 1266 </span> : }</a>
|
|
<a name="1267"><span class="lineNum"> 1267 </span><span class="lineCov"> 238464 : }</span></a>
|
|
<a name="1268"><span class="lineNum"> 1268 </span> : </a>
|
|
<a name="1269"><span class="lineNum"> 1269 </span> : static void</a>
|
|
<a name="1270"><span class="lineNum"> 1270 </span><span class="lineNoCov"> 0 : reset_locals ()</span></a>
|
|
<a name="1271"><span class="lineNum"> 1271 </span> : {</a>
|
|
<a name="1272"><span class="lineNum"> 1272 </span><span class="lineNoCov"> 0 : inside_function_def = 0;</span></a>
|
|
<a name="1273"><span class="lineNum"> 1273 </span><span class="lineNoCov"> 0 : indentation = 0;</span></a>
|
|
<a name="1274"><span class="lineNum"> 1274 </span><span class="lineNoCov"> 0 : printing_connection = 0;</span></a>
|
|
<a name="1275"><span class="lineNum"> 1275 </span><span class="lineNoCov"> 0 : deferred_heredocs = 0;</span></a>
|
|
<a name="1276"><span class="lineNum"> 1276 </span><span class="lineNoCov"> 0 : }</span></a>
|
|
<a name="1277"><span class="lineNum"> 1277 </span> : </a>
|
|
<a name="1278"><span class="lineNum"> 1278 </span> : static void</a>
|
|
<a name="1279"><span class="lineNum"> 1279 </span><span class="lineNoCov"> 0 : print_function_def (func)</span></a>
|
|
<a name="1280"><span class="lineNum"> 1280 </span> : FUNCTION_DEF *func;</a>
|
|
<a name="1281"><span class="lineNum"> 1281 </span> : {</a>
|
|
<a name="1282"><span class="lineNum"> 1282 </span><span class="lineNoCov"> 0 : COMMAND *cmdcopy;</span></a>
|
|
<a name="1283"><span class="lineNum"> 1283 </span><span class="lineNoCov"> 0 : REDIRECT *func_redirects;</span></a>
|
|
<a name="1284"><span class="lineNum"> 1284 </span> : </a>
|
|
<a name="1285"><span class="lineNum"> 1285 </span><span class="lineNoCov"> 0 : func_redirects = NULL;</span></a>
|
|
<a name="1286"><span class="lineNum"> 1286 </span> : /* When in posix mode, print functions as posix specifies them. */</a>
|
|
<a name="1287"><span class="lineNum"> 1287 </span><span class="lineNoCov"> 0 : if (posixly_correct == 0)</span></a>
|
|
<a name="1288"><span class="lineNum"> 1288 </span><span class="lineNoCov"> 0 : cprintf ("function %s () \n", func->name->word);</span></a>
|
|
<a name="1289"><span class="lineNum"> 1289 </span> : else</a>
|
|
<a name="1290"><span class="lineNum"> 1290 </span><span class="lineNoCov"> 0 : cprintf ("%s () \n", func->name->word);</span></a>
|
|
<a name="1291"><span class="lineNum"> 1291 </span><span class="lineNoCov"> 0 : add_unwind_protect (reset_locals, 0);</span></a>
|
|
<a name="1292"><span class="lineNum"> 1292 </span> : </a>
|
|
<a name="1293"><span class="lineNum"> 1293 </span><span class="lineNoCov"> 0 : indent (indentation);</span></a>
|
|
<a name="1294"><span class="lineNum"> 1294 </span><span class="lineNoCov"> 0 : cprintf ("{ \n");</span></a>
|
|
<a name="1295"><span class="lineNum"> 1295 </span> : </a>
|
|
<a name="1296"><span class="lineNum"> 1296 </span><span class="lineNoCov"> 0 : inside_function_def++;</span></a>
|
|
<a name="1297"><span class="lineNum"> 1297 </span><span class="lineNoCov"> 0 : indentation += indentation_amount;</span></a>
|
|
<a name="1298"><span class="lineNum"> 1298 </span> : </a>
|
|
<a name="1299"><span class="lineNum"> 1299 </span><span class="lineNoCov"> 0 : cmdcopy = copy_command (func->command);</span></a>
|
|
<a name="1300"><span class="lineNum"> 1300 </span><span class="lineNoCov"> 0 : if (cmdcopy->type == cm_group)</span></a>
|
|
<a name="1301"><span class="lineNum"> 1301 </span> : {</a>
|
|
<a name="1302"><span class="lineNum"> 1302 </span><span class="lineNoCov"> 0 : func_redirects = cmdcopy->redirects;</span></a>
|
|
<a name="1303"><span class="lineNum"> 1303 </span><span class="lineNoCov"> 0 : cmdcopy->redirects = (REDIRECT *)NULL;</span></a>
|
|
<a name="1304"><span class="lineNum"> 1304 </span> : }</a>
|
|
<a name="1305"><span class="lineNum"> 1305 </span><span class="lineNoCov"> 0 : make_command_string_internal (cmdcopy->type == cm_group</span></a>
|
|
<a name="1306"><span class="lineNum"> 1306 </span><span class="lineNoCov"> 0 : ? cmdcopy->value.Group->command</span></a>
|
|
<a name="1307"><span class="lineNum"> 1307 </span> : : cmdcopy);</a>
|
|
<a name="1308"><span class="lineNum"> 1308 </span> : /* XXX - PRINT_DEFERRED_HEREDOCS (""); ? */</a>
|
|
<a name="1309"><span class="lineNum"> 1309 </span> : </a>
|
|
<a name="1310"><span class="lineNum"> 1310 </span><span class="lineNoCov"> 0 : remove_unwind_protect ();</span></a>
|
|
<a name="1311"><span class="lineNum"> 1311 </span><span class="lineNoCov"> 0 : indentation -= indentation_amount;</span></a>
|
|
<a name="1312"><span class="lineNum"> 1312 </span><span class="lineNoCov"> 0 : inside_function_def--;</span></a>
|
|
<a name="1313"><span class="lineNum"> 1313 </span> : </a>
|
|
<a name="1314"><span class="lineNum"> 1314 </span><span class="lineNoCov"> 0 : if (func_redirects)</span></a>
|
|
<a name="1315"><span class="lineNum"> 1315 </span> : { /* { */</a>
|
|
<a name="1316"><span class="lineNum"> 1316 </span><span class="lineNoCov"> 0 : newline ("} ");</span></a>
|
|
<a name="1317"><span class="lineNum"> 1317 </span><span class="lineNoCov"> 0 : print_redirection_list (func_redirects);</span></a>
|
|
<a name="1318"><span class="lineNum"> 1318 </span><span class="lineNoCov"> 0 : cmdcopy->redirects = func_redirects;</span></a>
|
|
<a name="1319"><span class="lineNum"> 1319 </span> : }</a>
|
|
<a name="1320"><span class="lineNum"> 1320 </span> : else</a>
|
|
<a name="1321"><span class="lineNum"> 1321 </span><span class="lineNoCov"> 0 : newline ("}");</span></a>
|
|
<a name="1322"><span class="lineNum"> 1322 </span> : </a>
|
|
<a name="1323"><span class="lineNum"> 1323 </span><span class="lineNoCov"> 0 : dispose_command (cmdcopy);</span></a>
|
|
<a name="1324"><span class="lineNum"> 1324 </span><span class="lineNoCov"> 0 : }</span></a>
|
|
<a name="1325"><span class="lineNum"> 1325 </span> : </a>
|
|
<a name="1326"><span class="lineNum"> 1326 </span> : /* Return the string representation of the named function.</a>
|
|
<a name="1327"><span class="lineNum"> 1327 </span> : NAME is the name of the function.</a>
|
|
<a name="1328"><span class="lineNum"> 1328 </span> : COMMAND is the function body. It should be a GROUP_COM.</a>
|
|
<a name="1329"><span class="lineNum"> 1329 </span> : flags&FUNC_MULTILINE is non-zero to pretty-print, or zero for all on one line.</a>
|
|
<a name="1330"><span class="lineNum"> 1330 </span> : flags&FUNC_EXTERNAL means convert from internal to external form</a>
|
|
<a name="1331"><span class="lineNum"> 1331 </span> : */</a>
|
|
<a name="1332"><span class="lineNum"> 1332 </span> : char *</a>
|
|
<a name="1333"><span class="lineNum"> 1333 </span><span class="lineCov"> 143 : named_function_string (name, command, flags)</span></a>
|
|
<a name="1334"><span class="lineNum"> 1334 </span> : char *name;</a>
|
|
<a name="1335"><span class="lineNum"> 1335 </span> : COMMAND *command;</a>
|
|
<a name="1336"><span class="lineNum"> 1336 </span> : int flags;</a>
|
|
<a name="1337"><span class="lineNum"> 1337 </span> : {</a>
|
|
<a name="1338"><span class="lineNum"> 1338 </span><span class="lineCov"> 143 : char *result;</span></a>
|
|
<a name="1339"><span class="lineNum"> 1339 </span><span class="lineCov"> 143 : int old_indent, old_amount;</span></a>
|
|
<a name="1340"><span class="lineNum"> 1340 </span><span class="lineCov"> 143 : COMMAND *cmdcopy;</span></a>
|
|
<a name="1341"><span class="lineNum"> 1341 </span><span class="lineCov"> 143 : REDIRECT *func_redirects;</span></a>
|
|
<a name="1342"><span class="lineNum"> 1342 </span> : </a>
|
|
<a name="1343"><span class="lineNum"> 1343 </span><span class="lineCov"> 143 : old_indent = indentation;</span></a>
|
|
<a name="1344"><span class="lineNum"> 1344 </span><span class="lineCov"> 143 : old_amount = indentation_amount;</span></a>
|
|
<a name="1345"><span class="lineNum"> 1345 </span><span class="lineCov"> 143 : command_string_index = was_heredoc = 0;</span></a>
|
|
<a name="1346"><span class="lineNum"> 1346 </span><span class="lineCov"> 143 : deferred_heredocs = 0;</span></a>
|
|
<a name="1347"><span class="lineNum"> 1347 </span> : </a>
|
|
<a name="1348"><span class="lineNum"> 1348 </span><span class="lineCov"> 143 : if (name && *name)</span></a>
|
|
<a name="1349"><span class="lineNum"> 1349 </span> : {</a>
|
|
<a name="1350"><span class="lineNum"> 1350 </span><span class="lineNoCov"> 0 : if (find_reserved_word (name) >= 0)</span></a>
|
|
<a name="1351"><span class="lineNum"> 1351 </span><span class="lineNoCov"> 0 : cprintf ("function ");</span></a>
|
|
<a name="1352"><span class="lineNum"> 1352 </span><span class="lineNoCov"> 0 : cprintf ("%s ", name);</span></a>
|
|
<a name="1353"><span class="lineNum"> 1353 </span> : }</a>
|
|
<a name="1354"><span class="lineNum"> 1354 </span> : </a>
|
|
<a name="1355"><span class="lineNum"> 1355 </span><span class="lineCov"> 143 : cprintf ("() ");</span></a>
|
|
<a name="1356"><span class="lineNum"> 1356 </span> : </a>
|
|
<a name="1357"><span class="lineNum"> 1357 </span><span class="lineCov"> 143 : if ((flags & FUNC_MULTILINE) == 0)</span></a>
|
|
<a name="1358"><span class="lineNum"> 1358 </span> : {</a>
|
|
<a name="1359"><span class="lineNum"> 1359 </span><span class="lineNoCov"> 0 : indentation = 1;</span></a>
|
|
<a name="1360"><span class="lineNum"> 1360 </span><span class="lineNoCov"> 0 : indentation_amount = 0;</span></a>
|
|
<a name="1361"><span class="lineNum"> 1361 </span> : }</a>
|
|
<a name="1362"><span class="lineNum"> 1362 </span> : else</a>
|
|
<a name="1363"><span class="lineNum"> 1363 </span> : {</a>
|
|
<a name="1364"><span class="lineNum"> 1364 </span><span class="lineCov"> 143 : cprintf ("\n");</span></a>
|
|
<a name="1365"><span class="lineNum"> 1365 </span><span class="lineCov"> 143 : indentation += indentation_amount;</span></a>
|
|
<a name="1366"><span class="lineNum"> 1366 </span> : }</a>
|
|
<a name="1367"><span class="lineNum"> 1367 </span> : </a>
|
|
<a name="1368"><span class="lineNum"> 1368 </span><span class="lineCov"> 143 : inside_function_def++;</span></a>
|
|
<a name="1369"><span class="lineNum"> 1369 </span> : </a>
|
|
<a name="1370"><span class="lineNum"> 1370 </span><span class="lineCov"> 143 : cprintf ((flags & FUNC_MULTILINE) ? "{ \n" : "{ ");</span></a>
|
|
<a name="1371"><span class="lineNum"> 1371 </span> : </a>
|
|
<a name="1372"><span class="lineNum"> 1372 </span><span class="lineCov"> 143 : cmdcopy = copy_command (command);</span></a>
|
|
<a name="1373"><span class="lineNum"> 1373 </span> : /* Take any redirections specified in the function definition (which should</a>
|
|
<a name="1374"><span class="lineNum"> 1374 </span> : apply to the function as a whole) and save them for printing later. */</a>
|
|
<a name="1375"><span class="lineNum"> 1375 </span><span class="lineCov"> 143 : func_redirects = (REDIRECT *)NULL;</span></a>
|
|
<a name="1376"><span class="lineNum"> 1376 </span><span class="lineCov"> 143 : if (cmdcopy->type == cm_group)</span></a>
|
|
<a name="1377"><span class="lineNum"> 1377 </span> : {</a>
|
|
<a name="1378"><span class="lineNum"> 1378 </span><span class="lineCov"> 143 : func_redirects = cmdcopy->redirects;</span></a>
|
|
<a name="1379"><span class="lineNum"> 1379 </span><span class="lineCov"> 143 : cmdcopy->redirects = (REDIRECT *)NULL;</span></a>
|
|
<a name="1380"><span class="lineNum"> 1380 </span> : }</a>
|
|
<a name="1381"><span class="lineNum"> 1381 </span><span class="lineCov"> 286 : make_command_string_internal (cmdcopy->type == cm_group</span></a>
|
|
<a name="1382"><span class="lineNum"> 1382 </span><span class="lineCov"> 143 : ? cmdcopy->value.Group->command</span></a>
|
|
<a name="1383"><span class="lineNum"> 1383 </span> : : cmdcopy);</a>
|
|
<a name="1384"><span class="lineNum"> 1384 </span> : /* XXX - PRINT_DEFERRED_HEREDOCS (""); ? */</a>
|
|
<a name="1385"><span class="lineNum"> 1385 </span> : </a>
|
|
<a name="1386"><span class="lineNum"> 1386 </span><span class="lineCov"> 143 : indentation = old_indent;</span></a>
|
|
<a name="1387"><span class="lineNum"> 1387 </span><span class="lineCov"> 143 : indentation_amount = old_amount;</span></a>
|
|
<a name="1388"><span class="lineNum"> 1388 </span><span class="lineCov"> 143 : inside_function_def--;</span></a>
|
|
<a name="1389"><span class="lineNum"> 1389 </span> : </a>
|
|
<a name="1390"><span class="lineNum"> 1390 </span><span class="lineCov"> 143 : if (func_redirects)</span></a>
|
|
<a name="1391"><span class="lineNum"> 1391 </span> : { /* { */</a>
|
|
<a name="1392"><span class="lineNum"> 1392 </span><span class="lineNoCov"> 0 : newline ("} ");</span></a>
|
|
<a name="1393"><span class="lineNum"> 1393 </span><span class="lineNoCov"> 0 : print_redirection_list (func_redirects);</span></a>
|
|
<a name="1394"><span class="lineNum"> 1394 </span><span class="lineNoCov"> 0 : cmdcopy->redirects = func_redirects;</span></a>
|
|
<a name="1395"><span class="lineNum"> 1395 </span> : }</a>
|
|
<a name="1396"><span class="lineNum"> 1396 </span> : else</a>
|
|
<a name="1397"><span class="lineNum"> 1397 </span><span class="lineCov"> 143 : newline ("}");</span></a>
|
|
<a name="1398"><span class="lineNum"> 1398 </span> : </a>
|
|
<a name="1399"><span class="lineNum"> 1399 </span><span class="lineCov"> 143 : result = the_printed_command;</span></a>
|
|
<a name="1400"><span class="lineNum"> 1400 </span> : </a>
|
|
<a name="1401"><span class="lineNum"> 1401 </span><span class="lineCov"> 143 : if ((flags & FUNC_MULTILINE) == 0)</span></a>
|
|
<a name="1402"><span class="lineNum"> 1402 </span> : {</a>
|
|
<a name="1403"><span class="lineNum"> 1403 </span> : #if 0</a>
|
|
<a name="1404"><span class="lineNum"> 1404 </span> : register int i;</a>
|
|
<a name="1405"><span class="lineNum"> 1405 </span> : for (i = 0; result[i]; i++)</a>
|
|
<a name="1406"><span class="lineNum"> 1406 </span> : if (result[i] == '\n')</a>
|
|
<a name="1407"><span class="lineNum"> 1407 </span> : {</a>
|
|
<a name="1408"><span class="lineNum"> 1408 </span> : strcpy (result + i, result + i + 1);</a>
|
|
<a name="1409"><span class="lineNum"> 1409 </span> : --i;</a>
|
|
<a name="1410"><span class="lineNum"> 1410 </span> : }</a>
|
|
<a name="1411"><span class="lineNum"> 1411 </span> : #else</a>
|
|
<a name="1412"><span class="lineNum"> 1412 </span><span class="lineNoCov"> 0 : if (result[2] == '\n') /* XXX -- experimental */</span></a>
|
|
<a name="1413"><span class="lineNum"> 1413 </span><span class="lineNoCov"> 0 : memmove (result + 2, result + 3, strlen (result) - 2);</span></a>
|
|
<a name="1414"><span class="lineNum"> 1414 </span> : </a>
|
|
<a name="1415"><span class="lineNum"> 1415 </span> : #endif</a>
|
|
<a name="1416"><span class="lineNum"> 1416 </span> : }</a>
|
|
<a name="1417"><span class="lineNum"> 1417 </span> : </a>
|
|
<a name="1418"><span class="lineNum"> 1418 </span><span class="lineCov"> 143 : dispose_command (cmdcopy);</span></a>
|
|
<a name="1419"><span class="lineNum"> 1419 </span> : </a>
|
|
<a name="1420"><span class="lineNum"> 1420 </span><span class="lineCov"> 143 : if (flags & FUNC_EXTERNAL)</span></a>
|
|
<a name="1421"><span class="lineNum"> 1421 </span><span class="lineCov"> 143 : result = remove_quoted_escapes (result);</span></a>
|
|
<a name="1422"><span class="lineNum"> 1422 </span> : </a>
|
|
<a name="1423"><span class="lineNum"> 1423 </span><span class="lineCov"> 143 : return (result);</span></a>
|
|
<a name="1424"><span class="lineNum"> 1424 </span> : }</a>
|
|
<a name="1425"><span class="lineNum"> 1425 </span> : </a>
|
|
<a name="1426"><span class="lineNum"> 1426 </span> : static void</a>
|
|
<a name="1427"><span class="lineNum"> 1427 </span><span class="lineCov"> 5312 : newline (string)</span></a>
|
|
<a name="1428"><span class="lineNum"> 1428 </span> : char *string;</a>
|
|
<a name="1429"><span class="lineNum"> 1429 </span> : {</a>
|
|
<a name="1430"><span class="lineNum"> 1430 </span><span class="lineCov"> 5312 : cprintf ("\n");</span></a>
|
|
<a name="1431"><span class="lineNum"> 1431 </span><span class="lineCov"> 5312 : indent (indentation);</span></a>
|
|
<a name="1432"><span class="lineNum"> 1432 </span><span class="lineCov"> 5312 : if (string && *string)</span></a>
|
|
<a name="1433"><span class="lineNum"> 1433 </span><span class="lineCov"> 4492 : cprintf ("%s", string);</span></a>
|
|
<a name="1434"><span class="lineNum"> 1434 </span><span class="lineCov"> 5312 : }</span></a>
|
|
<a name="1435"><span class="lineNum"> 1435 </span> : </a>
|
|
<a name="1436"><span class="lineNum"> 1436 </span> : static char *indentation_string;</a>
|
|
<a name="1437"><span class="lineNum"> 1437 </span> : static int indentation_size;</a>
|
|
<a name="1438"><span class="lineNum"> 1438 </span> : </a>
|
|
<a name="1439"><span class="lineNum"> 1439 </span> : static void</a>
|
|
<a name="1440"><span class="lineNum"> 1440 </span><span class="lineCov"> 14228 : indent (amount)</span></a>
|
|
<a name="1441"><span class="lineNum"> 1441 </span> : int amount;</a>
|
|
<a name="1442"><span class="lineNum"> 1442 </span> : {</a>
|
|
<a name="1443"><span class="lineNum"> 1443 </span><span class="lineCov"> 14228 : register int i;</span></a>
|
|
<a name="1444"><span class="lineNum"> 1444 </span> : </a>
|
|
<a name="1445"><span class="lineNum"> 1445 </span><span class="lineCov"> 21476 : RESIZE_MALLOCED_BUFFER (indentation_string, 0, amount, indentation_size, 16);</span></a>
|
|
<a name="1446"><span class="lineNum"> 1446 </span> : </a>
|
|
<a name="1447"><span class="lineNum"> 1447 </span><span class="lineCov"> 46328 : for (i = 0; amount > 0; amount--)</span></a>
|
|
<a name="1448"><span class="lineNum"> 1448 </span><span class="lineCov"> 32100 : indentation_string[i++] = ' ';</span></a>
|
|
<a name="1449"><span class="lineNum"> 1449 </span><span class="lineCov"> 14228 : indentation_string[i] = '\0';</span></a>
|
|
<a name="1450"><span class="lineNum"> 1450 </span><span class="lineCov"> 14228 : cprintf ("%s", indentation_string);</span></a>
|
|
<a name="1451"><span class="lineNum"> 1451 </span><span class="lineCov"> 14228 : }</span></a>
|
|
<a name="1452"><span class="lineNum"> 1452 </span> : </a>
|
|
<a name="1453"><span class="lineNum"> 1453 </span> : static void</a>
|
|
<a name="1454"><span class="lineNum"> 1454 </span><span class="lineCov"> 6205 : semicolon ()</span></a>
|
|
<a name="1455"><span class="lineNum"> 1455 </span> : {</a>
|
|
<a name="1456"><span class="lineNum"> 1456 </span><span class="lineCov"> 6205 : if (command_string_index > 0 &&</span></a>
|
|
<a name="1457"><span class="lineNum"> 1457 </span><span class="lineCov"> 6205 : (the_printed_command[command_string_index - 1] == '&' ||</span></a>
|
|
<a name="1458"><span class="lineNum"> 1458 </span> : the_printed_command[command_string_index - 1] == '\n'))</a>
|
|
<a name="1459"><span class="lineNum"> 1459 </span> : return;</a>
|
|
<a name="1460"><span class="lineNum"> 1460 </span><span class="lineCov"> 6205 : cprintf (";");</span></a>
|
|
<a name="1461"><span class="lineNum"> 1461 </span> : }</a>
|
|
<a name="1462"><span class="lineNum"> 1462 </span> : </a>
|
|
<a name="1463"><span class="lineNum"> 1463 </span> : /* How to make the string. */</a>
|
|
<a name="1464"><span class="lineNum"> 1464 </span> : static void</a>
|
|
<a name="1465"><span class="lineNum"> 1465 </span> : #if defined (PREFER_STDARG)</a>
|
|
<a name="1466"><span class="lineNum"> 1466 </span><span class="lineCov"> 204490201 : cprintf (const char *control, ...)</span></a>
|
|
<a name="1467"><span class="lineNum"> 1467 </span> : #else</a>
|
|
<a name="1468"><span class="lineNum"> 1468 </span> : cprintf (control, va_alist)</a>
|
|
<a name="1469"><span class="lineNum"> 1469 </span> : const char *control;</a>
|
|
<a name="1470"><span class="lineNum"> 1470 </span> : va_dcl</a>
|
|
<a name="1471"><span class="lineNum"> 1471 </span> : #endif</a>
|
|
<a name="1472"><span class="lineNum"> 1472 </span> : {</a>
|
|
<a name="1473"><span class="lineNum"> 1473 </span><span class="lineCov"> 204490201 : register const char *s;</span></a>
|
|
<a name="1474"><span class="lineNum"> 1474 </span><span class="lineCov"> 204490201 : char char_arg[2], *argp, intbuf[INT_STRLEN_BOUND (int) + 1];</span></a>
|
|
<a name="1475"><span class="lineNum"> 1475 </span><span class="lineCov"> 204490201 : int digit_arg, arg_len, c;</span></a>
|
|
<a name="1476"><span class="lineNum"> 1476 </span><span class="lineCov"> 204490201 : va_list args;</span></a>
|
|
<a name="1477"><span class="lineNum"> 1477 </span> : </a>
|
|
<a name="1478"><span class="lineNum"> 1478 </span><span class="lineCov"> 204490201 : SH_VA_START (args, control);</span></a>
|
|
<a name="1479"><span class="lineNum"> 1479 </span> : </a>
|
|
<a name="1480"><span class="lineNum"> 1480 </span><span class="lineCov"> 204490201 : arg_len = strlen (control);</span></a>
|
|
<a name="1481"><span class="lineNum"> 1481 </span><span class="lineCov"> 204490201 : the_printed_command_resize (arg_len + 1);</span></a>
|
|
<a name="1482"><span class="lineNum"> 1482 </span> : </a>
|
|
<a name="1483"><span class="lineNum"> 1483 </span><span class="lineCov"> 204490201 : char_arg[1] = '\0';</span></a>
|
|
<a name="1484"><span class="lineNum"> 1484 </span><span class="lineCov"> 204490201 : s = control;</span></a>
|
|
<a name="1485"><span class="lineNum"> 1485 </span><span class="lineCov"> 658638770 : while (s && *s)</span></a>
|
|
<a name="1486"><span class="lineNum"> 1486 </span> : {</a>
|
|
<a name="1487"><span class="lineNum"> 1487 </span><span class="lineCov"> 454148569 : c = *s++;</span></a>
|
|
<a name="1488"><span class="lineNum"> 1488 </span><span class="lineCov"> 454148569 : argp = (char *)NULL;</span></a>
|
|
<a name="1489"><span class="lineNum"> 1489 </span><span class="lineCov"> 454148569 : if (c != '%' || !*s)</span></a>
|
|
<a name="1490"><span class="lineNum"> 1490 </span> : {</a>
|
|
<a name="1491"><span class="lineNum"> 1491 </span><span class="lineCov"> 51610078 : char_arg[0] = c;</span></a>
|
|
<a name="1492"><span class="lineNum"> 1492 </span><span class="lineCov"> 51610078 : argp = char_arg;</span></a>
|
|
<a name="1493"><span class="lineNum"> 1493 </span><span class="lineCov"> 51610078 : arg_len = 1;</span></a>
|
|
<a name="1494"><span class="lineNum"> 1494 </span> : }</a>
|
|
<a name="1495"><span class="lineNum"> 1495 </span> : else</a>
|
|
<a name="1496"><span class="lineNum"> 1496 </span> : {</a>
|
|
<a name="1497"><span class="lineNum"> 1497 </span><span class="lineCov"> 402538491 : c = *s++;</span></a>
|
|
<a name="1498"><span class="lineNum"> 1498 </span><span class="lineCov"> 402538491 : switch (c)</span></a>
|
|
<a name="1499"><span class="lineNum"> 1499 </span> : {</a>
|
|
<a name="1500"><span class="lineNum"> 1500 </span><span class="lineNoCov"> 0 : case '%':</span></a>
|
|
<a name="1501"><span class="lineNum"> 1501 </span><span class="lineNoCov"> 0 : char_arg[0] = c;</span></a>
|
|
<a name="1502"><span class="lineNum"> 1502 </span><span class="lineNoCov"> 0 : argp = char_arg;</span></a>
|
|
<a name="1503"><span class="lineNum"> 1503 </span><span class="lineNoCov"> 0 : arg_len = 1;</span></a>
|
|
<a name="1504"><span class="lineNum"> 1504 </span><span class="lineNoCov"> 0 : break;</span></a>
|
|
<a name="1505"><span class="lineNum"> 1505 </span> : </a>
|
|
<a name="1506"><span class="lineNum"> 1506 </span><span class="lineCov"> 402458339 : case 's':</span></a>
|
|
<a name="1507"><span class="lineNum"> 1507 </span><span class="lineCov"> 402458339 : argp = va_arg (args, char *);</span></a>
|
|
<a name="1508"><span class="lineNum"> 1508 </span><span class="lineCov"> 402458339 : arg_len = strlen (argp);</span></a>
|
|
<a name="1509"><span class="lineNum"> 1509 </span><span class="lineCov"> 402458339 : break;</span></a>
|
|
<a name="1510"><span class="lineNum"> 1510 </span> : </a>
|
|
<a name="1511"><span class="lineNum"> 1511 </span><span class="lineCov"> 80152 : case 'd':</span></a>
|
|
<a name="1512"><span class="lineNum"> 1512 </span> : /* Represent an out-of-range file descriptor with an out-of-range</a>
|
|
<a name="1513"><span class="lineNum"> 1513 </span> : integer value. We can do this because the only use of `%d' in</a>
|
|
<a name="1514"><span class="lineNum"> 1514 </span> : the calls to cprintf is to output a file descriptor number for</a>
|
|
<a name="1515"><span class="lineNum"> 1515 </span> : a redirection. */</a>
|
|
<a name="1516"><span class="lineNum"> 1516 </span><span class="lineCov"> 80152 : digit_arg = va_arg (args, int);</span></a>
|
|
<a name="1517"><span class="lineNum"> 1517 </span><span class="lineCov"> 80152 : if (digit_arg < 0)</span></a>
|
|
<a name="1518"><span class="lineNum"> 1518 </span> : {</a>
|
|
<a name="1519"><span class="lineNum"> 1519 </span><span class="lineNoCov"> 0 : sprintf (intbuf, "%u", (unsigned)-1);</span></a>
|
|
<a name="1520"><span class="lineNum"> 1520 </span><span class="lineNoCov"> 0 : argp = intbuf;</span></a>
|
|
<a name="1521"><span class="lineNum"> 1521 </span> : }</a>
|
|
<a name="1522"><span class="lineNum"> 1522 </span> : else</a>
|
|
<a name="1523"><span class="lineNum"> 1523 </span><span class="lineCov"> 80152 : argp = inttostr (digit_arg, intbuf, sizeof (intbuf));</span></a>
|
|
<a name="1524"><span class="lineNum"> 1524 </span><span class="lineCov"> 80152 : arg_len = strlen (argp);</span></a>
|
|
<a name="1525"><span class="lineNum"> 1525 </span><span class="lineCov"> 80152 : break;</span></a>
|
|
<a name="1526"><span class="lineNum"> 1526 </span> : </a>
|
|
<a name="1527"><span class="lineNum"> 1527 </span><span class="lineNoCov"> 0 : case 'c':</span></a>
|
|
<a name="1528"><span class="lineNum"> 1528 </span><span class="lineNoCov"> 0 : char_arg[0] = va_arg (args, int);</span></a>
|
|
<a name="1529"><span class="lineNum"> 1529 </span><span class="lineNoCov"> 0 : argp = char_arg;</span></a>
|
|
<a name="1530"><span class="lineNum"> 1530 </span><span class="lineNoCov"> 0 : arg_len = 1;</span></a>
|
|
<a name="1531"><span class="lineNum"> 1531 </span><span class="lineNoCov"> 0 : break;</span></a>
|
|
<a name="1532"><span class="lineNum"> 1532 </span> : </a>
|
|
<a name="1533"><span class="lineNum"> 1533 </span><span class="lineNoCov"> 0 : default:</span></a>
|
|
<a name="1534"><span class="lineNum"> 1534 </span><span class="lineNoCov"> 0 : programming_error (_("cprintf: `%c': invalid format character"), c);</span></a>
|
|
<a name="1535"><span class="lineNum"> 1535 </span> : /*NOTREACHED*/</a>
|
|
<a name="1536"><span class="lineNum"> 1536 </span> : }</a>
|
|
<a name="1537"><span class="lineNum"> 1537 </span> : }</a>
|
|
<a name="1538"><span class="lineNum"> 1538 </span> : </a>
|
|
<a name="1539"><span class="lineNum"> 1539 </span><span class="lineCov"> 454148569 : if (argp && arg_len)</span></a>
|
|
<a name="1540"><span class="lineNum"> 1540 </span> : {</a>
|
|
<a name="1541"><span class="lineNum"> 1541 </span><span class="lineCov"> 367825454 : the_printed_command_resize (arg_len + 1);</span></a>
|
|
<a name="1542"><span class="lineNum"> 1542 </span><span class="lineCov"> 367825454 : FASTCOPY (argp, the_printed_command + command_string_index, arg_len);</span></a>
|
|
<a name="1543"><span class="lineNum"> 1543 </span><span class="lineCov"> 367825454 : command_string_index += arg_len;</span></a>
|
|
<a name="1544"><span class="lineNum"> 1544 </span> : }</a>
|
|
<a name="1545"><span class="lineNum"> 1545 </span> : }</a>
|
|
<a name="1546"><span class="lineNum"> 1546 </span> : </a>
|
|
<a name="1547"><span class="lineNum"> 1547 </span><span class="lineCov"> 204490201 : va_end (args);</span></a>
|
|
<a name="1548"><span class="lineNum"> 1548 </span> : </a>
|
|
<a name="1549"><span class="lineNum"> 1549 </span><span class="lineCov"> 204490201 : the_printed_command[command_string_index] = '\0';</span></a>
|
|
<a name="1550"><span class="lineNum"> 1550 </span><span class="lineCov"> 204490201 : }</span></a>
|
|
<a name="1551"><span class="lineNum"> 1551 </span> : </a>
|
|
<a name="1552"><span class="lineNum"> 1552 </span> : /* Ensure that there is enough space to stuff LENGTH characters into</a>
|
|
<a name="1553"><span class="lineNum"> 1553 </span> : THE_PRINTED_COMMAND. */</a>
|
|
<a name="1554"><span class="lineNum"> 1554 </span> : static void</a>
|
|
<a name="1555"><span class="lineNum"> 1555 </span><span class="lineCov"> 572315655 : the_printed_command_resize (length)</span></a>
|
|
<a name="1556"><span class="lineNum"> 1556 </span> : int length;</a>
|
|
<a name="1557"><span class="lineNum"> 1557 </span> : {</a>
|
|
<a name="1558"><span class="lineNum"> 1558 </span><span class="lineCov"> 572315655 : if (the_printed_command == 0)</span></a>
|
|
<a name="1559"><span class="lineNum"> 1559 </span> : {</a>
|
|
<a name="1560"><span class="lineNum"> 1560 </span><span class="lineCov"> 9542957 : the_printed_command_size = (length + PRINTED_COMMAND_INITIAL_SIZE - 1) & ~(PRINTED_COMMAND_INITIAL_SIZE - 1);</span></a>
|
|
<a name="1561"><span class="lineNum"> 1561 </span><span class="lineCov"> 9542957 : the_printed_command = (char *)xmalloc (the_printed_command_size);</span></a>
|
|
<a name="1562"><span class="lineNum"> 1562 </span><span class="lineCov"> 9542957 : command_string_index = 0;</span></a>
|
|
<a name="1563"><span class="lineNum"> 1563 </span> : }</a>
|
|
<a name="1564"><span class="lineNum"> 1564 </span><span class="lineCov"> 562772698 : else if ((command_string_index + length) >= the_printed_command_size)</span></a>
|
|
<a name="1565"><span class="lineNum"> 1565 </span> : {</a>
|
|
<a name="1566"><span class="lineNum"> 1566 </span><span class="lineCov"> 5687417 : int new;</span></a>
|
|
<a name="1567"><span class="lineNum"> 1567 </span><span class="lineCov"> 5687417 : new = command_string_index + length + 1;</span></a>
|
|
<a name="1568"><span class="lineNum"> 1568 </span> : </a>
|
|
<a name="1569"><span class="lineNum"> 1569 </span> : /* Round up to the next multiple of PRINTED_COMMAND_GROW_SIZE. */</a>
|
|
<a name="1570"><span class="lineNum"> 1570 </span><span class="lineCov"> 5687417 : new = (new + PRINTED_COMMAND_GROW_SIZE - 1) & ~(PRINTED_COMMAND_GROW_SIZE - 1);</span></a>
|
|
<a name="1571"><span class="lineNum"> 1571 </span><span class="lineCov"> 5687417 : the_printed_command_size = new;</span></a>
|
|
<a name="1572"><span class="lineNum"> 1572 </span> : </a>
|
|
<a name="1573"><span class="lineNum"> 1573 </span><span class="lineCov"> 5687417 : the_printed_command = (char *)xrealloc (the_printed_command, the_printed_command_size);</span></a>
|
|
<a name="1574"><span class="lineNum"> 1574 </span> : }</a>
|
|
<a name="1575"><span class="lineNum"> 1575 </span><span class="lineCov"> 572315655 : }</span></a>
|
|
<a name="1576"><span class="lineNum"> 1576 </span> : </a>
|
|
<a name="1577"><span class="lineNum"> 1577 </span> : #if defined (HAVE_VPRINTF)</a>
|
|
<a name="1578"><span class="lineNum"> 1578 </span> : /* ``If vprintf is available, you may assume that vfprintf and vsprintf are</a>
|
|
<a name="1579"><span class="lineNum"> 1579 </span> : also available.'' */</a>
|
|
<a name="1580"><span class="lineNum"> 1580 </span> : </a>
|
|
<a name="1581"><span class="lineNum"> 1581 </span> : static void</a>
|
|
<a name="1582"><span class="lineNum"> 1582 </span> : #if defined (PREFER_STDARG)</a>
|
|
<a name="1583"><span class="lineNum"> 1583 </span><span class="lineNoCov"> 0 : xprintf (const char *format, ...)</span></a>
|
|
<a name="1584"><span class="lineNum"> 1584 </span> : #else</a>
|
|
<a name="1585"><span class="lineNum"> 1585 </span> : xprintf (format, va_alist)</a>
|
|
<a name="1586"><span class="lineNum"> 1586 </span> : const char *format;</a>
|
|
<a name="1587"><span class="lineNum"> 1587 </span> : va_dcl</a>
|
|
<a name="1588"><span class="lineNum"> 1588 </span> : #endif</a>
|
|
<a name="1589"><span class="lineNum"> 1589 </span> : {</a>
|
|
<a name="1590"><span class="lineNum"> 1590 </span><span class="lineNoCov"> 0 : va_list args;</span></a>
|
|
<a name="1591"><span class="lineNum"> 1591 </span> : </a>
|
|
<a name="1592"><span class="lineNum"> 1592 </span><span class="lineNoCov"> 0 : SH_VA_START (args, format);</span></a>
|
|
<a name="1593"><span class="lineNum"> 1593 </span> : </a>
|
|
<a name="1594"><span class="lineNum"> 1594 </span><span class="lineNoCov"> 0 : vfprintf (stdout, format, args);</span></a>
|
|
<a name="1595"><span class="lineNum"> 1595 </span><span class="lineNoCov"> 0 : va_end (args);</span></a>
|
|
<a name="1596"><span class="lineNum"> 1596 </span><span class="lineNoCov"> 0 : }</span></a>
|
|
<a name="1597"><span class="lineNum"> 1597 </span> : </a>
|
|
<a name="1598"><span class="lineNum"> 1598 </span> : #else</a>
|
|
<a name="1599"><span class="lineNum"> 1599 </span> : </a>
|
|
<a name="1600"><span class="lineNum"> 1600 </span> : static void</a>
|
|
<a name="1601"><span class="lineNum"> 1601 </span> : xprintf (format, arg1, arg2, arg3, arg4, arg5)</a>
|
|
<a name="1602"><span class="lineNum"> 1602 </span> : const char *format;</a>
|
|
<a name="1603"><span class="lineNum"> 1603 </span> : {</a>
|
|
<a name="1604"><span class="lineNum"> 1604 </span> : printf (format, arg1, arg2, arg3, arg4, arg5);</a>
|
|
<a name="1605"><span class="lineNum"> 1605 </span> : }</a>
|
|
<a name="1606"><span class="lineNum"> 1606 </span> : </a>
|
|
<a name="1607"><span class="lineNum"> 1607 </span> : #endif /* !HAVE_VPRINTF */</a>
|
|
</pre>
|
|
</td>
|
|
</tr>
|
|
</table>
|
|
<br>
|
|
|
|
<table width="100%" border=0 cellspacing=0 cellpadding=0>
|
|
<tr><td class="ruler"><img src="../glass.png" width=3 height=3 alt=""></td></tr>
|
|
<tr><td class="versionInfo">Generated by: <a href="http://ltp.sourceforge.net/coverage/lcov.php" target="_parent">LCOV version 1.14.0.6.4058</a></td></tr>
|
|
</table>
|
|
<br>
|
|
|
|
</body>
|
|
</html>
|