File: param_8c-source.html

package info (click to toggle)
polylib 5.22.5-3%2Bdfsg
  • links: PTS, VCS
  • area: main
  • in suites: jessie, jessie-kfreebsd, stretch, wheezy
  • size: 14,444 kB
  • ctags: 52,958
  • sloc: ansic: 16,342; sh: 10,134; makefile: 560
file content (90 lines) | stat: -rw-r--r-- 7,160 bytes parent folder | download | duplicates (4)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN">
<html><head><meta http-equiv="Content-Type" content="text/html;charset=UTF-8">
<title>polylib: param.c Source File</title>
<link href="doxygen.css" rel="stylesheet" type="text/css">
<link href="tabs.css" rel="stylesheet" type="text/css">
</head><body>
<!-- Generated by Doxygen 1.5.6 -->
<div class="navigation" id="top">
  <div class="tabs">
    <ul>
      <li><a href="main.html"><span>Main&nbsp;Page</span></a></li>
      <li><a href="annotated.html"><span>Classes</span></a></li>
      <li class="current"><a href="files.html"><span>Files</span></a></li>
    </ul>
  </div>
<h1>param.c</h1><a href="param_8c.html">Go to the documentation of this file.</a><div class="fragment"><pre class="fragment"><a name="l00001"></a>00001 <span class="preprocessor">#include &lt;stdio.h&gt;</span>
<a name="l00002"></a>00002 <span class="preprocessor">#include &lt;stdlib.h&gt;</span>
<a name="l00003"></a>00003 <span class="preprocessor">#include &lt;string.h&gt;</span>
<a name="l00004"></a>00004 
<a name="l00005"></a>00005 <span class="preprocessor">#include &lt;<a class="code" href="polylib_8h.html">polylib/polylib.h</a>&gt;</span>
<a name="l00006"></a>00006 
<a name="l00007"></a>00007 <span class="comment">/****************************************************/</span>
<a name="l00008"></a>00008 <span class="comment">/* Read_ParamNames() :                              */</span>
<a name="l00009"></a>00009 <span class="comment">/* Reads FILE *in for the parameter names           */</span>
<a name="l00010"></a>00010 <span class="comment">/* if in==NULL or not enough parameters on input,   */</span>
<a name="l00011"></a>00011 <span class="comment">/*  use default names                               */</span>
<a name="l00012"></a>00012 <span class="comment">/* returns an n-array of strings                    */</span>
<a name="l00013"></a>00013 <span class="comment">/****************************************************/</span>
<a name="l00014"></a><a class="code" href="param_8h.html#c5f556f34173ebc8815247ee7f4e2a0b">00014</a> <span class="keyword">const</span> <span class="keywordtype">char</span> **<a class="code" href="param_8c.html#c5f556f34173ebc8815247ee7f4e2a0b">Read_ParamNames</a>(FILE *in,<span class="keywordtype">int</span> <a class="code" href="polyparam_8c.html#742204794ea328ba293fe59cec79b990">m</a>)
<a name="l00015"></a>00015 {
<a name="l00016"></a>00016   <span class="keywordtype">char</span> **param_name;
<a name="l00017"></a>00017   <span class="keywordtype">int</span> c, i, j, f;
<a name="l00018"></a>00018   <span class="keywordtype">char</span> <a class="code" href="polytest_8c.html#27d9a0cff1341bbc004fabd1ad8a1543">s</a>[1024],param[32];
<a name="l00019"></a>00019   
<a name="l00020"></a>00020   <span class="keywordflow">if</span>(!in)
<a name="l00021"></a>00021     f = 0;
<a name="l00022"></a>00022   <span class="keywordflow">else</span>
<a name="l00023"></a>00023     <span class="keywordflow">do</span>
<a name="l00024"></a>00024       f = (fgets(s, 1024, in)!=NULL);
<a name="l00025"></a>00025     <span class="keywordflow">while</span> (f &amp;&amp; (*s==<span class="charliteral">'#'</span> || *s==<span class="charliteral">'\n'</span>));
<a name="l00026"></a>00026   
<a name="l00027"></a>00027   param_name = (<span class="keywordtype">char</span> **)malloc(m*<span class="keyword">sizeof</span>(<span class="keywordtype">char</span> *));
<a name="l00028"></a>00028   i = 0;
<a name="l00029"></a>00029   <span class="keywordflow">if</span>(f) {
<a name="l00030"></a>00030     c = 0;
<a name="l00031"></a>00031     <span class="keywordflow">for</span>(;i&lt;m;++i) {
<a name="l00032"></a>00032       j=0;
<a name="l00033"></a>00033       <span class="keywordflow">for</span>(;;++c) {
<a name="l00034"></a>00034         <span class="keywordflow">if</span>(s[c]==<span class="charliteral">' '</span>) {
<a name="l00035"></a>00035           <span class="keywordflow">if</span>(j==0)
<a name="l00036"></a>00036             <span class="keywordflow">continue</span>;
<a name="l00037"></a>00037           <span class="keywordflow">else</span>
<a name="l00038"></a>00038             <span class="keywordflow">break</span>;
<a name="l00039"></a>00039         }
<a name="l00040"></a>00040         <span class="keywordflow">if</span>(s[c]==<span class="charliteral">'\n'</span> || s[c]==0)
<a name="l00041"></a>00041           <span class="keywordflow">break</span>;
<a name="l00042"></a>00042         param[j++] = s[c];
<a name="l00043"></a>00043       }
<a name="l00044"></a>00044 
<a name="l00045"></a>00045       <span class="comment">/* Not enough parameters on input, end */</span>
<a name="l00046"></a>00046       <span class="keywordflow">if</span>(j==0)
<a name="l00047"></a>00047         <span class="keywordflow">break</span>;
<a name="l00048"></a>00048       param[j] = 0;
<a name="l00049"></a>00049       param_name[i] = (<span class="keywordtype">char</span> *)malloc( (j+1)*<span class="keyword">sizeof</span>(char) );
<a name="l00050"></a>00050       strcpy(param_name[i],param);
<a name="l00051"></a>00051     }
<a name="l00052"></a>00052   }
<a name="l00053"></a>00053   
<a name="l00054"></a>00054   <span class="comment">/* Not enough parameters on input : use default names */</span>
<a name="l00055"></a>00055   <span class="keywordflow">if</span>(!f || i!=m) {
<a name="l00056"></a>00056     <span class="keywordflow">for</span>(;i&lt;m;++i) {
<a name="l00057"></a>00057       param_name[i] = (<span class="keywordtype">char</span> *) malloc(2*<span class="keyword">sizeof</span>(<span class="keywordtype">char</span>));
<a name="l00058"></a>00058       sprintf(param_name[i], <span class="stringliteral">"%c"</span>, <a class="code" href="types_8h.html#39e85cb3471b4808b39bdde4fb125cbe">PCHAR</a>+i+1);
<a name="l00059"></a>00059     }
<a name="l00060"></a>00060   }
<a name="l00061"></a>00061   <span class="keywordflow">return</span> (<span class="keyword">const</span> <span class="keywordtype">char</span>**)param_name;
<a name="l00062"></a>00062 } <span class="comment">/* Read_ParamNames */</span>
<a name="l00063"></a>00063 
<a name="l00064"></a><a class="code" href="param_8h.html#e85c395031b2feb7cc47ba691bb6392f">00064</a> <span class="keywordtype">void</span> <a class="code" href="param_8c.html#e85c395031b2feb7cc47ba691bb6392f">Free_ParamNames</a>(<span class="keyword">const</span> <span class="keywordtype">char</span> **params, <span class="keywordtype">int</span> <a class="code" href="polyparam_8c.html#742204794ea328ba293fe59cec79b990">m</a>)
<a name="l00065"></a>00065 {
<a name="l00066"></a>00066     <span class="keywordflow">while</span> (--m &gt;= 0)
<a name="l00067"></a>00067         free((<span class="keywordtype">char</span> *)params[m]);
<a name="l00068"></a>00068     free(params);
<a name="l00069"></a>00069 }
</pre></div></div>
<hr size="1"><address style="text-align: right;"><small>Generated on Tue Sep 15 18:33:59 2009 for polylib by&nbsp;
<a href="http://www.doxygen.org/index.html">
<img src="doxygen.png" alt="doxygen" align="middle" border="0"></a> 1.5.6 </small></address>
</body>
</html>