424 lines
39 KiB
HTML
424 lines
39 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-bash.info - builtins/getopts.def</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">builtins</a> - getopts.def<span style="font-size: 80%;"> (source / <a href="getopts.def.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-bash.info</td>
|
|
<td></td>
|
|
<td class="headerItem">Lines:</td>
|
|
<td class="headerCovTableEntry">4</td>
|
|
<td class="headerCovTableEntry">112</td>
|
|
<td class="headerCovTableEntryLo">3.6 %</td>
|
|
</tr>
|
|
<tr>
|
|
<td class="headerItem">Date:</td>
|
|
<td class="headerValue">2020-10-29 14:49:28</td>
|
|
<td></td>
|
|
<td class="headerItem">Functions:</td>
|
|
<td class="headerCovTableEntry">1</td>
|
|
<td class="headerCovTableEntry">4</td>
|
|
<td class="headerCovTableEntryLo">25.0 %</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> : This file is getopts.def, from which is created getopts.c.</a>
|
|
<a name="2"><span class="lineNum"> 2 </span> : It implements the builtin "getopts" in Bash.</a>
|
|
<a name="3"><span class="lineNum"> 3 </span> : </a>
|
|
<a name="4"><span class="lineNum"> 4 </span> : Copyright (C) 1987-2015 Free Software Foundation, Inc.</a>
|
|
<a name="5"><span class="lineNum"> 5 </span> : </a>
|
|
<a name="6"><span class="lineNum"> 6 </span> : This file is part of GNU Bash, the Bourne Again SHell.</a>
|
|
<a name="7"><span class="lineNum"> 7 </span> : </a>
|
|
<a name="8"><span class="lineNum"> 8 </span> : Bash is free software: you can redistribute it and/or modify</a>
|
|
<a name="9"><span class="lineNum"> 9 </span> : it under the terms of the GNU General Public License as published by</a>
|
|
<a name="10"><span class="lineNum"> 10 </span> : the Free Software Foundation, either version 3 of the License, or</a>
|
|
<a name="11"><span class="lineNum"> 11 </span> : (at your option) any later version.</a>
|
|
<a name="12"><span class="lineNum"> 12 </span> : </a>
|
|
<a name="13"><span class="lineNum"> 13 </span> : Bash is distributed in the hope that it will be useful,</a>
|
|
<a name="14"><span class="lineNum"> 14 </span> : but WITHOUT ANY WARRANTY; without even the implied warranty of</a>
|
|
<a name="15"><span class="lineNum"> 15 </span> : MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the</a>
|
|
<a name="16"><span class="lineNum"> 16 </span> : GNU General Public License for more details.</a>
|
|
<a name="17"><span class="lineNum"> 17 </span> : </a>
|
|
<a name="18"><span class="lineNum"> 18 </span> : You should have received a copy of the GNU General Public License</a>
|
|
<a name="19"><span class="lineNum"> 19 </span> : along with Bash. If not, see <http://www.gnu.org/licenses/>.</a>
|
|
<a name="20"><span class="lineNum"> 20 </span> : </a>
|
|
<a name="21"><span class="lineNum"> 21 </span> : $PRODUCES getopts.c</a>
|
|
<a name="22"><span class="lineNum"> 22 </span> : </a>
|
|
<a name="23"><span class="lineNum"> 23 </span> : $BUILTIN getopts</a>
|
|
<a name="24"><span class="lineNum"> 24 </span> : $FUNCTION getopts_builtin</a>
|
|
<a name="25"><span class="lineNum"> 25 </span> : $SHORT_DOC getopts optstring name [arg]</a>
|
|
<a name="26"><span class="lineNum"> 26 </span> : Parse option arguments.</a>
|
|
<a name="27"><span class="lineNum"> 27 </span> : </a>
|
|
<a name="28"><span class="lineNum"> 28 </span> : Getopts is used by shell procedures to parse positional parameters</a>
|
|
<a name="29"><span class="lineNum"> 29 </span> : as options.</a>
|
|
<a name="30"><span class="lineNum"> 30 </span> : </a>
|
|
<a name="31"><span class="lineNum"> 31 </span> : OPTSTRING contains the option letters to be recognized; if a letter</a>
|
|
<a name="32"><span class="lineNum"> 32 </span> : is followed by a colon, the option is expected to have an argument,</a>
|
|
<a name="33"><span class="lineNum"> 33 </span> : which should be separated from it by white space.</a>
|
|
<a name="34"><span class="lineNum"> 34 </span> : </a>
|
|
<a name="35"><span class="lineNum"> 35 </span> : Each time it is invoked, getopts will place the next option in the</a>
|
|
<a name="36"><span class="lineNum"> 36 </span> : shell variable $name, initializing name if it does not exist, and</a>
|
|
<a name="37"><span class="lineNum"> 37 </span> : the index of the next argument to be processed into the shell</a>
|
|
<a name="38"><span class="lineNum"> 38 </span> : variable OPTIND. OPTIND is initialized to 1 each time the shell or</a>
|
|
<a name="39"><span class="lineNum"> 39 </span> : a shell script is invoked. When an option requires an argument,</a>
|
|
<a name="40"><span class="lineNum"> 40 </span> : getopts places that argument into the shell variable OPTARG.</a>
|
|
<a name="41"><span class="lineNum"> 41 </span> : </a>
|
|
<a name="42"><span class="lineNum"> 42 </span> : getopts reports errors in one of two ways. If the first character</a>
|
|
<a name="43"><span class="lineNum"> 43 </span> : of OPTSTRING is a colon, getopts uses silent error reporting. In</a>
|
|
<a name="44"><span class="lineNum"> 44 </span> : this mode, no error messages are printed. If an invalid option is</a>
|
|
<a name="45"><span class="lineNum"> 45 </span> : seen, getopts places the option character found into OPTARG. If a</a>
|
|
<a name="46"><span class="lineNum"> 46 </span> : required argument is not found, getopts places a ':' into NAME and</a>
|
|
<a name="47"><span class="lineNum"> 47 </span> : sets OPTARG to the option character found. If getopts is not in</a>
|
|
<a name="48"><span class="lineNum"> 48 </span> : silent mode, and an invalid option is seen, getopts places '?' into</a>
|
|
<a name="49"><span class="lineNum"> 49 </span> : NAME and unsets OPTARG. If a required argument is not found, a '?'</a>
|
|
<a name="50"><span class="lineNum"> 50 </span> : is placed in NAME, OPTARG is unset, and a diagnostic message is</a>
|
|
<a name="51"><span class="lineNum"> 51 </span> : printed.</a>
|
|
<a name="52"><span class="lineNum"> 52 </span> : </a>
|
|
<a name="53"><span class="lineNum"> 53 </span> : If the shell variable OPTERR has the value 0, getopts disables the</a>
|
|
<a name="54"><span class="lineNum"> 54 </span> : printing of error messages, even if the first character of</a>
|
|
<a name="55"><span class="lineNum"> 55 </span> : OPTSTRING is not a colon. OPTERR has the value 1 by default.</a>
|
|
<a name="56"><span class="lineNum"> 56 </span> : </a>
|
|
<a name="57"><span class="lineNum"> 57 </span> : Getopts normally parses the positional parameters ($0 - $9), but if</a>
|
|
<a name="58"><span class="lineNum"> 58 </span> : more arguments are given, they are parsed instead.</a>
|
|
<a name="59"><span class="lineNum"> 59 </span> : </a>
|
|
<a name="60"><span class="lineNum"> 60 </span> : Exit Status:</a>
|
|
<a name="61"><span class="lineNum"> 61 </span> : Returns success if an option is found; fails if the end of options is</a>
|
|
<a name="62"><span class="lineNum"> 62 </span> : encountered or an error occurs.</a>
|
|
<a name="63"><span class="lineNum"> 63 </span> : $END</a>
|
|
<a name="64"><span class="lineNum"> 64 </span> : </a>
|
|
<a name="65"><span class="lineNum"> 65 </span> : #include <config.h></a>
|
|
<a name="66"><span class="lineNum"> 66 </span> : </a>
|
|
<a name="67"><span class="lineNum"> 67 </span> : #include <stdio.h></a>
|
|
<a name="68"><span class="lineNum"> 68 </span> : </a>
|
|
<a name="69"><span class="lineNum"> 69 </span> : #if defined (HAVE_UNISTD_H)</a>
|
|
<a name="70"><span class="lineNum"> 70 </span> : # ifdef _MINIX</a>
|
|
<a name="71"><span class="lineNum"> 71 </span> : # include <sys/types.h></a>
|
|
<a name="72"><span class="lineNum"> 72 </span> : # endif</a>
|
|
<a name="73"><span class="lineNum"> 73 </span> : # include <unistd.h></a>
|
|
<a name="74"><span class="lineNum"> 74 </span> : #endif</a>
|
|
<a name="75"><span class="lineNum"> 75 </span> : </a>
|
|
<a name="76"><span class="lineNum"> 76 </span> : #include "../bashansi.h"</a>
|
|
<a name="77"><span class="lineNum"> 77 </span> : #include "../bashintl.h"</a>
|
|
<a name="78"><span class="lineNum"> 78 </span> : </a>
|
|
<a name="79"><span class="lineNum"> 79 </span> : #include "../shell.h"</a>
|
|
<a name="80"><span class="lineNum"> 80 </span> : #include "common.h"</a>
|
|
<a name="81"><span class="lineNum"> 81 </span> : #include "bashgetopt.h"</a>
|
|
<a name="82"><span class="lineNum"> 82 </span> : #include "getopt.h"</a>
|
|
<a name="83"><span class="lineNum"> 83 </span> : </a>
|
|
<a name="84"><span class="lineNum"> 84 </span> : #define G_EOF -1</a>
|
|
<a name="85"><span class="lineNum"> 85 </span> : #define G_INVALID_OPT -2</a>
|
|
<a name="86"><span class="lineNum"> 86 </span> : #define G_ARG_MISSING -3</a>
|
|
<a name="87"><span class="lineNum"> 87 </span> : </a>
|
|
<a name="88"><span class="lineNum"> 88 </span> : extern char *this_command_name;</a>
|
|
<a name="89"><span class="lineNum"> 89 </span> : </a>
|
|
<a name="90"><span class="lineNum"> 90 </span> : static int getopts_unbind_variable __P((char *));</a>
|
|
<a name="91"><span class="lineNum"> 91 </span> : static int getopts_bind_variable __P((char *, char *));</a>
|
|
<a name="92"><span class="lineNum"> 92 </span> : static int dogetopts __P((int, char **));</a>
|
|
<a name="93"><span class="lineNum"> 93 </span> : </a>
|
|
<a name="94"><span class="lineNum"> 94 </span> : /* getopts_reset is magic code for when OPTIND is reset. N is the</a>
|
|
<a name="95"><span class="lineNum"> 95 </span> : value that has just been assigned to OPTIND. */</a>
|
|
<a name="96"><span class="lineNum"> 96 </span> : void</a>
|
|
<a name="97"><span class="lineNum"> 97 </span><span class="lineCov"> 9143290 : getopts_reset (newind)</span></a>
|
|
<a name="98"><span class="lineNum"> 98 </span> : int newind;</a>
|
|
<a name="99"><span class="lineNum"> 99 </span> : {</a>
|
|
<a name="100"><span class="lineNum"> 100 </span><span class="lineCov"> 9143290 : sh_optind = newind;</span></a>
|
|
<a name="101"><span class="lineNum"> 101 </span><span class="lineCov"> 9143290 : sh_badopt = 0;</span></a>
|
|
<a name="102"><span class="lineNum"> 102 </span><span class="lineCov"> 9143290 : }</span></a>
|
|
<a name="103"><span class="lineNum"> 103 </span> : </a>
|
|
<a name="104"><span class="lineNum"> 104 </span> : static int</a>
|
|
<a name="105"><span class="lineNum"> 105 </span> : getopts_unbind_variable (name)</a>
|
|
<a name="106"><span class="lineNum"> 106 </span> : char *name;</a>
|
|
<a name="107"><span class="lineNum"> 107 </span> : {</a>
|
|
<a name="108"><span class="lineNum"> 108 </span> : #if 0</a>
|
|
<a name="109"><span class="lineNum"> 109 </span> : return (unbind_variable (name));</a>
|
|
<a name="110"><span class="lineNum"> 110 </span> : #else</a>
|
|
<a name="111"><span class="lineNum"> 111 </span><span class="lineNoCov"> 0 : return (unbind_variable_noref (name));</span></a>
|
|
<a name="112"><span class="lineNum"> 112 </span> : #endif</a>
|
|
<a name="113"><span class="lineNum"> 113 </span> : }</a>
|
|
<a name="114"><span class="lineNum"> 114 </span> : </a>
|
|
<a name="115"><span class="lineNum"> 115 </span> : static int</a>
|
|
<a name="116"><span class="lineNum"> 116 </span><span class="lineNoCov"> 0 : getopts_bind_variable (name, value)</span></a>
|
|
<a name="117"><span class="lineNum"> 117 </span> : char *name, *value;</a>
|
|
<a name="118"><span class="lineNum"> 118 </span> : {</a>
|
|
<a name="119"><span class="lineNum"> 119 </span><span class="lineNoCov"> 0 : SHELL_VAR *v;</span></a>
|
|
<a name="120"><span class="lineNum"> 120 </span> : </a>
|
|
<a name="121"><span class="lineNum"> 121 </span><span class="lineNoCov"> 0 : if (legal_identifier (name))</span></a>
|
|
<a name="122"><span class="lineNum"> 122 </span> : {</a>
|
|
<a name="123"><span class="lineNum"> 123 </span><span class="lineNoCov"> 0 : v = bind_variable (name, value, 0);</span></a>
|
|
<a name="124"><span class="lineNum"> 124 </span><span class="lineNoCov"> 0 : if (v && (readonly_p (v) || noassign_p (v)))</span></a>
|
|
<a name="125"><span class="lineNum"> 125 </span> : return (EX_MISCERROR);</a>
|
|
<a name="126"><span class="lineNum"> 126 </span><span class="lineNoCov"> 0 : return (v ? EXECUTION_SUCCESS : EXECUTION_FAILURE);</span></a>
|
|
<a name="127"><span class="lineNum"> 127 </span> : }</a>
|
|
<a name="128"><span class="lineNum"> 128 </span> : else</a>
|
|
<a name="129"><span class="lineNum"> 129 </span> : {</a>
|
|
<a name="130"><span class="lineNum"> 130 </span><span class="lineNoCov"> 0 : sh_invalidid (name);</span></a>
|
|
<a name="131"><span class="lineNum"> 131 </span><span class="lineNoCov"> 0 : return (EXECUTION_FAILURE);</span></a>
|
|
<a name="132"><span class="lineNum"> 132 </span> : }</a>
|
|
<a name="133"><span class="lineNum"> 133 </span> : }</a>
|
|
<a name="134"><span class="lineNum"> 134 </span> : </a>
|
|
<a name="135"><span class="lineNum"> 135 </span> : /* Error handling is now performed as specified by Posix.2, draft 11</a>
|
|
<a name="136"><span class="lineNum"> 136 </span> : (identical to that of ksh-88). The special handling is enabled if</a>
|
|
<a name="137"><span class="lineNum"> 137 </span> : the first character of the option string is a colon; this handling</a>
|
|
<a name="138"><span class="lineNum"> 138 </span> : disables diagnostic messages concerning missing option arguments</a>
|
|
<a name="139"><span class="lineNum"> 139 </span> : and invalid option characters. The handling is as follows.</a>
|
|
<a name="140"><span class="lineNum"> 140 </span> : </a>
|
|
<a name="141"><span class="lineNum"> 141 </span> : INVALID OPTIONS:</a>
|
|
<a name="142"><span class="lineNum"> 142 </span> : name -> "?"</a>
|
|
<a name="143"><span class="lineNum"> 143 </span> : if (special_error) then</a>
|
|
<a name="144"><span class="lineNum"> 144 </span> : OPTARG = option character found</a>
|
|
<a name="145"><span class="lineNum"> 145 </span> : no error output</a>
|
|
<a name="146"><span class="lineNum"> 146 </span> : else</a>
|
|
<a name="147"><span class="lineNum"> 147 </span> : OPTARG unset</a>
|
|
<a name="148"><span class="lineNum"> 148 </span> : diagnostic message</a>
|
|
<a name="149"><span class="lineNum"> 149 </span> : fi</a>
|
|
<a name="150"><span class="lineNum"> 150 </span> : </a>
|
|
<a name="151"><span class="lineNum"> 151 </span> : MISSING OPTION ARGUMENT;</a>
|
|
<a name="152"><span class="lineNum"> 152 </span> : if (special_error) then</a>
|
|
<a name="153"><span class="lineNum"> 153 </span> : name -> ":"</a>
|
|
<a name="154"><span class="lineNum"> 154 </span> : OPTARG = option character found</a>
|
|
<a name="155"><span class="lineNum"> 155 </span> : else</a>
|
|
<a name="156"><span class="lineNum"> 156 </span> : name -> "?"</a>
|
|
<a name="157"><span class="lineNum"> 157 </span> : OPTARG unset</a>
|
|
<a name="158"><span class="lineNum"> 158 </span> : diagnostic message</a>
|
|
<a name="159"><span class="lineNum"> 159 </span> : fi</a>
|
|
<a name="160"><span class="lineNum"> 160 </span> : */</a>
|
|
<a name="161"><span class="lineNum"> 161 </span> : </a>
|
|
<a name="162"><span class="lineNum"> 162 </span> : static int</a>
|
|
<a name="163"><span class="lineNum"> 163 </span><span class="lineNoCov"> 0 : dogetopts (argc, argv)</span></a>
|
|
<a name="164"><span class="lineNum"> 164 </span> : int argc;</a>
|
|
<a name="165"><span class="lineNum"> 165 </span> : char **argv;</a>
|
|
<a name="166"><span class="lineNum"> 166 </span> : {</a>
|
|
<a name="167"><span class="lineNum"> 167 </span><span class="lineNoCov"> 0 : int ret, special_error, old_opterr, i, n;</span></a>
|
|
<a name="168"><span class="lineNum"> 168 </span><span class="lineNoCov"> 0 : char strval[2], numval[16];</span></a>
|
|
<a name="169"><span class="lineNum"> 169 </span><span class="lineNoCov"> 0 : char *optstr; /* list of options */</span></a>
|
|
<a name="170"><span class="lineNum"> 170 </span><span class="lineNoCov"> 0 : char *name; /* variable to get flag val */</span></a>
|
|
<a name="171"><span class="lineNum"> 171 </span><span class="lineNoCov"> 0 : char *t;</span></a>
|
|
<a name="172"><span class="lineNum"> 172 </span> : </a>
|
|
<a name="173"><span class="lineNum"> 173 </span><span class="lineNoCov"> 0 : if (argc < 3)</span></a>
|
|
<a name="174"><span class="lineNum"> 174 </span> : {</a>
|
|
<a name="175"><span class="lineNum"> 175 </span><span class="lineNoCov"> 0 : builtin_usage ();</span></a>
|
|
<a name="176"><span class="lineNum"> 176 </span><span class="lineNoCov"> 0 : return (EX_USAGE);</span></a>
|
|
<a name="177"><span class="lineNum"> 177 </span> : }</a>
|
|
<a name="178"><span class="lineNum"> 178 </span> : </a>
|
|
<a name="179"><span class="lineNum"> 179 </span> : /* argv[0] is "getopts". */</a>
|
|
<a name="180"><span class="lineNum"> 180 </span> : </a>
|
|
<a name="181"><span class="lineNum"> 181 </span><span class="lineNoCov"> 0 : optstr = argv[1];</span></a>
|
|
<a name="182"><span class="lineNum"> 182 </span><span class="lineNoCov"> 0 : name = argv[2];</span></a>
|
|
<a name="183"><span class="lineNum"> 183 </span><span class="lineNoCov"> 0 : argc -= 2;</span></a>
|
|
<a name="184"><span class="lineNum"> 184 </span><span class="lineNoCov"> 0 : argv += 2;</span></a>
|
|
<a name="185"><span class="lineNum"> 185 </span> : </a>
|
|
<a name="186"><span class="lineNum"> 186 </span><span class="lineNoCov"> 0 : special_error = optstr[0] == ':';</span></a>
|
|
<a name="187"><span class="lineNum"> 187 </span> : </a>
|
|
<a name="188"><span class="lineNum"> 188 </span><span class="lineNoCov"> 0 : if (special_error)</span></a>
|
|
<a name="189"><span class="lineNum"> 189 </span> : {</a>
|
|
<a name="190"><span class="lineNum"> 190 </span><span class="lineNoCov"> 0 : old_opterr = sh_opterr;</span></a>
|
|
<a name="191"><span class="lineNum"> 191 </span><span class="lineNoCov"> 0 : optstr++;</span></a>
|
|
<a name="192"><span class="lineNum"> 192 </span><span class="lineNoCov"> 0 : sh_opterr = 0; /* suppress diagnostic messages */</span></a>
|
|
<a name="193"><span class="lineNum"> 193 </span> : }</a>
|
|
<a name="194"><span class="lineNum"> 194 </span> : </a>
|
|
<a name="195"><span class="lineNum"> 195 </span><span class="lineNoCov"> 0 : if (argc > 1)</span></a>
|
|
<a name="196"><span class="lineNum"> 196 </span> : {</a>
|
|
<a name="197"><span class="lineNum"> 197 </span><span class="lineNoCov"> 0 : sh_getopt_restore_state (argv);</span></a>
|
|
<a name="198"><span class="lineNum"> 198 </span><span class="lineNoCov"> 0 : t = argv[0];</span></a>
|
|
<a name="199"><span class="lineNum"> 199 </span><span class="lineNoCov"> 0 : argv[0] = dollar_vars[0];</span></a>
|
|
<a name="200"><span class="lineNum"> 200 </span><span class="lineNoCov"> 0 : ret = sh_getopt (argc, argv, optstr);</span></a>
|
|
<a name="201"><span class="lineNum"> 201 </span><span class="lineNoCov"> 0 : argv[0] = t;</span></a>
|
|
<a name="202"><span class="lineNum"> 202 </span> : }</a>
|
|
<a name="203"><span class="lineNum"> 203 </span><span class="lineNoCov"> 0 : else if (rest_of_args == (WORD_LIST *)NULL)</span></a>
|
|
<a name="204"><span class="lineNum"> 204 </span> : {</a>
|
|
<a name="205"><span class="lineNum"> 205 </span><span class="lineNoCov"> 0 : for (i = 0; i < 10 && dollar_vars[i]; i++)</span></a>
|
|
<a name="206"><span class="lineNum"> 206 </span><span class="lineNoCov"> 0 : ;</span></a>
|
|
<a name="207"><span class="lineNum"> 207 </span> : </a>
|
|
<a name="208"><span class="lineNum"> 208 </span><span class="lineNoCov"> 0 : sh_getopt_restore_state (dollar_vars);</span></a>
|
|
<a name="209"><span class="lineNum"> 209 </span><span class="lineNoCov"> 0 : ret = sh_getopt (i, dollar_vars, optstr);</span></a>
|
|
<a name="210"><span class="lineNum"> 210 </span> : }</a>
|
|
<a name="211"><span class="lineNum"> 211 </span> : else</a>
|
|
<a name="212"><span class="lineNum"> 212 </span> : {</a>
|
|
<a name="213"><span class="lineNum"> 213 </span> : register WORD_LIST *words;</a>
|
|
<a name="214"><span class="lineNum"> 214 </span> : char **v;</a>
|
|
<a name="215"><span class="lineNum"> 215 </span> : </a>
|
|
<a name="216"><span class="lineNum"> 216 </span><span class="lineNoCov"> 0 : for (i = 0; i < 10 && dollar_vars[i]; i++)</span></a>
|
|
<a name="217"><span class="lineNum"> 217 </span><span class="lineNoCov"> 0 : ;</span></a>
|
|
<a name="218"><span class="lineNum"> 218 </span><span class="lineNoCov"> 0 : for (words = rest_of_args; words; words = words->next, i++)</span></a>
|
|
<a name="219"><span class="lineNum"> 219 </span><span class="lineNoCov"> 0 : ;</span></a>
|
|
<a name="220"><span class="lineNum"> 220 </span><span class="lineNoCov"> 0 : v = strvec_create (i + 1);</span></a>
|
|
<a name="221"><span class="lineNum"> 221 </span><span class="lineNoCov"> 0 : for (i = 0; i < 10 && dollar_vars[i]; i++)</span></a>
|
|
<a name="222"><span class="lineNum"> 222 </span><span class="lineNoCov"> 0 : v[i] = dollar_vars[i];</span></a>
|
|
<a name="223"><span class="lineNum"> 223 </span><span class="lineNoCov"> 0 : for (words = rest_of_args; words; words = words->next, i++)</span></a>
|
|
<a name="224"><span class="lineNum"> 224 </span><span class="lineNoCov"> 0 : v[i] = words->word->word;</span></a>
|
|
<a name="225"><span class="lineNum"> 225 </span><span class="lineNoCov"> 0 : v[i] = (char *)NULL;</span></a>
|
|
<a name="226"><span class="lineNum"> 226 </span><span class="lineNoCov"> 0 : sh_getopt_restore_state (v);</span></a>
|
|
<a name="227"><span class="lineNum"> 227 </span><span class="lineNoCov"> 0 : ret = sh_getopt (i, v, optstr);</span></a>
|
|
<a name="228"><span class="lineNum"> 228 </span><span class="lineNoCov"> 0 : free (v);</span></a>
|
|
<a name="229"><span class="lineNum"> 229 </span> : }</a>
|
|
<a name="230"><span class="lineNum"> 230 </span> : </a>
|
|
<a name="231"><span class="lineNum"> 231 </span><span class="lineNoCov"> 0 : if (special_error)</span></a>
|
|
<a name="232"><span class="lineNum"> 232 </span><span class="lineNoCov"> 0 : sh_opterr = old_opterr;</span></a>
|
|
<a name="233"><span class="lineNum"> 233 </span> : </a>
|
|
<a name="234"><span class="lineNum"> 234 </span> : /* Set the OPTIND variable in any case, to handle "--" skipping. It's</a>
|
|
<a name="235"><span class="lineNum"> 235 </span> : highly unlikely that 14 digits will be too few. */</a>
|
|
<a name="236"><span class="lineNum"> 236 </span><span class="lineNoCov"> 0 : if (sh_optind < 10)</span></a>
|
|
<a name="237"><span class="lineNum"> 237 </span> : {</a>
|
|
<a name="238"><span class="lineNum"> 238 </span><span class="lineNoCov"> 0 : numval[14] = sh_optind + '0';</span></a>
|
|
<a name="239"><span class="lineNum"> 239 </span><span class="lineNoCov"> 0 : numval[15] = '\0';</span></a>
|
|
<a name="240"><span class="lineNum"> 240 </span><span class="lineNoCov"> 0 : i = 14;</span></a>
|
|
<a name="241"><span class="lineNum"> 241 </span> : }</a>
|
|
<a name="242"><span class="lineNum"> 242 </span> : else</a>
|
|
<a name="243"><span class="lineNum"> 243 </span> : {</a>
|
|
<a name="244"><span class="lineNum"> 244 </span><span class="lineNoCov"> 0 : numval[i = 15] = '\0';</span></a>
|
|
<a name="245"><span class="lineNum"> 245 </span><span class="lineNoCov"> 0 : n = sh_optind;</span></a>
|
|
<a name="246"><span class="lineNum"> 246 </span><span class="lineNoCov"> 0 : do</span></a>
|
|
<a name="247"><span class="lineNum"> 247 </span> : {</a>
|
|
<a name="248"><span class="lineNum"> 248 </span><span class="lineNoCov"> 0 : numval[--i] = (n % 10) + '0';</span></a>
|
|
<a name="249"><span class="lineNum"> 249 </span> : }</a>
|
|
<a name="250"><span class="lineNum"> 250 </span><span class="lineNoCov"> 0 : while (n /= 10);</span></a>
|
|
<a name="251"><span class="lineNum"> 251 </span> : }</a>
|
|
<a name="252"><span class="lineNum"> 252 </span><span class="lineNoCov"> 0 : bind_variable ("OPTIND", numval + i, 0);</span></a>
|
|
<a name="253"><span class="lineNum"> 253 </span> : </a>
|
|
<a name="254"><span class="lineNum"> 254 </span> : /* If an error occurred, decide which one it is and set the return</a>
|
|
<a name="255"><span class="lineNum"> 255 </span> : code appropriately. In all cases, the option character in error</a>
|
|
<a name="256"><span class="lineNum"> 256 </span> : is in OPTOPT. If an invalid option was encountered, OPTARG is</a>
|
|
<a name="257"><span class="lineNum"> 257 </span> : NULL. If a required option argument was missing, OPTARG points</a>
|
|
<a name="258"><span class="lineNum"> 258 </span> : to a NULL string (that is, sh_optarg[0] == 0). */</a>
|
|
<a name="259"><span class="lineNum"> 259 </span><span class="lineNoCov"> 0 : if (ret == '?')</span></a>
|
|
<a name="260"><span class="lineNum"> 260 </span> : {</a>
|
|
<a name="261"><span class="lineNum"> 261 </span><span class="lineNoCov"> 0 : if (sh_optarg == NULL)</span></a>
|
|
<a name="262"><span class="lineNum"> 262 </span> : ret = G_INVALID_OPT;</a>
|
|
<a name="263"><span class="lineNum"> 263 </span><span class="lineNoCov"> 0 : else if (sh_optarg[0] == '\0')</span></a>
|
|
<a name="264"><span class="lineNum"> 264 </span> : ret = G_ARG_MISSING;</a>
|
|
<a name="265"><span class="lineNum"> 265 </span> : }</a>
|
|
<a name="266"><span class="lineNum"> 266 </span> : </a>
|
|
<a name="267"><span class="lineNum"> 267 </span><span class="lineNoCov"> 0 : if (ret == G_EOF)</span></a>
|
|
<a name="268"><span class="lineNum"> 268 </span> : {</a>
|
|
<a name="269"><span class="lineNum"> 269 </span><span class="lineNoCov"> 0 : getopts_unbind_variable ("OPTARG");</span></a>
|
|
<a name="270"><span class="lineNum"> 270 </span><span class="lineNoCov"> 0 : getopts_bind_variable (name, "?");</span></a>
|
|
<a name="271"><span class="lineNum"> 271 </span><span class="lineNoCov"> 0 : return (EXECUTION_FAILURE);</span></a>
|
|
<a name="272"><span class="lineNum"> 272 </span> : }</a>
|
|
<a name="273"><span class="lineNum"> 273 </span> : </a>
|
|
<a name="274"><span class="lineNum"> 274 </span><span class="lineNoCov"> 0 : if (ret == G_INVALID_OPT)</span></a>
|
|
<a name="275"><span class="lineNum"> 275 </span> : {</a>
|
|
<a name="276"><span class="lineNum"> 276 </span> : /* Invalid option encountered. */</a>
|
|
<a name="277"><span class="lineNum"> 277 </span><span class="lineNoCov"> 0 : ret = getopts_bind_variable (name, "?");</span></a>
|
|
<a name="278"><span class="lineNum"> 278 </span> : </a>
|
|
<a name="279"><span class="lineNum"> 279 </span><span class="lineNoCov"> 0 : if (special_error)</span></a>
|
|
<a name="280"><span class="lineNum"> 280 </span> : {</a>
|
|
<a name="281"><span class="lineNum"> 281 </span><span class="lineNoCov"> 0 : strval[0] = (char)sh_optopt;</span></a>
|
|
<a name="282"><span class="lineNum"> 282 </span><span class="lineNoCov"> 0 : strval[1] = '\0';</span></a>
|
|
<a name="283"><span class="lineNum"> 283 </span><span class="lineNoCov"> 0 : bind_variable ("OPTARG", strval, 0);</span></a>
|
|
<a name="284"><span class="lineNum"> 284 </span> : }</a>
|
|
<a name="285"><span class="lineNum"> 285 </span> : else</a>
|
|
<a name="286"><span class="lineNum"> 286 </span><span class="lineNoCov"> 0 : getopts_unbind_variable ("OPTARG");</span></a>
|
|
<a name="287"><span class="lineNum"> 287 </span> : </a>
|
|
<a name="288"><span class="lineNum"> 288 </span><span class="lineNoCov"> 0 : return (ret);</span></a>
|
|
<a name="289"><span class="lineNum"> 289 </span> : }</a>
|
|
<a name="290"><span class="lineNum"> 290 </span> : </a>
|
|
<a name="291"><span class="lineNum"> 291 </span><span class="lineNoCov"> 0 : if (ret == G_ARG_MISSING)</span></a>
|
|
<a name="292"><span class="lineNum"> 292 </span> : {</a>
|
|
<a name="293"><span class="lineNum"> 293 </span> : /* Required argument missing. */</a>
|
|
<a name="294"><span class="lineNum"> 294 </span><span class="lineNoCov"> 0 : if (special_error)</span></a>
|
|
<a name="295"><span class="lineNum"> 295 </span> : {</a>
|
|
<a name="296"><span class="lineNum"> 296 </span><span class="lineNoCov"> 0 : ret = getopts_bind_variable (name, ":");</span></a>
|
|
<a name="297"><span class="lineNum"> 297 </span> : </a>
|
|
<a name="298"><span class="lineNum"> 298 </span><span class="lineNoCov"> 0 : strval[0] = (char)sh_optopt;</span></a>
|
|
<a name="299"><span class="lineNum"> 299 </span><span class="lineNoCov"> 0 : strval[1] = '\0';</span></a>
|
|
<a name="300"><span class="lineNum"> 300 </span><span class="lineNoCov"> 0 : bind_variable ("OPTARG", strval, 0);</span></a>
|
|
<a name="301"><span class="lineNum"> 301 </span> : }</a>
|
|
<a name="302"><span class="lineNum"> 302 </span> : else</a>
|
|
<a name="303"><span class="lineNum"> 303 </span> : {</a>
|
|
<a name="304"><span class="lineNum"> 304 </span><span class="lineNoCov"> 0 : ret = getopts_bind_variable (name, "?");</span></a>
|
|
<a name="305"><span class="lineNum"> 305 </span><span class="lineNoCov"> 0 : getopts_unbind_variable ("OPTARG");</span></a>
|
|
<a name="306"><span class="lineNum"> 306 </span> : }</a>
|
|
<a name="307"><span class="lineNum"> 307 </span><span class="lineNoCov"> 0 : return (ret);</span></a>
|
|
<a name="308"><span class="lineNum"> 308 </span> : } </a>
|
|
<a name="309"><span class="lineNum"> 309 </span> : </a>
|
|
<a name="310"><span class="lineNum"> 310 </span><span class="lineNoCov"> 0 : bind_variable ("OPTARG", sh_optarg, 0);</span></a>
|
|
<a name="311"><span class="lineNum"> 311 </span> : </a>
|
|
<a name="312"><span class="lineNum"> 312 </span><span class="lineNoCov"> 0 : strval[0] = (char) ret;</span></a>
|
|
<a name="313"><span class="lineNum"> 313 </span><span class="lineNoCov"> 0 : strval[1] = '\0';</span></a>
|
|
<a name="314"><span class="lineNum"> 314 </span><span class="lineNoCov"> 0 : return (getopts_bind_variable (name, strval));</span></a>
|
|
<a name="315"><span class="lineNum"> 315 </span> : }</a>
|
|
<a name="316"><span class="lineNum"> 316 </span> : </a>
|
|
<a name="317"><span class="lineNum"> 317 </span> : /* The getopts builtin. Build an argv, and call dogetopts with it. */</a>
|
|
<a name="318"><span class="lineNum"> 318 </span> : int</a>
|
|
<a name="319"><span class="lineNum"> 319 </span><span class="lineNoCov"> 0 : getopts_builtin (list)</span></a>
|
|
<a name="320"><span class="lineNum"> 320 </span> : WORD_LIST *list;</a>
|
|
<a name="321"><span class="lineNum"> 321 </span> : {</a>
|
|
<a name="322"><span class="lineNum"> 322 </span><span class="lineNoCov"> 0 : char **av;</span></a>
|
|
<a name="323"><span class="lineNum"> 323 </span><span class="lineNoCov"> 0 : int ac, ret;</span></a>
|
|
<a name="324"><span class="lineNum"> 324 </span> : </a>
|
|
<a name="325"><span class="lineNum"> 325 </span><span class="lineNoCov"> 0 : if (list == 0)</span></a>
|
|
<a name="326"><span class="lineNum"> 326 </span> : {</a>
|
|
<a name="327"><span class="lineNum"> 327 </span><span class="lineNoCov"> 0 : builtin_usage ();</span></a>
|
|
<a name="328"><span class="lineNum"> 328 </span><span class="lineNoCov"> 0 : return EX_USAGE;</span></a>
|
|
<a name="329"><span class="lineNum"> 329 </span> : }</a>
|
|
<a name="330"><span class="lineNum"> 330 </span> : </a>
|
|
<a name="331"><span class="lineNum"> 331 </span><span class="lineNoCov"> 0 : reset_internal_getopt ();</span></a>
|
|
<a name="332"><span class="lineNum"> 332 </span><span class="lineNoCov"> 0 : if ((ret = internal_getopt (list, "")) != -1)</span></a>
|
|
<a name="333"><span class="lineNum"> 333 </span> : {</a>
|
|
<a name="334"><span class="lineNum"> 334 </span><span class="lineNoCov"> 0 : if (ret == GETOPT_HELP)</span></a>
|
|
<a name="335"><span class="lineNum"> 335 </span><span class="lineNoCov"> 0 : builtin_help ();</span></a>
|
|
<a name="336"><span class="lineNum"> 336 </span> : else</a>
|
|
<a name="337"><span class="lineNum"> 337 </span><span class="lineNoCov"> 0 : builtin_usage ();</span></a>
|
|
<a name="338"><span class="lineNum"> 338 </span><span class="lineNoCov"> 0 : return (EX_USAGE);</span></a>
|
|
<a name="339"><span class="lineNum"> 339 </span> : }</a>
|
|
<a name="340"><span class="lineNum"> 340 </span><span class="lineNoCov"> 0 : list = loptend;</span></a>
|
|
<a name="341"><span class="lineNum"> 341 </span> : </a>
|
|
<a name="342"><span class="lineNum"> 342 </span><span class="lineNoCov"> 0 : av = make_builtin_argv (list, &ac);</span></a>
|
|
<a name="343"><span class="lineNum"> 343 </span><span class="lineNoCov"> 0 : ret = dogetopts (ac, av);</span></a>
|
|
<a name="344"><span class="lineNum"> 344 </span><span class="lineNoCov"> 0 : free ((char *)av);</span></a>
|
|
<a name="345"><span class="lineNum"> 345 </span> : </a>
|
|
<a name="346"><span class="lineNum"> 346 </span><span class="lineNoCov"> 0 : return (ret);</span></a>
|
|
<a name="347"><span class="lineNum"> 347 </span> : }</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>
|