Mercurial Mercurial > oss > MCL > sftools > depl > docscontent / annotate
summary | shortlog | changelog | graph | tags | bookmarks | branches | files | changeset | file | latest | revisions | annotate | diff | comparison | raw | help
Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Symbian3/Examples/guid-6013a680-57f9-415b-8851-c4fa63356636/_u_n_i_t_s_8_c_source.html
author Dominic Pinkman <dominic.pinkman@nokia.com>
Fri, 13 Aug 2010 16:47:46 +0100
changeset 14 578be2adaf3e
parent 6 43e37759235e
permissions -rw-r--r--
Week 32 contribution of PDK documentation content. See release notes for details. Fixes bug Bug 3582
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
6
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
     1
 
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
     2
 
<html xmlns="http://www.w3.org/1999/xhtml">
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
     3
 
<head>
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
     4
 
<meta http-equiv="Content-Type" content="text/xhtml;charset=UTF-8"/>
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
     5
 
<title>TB9.2 Example Applications: examples/Stdlib/ConsoleApp/UNITS.C Source File</title>
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
     6
 
<link href="tabs.css" rel="stylesheet" type="text/css"/>
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
     7
 
<link href="doxygen.css" rel="stylesheet" type="text/css"/>
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
     8
 
</head>
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
     9
 
<body>
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
    10
 
<!-- Generated by Doxygen 1.6.2 -->
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
    11
 
<h1>examples/Stdlib/ConsoleApp/UNITS.C</h1><div class="fragment"><pre class="fragment"><a name="l00001"></a>00001 <span class="comment">// UNITS.C</span>
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
    12
 
<a name="l00002"></a>00002 <span class="comment">//</span>
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
    13
 
<a name="l00003"></a>00003 <span class="comment">// Copyright (c) 1997-2009 Nokia Corporation and/or its subsidiary(-ies).</span>
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
    14
 
<a name="l00004"></a>00004 <span class="comment">// All rights reserved.</span>
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
    15
 
<a name="l00005"></a>00005 <span class="comment">// This component and the accompanying materials are made available</span>
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
    16
 
<a name="l00006"></a>00006 <span class="comment">// under the terms of &quot;Eclipse Public License v1.0&quot;</span>
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
    17
 
<a name="l00007"></a>00007 <span class="comment">// which accompanies this distribution, and is available</span>
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
    18
 
<a name="l00008"></a>00008 <span class="comment">// at the URL &quot;http://www.eclipse.org/legal/epl-v10.html&quot;.</span>
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
    19
 
<a name="l00009"></a>00009 <span class="comment">//</span>
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
    20
 
<a name="l00010"></a>00010 <span class="comment">// Initial Contributors:</span>
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
    21
 
<a name="l00011"></a>00011 <span class="comment">// Nokia Corporation - initial contribution.</span>
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
    22
 
<a name="l00012"></a>00012 <span class="comment">//</span>
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
    23
 
<a name="l00013"></a>00013 <span class="comment">// Contributors:</span>
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
    24
 
<a name="l00014"></a>00014 <span class="comment">//</span>
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
    25
 
<a name="l00015"></a>00015 <span class="comment">// Description:</span>
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
    26
 
<a name="l00016"></a>00016 <span class="comment">//</span>
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
    27
 
<a name="l00017"></a>00017
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
    28
 
<a name="l00018"></a>00018 <span class="preprocessor">#include &lt;ctype.h&gt;</span>
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
    29
 
<a name="l00019"></a>00019 <span class="preprocessor">#include &lt;stdio.h&gt;</span>
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
    30
 
<a name="l00020"></a>00020 <span class="preprocessor">#include &lt;string.h&gt;</span>
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
    31
 
<a name="l00021"></a>00021 <span class="preprocessor">#include &lt;stdlib.h&gt;</span>
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
    32
 
<a name="l00022"></a>00022
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
    33
 
<a name="l00023"></a>00023 <span class="preprocessor">#include &quot;PATHNAME.H&quot;</span>
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
    34
 
<a name="l00024"></a>00024
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
    35
 
<a name="l00025"></a>00025 <span class="preprocessor">#define VERSION &quot;1.0&quot;</span>
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
    36
 
<a name="l00026"></a>00026 <span class="preprocessor"></span>
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
    37
 
<a name="l00027"></a>00027 <span class="preprocessor">#ifndef UNITSFILE</span>
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
    38
 
<a name="l00028"></a>00028 <span class="preprocessor"></span><span class="preprocessor">#define UNITSFILE _PATH_UNITSLIB</span>
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
    39
 
<a name="l00029"></a>00029 <span class="preprocessor"></span><span class="preprocessor">#endif</span>
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
    40
 
<a name="l00030"></a>00030 <span class="preprocessor"></span>
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
    41
 
<a name="l00031"></a>00031 <span class="preprocessor">#define MAXUNITS 1000</span>
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
    42
 
<a name="l00032"></a>00032 <span class="preprocessor"></span><span class="preprocessor">#define MAXPREFIXES 50</span>
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
    43
 
<a name="l00033"></a>00033 <span class="preprocessor"></span><span class="preprocessor">#define MAXSUBUNITS 500</span>
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
    44
 
<a name="l00034"></a>00034 <span class="preprocessor"></span>
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
    45
 
<a name="l00035"></a>00035 <span class="preprocessor">#define PRIMITIVECHAR &#39;!&#39;</span>
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
    46
 
<a name="l00036"></a>00036 <span class="preprocessor"></span>
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
    47
 
<a name="l00037"></a>00037 <span class="keywordtype">char</span> *powerstring = <span class="stringliteral">&quot;^&quot;</span>;
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
    48
 
<a name="l00038"></a>00038
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
    49
 
<a name="l00039"></a>00039 <span class="keyword">struct </span>{
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
    50
 
<a name="l00040"></a>00040         <span class="keywordtype">char</span> *uname;
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
    51
 
<a name="l00041"></a>00041         <span class="keywordtype">char</span> *uval;
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
    52
 
<a name="l00042"></a>00042 } unittable[MAXUNITS];
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
    53
 
<a name="l00043"></a>00043
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
    54
 
<a name="l00044"></a>00044 <span class="keyword">struct </span>unittype {
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
    55
 
<a name="l00045"></a>00045         <span class="keywordtype">char</span> *numerator[225]; <span class="comment">// was [MAXSUBUNITS]</span>
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
    56
 
<a name="l00046"></a>00046         <span class="keywordtype">char</span> *denominator[225]; <span class="comment">// was [MAXSUBUNITS]</span>
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
    57
 
<a name="l00047"></a>00047         <span class="keywordtype">double</span> factor;
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
    58
 
<a name="l00048"></a>00048 };
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
    59
 
<a name="l00049"></a>00049
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
    60
 
<a name="l00050"></a>00050 <span class="keyword">struct </span>{
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
    61
 
<a name="l00051"></a>00051         <span class="keywordtype">char</span> *prefixname;
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
    62
 
<a name="l00052"></a>00052         <span class="keywordtype">char</span> *prefixval;
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
    63
 
<a name="l00053"></a>00053 }      prefixtable[MAXPREFIXES];
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
    64
 
<a name="l00054"></a>00054
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
    65
 
<a name="l00055"></a>00055
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
    66
 
<a name="l00056"></a>00056 <span class="keywordtype">char</span> *NULLUNIT = <span class="stringliteral">&quot;&quot;</span>;
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
    67
 
<a name="l00057"></a>00057
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
    68
 
<a name="l00058"></a>00058 <span class="keywordtype">int</span> unitcount;
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
    69
 
<a name="l00059"></a>00059 <span class="keywordtype">int</span> prefixcount;
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
    70
 
<a name="l00060"></a>00060
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
    71
 
<a name="l00061"></a>00061
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
    72
 
<a name="l00062"></a>00062 <span class="keywordtype">char</span> *
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
    73
 
<a name="l00063"></a>00063 dupstr(<span class="keywordtype">char</span> *str)
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
    74
 
<a name="l00064"></a>00064 {
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
    75
 
<a name="l00065"></a>00065         <span class="keywordtype">char</span> *ret;
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
    76
 
<a name="l00066"></a>00066
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
    77
 
<a name="l00067"></a>00067         ret = (<span class="keywordtype">char</span> *)malloc(strlen(str) + 1);
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
    78
 
<a name="l00068"></a>00068         <span class="keywordflow">if</span> (!ret) {
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
    79
 
<a name="l00069"></a>00069                 fprintf(stderr, <span class="stringliteral">&quot;Memory allocation error\n&quot;</span>);
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
    80
 
<a name="l00070"></a>00070                 exit(3);
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
    81
 
<a name="l00071"></a>00071         }
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
    82
 
<a name="l00072"></a>00072         strcpy(ret, str);
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
    83
 
<a name="l00073"></a>00073         <span class="keywordflow">return</span> (ret);
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
    84
 
<a name="l00074"></a>00074 }
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
    85
 
<a name="l00075"></a>00075
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
    86
 
<a name="l00076"></a>00076
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
    87
 
<a name="l00077"></a>00077 <span class="keywordtype">void</span>
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
    88
 
<a name="l00078"></a>00078 readerror(<span class="keywordtype">int</span> linenum)
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
    89
 
<a name="l00079"></a>00079 {
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
    90
 
<a name="l00080"></a>00080         fprintf(stderr, <span class="stringliteral">&quot;Error in units file &#39;%s&#39; line %d\n&quot;</span>, UNITSFILE,
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
    91
 
<a name="l00081"></a>00081             linenum);
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
    92
 
<a name="l00082"></a>00082 }
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
    93
 
<a name="l00083"></a>00083
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
    94
 
<a name="l00084"></a>00084
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
    95
 
<a name="l00085"></a>00085 <span class="keywordtype">void</span>
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
    96
 
<a name="l00086"></a>00086 readunits(<span class="keywordtype">char</span> *userfile)
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
    97
 
<a name="l00087"></a>00087 {
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
    98
 
<a name="l00088"></a>00088         FILE *unitfile;
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
    99
 
<a name="l00089"></a>00089         <span class="keywordtype">char</span> line[80], *lineptr;
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   100
 
<a name="l00090"></a>00090         <span class="keywordtype">int</span> len, linenum, i;
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   101
 
<a name="l00091"></a>00091
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   102
 
<a name="l00092"></a>00092         unitcount = 0;
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   103
 
<a name="l00093"></a>00093         linenum = 0;
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   104
 
<a name="l00094"></a>00094
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   105
 
<a name="l00095"></a>00095         <span class="keywordflow">if</span> (userfile) {
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   106
 
<a name="l00096"></a>00096                 unitfile = fopen(userfile, <span class="stringliteral">&quot;rt&quot;</span>);
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   107
 
<a name="l00097"></a>00097                 <span class="keywordflow">if</span> (!unitfile) {
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   108
 
<a name="l00098"></a>00098                         fprintf(stderr, <span class="stringliteral">&quot;Unable to open units file &#39;%s&#39;\n&quot;</span>,
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   109
 
<a name="l00099"></a>00099                             userfile);
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   110
 
<a name="l00100"></a>00100                         exit(1);
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   111
 
<a name="l00101"></a>00101                 }
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   112
 
<a name="l00102"></a>00102         }
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   113
 
<a name="l00103"></a>00103         <span class="keywordflow">else</span> {
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   114
 
<a name="l00104"></a>00104                 unitfile = fopen(UNITSFILE, <span class="stringliteral">&quot;rt&quot;</span>);
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   115
 
<a name="l00105"></a>00105                 <span class="keywordflow">if</span> (!unitfile) {
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   116
 
<a name="l00106"></a>00106                         <span class="keywordtype">char</span> *direc, *env;
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   117
 
<a name="l00107"></a>00107                         <span class="keywordtype">char</span> filename[1000];
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   118
 
<a name="l00108"></a>00108                         <span class="keywordtype">char</span> separator[2];
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   119
 
<a name="l00109"></a>00109
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   120
 
<a name="l00110"></a>00110                         env = getenv(<span class="stringliteral">&quot;PATH&quot;</span>);
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   121
 
<a name="l00111"></a>00111                         <span class="keywordflow">if</span> (env) {
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   122
 
<a name="l00112"></a>00112                                 <span class="keywordflow">if</span> (strchr(env, <span class="charliteral">&#39;;&#39;</span>))
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   123
 
<a name="l00113"></a>00113                                         strcpy(separator, <span class="stringliteral">&quot;;&quot;</span>);
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   124
 
<a name="l00114"></a>00114                                 <span class="keywordflow">else</span>
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   125
 
<a name="l00115"></a>00115                                         strcpy(separator, <span class="stringliteral">&quot;:&quot;</span>);
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   126
 
<a name="l00116"></a>00116                                 direc = strtok(env, separator);
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   127
 
<a name="l00117"></a>00117                                 <span class="keywordflow">while</span> (direc) {
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   128
 
<a name="l00118"></a>00118                                         strcpy(filename, <span class="stringliteral">&quot;&quot;</span>);
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   129
 
<a name="l00119"></a>00119                                         strncat(filename, direc, 999);
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   130
 
<a name="l00120"></a>00120                                         strncat(filename, <span class="stringliteral">&quot;/&quot;</span>,
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   131
 
<a name="l00121"></a>00121                                             999 - strlen(filename));
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   132
 
<a name="l00122"></a>00122                                         strncat(filename, UNITSFILE,
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   133
 
<a name="l00123"></a>00123                                             999 - strlen(filename));
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   134
 
<a name="l00124"></a>00124                                         unitfile = fopen(filename, <span class="stringliteral">&quot;rt&quot;</span>);
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   135
 
<a name="l00125"></a>00125                                         <span class="keywordflow">if</span> (unitfile)
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   136
 
<a name="l00126"></a>00126                                                 <span class="keywordflow">break</span>;
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   137
 
<a name="l00127"></a>00127                                         direc = strtok(NULL, separator);
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   138
 
<a name="l00128"></a>00128                                 }
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   139
 
<a name="l00129"></a>00129                         }
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   140
 
<a name="l00130"></a>00130                         <span class="keywordflow">if</span> (!unitfile) {
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   141
 
<a name="l00131"></a>00131                                 fprintf(stderr, <span class="stringliteral">&quot;Can&#39;t find units file &#39;%s&#39;\n&quot;</span>,
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   142
 
<a name="l00132"></a>00132                                     UNITSFILE);
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   143
 
<a name="l00133"></a>00133                                 exit(1);
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   144
 
<a name="l00134"></a>00134                         }
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   145
 
<a name="l00135"></a>00135                 }
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   146
 
<a name="l00136"></a>00136         }
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   147
 
<a name="l00137"></a>00137         <span class="keywordflow">while</span> (!feof(unitfile)) {
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   148
 
<a name="l00138"></a>00138                 <span class="keywordflow">if</span> (!fgets(line, 79, unitfile))
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   149
 
<a name="l00139"></a>00139                         <span class="keywordflow">break</span>;
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   150
 
<a name="l00140"></a>00140                 linenum++;
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   151
 
<a name="l00141"></a>00141                 lineptr = line;
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   152
 
<a name="l00142"></a>00142                 <span class="keywordflow">if</span> (*lineptr == <span class="charliteral">&#39;/&#39;</span>)
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   153
 
<a name="l00143"></a>00143                         <span class="keywordflow">continue</span>;
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   154
 
<a name="l00144"></a>00144                 lineptr += strspn(lineptr, <span class="stringliteral">&quot; \n\t&quot;</span>);
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   155
 
<a name="l00145"></a>00145                 len = strcspn(lineptr, <span class="stringliteral">&quot; \n\t&quot;</span>);
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   156
 
<a name="l00146"></a>00146                 lineptr[len] = 0;
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   157
 
<a name="l00147"></a>00147                 <span class="keywordflow">if</span> (!strlen(lineptr))
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   158
 
<a name="l00148"></a>00148                         <span class="keywordflow">continue</span>;
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   159
 
<a name="l00149"></a>00149                 <span class="keywordflow">if</span> (lineptr[strlen(lineptr) - 1] == <span class="charliteral">&#39;-&#39;</span>) { <span class="comment">/* it&#39;s a prefix */</span>
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   160
 
<a name="l00150"></a>00150                         <span class="keywordflow">if</span> (prefixcount == MAXPREFIXES) {
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   161
 
<a name="l00151"></a>00151                                 fprintf(stderr, <span class="stringliteral">&quot;Memory for prefixes exceeded in line %d\n&quot;</span>,
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   162
 
<a name="l00152"></a>00152                                     linenum);
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   163
 
<a name="l00153"></a>00153                                 <span class="keywordflow">continue</span>;
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   164
 
<a name="l00154"></a>00154                         }
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   165
 
<a name="l00155"></a>00155                         lineptr[strlen(lineptr) - 1] = 0;
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   166
 
<a name="l00156"></a>00156                         prefixtable[prefixcount].prefixname = dupstr(lineptr);
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   167
 
<a name="l00157"></a>00157                         <span class="keywordflow">for</span> (i = 0; i &lt; prefixcount; i++)
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   168
 
<a name="l00158"></a>00158                                 <span class="keywordflow">if</span> (!strcmp(prefixtable[i].prefixname, lineptr)) {
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   169
 
<a name="l00159"></a>00159                                         fprintf(stderr, <span class="stringliteral">&quot;Redefinition of prefix &#39;%s&#39; on line %d ignored\n&quot;</span>,
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   170
 
<a name="l00160"></a>00160                                             lineptr, linenum);
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   171
 
<a name="l00161"></a>00161                                         <span class="keywordflow">continue</span>;
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   172
 
<a name="l00162"></a>00162                                 }
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   173
 
<a name="l00163"></a>00163                         lineptr += len + 1;
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   174
 
<a name="l00164"></a>00164                         <span class="keywordflow">if</span> (!strlen(lineptr)) {
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   175
 
<a name="l00165"></a>00165                                 readerror(linenum);
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   176
 
<a name="l00166"></a>00166                                 <span class="keywordflow">continue</span>;
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   177
 
<a name="l00167"></a>00167                         }
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   178
 
<a name="l00168"></a>00168                         lineptr += strspn(lineptr, <span class="stringliteral">&quot; \n\t&quot;</span>);
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   179
 
<a name="l00169"></a>00169                         len = strcspn(lineptr, <span class="stringliteral">&quot;\n\t&quot;</span>);
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   180
 
<a name="l00170"></a>00170                         lineptr[len] = 0;
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   181
 
<a name="l00171"></a>00171                         prefixtable[prefixcount++].prefixval = dupstr(lineptr);
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   182
 
<a name="l00172"></a>00172                 }
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   183
 
<a name="l00173"></a>00173                 <span class="keywordflow">else</span> {          <span class="comment">/* it&#39;s not a prefix */</span>
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   184
 
<a name="l00174"></a>00174                         <span class="keywordflow">if</span> (unitcount == MAXUNITS) {
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   185
 
<a name="l00175"></a>00175                                 fprintf(stderr, <span class="stringliteral">&quot;Memory for units exceeded in line %d\n&quot;</span>,
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   186
 
<a name="l00176"></a>00176                                     linenum);
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   187
 
<a name="l00177"></a>00177                                 <span class="keywordflow">continue</span>;
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   188
 
<a name="l00178"></a>00178                         }
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   189
 
<a name="l00179"></a>00179                         unittable[unitcount].uname = dupstr(lineptr);
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   190
 
<a name="l00180"></a>00180                         <span class="keywordflow">for</span> (i = 0; i &lt; unitcount; i++)
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   191
 
<a name="l00181"></a>00181                                 <span class="keywordflow">if</span> (!strcmp(unittable[i].uname, lineptr)) {
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   192
 
<a name="l00182"></a>00182                                         fprintf(stderr, <span class="stringliteral">&quot;Redefinition of unit &#39;%s&#39; on line %d ignored\n&quot;</span>,
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   193
 
<a name="l00183"></a>00183                                             lineptr, linenum);
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   194
 
<a name="l00184"></a>00184                                         <span class="keywordflow">continue</span>;
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   195
 
<a name="l00185"></a>00185                                 }
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   196
 
<a name="l00186"></a>00186                         lineptr += len + 1;
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   197
 
<a name="l00187"></a>00187                         lineptr += strspn(lineptr, <span class="stringliteral">&quot; \n\t&quot;</span>);
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   198
 
<a name="l00188"></a>00188                         <span class="keywordflow">if</span> (!strlen(lineptr)) {
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   199
 
<a name="l00189"></a>00189                                 readerror(linenum);
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   200
 
<a name="l00190"></a>00190                                 <span class="keywordflow">continue</span>;
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   201
 
<a name="l00191"></a>00191                         }
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   202
 
<a name="l00192"></a>00192                         len = strcspn(lineptr, <span class="stringliteral">&quot;\n\t&quot;</span>);
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   203
 
<a name="l00193"></a>00193                         lineptr[len] = 0;
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   204
 
<a name="l00194"></a>00194                         unittable[unitcount++].uval = dupstr(lineptr);
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   205
 
<a name="l00195"></a>00195                 }
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   206
 
<a name="l00196"></a>00196         }
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   207
 
<a name="l00197"></a>00197         fclose(unitfile);
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   208
 
<a name="l00198"></a>00198 }
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   209
 
<a name="l00199"></a>00199
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   210
 
<a name="l00200"></a>00200 <span class="keywordtype">void</span>
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   211
 
<a name="l00201"></a>00201 initializeunit(<span class="keyword">struct</span> unittype * theunit)
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   212
 
<a name="l00202"></a>00202 {
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   213
 
<a name="l00203"></a>00203         theunit-&gt;factor = 1.0;
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   214
 
<a name="l00204"></a>00204         theunit-&gt;numerator[0] = theunit-&gt;denominator[0] = NULL;
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   215
 
<a name="l00205"></a>00205 }
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   216
 
<a name="l00206"></a>00206
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   217
 
<a name="l00207"></a>00207
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   218
 
<a name="l00208"></a>00208 <span class="keywordtype">int</span>
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   219
 
<a name="l00209"></a>00209 addsubunit(<span class="keywordtype">char</span> *product[], <span class="keywordtype">char</span> *toadd)
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   220
 
<a name="l00210"></a>00210 {
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   221
 
<a name="l00211"></a>00211         <span class="keywordtype">char</span> **ptr;
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   222
 
<a name="l00212"></a>00212
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   223
 
<a name="l00213"></a>00213         <span class="keywordflow">for</span> (ptr = product; *ptr &amp;&amp; *ptr != NULLUNIT; ptr++){};
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   224
 
<a name="l00214"></a>00214         <span class="keywordflow">if</span> (ptr &gt;= product + MAXSUBUNITS) {
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   225
 
<a name="l00215"></a>00215                 fprintf(stderr, <span class="stringliteral">&quot;Memory overflow in unit reduction\n&quot;</span>);
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   226
 
<a name="l00216"></a>00216                 <span class="keywordflow">return</span> 1;
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   227
 
<a name="l00217"></a>00217         }
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   228
 
<a name="l00218"></a>00218         <span class="keywordflow">if</span> (!*ptr)
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   229
 
<a name="l00219"></a>00219                 *(ptr + 1) = 0;
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   230
 
<a name="l00220"></a>00220         *ptr = dupstr(toadd);
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   231
 
<a name="l00221"></a>00221         <span class="keywordflow">return</span> 0;
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   232
 
<a name="l00222"></a>00222 }
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   233
 
<a name="l00223"></a>00223
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   234
 
<a name="l00224"></a>00224
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   235
 
<a name="l00225"></a>00225 <span class="keywordtype">void</span>
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   236
 
<a name="l00226"></a>00226 showunit(<span class="keyword">struct</span> unittype * theunit)
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   237
 
<a name="l00227"></a>00227 {
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   238
 
<a name="l00228"></a>00228         <span class="keywordtype">char</span> **ptr;
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   239
 
<a name="l00229"></a>00229         <span class="keywordtype">int</span> printedslash;
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   240
 
<a name="l00230"></a>00230         <span class="keywordtype">int</span> counter = 1;
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   241
 
<a name="l00231"></a>00231
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   242
 
<a name="l00232"></a>00232         printf(<span class="stringliteral">&quot;\t%.8g&quot;</span>, theunit-&gt;factor);
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   243
 
<a name="l00233"></a>00233         <span class="keywordflow">for</span> (ptr = theunit-&gt;numerator; *ptr; ptr++) {
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   244
 
<a name="l00234"></a>00234                 <span class="keywordflow">if</span> (ptr &gt; theunit-&gt;numerator &amp;&amp; **ptr &amp;&amp;
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   245
 
<a name="l00235"></a>00235                     !strcmp(*ptr, *(ptr - 1)))
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   246
 
<a name="l00236"></a>00236                         counter++;
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   247
 
<a name="l00237"></a>00237                 <span class="keywordflow">else</span> {
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   248
 
<a name="l00238"></a>00238                         <span class="keywordflow">if</span> (counter &gt; 1)
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   249
 
<a name="l00239"></a>00239                                 printf(<span class="stringliteral">&quot;%s%d&quot;</span>, powerstring, counter);
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   250
 
<a name="l00240"></a>00240                         <span class="keywordflow">if</span> (**ptr)
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   251
 
<a name="l00241"></a>00241                                 printf(<span class="stringliteral">&quot; %s&quot;</span>, *ptr);
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   252
 
<a name="l00242"></a>00242                         counter = 1;
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   253
 
<a name="l00243"></a>00243                 }
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   254
 
<a name="l00244"></a>00244         }
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   255
 
<a name="l00245"></a>00245         <span class="keywordflow">if</span> (counter &gt; 1)
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   256
 
<a name="l00246"></a>00246                 printf(<span class="stringliteral">&quot;%s%d&quot;</span>, powerstring, counter);
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   257
 
<a name="l00247"></a>00247         counter = 1;
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   258
 
<a name="l00248"></a>00248         printedslash = 0;
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   259
 
<a name="l00249"></a>00249         <span class="keywordflow">for</span> (ptr = theunit-&gt;denominator; *ptr; ptr++) {
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   260
 
<a name="l00250"></a>00250                 <span class="keywordflow">if</span> (ptr &gt; theunit-&gt;denominator &amp;&amp; **ptr &amp;&amp;
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   261
 
<a name="l00251"></a>00251                     !strcmp(*ptr, *(ptr - 1)))
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   262
 
<a name="l00252"></a>00252                         counter++;
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   263
 
<a name="l00253"></a>00253                 <span class="keywordflow">else</span> {
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   264
 
<a name="l00254"></a>00254                         <span class="keywordflow">if</span> (counter &gt; 1)
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   265
 
<a name="l00255"></a>00255                                 printf(<span class="stringliteral">&quot;%s%d&quot;</span>, powerstring, counter);
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   266
 
<a name="l00256"></a>00256                         <span class="keywordflow">if</span> (**ptr) {
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   267
 
<a name="l00257"></a>00257                                 <span class="keywordflow">if</span> (!printedslash)
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   268
 
<a name="l00258"></a>00258                                         printf(<span class="stringliteral">&quot; /&quot;</span>);
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   269
 
<a name="l00259"></a>00259                                 printedslash = 1;
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   270
 
<a name="l00260"></a>00260                                 printf(<span class="stringliteral">&quot; %s&quot;</span>, *ptr);
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   271
 
<a name="l00261"></a>00261                         }
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   272
 
<a name="l00262"></a>00262                         counter = 1;
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   273
 
<a name="l00263"></a>00263                 }
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   274
 
<a name="l00264"></a>00264         }
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   275
 
<a name="l00265"></a>00265         <span class="keywordflow">if</span> (counter &gt; 1)
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   276
 
<a name="l00266"></a>00266                 printf(<span class="stringliteral">&quot;%s%d&quot;</span>, powerstring, counter);
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   277
 
<a name="l00267"></a>00267         printf(<span class="stringliteral">&quot;\n&quot;</span>);
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   278
 
<a name="l00268"></a>00268 }
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   279
 
<a name="l00269"></a>00269
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   280
 
<a name="l00270"></a>00270
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   281
 
<a name="l00271"></a>00271 <span class="keywordtype">void</span>
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   282
 
<a name="l00272"></a>00272 zeroerror()
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   283
 
<a name="l00273"></a>00273 {
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   284
 
<a name="l00274"></a>00274         fprintf(stderr, <span class="stringliteral">&quot;Unit reduces to zero\n&quot;</span>);
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   285
 
<a name="l00275"></a>00275 }
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   286
 
<a name="l00276"></a>00276
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   287
 
<a name="l00277"></a>00277 <span class="comment">/*</span>
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   288
 
<a name="l00278"></a>00278 <span class="comment">   Adds the specified string to the unit.</span>
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   289
 
<a name="l00279"></a>00279 <span class="comment">   Flip is 0 for adding normally, 1 for adding reciprocal.</span>
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   290
 
<a name="l00280"></a>00280 <span class="comment"></span>
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   291
 
<a name="l00281"></a>00281 <span class="comment">   Returns 0 for successful addition, nonzero on error.</span>
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   292
 
<a name="l00282"></a>00282 <span class="comment">*/</span>
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   293
 
<a name="l00283"></a>00283
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   294
 
<a name="l00284"></a>00284 <span class="keywordtype">int</span>
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   295
 
<a name="l00285"></a>00285 addunit(<span class="keyword">struct</span> unittype * theunit, <span class="keywordtype">char</span> *toadd, <span class="keywordtype">int</span> flip)
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   296
 
<a name="l00286"></a>00286 {
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   297
 
<a name="l00287"></a>00287         <span class="keywordtype">char</span> *scratch, *savescr;
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   298
 
<a name="l00288"></a>00288         <span class="keywordtype">char</span> *item;
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   299
 
<a name="l00289"></a>00289         <span class="keywordtype">char</span> *divider, *slash;
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   300
 
<a name="l00290"></a>00290         <span class="keywordtype">int</span> doingtop;
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   301
 
<a name="l00291"></a>00291
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   302
 
<a name="l00292"></a>00292         savescr = scratch = dupstr(toadd);
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   303
 
<a name="l00293"></a>00293         <span class="keywordflow">for</span> (slash = scratch + 1; *slash; slash++)
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   304
 
<a name="l00294"></a>00294                 <span class="keywordflow">if</span> (*slash == <span class="charliteral">&#39;-&#39;</span> &amp;&amp;
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   305
 
<a name="l00295"></a>00295                     (tolower(*(slash - 1)) != <span class="charliteral">&#39;e&#39;</span> ||
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   306
 
<a name="l00296"></a>00296                     !strchr(<span class="stringliteral">&quot;.0123456789&quot;</span>, *(slash + 1))))
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   307
 
<a name="l00297"></a>00297                         *slash = <span class="charliteral">&#39; &#39;</span>;
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   308
 
<a name="l00298"></a>00298         slash = strchr(scratch, <span class="charliteral">&#39;/&#39;</span>);
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   309
 
<a name="l00299"></a>00299         <span class="keywordflow">if</span> (slash)
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   310
 
<a name="l00300"></a>00300                 *slash = 0;
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   311
 
<a name="l00301"></a>00301         doingtop = 1;
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   312
 
<a name="l00302"></a>00302         <span class="keywordflow">do</span> {
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   313
 
<a name="l00303"></a>00303                 item = strtok(scratch, <span class="stringliteral">&quot; *\t\n/&quot;</span>);
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   314
 
<a name="l00304"></a>00304                 <span class="keywordflow">while</span> (item) {
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   315
 
<a name="l00305"></a>00305                         <span class="keywordflow">if</span> (strchr(<span class="stringliteral">&quot;0123456789.&quot;</span>, *item)) { <span class="comment">/* item is a number */</span>
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   316
 
<a name="l00306"></a>00306                                 <span class="keywordtype">double</span> num;
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   317
 
<a name="l00307"></a>00307
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   318
 
<a name="l00308"></a>00308                                 divider = strchr(item, <span class="charliteral">&#39;|&#39;</span>);
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   319
 
<a name="l00309"></a>00309                                 <span class="keywordflow">if</span> (divider) {
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   320
 
<a name="l00310"></a>00310                                         *divider = 0;
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   321
 
<a name="l00311"></a>00311                                         num = atof(item);
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   322
 
<a name="l00312"></a>00312                                         <span class="keywordflow">if</span> (!num) {
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   323
 
<a name="l00313"></a>00313                                                 zeroerror();
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   324
 
<a name="l00314"></a>00314                                                 <span class="keywordflow">return</span> 1;
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   325
 
<a name="l00315"></a>00315                                         }
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   326
 
<a name="l00316"></a>00316                                         <span class="keywordflow">if</span> (doingtop ^ flip)
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   327
 
<a name="l00317"></a>00317                                                 theunit-&gt;factor *= num;
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   328
 
<a name="l00318"></a>00318                                         <span class="keywordflow">else</span>
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   329
 
<a name="l00319"></a>00319                                                 theunit-&gt;factor /= num;
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   330
 
<a name="l00320"></a>00320                                         num = atof(divider + 1);
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   331
 
<a name="l00321"></a>00321                                         <span class="keywordflow">if</span> (!num) {
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   332
 
<a name="l00322"></a>00322                                                 zeroerror();
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   333
 
<a name="l00323"></a>00323                                                 <span class="keywordflow">return</span> 1;
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   334
 
<a name="l00324"></a>00324                                         }
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   335
 
<a name="l00325"></a>00325                                         <span class="keywordflow">if</span> (doingtop ^ flip)
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   336
 
<a name="l00326"></a>00326                                                 theunit-&gt;factor /= num;
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   337
 
<a name="l00327"></a>00327                                         <span class="keywordflow">else</span>
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   338
 
<a name="l00328"></a>00328                                                 theunit-&gt;factor *= num;
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   339
 
<a name="l00329"></a>00329                                 }
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   340
 
<a name="l00330"></a>00330                                 <span class="keywordflow">else</span> {
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   341
 
<a name="l00331"></a>00331                                         num = atof(item);
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   342
 
<a name="l00332"></a>00332                                         <span class="keywordflow">if</span> (!num) {
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   343
 
<a name="l00333"></a>00333                                                 zeroerror();
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   344
 
<a name="l00334"></a>00334                                                 <span class="keywordflow">return</span> 1;
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   345
 
<a name="l00335"></a>00335                                         }
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   346
 
<a name="l00336"></a>00336                                         <span class="keywordflow">if</span> (doingtop ^ flip)
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   347
 
<a name="l00337"></a>00337                                                 theunit-&gt;factor *= num;
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   348
 
<a name="l00338"></a>00338                                         <span class="keywordflow">else</span>
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   349
 
<a name="l00339"></a>00339                                                 theunit-&gt;factor /= num;
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   350
 
<a name="l00340"></a>00340
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   351
 
<a name="l00341"></a>00341                                 }
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   352
 
<a name="l00342"></a>00342                         }
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   353
 
<a name="l00343"></a>00343                         <span class="keywordflow">else</span> {  <span class="comment">/* item is not a number */</span>
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   354
 
<a name="l00344"></a>00344                                 <span class="keywordtype">int</span> repeat = 1;
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   355
 
<a name="l00345"></a>00345
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   356
 
<a name="l00346"></a>00346                                 <span class="keywordflow">if</span> (strchr(<span class="stringliteral">&quot;23456789&quot;</span>,
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   357
 
<a name="l00347"></a>00347                                     item[strlen(item) - 1])) {
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   358
 
<a name="l00348"></a>00348                                         repeat = item[strlen(item) - 1] - <span class="charliteral">&#39;0&#39;</span>;
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   359
 
<a name="l00349"></a>00349                                         item[strlen(item) - 1] = 0;
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   360
 
<a name="l00350"></a>00350                                 }
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   361
 
<a name="l00351"></a>00351                                 <span class="keywordflow">for</span> (; repeat; repeat--)
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   362
 
<a name="l00352"></a>00352                                         <span class="keywordflow">if</span> (addsubunit(doingtop ^ flip ? theunit-&gt;numerator : theunit-&gt;denominator, item))
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   363
 
<a name="l00353"></a>00353                                                 <span class="keywordflow">return</span> 1;
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   364
 
<a name="l00354"></a>00354                         }
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   365
 
<a name="l00355"></a>00355                         item = strtok(NULL, <span class="stringliteral">&quot; *\t/\n&quot;</span>);
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   366
 
<a name="l00356"></a>00356                 }
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   367
 
<a name="l00357"></a>00357                 doingtop--;
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   368
 
<a name="l00358"></a>00358                 <span class="keywordflow">if</span> (slash) {
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   369
 
<a name="l00359"></a>00359                         scratch = slash + 1;
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   370
 
<a name="l00360"></a>00360                 }
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   371
 
<a name="l00361"></a>00361                 <span class="keywordflow">else</span>
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   372
 
<a name="l00362"></a>00362                         doingtop--;
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   373
 
<a name="l00363"></a>00363         } <span class="keywordflow">while</span> (doingtop &gt;= 0);
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   374
 
<a name="l00364"></a>00364         free(savescr);
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   375
 
<a name="l00365"></a>00365         <span class="keywordflow">return</span> 0;
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   376
 
<a name="l00366"></a>00366 }
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   377
 
<a name="l00367"></a>00367
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   378
 
<a name="l00368"></a>00368
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   379
 
<a name="l00369"></a>00369 <span class="keywordtype">int</span>
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   380
 
<a name="l00370"></a>00370 compare(<span class="keyword">const</span> <span class="keywordtype">void</span> *item1, <span class="keyword">const</span> <span class="keywordtype">void</span> *item2)
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   381
 
<a name="l00371"></a>00371 {
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   382
 
<a name="l00372"></a>00372         <span class="keywordflow">return</span> strcmp(*(<span class="keywordtype">char</span> **) item1, *(<span class="keywordtype">char</span> **) item2);
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   383
 
<a name="l00373"></a>00373 }
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   384
 
<a name="l00374"></a>00374
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   385
 
<a name="l00375"></a>00375
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   386
 
<a name="l00376"></a>00376 <span class="keywordtype">void</span>
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   387
 
<a name="l00377"></a>00377 sortunit(<span class="keyword">struct</span> unittype * theunit)
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   388
 
<a name="l00378"></a>00378 {
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   389
 
<a name="l00379"></a>00379         <span class="keywordtype">char</span> **ptr;
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   390
 
<a name="l00380"></a>00380         <span class="keywordtype">int</span> count;
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   391
 
<a name="l00381"></a>00381
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   392
 
<a name="l00382"></a>00382         <span class="keywordflow">for</span> (count = 0, ptr = theunit-&gt;numerator; *ptr; ptr++, count++){};
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   393
 
<a name="l00383"></a>00383         qsort(theunit-&gt;numerator, count, <span class="keyword">sizeof</span>(<span class="keywordtype">char</span> *), compare);
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   394
 
<a name="l00384"></a>00384         <span class="keywordflow">for</span> (count = 0, ptr = theunit-&gt;denominator; *ptr; ptr++, count++){};
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   395
 
<a name="l00385"></a>00385         qsort(theunit-&gt;denominator, count, <span class="keyword">sizeof</span>(<span class="keywordtype">char</span> *), compare);
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   396
 
<a name="l00386"></a>00386 }
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   397
 
<a name="l00387"></a>00387
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   398
 
<a name="l00388"></a>00388
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   399
 
<a name="l00389"></a>00389 <span class="keywordtype">void</span>
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   400
 
<a name="l00390"></a>00390 cancelunit(<span class="keyword">struct</span> unittype * theunit)
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   401
 
<a name="l00391"></a>00391 {
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   402
 
<a name="l00392"></a>00392         <span class="keywordtype">char</span> **den, **num;
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   403
 
<a name="l00393"></a>00393         <span class="keywordtype">int</span> comp;
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   404
 
<a name="l00394"></a>00394
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   405
 
<a name="l00395"></a>00395         den = theunit-&gt;denominator;
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   406
 
<a name="l00396"></a>00396         num = theunit-&gt;numerator;
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   407
 
<a name="l00397"></a>00397
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   408
 
<a name="l00398"></a>00398         <span class="keywordflow">while</span> (*num &amp;&amp; *den) {
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   409
 
<a name="l00399"></a>00399                 comp = strcmp(*den, *num);
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   410
 
<a name="l00400"></a>00400                 <span class="keywordflow">if</span> (!comp) {
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   411
 
<a name="l00401"></a>00401 <span class="comment">/*      if (*den!=NULLUNIT) free(*den);</span>
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   412
 
<a name="l00402"></a>00402 <span class="comment">      if (*num!=NULLUNIT) free(*num);*/</span>
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   413
 
<a name="l00403"></a>00403                         *den++ = NULLUNIT;
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   414
 
<a name="l00404"></a>00404                         *num++ = NULLUNIT;
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   415
 
<a name="l00405"></a>00405                 }
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   416
 
<a name="l00406"></a>00406                 <span class="keywordflow">else</span> <span class="keywordflow">if</span> (comp &lt; 0)
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   417
 
<a name="l00407"></a>00407                         den++;
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   418
 
<a name="l00408"></a>00408                 <span class="keywordflow">else</span>
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   419
 
<a name="l00409"></a>00409                         num++;
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   420
 
<a name="l00410"></a>00410         }
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   421
 
<a name="l00411"></a>00411 }
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   422
 
<a name="l00412"></a>00412
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   423
 
<a name="l00413"></a>00413
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   424
 
<a name="l00414"></a>00414
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   425
 
<a name="l00415"></a>00415
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   426
 
<a name="l00416"></a>00416 <span class="comment">/*</span>
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   427
 
<a name="l00417"></a>00417 <span class="comment">   Looks up the definition for the specified unit.</span>
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   428
 
<a name="l00418"></a>00418 <span class="comment">   Returns a pointer to the definition or a null pointer</span>
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   429
 
<a name="l00419"></a>00419 <span class="comment">   if the specified unit does not appear in the units table.</span>
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   430
 
<a name="l00420"></a>00420 <span class="comment">*/</span>
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   431
 
<a name="l00421"></a>00421
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   432
 
<a name="l00422"></a>00422 <span class="keyword">static</span> <span class="keywordtype">char</span> buffer[100];        <span class="comment">/* buffer for lookupunit answers with</span>
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   433
 
<a name="l00423"></a>00423 <span class="comment">                                   prefixes */</span>
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   434
 
<a name="l00424"></a>00424
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   435
 
<a name="l00425"></a>00425 <span class="keywordtype">char</span> *
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   436
 
<a name="l00426"></a>00426 lookupunit(<span class="keywordtype">char</span> *unit)
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   437
 
<a name="l00427"></a>00427 {
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   438
 
<a name="l00428"></a>00428         <span class="keywordtype">int</span> i;
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   439
 
<a name="l00429"></a>00429         <span class="keywordtype">char</span> *copy;
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   440
 
<a name="l00430"></a>00430
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   441
 
<a name="l00431"></a>00431         <span class="keywordflow">for</span> (i = 0; i &lt; unitcount; i++) {
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   442
 
<a name="l00432"></a>00432                 <span class="keywordflow">if</span> (!strcmp(unittable[i].uname, unit))
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   443
 
<a name="l00433"></a>00433                         <span class="keywordflow">return</span> unittable[i].uval;
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   444
 
<a name="l00434"></a>00434         }
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   445
 
<a name="l00435"></a>00435
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   446
 
<a name="l00436"></a>00436         <span class="keywordflow">if</span> (unit[strlen(unit) - 1] == <span class="charliteral">&#39;^&#39;</span>) {
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   447
 
<a name="l00437"></a>00437                 copy = dupstr(unit);
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   448
 
<a name="l00438"></a>00438                 copy[strlen(copy) - 1] = 0;
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   449
 
<a name="l00439"></a>00439                 <span class="keywordflow">for</span> (i = 0; i &lt; unitcount; i++) {
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   450
 
<a name="l00440"></a>00440                         <span class="keywordflow">if</span> (!strcmp(unittable[i].uname, copy)) {
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   451
 
<a name="l00441"></a>00441                                 strcpy(buffer, copy);
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   452
 
<a name="l00442"></a>00442                                 free(copy);
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   453
 
<a name="l00443"></a>00443                                 <span class="keywordflow">return</span> buffer;
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   454
 
<a name="l00444"></a>00444                         }
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   455
 
<a name="l00445"></a>00445                 }
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   456
 
<a name="l00446"></a>00446                 free(copy);
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   457
 
<a name="l00447"></a>00447         }
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   458
 
<a name="l00448"></a>00448         <span class="keywordflow">if</span> (unit[strlen(unit) - 1] == <span class="charliteral">&#39;s&#39;</span>) {
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   459
 
<a name="l00449"></a>00449                 copy = dupstr(unit);
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   460
 
<a name="l00450"></a>00450                 copy[strlen(copy) - 1] = 0;
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   461
 
<a name="l00451"></a>00451                 <span class="keywordflow">for</span> (i = 0; i &lt; unitcount; i++) {
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   462
 
<a name="l00452"></a>00452                         <span class="keywordflow">if</span> (!strcmp(unittable[i].uname, copy)) {
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   463
 
<a name="l00453"></a>00453                                 strcpy(buffer, copy);
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   464
 
<a name="l00454"></a>00454                                 free(copy);
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   465
 
<a name="l00455"></a>00455                                 <span class="keywordflow">return</span> buffer;
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   466
 
<a name="l00456"></a>00456                         }
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   467
 
<a name="l00457"></a>00457                 }
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   468
 
<a name="l00458"></a>00458                 <span class="keywordflow">if</span> (copy[strlen(copy) - 1] == <span class="charliteral">&#39;e&#39;</span>) {
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   469
 
<a name="l00459"></a>00459                         copy[strlen(copy) - 1] = 0;
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   470
 
<a name="l00460"></a>00460                         <span class="keywordflow">for</span> (i = 0; i &lt; unitcount; i++) {
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   471
 
<a name="l00461"></a>00461                                 <span class="keywordflow">if</span> (!strcmp(unittable[i].uname, copy)) {
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   472
 
<a name="l00462"></a>00462                                         strcpy(buffer, copy);
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   473
 
<a name="l00463"></a>00463                                         free(copy);
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   474
 
<a name="l00464"></a>00464                                         <span class="keywordflow">return</span> buffer;
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   475
 
<a name="l00465"></a>00465                                 }
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   476
 
<a name="l00466"></a>00466                         }
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   477
 
<a name="l00467"></a>00467                 }
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   478
 
<a name="l00468"></a>00468                 free(copy);
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   479
 
<a name="l00469"></a>00469         }
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   480
 
<a name="l00470"></a>00470         <span class="keywordflow">for</span> (i = 0; i &lt; prefixcount; i++) {
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   481
 
<a name="l00471"></a>00471                 <span class="keywordflow">if</span> (!strncmp(prefixtable[i].prefixname, unit,
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   482
 
<a name="l00472"></a>00472                         strlen(prefixtable[i].prefixname))) {
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   483
 
<a name="l00473"></a>00473                         unit += strlen(prefixtable[i].prefixname);
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   484
 
<a name="l00474"></a>00474                         <span class="keywordflow">if</span> (!strlen(unit) || lookupunit(unit)) {
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   485
 
<a name="l00475"></a>00475                                 strcpy(buffer, prefixtable[i].prefixval);
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   486
 
<a name="l00476"></a>00476                                 strcat(buffer, <span class="stringliteral">&quot; &quot;</span>);
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   487
 
<a name="l00477"></a>00477                                 strcat(buffer, unit);
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   488
 
<a name="l00478"></a>00478                                 <span class="keywordflow">return</span> buffer;
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   489
 
<a name="l00479"></a>00479                         }
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   490
 
<a name="l00480"></a>00480                 }
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   491
 
<a name="l00481"></a>00481         }
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   492
 
<a name="l00482"></a>00482         <span class="keywordflow">return</span> 0;
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   493
 
<a name="l00483"></a>00483 }
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   494
 
<a name="l00484"></a>00484
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   495
 
<a name="l00485"></a>00485
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   496
 
<a name="l00486"></a>00486
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   497
 
<a name="l00487"></a>00487 <span class="comment">/*</span>
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   498
 
<a name="l00488"></a>00488 <span class="comment">   reduces a product of symbolic units to primitive units.</span>
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   499
 
<a name="l00489"></a>00489 <span class="comment">   The three low bits are used to return flags:</span>
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   500
 
<a name="l00490"></a>00490 <span class="comment"></span>
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   501
 
<a name="l00491"></a>00491 <span class="comment">     bit 0 (1) set on if reductions were performed without error.</span>
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   502
 
<a name="l00492"></a>00492 <span class="comment">     bit 1 (2) set on if no reductions are performed.</span>
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   503
 
<a name="l00493"></a>00493 <span class="comment">     bit 2 (4) set on if an unknown unit is discovered.</span>
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   504
 
<a name="l00494"></a>00494 <span class="comment">*/</span>
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   505
 
<a name="l00495"></a>00495
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   506
 
<a name="l00496"></a>00496
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   507
 
<a name="l00497"></a>00497 <span class="preprocessor">#define ERROR 4</span>
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   508
 
<a name="l00498"></a>00498 <span class="preprocessor"></span>
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   509
 
<a name="l00499"></a>00499 <span class="keywordtype">int</span>
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   510
 
<a name="l00500"></a>00500 reduceproduct(<span class="keyword">struct</span> unittype * theunit, <span class="keywordtype">int</span> flip)
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   511
 
<a name="l00501"></a>00501 {
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   512
 
<a name="l00502"></a>00502
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   513
 
<a name="l00503"></a>00503         <span class="keywordtype">char</span> *toadd;
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   514
 
<a name="l00504"></a>00504         <span class="keywordtype">char</span> **product;
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   515
 
<a name="l00505"></a>00505         <span class="keywordtype">int</span> didsomething = 2;
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   516
 
<a name="l00506"></a>00506
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   517
 
<a name="l00507"></a>00507         <span class="keywordflow">if</span> (flip)
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   518
 
<a name="l00508"></a>00508                 product = theunit-&gt;denominator;
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   519
 
<a name="l00509"></a>00509         <span class="keywordflow">else</span>
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   520
 
<a name="l00510"></a>00510                 product = theunit-&gt;numerator;
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   521
 
<a name="l00511"></a>00511
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   522
 
<a name="l00512"></a>00512         <span class="keywordflow">for</span> (; *product; product++) {
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   523
 
<a name="l00513"></a>00513
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   524
 
<a name="l00514"></a>00514                 <span class="keywordflow">for</span> (;;) {
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   525
 
<a name="l00515"></a>00515                         <span class="keywordflow">if</span> (!strlen(*product))
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   526
 
<a name="l00516"></a>00516                                 <span class="keywordflow">break</span>;
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   527
 
<a name="l00517"></a>00517                         toadd = lookupunit(*product);
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   528
 
<a name="l00518"></a>00518                         <span class="keywordflow">if</span> (!toadd) {
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   529
 
<a name="l00519"></a>00519                                 printf(<span class="stringliteral">&quot;unknown unit &#39;%s&#39;\n&quot;</span>, *product);
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   530
 
<a name="l00520"></a>00520                                 <span class="keywordflow">return</span> ERROR;
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   531
 
<a name="l00521"></a>00521                         }
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   532
 
<a name="l00522"></a>00522                         <span class="keywordflow">if</span> (strchr(toadd, PRIMITIVECHAR))
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   533
 
<a name="l00523"></a>00523                                 <span class="keywordflow">break</span>;
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   534
 
<a name="l00524"></a>00524                         didsomething = 1;
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   535
 
<a name="l00525"></a>00525                         <span class="keywordflow">if</span> (*product != NULLUNIT) {
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   536
 
<a name="l00526"></a>00526                                 free(*product);
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   537
 
<a name="l00527"></a>00527                                 *product = NULLUNIT;
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   538
 
<a name="l00528"></a>00528                         }
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   539
 
<a name="l00529"></a>00529                         <span class="keywordflow">if</span> (addunit(theunit, toadd, flip))
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   540
 
<a name="l00530"></a>00530                                 <span class="keywordflow">return</span> ERROR;
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   541
 
<a name="l00531"></a>00531                 }
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   542
 
<a name="l00532"></a>00532         }
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   543
 
<a name="l00533"></a>00533         <span class="keywordflow">return</span> didsomething;
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   544
 
<a name="l00534"></a>00534 }
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   545
 
<a name="l00535"></a>00535
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   546
 
<a name="l00536"></a>00536
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   547
 
<a name="l00537"></a>00537 <span class="comment">/*</span>
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   548
 
<a name="l00538"></a>00538 <span class="comment">   Reduces numerator and denominator of the specified unit.</span>
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   549
 
<a name="l00539"></a>00539 <span class="comment">   Returns 0 on success, or 1 on unknown unit error.</span>
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   550
 
<a name="l00540"></a>00540 <span class="comment">*/</span>
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   551
 
<a name="l00541"></a>00541
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   552
 
<a name="l00542"></a>00542 <span class="keywordtype">int</span>
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   553
 
<a name="l00543"></a>00543 reduceunit(<span class="keyword">struct</span> unittype * theunit)
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   554
 
<a name="l00544"></a>00544 {
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   555
 
<a name="l00545"></a>00545         <span class="keywordtype">int</span> ret;
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   556
 
<a name="l00546"></a>00546
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   557
 
<a name="l00547"></a>00547         ret = 1;
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   558
 
<a name="l00548"></a>00548         <span class="keywordflow">while</span> (ret &amp; 1) {
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   559
 
<a name="l00549"></a>00549                 ret = reduceproduct(theunit, 0) | reduceproduct(theunit, 1);
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   560
 
<a name="l00550"></a>00550                 <span class="keywordflow">if</span> (ret &amp; 4)
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   561
 
<a name="l00551"></a>00551                         <span class="keywordflow">return</span> 1;
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   562
 
<a name="l00552"></a>00552         }
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   563
 
<a name="l00553"></a>00553         <span class="keywordflow">return</span> 0;
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   564
 
<a name="l00554"></a>00554 }
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   565
 
<a name="l00555"></a>00555
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   566
 
<a name="l00556"></a>00556
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   567
 
<a name="l00557"></a>00557 <span class="keywordtype">int</span>
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   568
 
<a name="l00558"></a>00558 compareproducts(<span class="keywordtype">char</span> **one, <span class="keywordtype">char</span> **two)
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   569
 
<a name="l00559"></a>00559 {
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   570
 
<a name="l00560"></a>00560         <span class="keywordflow">while</span> (*one || *two) {
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   571
 
<a name="l00561"></a>00561                 <span class="keywordflow">if</span> (!*one &amp;&amp; *two != NULLUNIT)
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   572
 
<a name="l00562"></a>00562                         <span class="keywordflow">return</span> 1;
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   573
 
<a name="l00563"></a>00563                 <span class="keywordflow">if</span> (!*two &amp;&amp; *one != NULLUNIT)
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   574
 
<a name="l00564"></a>00564                         <span class="keywordflow">return</span> 1;
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   575
 
<a name="l00565"></a>00565                 <span class="keywordflow">if</span> (*one == NULLUNIT)
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   576
 
<a name="l00566"></a>00566                         one++;
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   577
 
<a name="l00567"></a>00567                 <span class="keywordflow">else</span> <span class="keywordflow">if</span> (*two == NULLUNIT)
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   578
 
<a name="l00568"></a>00568                         two++;
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   579
 
<a name="l00569"></a>00569                 <span class="keywordflow">else</span> <span class="keywordflow">if</span> (strcmp(*one, *two))
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   580
 
<a name="l00570"></a>00570                         <span class="keywordflow">return</span> 1;
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   581
 
<a name="l00571"></a>00571                 <span class="keywordflow">else</span>
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   582
 
<a name="l00572"></a>00572                         one++, two++;
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   583
 
<a name="l00573"></a>00573         }
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   584
 
<a name="l00574"></a>00574         <span class="keywordflow">return</span> 0;
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   585
 
<a name="l00575"></a>00575 }
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   586
 
<a name="l00576"></a>00576
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   587
 
<a name="l00577"></a>00577
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   588
 
<a name="l00578"></a>00578 <span class="comment">/* Return zero if units are compatible, nonzero otherwise */</span>
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   589
 
<a name="l00579"></a>00579
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   590
 
<a name="l00580"></a>00580 <span class="keywordtype">int</span>
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   591
 
<a name="l00581"></a>00581 compareunits(<span class="keyword">struct</span> unittype * first, <span class="keyword">struct</span> unittype * second)
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   592
 
<a name="l00582"></a>00582 {
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   593
 
<a name="l00583"></a>00583         <span class="keywordflow">return</span>
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   594
 
<a name="l00584"></a>00584         compareproducts(first-&gt;numerator, second-&gt;numerator) ||
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   595
 
<a name="l00585"></a>00585         compareproducts(first-&gt;denominator, second-&gt;denominator);
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   596
 
<a name="l00586"></a>00586 }
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   597
 
<a name="l00587"></a>00587
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   598
 
<a name="l00588"></a>00588
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   599
 
<a name="l00589"></a>00589 <span class="keywordtype">int</span>
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   600
 
<a name="l00590"></a>00590 completereduce(<span class="keyword">struct</span> unittype * unit)
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   601
 
<a name="l00591"></a>00591 {
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   602
 
<a name="l00592"></a>00592         <span class="keywordflow">if</span> (reduceunit(unit))
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   603
 
<a name="l00593"></a>00593                 <span class="keywordflow">return</span> 1;
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   604
 
<a name="l00594"></a>00594         sortunit(unit);
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   605
 
<a name="l00595"></a>00595         cancelunit(unit);
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   606
 
<a name="l00596"></a>00596         <span class="keywordflow">return</span> 0;
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   607
 
<a name="l00597"></a>00597 }
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   608
 
<a name="l00598"></a>00598
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   609
 
<a name="l00599"></a>00599
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   610
 
<a name="l00600"></a>00600 <span class="keywordtype">void</span>
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   611
 
<a name="l00601"></a>00601 showanswer(<span class="keyword">struct</span> unittype * have, <span class="keyword">struct</span> unittype * want)
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   612
 
<a name="l00602"></a>00602 {
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   613
 
<a name="l00603"></a>00603         <span class="keywordflow">if</span> (compareunits(have, want)) {
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   614
 
<a name="l00604"></a>00604                 printf(<span class="stringliteral">&quot;conformability error\n&quot;</span>);
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   615
 
<a name="l00605"></a>00605                 showunit(have);
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   616
 
<a name="l00606"></a>00606                 showunit(want);
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   617
 
<a name="l00607"></a>00607         }
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   618
 
<a name="l00608"></a>00608         <span class="keywordflow">else</span>
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   619
 
<a name="l00609"></a>00609                 printf(<span class="stringliteral">&quot;\t* %.8g\n\t/ %.8g\n&quot;</span>, have-&gt;factor / want-&gt;factor,
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   620
 
<a name="l00610"></a>00610                     want-&gt;factor / have-&gt;factor);
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   621
 
<a name="l00611"></a>00611 }
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   622
 
<a name="l00612"></a>00612
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   623
 
<a name="l00613"></a>00613
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   624
 
<a name="l00614"></a>00614 <span class="keywordtype">void</span>
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   625
 
<a name="l00615"></a>00615 usage()
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   626
 
<a name="l00616"></a>00616 {
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   627
 
<a name="l00617"></a>00617         fprintf(stderr, <span class="stringliteral">&quot;\nunits [-f unitsfile] [-q] [-v] [from-unit to-unit]\n&quot;</span>);
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   628
 
<a name="l00618"></a>00618         fprintf(stderr, <span class="stringliteral">&quot;\n    -f specify units file\n&quot;</span>);
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   629
 
<a name="l00619"></a>00619         fprintf(stderr, <span class="stringliteral">&quot;    -q supress prompting (quiet)\n&quot;</span>);
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   630
 
<a name="l00620"></a>00620         fprintf(stderr, <span class="stringliteral">&quot;    -v print version number\n&quot;</span>);
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   631
 
<a name="l00621"></a>00621         exit(3);
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   632
 
<a name="l00622"></a>00622 }
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   633
 
<a name="l00623"></a>00623
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   634
 
<a name="l00624"></a>00624 <span class="keyword">extern</span> <span class="keywordtype">int</span> getopt(<span class="keywordtype">int</span>, <span class="keywordtype">char</span> **, <span class="keyword">const</span> <span class="keywordtype">char</span> *);
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   635
 
<a name="l00625"></a>00625
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   636
 
<a name="l00626"></a>00626 <span class="keywordtype">int</span>
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   637
 
<a name="l00627"></a>00627 <a class="code" href="redirectprintf_8c.html#a840291bc02cba5474a4cb46a9b9566fe">main</a>(<span class="keywordtype">int</span> argc, <span class="keywordtype">char</span> **argv)
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   638
 
<a name="l00628"></a>00628 {
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   639
 
<a name="l00629"></a>00629
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   640
 
<a name="l00630"></a>00630         <span class="keyword">struct </span>unittype have, want;
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   641
 
<a name="l00631"></a>00631         <span class="keywordtype">char</span> havestr[81], wantstr[81];
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   642
 
<a name="l00632"></a>00632         <span class="keywordtype">int</span> optchar;
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   643
 
<a name="l00633"></a>00633         <span class="keywordtype">char</span> *userfile = 0;
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   644
 
<a name="l00634"></a>00634         <span class="keywordtype">int</span> quiet = 0;
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   645
 
<a name="l00635"></a>00635
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   646
 
<a name="l00636"></a>00636         <span class="keyword">extern</span> <span class="keywordtype">char</span> *optarg;
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   647
 
<a name="l00637"></a>00637         <span class="keyword">extern</span> <span class="keywordtype">int</span> optind;
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   648
 
<a name="l00638"></a>00638
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   649
 
<a name="l00639"></a>00639         <span class="keywordflow">while</span> ((optchar = getopt(argc, argv, <span class="stringliteral">&quot;vqf:&quot;</span>)) != -1) {
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   650
 
<a name="l00640"></a>00640                 <span class="keywordflow">switch</span> (optchar) {
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   651
 
<a name="l00641"></a>00641                 <span class="keywordflow">case</span> <span class="charliteral">&#39;f&#39;</span>:
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   652
 
<a name="l00642"></a>00642                         userfile = optarg;
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   653
 
<a name="l00643"></a>00643                         <span class="keywordflow">break</span>;
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   654
 
<a name="l00644"></a>00644                 <span class="keywordflow">case</span> <span class="charliteral">&#39;q&#39;</span>:
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   655
 
<a name="l00645"></a>00645                         quiet = 1;
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   656
 
<a name="l00646"></a>00646                         <span class="keywordflow">break</span>;
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   657
 
<a name="l00647"></a>00647                 <span class="keywordflow">case</span> <span class="charliteral">&#39;v&#39;</span>:
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   658
 
<a name="l00648"></a>00648                         fprintf(stderr, <span class="stringliteral">&quot;\n  units version %s  Copyright (c) 1993 by Adrian Mariano\n&quot;</span>,
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   659
 
<a name="l00649"></a>00649                             VERSION);
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   660
 
<a name="l00650"></a>00650                         fprintf(stderr, <span class="stringliteral">&quot;                    This program may be freely distributed\n&quot;</span>);
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   661
 
<a name="l00651"></a>00651                         usage();
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   662
 
<a name="l00652"></a>00652                 <span class="keywordflow">default</span>:
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   663
 
<a name="l00653"></a>00653                         usage();
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   664
 
<a name="l00654"></a>00654                         <span class="keywordflow">break</span>;
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   665
 
<a name="l00655"></a>00655                 }
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   666
 
<a name="l00656"></a>00656         }
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   667
 
<a name="l00657"></a>00657
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   668
 
<a name="l00658"></a>00658         <span class="keywordflow">if</span> (optind != argc - 2 &amp;&amp; optind != argc)
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   669
 
<a name="l00659"></a>00659                 usage();
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   670
 
<a name="l00660"></a>00660
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   671
 
<a name="l00661"></a>00661         readunits(userfile);
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   672
 
<a name="l00662"></a>00662
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   673
 
<a name="l00663"></a>00663         <span class="keywordflow">if</span> (optind == argc - 2) {
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   674
 
<a name="l00664"></a>00664                 strcpy(havestr, argv[optind]);
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   675
 
<a name="l00665"></a>00665                 strcpy(wantstr, argv[optind + 1]);
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   676
 
<a name="l00666"></a>00666                 initializeunit(&amp;have);
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   677
 
<a name="l00667"></a>00667                 addunit(&amp;have, havestr, 0);
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   678
 
<a name="l00668"></a>00668                 completereduce(&amp;have);
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   679
 
<a name="l00669"></a>00669                 initializeunit(&amp;want);
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   680
 
<a name="l00670"></a>00670                 addunit(&amp;want, wantstr, 0);
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   681
 
<a name="l00671"></a>00671                 completereduce(&amp;want);
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   682
 
<a name="l00672"></a>00672                 showanswer(&amp;have, &amp;want);
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   683
 
<a name="l00673"></a>00673         }
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   684
 
<a name="l00674"></a>00674         <span class="keywordflow">else</span> {
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   685
 
<a name="l00675"></a>00675                 <span class="keywordflow">if</span> (!quiet)
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   686
 
<a name="l00676"></a>00676                         printf(<span class="stringliteral">&quot;%d units, %d prefixes\n\n&quot;</span>, unitcount,
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   687
 
<a name="l00677"></a>00677                             prefixcount);
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   688
 
<a name="l00678"></a>00678                 <span class="keywordflow">for</span> (;;) {
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   689
 
<a name="l00679"></a>00679                         <span class="keywordflow">do</span> {
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   690
 
<a name="l00680"></a>00680                                 initializeunit(&amp;have);
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   691
 
<a name="l00681"></a>00681                                 <span class="keywordflow">if</span> (!quiet)
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   692
 
<a name="l00682"></a>00682                                         printf(<span class="stringliteral">&quot;You have: &quot;</span>);
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   693
 
<a name="l00683"></a>00683                                 <span class="keywordflow">if</span> (!fgets(havestr, 80, stdin)) {
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   694
 
<a name="l00684"></a>00684                                         <span class="keywordflow">if</span> (!quiet)
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   695
 
<a name="l00685"></a>00685                                                 putchar(<span class="charliteral">&#39;\n&#39;</span>);
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   696
 
<a name="l00686"></a>00686                                         exit(0);
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   697
 
<a name="l00687"></a>00687                                 }
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   698
 
<a name="l00688"></a>00688                         } <span class="keywordflow">while</span> (addunit(&amp;have, havestr, 0) ||
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   699
 
<a name="l00689"></a>00689                             completereduce(&amp;have));
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   700
 
<a name="l00690"></a>00690                         <span class="keywordflow">do</span> {
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   701
 
<a name="l00691"></a>00691                                 initializeunit(&amp;want);
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   702
 
<a name="l00692"></a>00692                                 <span class="keywordflow">if</span> (!quiet)
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   703
 
<a name="l00693"></a>00693                                         printf(<span class="stringliteral">&quot;You want: &quot;</span>);
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   704
 
<a name="l00694"></a>00694                                 <span class="keywordflow">if</span> (!fgets(wantstr, 80, stdin)) {
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   705
 
<a name="l00695"></a>00695                                         <span class="keywordflow">if</span> (!quiet)
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   706
 
<a name="l00696"></a>00696                                                 putchar(<span class="charliteral">&#39;\n&#39;</span>);
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   707
 
<a name="l00697"></a>00697                                         exit(0);
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   708
 
<a name="l00698"></a>00698                                 }
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   709
 
<a name="l00699"></a>00699                         } <span class="keywordflow">while</span> (addunit(&amp;want, wantstr, 0) ||
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   710
 
<a name="l00700"></a>00700                             completereduce(&amp;want));
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   711
 
<a name="l00701"></a>00701                         showanswer(&amp;have, &amp;want);
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   712
 
<a name="l00702"></a>00702                 }
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   713
 
<a name="l00703"></a>00703         }
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   714
 
<a name="l00704"></a>00704
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   715
 
<a name="l00705"></a>00705         <span class="keywordflow">return</span>(0);
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   716
 
<a name="l00706"></a>00706 }
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   717
 
<a name="l00707"></a>00707
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   718
 
</pre></div></div>
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   719
 
<hr size="1"/><address style="text-align: right;"><small>Generated by&nbsp;
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   720
 
<a href="http://www.doxygen.org/index.html">
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   721
 
<img class="footer" src="doxygen.png" alt="doxygen"/></a> 1.6.2 </small></address>
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   722
 
</body>
43e37759235e Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff changeset 
   723
 
</html>
MCL/sftools/depl/docscontent