| Current File : //opt/RZruby/share/doc/ruby/html/de/d46/os2_8c_source.html |
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/xhtml;charset=UTF-8"/>
<meta http-equiv="X-UA-Compatible" content="IE=9"/>
<meta name="generator" content="Doxygen 1.8.5"/>
<title>Ruby: missing/os2.c Source File</title>
<link href="../../tabs.css" rel="stylesheet" type="text/css"/>
<script type="text/javascript" src="../../jquery.js"></script>
<script type="text/javascript" src="../../dynsections.js"></script>
<link href="../../doxygen.css" rel="stylesheet" type="text/css" />
</head>
<body>
<div id="top"><!-- do not remove this div, it is closed by doxygen! -->
<div id="titlearea">
<table cellspacing="0" cellpadding="0">
<tbody>
<tr style="height: 56px;">
<td style="padding-left: 0.5em;">
<div id="projectname">Ruby
 <span id="projectnumber">1.9.3p551(2014-11-13revision48407)</span>
</div>
</td>
</tr>
</tbody>
</table>
</div>
<!-- end header part -->
<!-- Generated by Doxygen 1.8.5 -->
<div id="navrow1" class="tabs">
<ul class="tablist">
<li><a href="../../index.html"><span>Main Page</span></a></li>
<li><a href="../../modules.html"><span>Modules</span></a></li>
<li><a href="../../annotated.html"><span>Data Structures</span></a></li>
<li class="current"><a href="../../files.html"><span>Files</span></a></li>
</ul>
</div>
<div id="navrow2" class="tabs2">
<ul class="tablist">
<li><a href="../../files.html"><span>File List</span></a></li>
<li><a href="../../globals.html"><span>Globals</span></a></li>
</ul>
</div>
<div id="nav-path" class="navpath">
<ul>
<li class="navelem"><a class="el" href="../../dir_f3bfeebb553c3f6ecfb19202628b4493.html">missing</a></li> </ul>
</div>
</div><!-- top -->
<div class="header">
<div class="headertitle">
<div class="title">os2.c</div> </div>
</div><!--header-->
<div class="contents">
<a href="../../de/d46/os2_8c.html">Go to the documentation of this file.</a><div class="fragment"><div class="line"><a name="l00001"></a><span class="lineno"> 1</span> <span class="comment">/* os/2 compatibility functions -- follows Ruby's license */</span></div>
<div class="line"><a name="l00002"></a><span class="lineno"> 2</span> </div>
<div class="line"><a name="l00003"></a><span class="lineno"> 3</span> <span class="preprocessor">#include "ruby.h"</span></div>
<div class="line"><a name="l00004"></a><span class="lineno"> 4</span> <span class="preprocessor">#include <stdio.h></span></div>
<div class="line"><a name="l00005"></a><span class="lineno"> 5</span> <span class="preprocessor">#include <stdlib.h></span></div>
<div class="line"><a name="l00006"></a><span class="lineno"> 6</span> <span class="preprocessor">#include <fcntl.h></span></div>
<div class="line"><a name="l00007"></a><span class="lineno"> 7</span> <span class="preprocessor">#include <process.h></span></div>
<div class="line"><a name="l00008"></a><span class="lineno"> 8</span> <span class="preprocessor">#include <limits.h></span></div>
<div class="line"><a name="l00009"></a><span class="lineno"> 9</span> <span class="preprocessor">#include <errno.h></span></div>
<div class="line"><a name="l00010"></a><span class="lineno"> 10</span> </div>
<div class="line"><a name="l00011"></a><span class="lineno"><a class="line" href="../../de/d46/os2_8c.html#a279849fd38ce284440d823ddda1d3f09"> 11</a></span> <span class="preprocessor">#define INCL_DOS</span></div>
<div class="line"><a name="l00012"></a><span class="lineno"> 12</span> <span class="preprocessor"></span><span class="preprocessor">#include <os2.h></span></div>
<div class="line"><a name="l00013"></a><span class="lineno"> 13</span> </div>
<div class="line"><a name="l00014"></a><span class="lineno"> 14</span> <span class="keywordtype">int</span></div>
<div class="line"><a name="l00015"></a><span class="lineno"><a class="line" href="../../de/d46/os2_8c.html#a8c838484c8aaebe6183c9eca231ddfde"> 15</a></span> <a class="code" href="../../dc/db1/win32_8h.html#ac7c7a6988eecb59569de9f51115a1df3">chown</a>(<span class="keywordtype">char</span> *<a class="code" href="../../db/d74/zlib_8c.html#a56e97a891edabd14d071def7e678ad7e">path</a>, <span class="keywordtype">int</span> owner, <span class="keywordtype">int</span> group)</div>
<div class="line"><a name="l00016"></a><span class="lineno"> 16</span> {</div>
<div class="line"><a name="l00017"></a><span class="lineno"> 17</span>  <span class="keywordflow">return</span> 0;</div>
<div class="line"><a name="l00018"></a><span class="lineno"> 18</span> }</div>
<div class="line"><a name="l00019"></a><span class="lineno"> 19</span> </div>
<div class="line"><a name="l00020"></a><span class="lineno"> 20</span> <span class="preprocessor">#if 0</span></div>
<div class="line"><a name="l00021"></a><span class="lineno"> 21</span> <span class="preprocessor"></span><span class="keywordtype">int</span></div>
<div class="line"><a name="l00022"></a><span class="lineno"> 22</span> <a class="code" href="../../dc/db1/win32_8h.html#a9f0ffa429d1a466322fb9b5bb084f828">link</a>(<span class="keywordtype">char</span> *from, <span class="keywordtype">char</span> *to)</div>
<div class="line"><a name="l00023"></a><span class="lineno"> 23</span> {</div>
<div class="line"><a name="l00024"></a><span class="lineno"> 24</span>  <span class="keywordflow">return</span> -1;</div>
<div class="line"><a name="l00025"></a><span class="lineno"> 25</span> }</div>
<div class="line"><a name="l00026"></a><span class="lineno"> 26</span> <span class="preprocessor">#endif</span></div>
<div class="line"><a name="l00027"></a><span class="lineno"> 27</span> <span class="preprocessor"></span></div>
<div class="line"><a name="l00028"></a><span class="lineno"> 28</span> <span class="preprocessor">#if defined(EMX_REPLACE_GETCWD) && (EMX_REPLACE_GETCWD) \</span></div>
<div class="line"><a name="l00029"></a><span class="lineno"> 29</span> <span class="preprocessor"> || defined(EMX_REPLACE_CHDIR) && (EMX_REPLACE_CHDIR)</span></div>
<div class="line"><a name="l00030"></a><span class="lineno"> 30</span> <span class="preprocessor"></span><span class="preprocessor">#include <unistd.h></span></div>
<div class="line"><a name="l00031"></a><span class="lineno"> 31</span> </div>
<div class="line"><a name="l00032"></a><span class="lineno"> 32</span> <span class="preprocessor">#if defined(EMX_REPLACE_GETCWD) && (EMX_REPLACE_GETCWD)</span></div>
<div class="line"><a name="l00033"></a><span class="lineno"> 33</span> <span class="preprocessor"></span><span class="comment">/* to handle the drive letter and DBCS characters within a given path */</span></div>
<div class="line"><a name="l00034"></a><span class="lineno"> 34</span> <span class="keywordtype">char</span> *</div>
<div class="line"><a name="l00035"></a><span class="lineno"> 35</span> getcwd(<span class="keywordtype">char</span> *<a class="code" href="../../db/d74/zlib_8c.html#a56e97a891edabd14d071def7e678ad7e">path</a>, <span class="keywordtype">size_t</span> <a class="code" href="../../d3/d15/name2ctype_8h.html#aed1cc4dca5d94cb452f79691f54f7423">len</a>)</div>
<div class="line"><a name="l00036"></a><span class="lineno"> 36</span> {</div>
<div class="line"><a name="l00037"></a><span class="lineno"> 37</span>  <span class="keywordflow">return</span> _getcwd2(path, (<span class="keywordtype">int</span>)len);</div>
<div class="line"><a name="l00038"></a><span class="lineno"> 38</span> }</div>
<div class="line"><a name="l00039"></a><span class="lineno"> 39</span> <span class="preprocessor">#endif</span></div>
<div class="line"><a name="l00040"></a><span class="lineno"> 40</span> <span class="preprocessor"></span></div>
<div class="line"><a name="l00041"></a><span class="lineno"> 41</span> <span class="preprocessor">#if defined(EMX_REPLACE_CHDIR) && (EMX_REPLACE_CHDIR)</span></div>
<div class="line"><a name="l00042"></a><span class="lineno"> 42</span> <span class="preprocessor"></span><span class="comment">/* to handle the drive letter and DBCS characters within a given path */</span></div>
<div class="line"><a name="l00043"></a><span class="lineno"> 43</span> <span class="keywordtype">int</span></div>
<div class="line"><a name="l00044"></a><span class="lineno"> 44</span> chdir(__const__ <span class="keywordtype">char</span> *path)</div>
<div class="line"><a name="l00045"></a><span class="lineno"> 45</span> {</div>
<div class="line"><a name="l00046"></a><span class="lineno"> 46</span>  <span class="keywordflow">return</span> _chdir2(path);</div>
<div class="line"><a name="l00047"></a><span class="lineno"> 47</span> }</div>
<div class="line"><a name="l00048"></a><span class="lineno"> 48</span> <span class="preprocessor">#endif</span></div>
<div class="line"><a name="l00049"></a><span class="lineno"> 49</span> <span class="preprocessor"></span><span class="preprocessor">#endif</span></div>
<div class="line"><a name="l00050"></a><span class="lineno"> 50</span> <span class="preprocessor"></span></div>
<div class="line"><a name="l00051"></a><span class="lineno"><a class="line" href="../../de/d46/os2_8c.html#aabe47ba16af2a3b8ea84dffa96fc867b"> 51</a></span> <span class="keyword">typedef</span> <span class="keywordtype">char</span>* <a class="code" href="../../de/d46/os2_8c.html#aabe47ba16af2a3b8ea84dffa96fc867b">CHARP</a>;</div>
<div class="line"><a name="l00052"></a><span class="lineno"> 52</span> </div>
<div class="line"><a name="l00053"></a><span class="lineno"> 53</span> <span class="keywordtype">int</span></div>
<div class="line"><a name="l00054"></a><span class="lineno"> 54</span> do_spawn(<a class="code" href="../../d5/d9d/tcltklib_8c.html#ac016cf800c945b35b6ed7d8d9c9b153c">cmd</a>)</div>
<div class="line"><a name="l00055"></a><span class="lineno"><a class="line" href="../../de/d46/os2_8c.html#ae713b5d7e4c3d10479923bac7720d86c"> 55</a></span> char *<a class="code" href="../../d5/d9d/tcltklib_8c.html#ac016cf800c945b35b6ed7d8d9c9b153c">cmd</a>;</div>
<div class="line"><a name="l00056"></a><span class="lineno"><a class="line" href="../../d5/d61/regerror_8c.html#a53ce592896550171997acfa09c18e219"> 56</a></span> {</div>
<div class="line"><a name="l00057"></a><span class="lineno"> 57</span>  <span class="keyword">register</span> <span class="keywordtype">char</span> **<a class="code" href="../../de/d07/bigdecimal_8c.html#a79369678b02205f099123dc0501f915f">a</a>;</div>
<div class="line"><a name="l00058"></a><span class="lineno"> 58</span>  <span class="keyword">register</span> <span class="keywordtype">char</span> *<a class="code" href="../../de/d46/os2_8c.html#a58defbf6fe556592007171f7a347f9d6">s</a>;</div>
<div class="line"><a name="l00059"></a><span class="lineno"><a class="line" href="../../de/d46/os2_8c.html#a1fa302baef54f3e7f08e6831fcf3e191"> 59</a></span>  <span class="keywordtype">char</span> **<a class="code" href="../../d5/d9d/tcltklib_8c.html#ab9ebbdd4596789afb752d19fca153ee5">argv</a>;</div>
<div class="line"><a name="l00060"></a><span class="lineno"><a class="line" href="../../de/d46/os2_8c.html#a1c780a489bfcc96130d06599b0cb01ae"> 60</a></span>  <span class="keywordtype">char</span> *<a class="code" href="../../de/d46/os2_8c.html#aef85af20f8841a63109d6f1973d47be1">shell</a>, *<a class="code" href="../../de/d46/os2_8c.html#a1c780a489bfcc96130d06599b0cb01ae">sw</a>, *<a class="code" href="../../de/d46/os2_8c.html#ab00d980bdc691775736b75a47ee4c2da">cmd2</a>;</div>
<div class="line"><a name="l00061"></a><span class="lineno"><a class="line" href="../../de/d46/os2_8c.html#a9611b3a00430a86619b5923de30f9fdb"> 61</a></span>  <span class="keywordtype">int</span> <a class="code" href="../../d5/d9d/tcltklib_8c.html#a9611b3a00430a86619b5923de30f9fdb">status</a>;</div>
<div class="line"><a name="l00062"></a><span class="lineno"> 62</span> </div>
<div class="line"><a name="l00063"></a><span class="lineno"><a class="line" href="../../de/d46/os2_8c.html#ad8cac7179e2dd6bcec7acf0528603748"> 63</a></span>  <span class="keywordflow">if</span> ((shell = <a class="code" href="../../de/d32/dir_8c.html#aee28fd8a0e40b6d958f7d20348e45368">getenv</a>(<span class="stringliteral">"RUBYSHELL"</span>)) != <a class="code" href="../../dd/dfb/yaml2byte_8c.html#ad0b08ddfcb8010b1d73d9d635d5e0201">NULL</a> && *shell != <span class="charliteral">'\0'</span>) {</div>
<div class="line"><a name="l00064"></a><span class="lineno"> 64</span>  s = <a class="code" href="../../de/d46/os2_8c.html#aef85af20f8841a63109d6f1973d47be1">shell</a>;</div>
<div class="line"><a name="l00065"></a><span class="lineno"> 65</span>  <span class="keywordflow">do</span></div>
<div class="line"><a name="l00066"></a><span class="lineno"> 66</span>  *s = isupper(*s) ? tolower(*s) : *<a class="code" href="../../de/d46/os2_8c.html#a58defbf6fe556592007171f7a347f9d6">s</a>;</div>
<div class="line"><a name="l00067"></a><span class="lineno"> 67</span>  <span class="keywordflow">while</span> (*++s);</div>
<div class="line"><a name="l00068"></a><span class="lineno"> 68</span>  <span class="keywordflow">if</span> (<a class="code" href="../../d3/d90/missing_8h.html#a695026fc69840c65da7ea58226006f69">strstr</a>(shell, <span class="stringliteral">"cmd"</span>) || <a class="code" href="../../d3/d90/missing_8h.html#a695026fc69840c65da7ea58226006f69">strstr</a>(shell, <span class="stringliteral">"4os2"</span>))</div>
<div class="line"><a name="l00069"></a><span class="lineno"> 69</span>  sw = <span class="stringliteral">"/c"</span>;</div>
<div class="line"><a name="l00070"></a><span class="lineno"> 70</span>  <span class="keywordflow">else</span></div>
<div class="line"><a name="l00071"></a><span class="lineno"> 71</span>  sw = <span class="stringliteral">"-c"</span>;</div>
<div class="line"><a name="l00072"></a><span class="lineno"><a class="line" href="../../de/d46/os2_8c.html#add657370704754f39268faa4d15bcbc0"> 72</a></span>  } <span class="keywordflow">else</span> <span class="keywordflow">if</span> ((shell = <a class="code" href="../../de/d32/dir_8c.html#aee28fd8a0e40b6d958f7d20348e45368">getenv</a>(<span class="stringliteral">"SHELL"</span>)) != <a class="code" href="../../dd/dfb/yaml2byte_8c.html#ad0b08ddfcb8010b1d73d9d635d5e0201">NULL</a> && *shell != <span class="charliteral">'\0'</span>) {</div>
<div class="line"><a name="l00073"></a><span class="lineno"> 73</span>  s = <a class="code" href="../../de/d46/os2_8c.html#aef85af20f8841a63109d6f1973d47be1">shell</a>;</div>
<div class="line"><a name="l00074"></a><span class="lineno"> 74</span>  <span class="keywordflow">do</span></div>
<div class="line"><a name="l00075"></a><span class="lineno"> 75</span>  *s = isupper(*s) ? tolower(*s) : *<a class="code" href="../../de/d46/os2_8c.html#a58defbf6fe556592007171f7a347f9d6">s</a>;</div>
<div class="line"><a name="l00076"></a><span class="lineno"> 76</span>  <span class="keywordflow">while</span> (*++s);</div>
<div class="line"><a name="l00077"></a><span class="lineno"> 77</span>  <span class="keywordflow">if</span> (<a class="code" href="../../d3/d90/missing_8h.html#a695026fc69840c65da7ea58226006f69">strstr</a>(shell, <span class="stringliteral">"cmd"</span>) || <a class="code" href="../../d3/d90/missing_8h.html#a695026fc69840c65da7ea58226006f69">strstr</a>(shell, <span class="stringliteral">"4os2"</span>))</div>
<div class="line"><a name="l00078"></a><span class="lineno"> 78</span>  sw = <span class="stringliteral">"/c"</span>;</div>
<div class="line"><a name="l00079"></a><span class="lineno"> 79</span>  <span class="keywordflow">else</span></div>
<div class="line"><a name="l00080"></a><span class="lineno"> 80</span>  sw = <span class="stringliteral">"-c"</span>;</div>
<div class="line"><a name="l00081"></a><span class="lineno"><a class="line" href="../../de/d46/os2_8c.html#a9d88b6a4e795e43c03f6d0f3317cd4a1"> 81</a></span>  } <span class="keywordflow">else</span> <span class="keywordflow">if</span> ((shell = <a class="code" href="../../de/d32/dir_8c.html#aee28fd8a0e40b6d958f7d20348e45368">getenv</a>(<span class="stringliteral">"COMSPEC"</span>)) != <a class="code" href="../../dd/dfb/yaml2byte_8c.html#ad0b08ddfcb8010b1d73d9d635d5e0201">NULL</a> && *shell != <span class="charliteral">'\0'</span>) {</div>
<div class="line"><a name="l00082"></a><span class="lineno"> 82</span>  s = <a class="code" href="../../de/d46/os2_8c.html#aef85af20f8841a63109d6f1973d47be1">shell</a>;</div>
<div class="line"><a name="l00083"></a><span class="lineno"> 83</span>  <span class="keywordflow">do</span></div>
<div class="line"><a name="l00084"></a><span class="lineno"> 84</span>  *s = isupper(*s) ? tolower(*s) : *<a class="code" href="../../de/d46/os2_8c.html#a58defbf6fe556592007171f7a347f9d6">s</a>;</div>
<div class="line"><a name="l00085"></a><span class="lineno"> 85</span>  <span class="keywordflow">while</span> (*++s);</div>
<div class="line"><a name="l00086"></a><span class="lineno"> 86</span>  <span class="keywordflow">if</span> (<a class="code" href="../../d3/d90/missing_8h.html#a695026fc69840c65da7ea58226006f69">strstr</a>(shell, <span class="stringliteral">"cmd"</span>) || <a class="code" href="../../d3/d90/missing_8h.html#a695026fc69840c65da7ea58226006f69">strstr</a>(shell, <span class="stringliteral">"4os2"</span>))</div>
<div class="line"><a name="l00087"></a><span class="lineno"> 87</span>  sw = <span class="stringliteral">"/c"</span>;</div>
<div class="line"><a name="l00088"></a><span class="lineno"> 88</span>  <span class="keywordflow">else</span></div>
<div class="line"><a name="l00089"></a><span class="lineno"> 89</span>  sw = <span class="stringliteral">"-c"</span>;</div>
<div class="line"><a name="l00090"></a><span class="lineno"> 90</span>  }</div>
<div class="line"><a name="l00091"></a><span class="lineno"> 91</span>  <span class="comment">/* see if there are shell metacharacters in it */</span></div>
<div class="line"><a name="l00092"></a><span class="lineno"> 92</span>  <span class="comment">/*SUPPRESS 530*/</span></div>
<div class="line"><a name="l00093"></a><span class="lineno"> 93</span>  <span class="comment">/* for (s = cmd; *s && isalpha(*s); s++) ;</span></div>
<div class="line"><a name="l00094"></a><span class="lineno"> 94</span> <span class="comment"> if (*s == '=')</span></div>
<div class="line"><a name="l00095"></a><span class="lineno"> 95</span> <span class="comment"> goto doshell; */</span></div>
<div class="line"><a name="l00096"></a><span class="lineno"><a class="line" href="../../de/d46/os2_8c.html#ad51484d865274d2e955722d376d4adcf"> 96</a></span>  <span class="keywordflow">for</span> (s = cmd; *<a class="code" href="../../de/d46/os2_8c.html#a58defbf6fe556592007171f7a347f9d6">s</a>; s++) {</div>
<div class="line"><a name="l00097"></a><span class="lineno"> 97</span>  <span class="keywordflow">if</span> (*sw == <span class="charliteral">'-'</span> && *s != <span class="charliteral">' '</span> &&</div>
<div class="line"><a name="l00098"></a><span class="lineno"> 98</span>  !isalpha(*s) && <a class="code" href="../../d5/d9d/tcltklib_8c.html#a2b772bde34cb865f671cba699f405675">index</a>(<span class="stringliteral">"$&*(){}[]'\";\\|?<>~`\n"</span>,*s)) {</div>
<div class="line"><a name="l00099"></a><span class="lineno"> 99</span>  <span class="keywordflow">if</span> (*s == <span class="charliteral">'\n'</span> && !s[1]) {</div>
<div class="line"><a name="l00100"></a><span class="lineno"> 100</span>  *s = <span class="charliteral">'\0'</span>;</div>
<div class="line"><a name="l00101"></a><span class="lineno"> 101</span>  <span class="keywordflow">break</span>;</div>
<div class="line"><a name="l00102"></a><span class="lineno"> 102</span>  }</div>
<div class="line"><a name="l00103"></a><span class="lineno"> 103</span>  <span class="keywordflow">goto</span> doshell;</div>
<div class="line"><a name="l00104"></a><span class="lineno"> 104</span>  } <span class="keywordflow">else</span> <span class="keywordflow">if</span> (*sw == <span class="charliteral">'/'</span> && *s != <span class="charliteral">' '</span> &&</div>
<div class="line"><a name="l00105"></a><span class="lineno"> 105</span>  !isalpha(*s) && <a class="code" href="../../d5/d9d/tcltklib_8c.html#a2b772bde34cb865f671cba699f405675">index</a>(<span class="stringliteral">"^()<>|&\n"</span>,*s)) {</div>
<div class="line"><a name="l00106"></a><span class="lineno"> 106</span>  <span class="keywordflow">if</span> (*s == <span class="charliteral">'\n'</span> && !s[1]) {</div>
<div class="line"><a name="l00107"></a><span class="lineno"> 107</span>  *s = <span class="charliteral">'\0'</span>;</div>
<div class="line"><a name="l00108"></a><span class="lineno"> 108</span>  <span class="keywordflow">break</span>;</div>
<div class="line"><a name="l00109"></a><span class="lineno"> 109</span>  }</div>
<div class="line"><a name="l00110"></a><span class="lineno"> 110</span>  doshell:</div>
<div class="line"><a name="l00111"></a><span class="lineno"> 111</span>  status = spawnlp(P_WAIT,shell,shell,sw,cmd,(<span class="keywordtype">char</span>*)<a class="code" href="../../dd/dfb/yaml2byte_8c.html#ad0b08ddfcb8010b1d73d9d635d5e0201">NULL</a>);</div>
<div class="line"><a name="l00112"></a><span class="lineno"> 112</span>  <span class="keywordflow">return</span> <a class="code" href="../../d5/d9d/tcltklib_8c.html#a9611b3a00430a86619b5923de30f9fdb">status</a>;</div>
<div class="line"><a name="l00113"></a><span class="lineno"> 113</span>  }</div>
<div class="line"><a name="l00114"></a><span class="lineno"> 114</span>  }</div>
<div class="line"><a name="l00115"></a><span class="lineno"> 115</span>  argv = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a79041aa2bc7439c11906a86f82a52eb6">ALLOC_N</a>(CHARP,(<a class="code" href="../../d6/d7b/strchr_8c.html#a219836f542ce53545052bed5353820ca">strlen</a>(cmd) / 2 + 2));</div>
<div class="line"><a name="l00116"></a><span class="lineno"> 116</span>  cmd2 = <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a79041aa2bc7439c11906a86f82a52eb6">ALLOC_N</a>(<span class="keywordtype">char</span>, (<a class="code" href="../../d6/d7b/strchr_8c.html#a219836f542ce53545052bed5353820ca">strlen</a>(cmd) + 1));</div>
<div class="line"><a name="l00117"></a><span class="lineno"> 117</span>  <a class="code" href="../../de/d46/os2_8c.html#a680b8d551cad22b86c39b98588c242f0">strcpy</a>(cmd2, cmd);</div>
<div class="line"><a name="l00118"></a><span class="lineno"><a class="line" href="../../de/d46/os2_8c.html#a80b2678c8d2005421bbade097963ea9c"> 118</a></span>  a = <a class="code" href="../../d5/d9d/tcltklib_8c.html#ab9ebbdd4596789afb752d19fca153ee5">argv</a>;</div>
<div class="line"><a name="l00119"></a><span class="lineno"> 119</span>  <span class="keywordflow">for</span> (s = cmd2; *<a class="code" href="../../de/d46/os2_8c.html#a58defbf6fe556592007171f7a347f9d6">s</a>;) {</div>
<div class="line"><a name="l00120"></a><span class="lineno"> 120</span>  <span class="keywordflow">while</span> (*s && isspace(*s)) s++;</div>
<div class="line"><a name="l00121"></a><span class="lineno"> 121</span>  <span class="keywordflow">if</span> (*s)</div>
<div class="line"><a name="l00122"></a><span class="lineno"> 122</span>  *(a++) = s;</div>
<div class="line"><a name="l00123"></a><span class="lineno"> 123</span>  <span class="keywordflow">while</span> (*s && !isspace(*s)) s++;</div>
<div class="line"><a name="l00124"></a><span class="lineno"> 124</span>  <span class="keywordflow">if</span> (*s)</div>
<div class="line"><a name="l00125"></a><span class="lineno"> 125</span>  *s++ = <span class="charliteral">'\0'</span>;</div>
<div class="line"><a name="l00126"></a><span class="lineno"> 126</span>  }</div>
<div class="line"><a name="l00127"></a><span class="lineno"> 127</span>  *a = <a class="code" href="../../dd/dfb/yaml2byte_8c.html#ad0b08ddfcb8010b1d73d9d635d5e0201">NULL</a>;</div>
<div class="line"><a name="l00128"></a><span class="lineno"><a class="line" href="../../de/d46/os2_8c.html#a8dccb28245e7bd902abe5890bd5c9f25"> 128</a></span>  <span class="keywordflow">if</span> (argv[0]) {</div>
<div class="line"><a name="l00129"></a><span class="lineno"> 129</span>  <span class="keywordflow">if</span> ((status = spawnvp(P_WAIT, argv[0], argv)) == -1) {</div>
<div class="line"><a name="l00130"></a><span class="lineno"> 130</span>  <a class="code" href="../../d1/ddc/dln_8c.html#affb9fc32698fab7f7b36e0cf8e64c83e">free</a>(argv);</div>
<div class="line"><a name="l00131"></a><span class="lineno"> 131</span>  <a class="code" href="../../d1/ddc/dln_8c.html#affb9fc32698fab7f7b36e0cf8e64c83e">free</a>(cmd2);</div>
<div class="line"><a name="l00132"></a><span class="lineno"> 132</span>  <span class="keywordflow">return</span> -1;</div>
<div class="line"><a name="l00133"></a><span class="lineno"> 133</span>  }</div>
<div class="line"><a name="l00134"></a><span class="lineno"> 134</span>  }</div>
<div class="line"><a name="l00135"></a><span class="lineno"> 135</span>  <a class="code" href="../../d1/ddc/dln_8c.html#affb9fc32698fab7f7b36e0cf8e64c83e">free</a>(cmd2);</div>
<div class="line"><a name="l00136"></a><span class="lineno"> 136</span>  <a class="code" href="../../d1/ddc/dln_8c.html#affb9fc32698fab7f7b36e0cf8e64c83e">free</a>(argv);</div>
<div class="line"><a name="l00137"></a><span class="lineno"> 137</span>  <span class="keywordflow">return</span> <a class="code" href="../../d5/d9d/tcltklib_8c.html#a9611b3a00430a86619b5923de30f9fdb">status</a>;</div>
<div class="line"><a name="l00138"></a><span class="lineno"> 138</span> }</div>
<div class="ttc" id="strchr_8c_html_a219836f542ce53545052bed5353820ca"><div class="ttname"><a href="../../d6/d7b/strchr_8c.html#a219836f542ce53545052bed5353820ca">strlen</a></div><div class="ttdeci">size_t strlen(const char *)</div></div>
<div class="ttc" id="os2_8c_html_a1c780a489bfcc96130d06599b0cb01ae"><div class="ttname"><a href="../../de/d46/os2_8c.html#a1c780a489bfcc96130d06599b0cb01ae">sw</a></div><div class="ttdeci">char * sw</div><div class="ttdef"><b>Definition:</b> <a href="../../de/d46/os2_8c_source.html#l00060">os2.c:60</a></div></div>
<div class="ttc" id="tcltklib_8c_html_a9611b3a00430a86619b5923de30f9fdb"><div class="ttname"><a href="../../d5/d9d/tcltklib_8c.html#a9611b3a00430a86619b5923de30f9fdb">status</a></div><div class="ttdeci">int status</div><div class="ttdef"><b>Definition:</b> <a href="../../d5/d9d/tcltklib_8c_source.html#l02186">tcltklib.c:2186</a></div></div>
<div class="ttc" id="zlib_8c_html_a56e97a891edabd14d071def7e678ad7e"><div class="ttname"><a href="../../db/d74/zlib_8c.html#a56e97a891edabd14d071def7e678ad7e">path</a></div><div class="ttdeci">gz path</div><div class="ttdef"><b>Definition:</b> <a href="../../db/d74/zlib_8c_source.html#l02040">zlib.c:2040</a></div></div>
<div class="ttc" id="tcltklib_8c_html_a2b772bde34cb865f671cba699f405675"><div class="ttname"><a href="../../d5/d9d/tcltklib_8c.html#a2b772bde34cb865f671cba699f405675">index</a></div><div class="ttdeci">int index</div><div class="ttdef"><b>Definition:</b> <a href="../../d5/d9d/tcltklib_8c_source.html#l04467">tcltklib.c:4467</a></div></div>
<div class="ttc" id="os2_8c_html_a680b8d551cad22b86c39b98588c242f0"><div class="ttname"><a href="../../de/d46/os2_8c.html#a680b8d551cad22b86c39b98588c242f0">strcpy</a></div><div class="ttdeci">strcpy(cmd2, cmd)</div></div>
<div class="ttc" id="yaml2byte_8c_html_ad0b08ddfcb8010b1d73d9d635d5e0201"><div class="ttname"><a href="../../dd/dfb/yaml2byte_8c.html#ad0b08ddfcb8010b1d73d9d635d5e0201">NULL</a></div><div class="ttdeci">n NULL</div><div class="ttdef"><b>Definition:</b> <a href="../../dd/dfb/yaml2byte_8c_source.html#l00134">yaml2byte.c:134</a></div></div>
<div class="ttc" id="ruby_2ruby_8h_html_a79041aa2bc7439c11906a86f82a52eb6"><div class="ttname"><a href="../../de/de6/ruby_2ruby_8h.html#a79041aa2bc7439c11906a86f82a52eb6">ALLOC_N</a></div><div class="ttdeci">#define ALLOC_N(type, n)</div><div class="ttdef"><b>Definition:</b> <a href="../../de/de6/ruby_2ruby_8h_source.html#l01034">ruby.h:1034</a></div></div>
<div class="ttc" id="missing_8h_html_a695026fc69840c65da7ea58226006f69"><div class="ttname"><a href="../../d3/d90/missing_8h.html#a695026fc69840c65da7ea58226006f69">strstr</a></div><div class="ttdeci">RUBY_EXTERN char * strstr(const char *, const char *)</div><div class="ttdef"><b>Definition:</b> <a href="../../d3/d29/strstr_8c_source.html#l00008">strstr.c:8</a></div></div>
<div class="ttc" id="win32_8h_html_ac7c7a6988eecb59569de9f51115a1df3"><div class="ttname"><a href="../../dc/db1/win32_8h.html#ac7c7a6988eecb59569de9f51115a1df3">chown</a></div><div class="ttdeci">int chown(const char *, int, int)</div><div class="ttdef"><b>Definition:</b> <a href="../../d5/df2/win32_8c_source.html#l03796">win32.c:3796</a></div></div>
<div class="ttc" id="win32_8h_html_a9f0ffa429d1a466322fb9b5bb084f828"><div class="ttname"><a href="../../dc/db1/win32_8h.html#a9f0ffa429d1a466322fb9b5bb084f828">link</a></div><div class="ttdeci">int link(const char *, const char *)</div><div class="ttdef"><b>Definition:</b> <a href="../../d5/df2/win32_8c_source.html#l03962">win32.c:3962</a></div></div>
<div class="ttc" id="tcltklib_8c_html_ab9ebbdd4596789afb752d19fca153ee5"><div class="ttname"><a href="../../d5/d9d/tcltklib_8c.html#ab9ebbdd4596789afb752d19fca153ee5">argv</a></div><div class="ttdeci">VALUE * argv</div><div class="ttdef"><b>Definition:</b> <a href="../../d5/d9d/tcltklib_8c_source.html#l01962">tcltklib.c:1962</a></div></div>
<div class="ttc" id="os2_8c_html_a58defbf6fe556592007171f7a347f9d6"><div class="ttname"><a href="../../de/d46/os2_8c.html#a58defbf6fe556592007171f7a347f9d6">s</a></div><div class="ttdeci">register char * s</div><div class="ttdef"><b>Definition:</b> <a href="../../de/d46/os2_8c_source.html#l00056">os2.c:56</a></div></div>
<div class="ttc" id="os2_8c_html_aabe47ba16af2a3b8ea84dffa96fc867b"><div class="ttname"><a href="../../de/d46/os2_8c.html#aabe47ba16af2a3b8ea84dffa96fc867b">CHARP</a></div><div class="ttdeci">char * CHARP</div><div class="ttdef"><b>Definition:</b> <a href="../../de/d46/os2_8c_source.html#l00051">os2.c:51</a></div></div>
<div class="ttc" id="dir_8c_html_aee28fd8a0e40b6d958f7d20348e45368"><div class="ttname"><a href="../../de/d32/dir_8c.html#aee28fd8a0e40b6d958f7d20348e45368">getenv</a></div><div class="ttdeci">char * getenv()</div></div>
<div class="ttc" id="name2ctype_8h_html_aed1cc4dca5d94cb452f79691f54f7423"><div class="ttname"><a href="../../d3/d15/name2ctype_8h.html#aed1cc4dca5d94cb452f79691f54f7423">len</a></div><div class="ttdeci">register unsigned int len</div><div class="ttdef"><b>Definition:</b> <a href="../../d3/d15/name2ctype_8h_source.html#l22210">name2ctype.h:22210</a></div></div>
<div class="ttc" id="tcltklib_8c_html_ac016cf800c945b35b6ed7d8d9c9b153c"><div class="ttname"><a href="../../d5/d9d/tcltklib_8c.html#ac016cf800c945b35b6ed7d8d9c9b153c">cmd</a></div><div class="ttdeci">const char * cmd</div><div class="ttdef"><b>Definition:</b> <a href="../../d5/d9d/tcltklib_8c_source.html#l00274">tcltklib.c:274</a></div></div>
<div class="ttc" id="os2_8c_html_ab00d980bdc691775736b75a47ee4c2da"><div class="ttname"><a href="../../de/d46/os2_8c.html#ab00d980bdc691775736b75a47ee4c2da">cmd2</a></div><div class="ttdeci">char * cmd2</div><div class="ttdef"><b>Definition:</b> <a href="../../de/d46/os2_8c_source.html#l00060">os2.c:60</a></div></div>
<div class="ttc" id="dln_8c_html_affb9fc32698fab7f7b36e0cf8e64c83e"><div class="ttname"><a href="../../d1/ddc/dln_8c.html#affb9fc32698fab7f7b36e0cf8e64c83e">free</a></div><div class="ttdeci">#define free(x)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/ddc/dln_8c_source.html#l00050">dln.c:50</a></div></div>
<div class="ttc" id="os2_8c_html_aef85af20f8841a63109d6f1973d47be1"><div class="ttname"><a href="../../de/d46/os2_8c.html#aef85af20f8841a63109d6f1973d47be1">shell</a></div><div class="ttdeci">char * shell</div><div class="ttdef"><b>Definition:</b> <a href="../../de/d46/os2_8c_source.html#l00060">os2.c:60</a></div></div>
<div class="ttc" id="bigdecimal_8c_html_a79369678b02205f099123dc0501f915f"><div class="ttname"><a href="../../de/d07/bigdecimal_8c.html#a79369678b02205f099123dc0501f915f">a</a></div><div class="ttdeci">Real * a</div><div class="ttdef"><b>Definition:</b> <a href="../../de/d07/bigdecimal_8c_source.html#l01140">bigdecimal.c:1140</a></div></div>
</div><!-- fragment --></div><!-- contents -->
<!-- start footer part -->
<hr class="footer"/><address class="footer"><small>
Generated by  <a href="http://www.doxygen.org/index.html">
<img class="footer" src="../../doxygen.png" alt="doxygen"/>
</a> 1.8.5
</small></address>
</body>
</html>