author | Dominic Pinkman <Dominic.Pinkman@Nokia.com> |
Tue, 30 Mar 2010 16:16:55 +0100 | |
changeset 6 | 43e37759235e |
permissions | -rw-r--r-- |
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 "Eclipse Public License v1.0"</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 "http://www.eclipse.org/legal/epl-v10.html".</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 <ctype.h></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 <stdio.h></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 <string.h></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 <stdlib.h></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 "PATHNAME.H"</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 "1.0"</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 '!'</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">"^"</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">""</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">"Memory allocation error\n"</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">"Error in units file '%s' line %d\n"</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">"rt"</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">"Unable to open units file '%s'\n"</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">"rt"</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">"PATH"</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">';'</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">";"</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">":"</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">""</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">"/"</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">"rt"</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">"Can't find units file '%s'\n"</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">'/'</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">" \n\t"</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">" \n\t"</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">'-'</span>) { <span class="comment">/* it'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">"Memory for prefixes exceeded in line %d\n"</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 < 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">"Redefinition of prefix '%s' on line %d ignored\n"</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">" \n\t"</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">"\n\t"</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'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">"Memory for units exceeded in line %d\n"</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 < 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">"Redefinition of unit '%s' on line %d ignored\n"</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">" \n\t"</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">"\n\t"</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->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->numerator[0] = theunit->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 && *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 >= 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">"Memory overflow in unit reduction\n"</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">"\t%.8g"</span>, theunit->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->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 > theunit->numerator && **ptr && |
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 > 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">"%s%d"</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">" %s"</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 > 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">"%s%d"</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->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 > theunit->denominator && **ptr && |
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 > 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">"%s%d"</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">" /"</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">" %s"</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 > 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">"%s%d"</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">"\n"</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">"Unit reduces to zero\n"</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">'-'</span> && |
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">'e'</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">".0123456789"</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">' '</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">'/'</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">" *\t\n/"</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">"0123456789."</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">'|'</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->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->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->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->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->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->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">"23456789"</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">'0'</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->numerator : theunit->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">" *\t/\n"</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 >= 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->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->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->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->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->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->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 && *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 < 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 < 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">'^'</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 < 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">'s'</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 < 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">'e'</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 < 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 < 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">" "</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->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->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">"unknown unit '%s'\n"</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 & 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 & 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 && *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 && *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->numerator, second->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->denominator, second->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">"conformability error\n"</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">"\t* %.8g\n\t/ %.8g\n"</span>, have->factor / want->factor, |
43e37759235e
Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff
changeset
|
620 |
<a name="l00610"></a>00610 want->factor / have->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">"\nunits [-f unitsfile] [-q] [-v] [from-unit to-unit]\n"</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">"\n -f specify units file\n"</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">" -q supress prompting (quiet)\n"</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">" -v print version number\n"</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">"vqf:"</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">'f'</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">'q'</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">'v'</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">"\n units version %s Copyright (c) 1993 by Adrian Mariano\n"</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">" This program may be freely distributed\n"</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 && 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(&have); |
43e37759235e
Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff
changeset
|
677 |
<a name="l00667"></a>00667 addunit(&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(&have); |
43e37759235e
Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff
changeset
|
679 |
<a name="l00669"></a>00669 initializeunit(&want); |
43e37759235e
Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff
changeset
|
680 |
<a name="l00670"></a>00670 addunit(&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(&want); |
43e37759235e
Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff
changeset
|
682 |
<a name="l00672"></a>00672 showanswer(&have, &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">"%d units, %d prefixes\n\n"</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(&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">"You have: "</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">'\n'</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(&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(&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(&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">"You want: "</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">'\n'</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(&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(&want)); |
43e37759235e
Week 12 contribution of example code"
Dominic Pinkman <Dominic.Pinkman@Nokia.com>
parents:
diff
changeset
|
711 |
<a name="l00701"></a>00701 showanswer(&have, &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 |
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> |