1 <!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd"> |
|
2 <html xmlns="http://www.w3.org/1999/xhtml"> |
|
3 <head> |
|
4 <meta http-equiv="Content-Type" content="text/xhtml;charset=UTF-8"/> |
|
5 <title>TB9.2 Example Applications: examples/PIPS/antiword/src/out2window.c Source File</title> |
|
6 <link href="tabs.css" rel="stylesheet" type="text/css"/> |
|
7 <link href="doxygen.css" rel="stylesheet" type="text/css"/> |
|
8 </head> |
|
9 <body> |
|
10 <!-- Generated by Doxygen 1.6.2 --> |
|
11 <h1>examples/PIPS/antiword/src/out2window.c</h1><div class="fragment"><pre class="fragment"><a name="l00001"></a>00001 <span class="comment">/*</span> |
|
12 <a name="l00002"></a>00002 <span class="comment"> * out2window.c</span> |
|
13 <a name="l00003"></a>00003 <span class="comment"> * Copyright (C) 1998-2005 A.J. van Os; Released under GPL</span> |
|
14 <a name="l00004"></a>00004 <span class="comment"> *</span> |
|
15 <a name="l00005"></a>00005 <span class="comment"> * Description:</span> |
|
16 <a name="l00006"></a>00006 <span class="comment"> * Output to a text window</span> |
|
17 <a name="l00007"></a>00007 <span class="comment"> */</span> |
|
18 <a name="l00008"></a>00008 |
|
19 <a name="l00009"></a>00009 <span class="preprocessor">#include <string.h></span> |
|
20 <a name="l00010"></a>00010 <span class="preprocessor">#include <stdlib.h></span> |
|
21 <a name="l00011"></a>00011 <span class="preprocessor">#include <ctype.h></span> |
|
22 <a name="l00012"></a>00012 <span class="preprocessor">#include "antiword.h"</span> |
|
23 <a name="l00013"></a>00013 |
|
24 <a name="l00014"></a>00014 <span class="comment">/* Used for numbering the chapters */</span> |
|
25 <a name="l00015"></a>00015 <span class="keyword">static</span> <span class="keywordtype">unsigned</span> <span class="keywordtype">int</span> auiHdrCounter[9]; |
|
26 <a name="l00016"></a>00016 |
|
27 <a name="l00017"></a>00017 |
|
28 <a name="l00018"></a>00018 <span class="comment">/*</span> |
|
29 <a name="l00019"></a>00019 <span class="comment"> * vString2Diagram - put a string into a diagram</span> |
|
30 <a name="l00020"></a>00020 <span class="comment"> */</span> |
|
31 <a name="l00021"></a>00021 <span class="keyword">static</span> <span class="keywordtype">void</span> |
|
32 <a name="l00022"></a>00022 vString2Diagram(diagram_type *pDiag, output_type *pAnchor) |
|
33 <a name="l00023"></a>00023 { |
|
34 <a name="l00024"></a>00024 output_type *pOutput; |
|
35 <a name="l00025"></a>00025 <span class="keywordtype">long</span> lWidth; |
|
36 <a name="l00026"></a>00026 USHORT usMaxFontSize; |
|
37 <a name="l00027"></a>00027 |
|
38 <a name="l00028"></a>00028 TRACE_MSG(<span class="stringliteral">"vString2Diagram"</span>); |
|
39 <a name="l00029"></a>00029 |
|
40 <a name="l00030"></a>00030 fail(pDiag == NULL); |
|
41 <a name="l00031"></a>00031 fail(pAnchor == NULL); |
|
42 <a name="l00032"></a>00032 |
|
43 <a name="l00033"></a>00033 <span class="comment">/* Compute the maximum fontsize in this string */</span> |
|
44 <a name="l00034"></a>00034 usMaxFontSize = MIN_FONT_SIZE; |
|
45 <a name="l00035"></a>00035 <span class="keywordflow">for</span> (pOutput = pAnchor; pOutput != NULL; pOutput = pOutput->pNext) { |
|
46 <a name="l00036"></a>00036 <span class="keywordflow">if</span> (pOutput->usFontSize > usMaxFontSize) { |
|
47 <a name="l00037"></a>00037 usMaxFontSize = pOutput->usFontSize; |
|
48 <a name="l00038"></a>00038 } |
|
49 <a name="l00039"></a>00039 } |
|
50 <a name="l00040"></a>00040 |
|
51 <a name="l00041"></a>00041 <span class="comment">/* Goto the next line */</span> |
|
52 <a name="l00042"></a>00042 vMove2NextLine(pDiag, pAnchor->tFontRef, usMaxFontSize); |
|
53 <a name="l00043"></a>00043 |
|
54 <a name="l00044"></a>00044 <span class="comment">/* Output all substrings */</span> |
|
55 <a name="l00045"></a>00045 <span class="keywordflow">for</span> (pOutput = pAnchor; pOutput != NULL; pOutput = pOutput->pNext) { |
|
56 <a name="l00046"></a>00046 lWidth = lMilliPoints2DrawUnits(pOutput->lStringWidth); |
|
57 <a name="l00047"></a>00047 vSubstring2Diagram(pDiag, pOutput->szStorage, |
|
58 <a name="l00048"></a>00048 pOutput->tNextFree, lWidth, pOutput->ucFontColor, |
|
59 <a name="l00049"></a>00049 pOutput->usFontStyle, pOutput->tFontRef, |
|
60 <a name="l00050"></a>00050 pOutput->usFontSize, usMaxFontSize); |
|
61 <a name="l00051"></a>00051 } |
|
62 <a name="l00052"></a>00052 |
|
63 <a name="l00053"></a>00053 <span class="comment">/* Goto the start of the line */</span> |
|
64 <a name="l00054"></a>00054 pDiag->lXleft = 0; |
|
65 <a name="l00055"></a>00055 TRACE_MSG(<span class="stringliteral">"leaving vString2Diagram"</span>); |
|
66 <a name="l00056"></a>00056 } <span class="comment">/* end of vString2Diagram */</span> |
|
67 <a name="l00057"></a>00057 |
|
68 <a name="l00058"></a>00058 <span class="comment">/*</span> |
|
69 <a name="l00059"></a>00059 <span class="comment"> * vSetLeftIndentation - set the left indentation of the specified diagram</span> |
|
70 <a name="l00060"></a>00060 <span class="comment"> */</span> |
|
71 <a name="l00061"></a>00061 <span class="keywordtype">void</span> |
|
72 <a name="l00062"></a>00062 vSetLeftIndentation(diagram_type *pDiag, <span class="keywordtype">long</span> lLeftIndentation) |
|
73 <a name="l00063"></a>00063 { |
|
74 <a name="l00064"></a>00064 <span class="keywordtype">long</span> lX; |
|
75 <a name="l00065"></a>00065 |
|
76 <a name="l00066"></a>00066 TRACE_MSG(<span class="stringliteral">"vSetLeftIndentation"</span>); |
|
77 <a name="l00067"></a>00067 |
|
78 <a name="l00068"></a>00068 fail(pDiag == NULL); |
|
79 <a name="l00069"></a>00069 fail(lLeftIndentation < 0); |
|
80 <a name="l00070"></a>00070 |
|
81 <a name="l00071"></a>00071 lX = lMilliPoints2DrawUnits(lLeftIndentation); |
|
82 <a name="l00072"></a>00072 <span class="keywordflow">if</span> (lX > 0) { |
|
83 <a name="l00073"></a>00073 pDiag->lXleft = lX; |
|
84 <a name="l00074"></a>00074 } <span class="keywordflow">else</span> { |
|
85 <a name="l00075"></a>00075 pDiag->lXleft = 0; |
|
86 <a name="l00076"></a>00076 } |
|
87 <a name="l00077"></a>00077 } <span class="comment">/* end of vSetLeftIndentation */</span> |
|
88 <a name="l00078"></a>00078 |
|
89 <a name="l00079"></a>00079 <span class="comment">/*</span> |
|
90 <a name="l00080"></a>00080 <span class="comment"> * lComputeNetWidth - compute the net string width</span> |
|
91 <a name="l00081"></a>00081 <span class="comment"> */</span> |
|
92 <a name="l00082"></a>00082 <span class="keyword">static</span> <span class="keywordtype">long</span> |
|
93 <a name="l00083"></a>00083 lComputeNetWidth(output_type *pAnchor) |
|
94 <a name="l00084"></a>00084 { |
|
95 <a name="l00085"></a>00085 output_type *pTmp; |
|
96 <a name="l00086"></a>00086 <span class="keywordtype">long</span> lNetWidth; |
|
97 <a name="l00087"></a>00087 |
|
98 <a name="l00088"></a>00088 TRACE_MSG(<span class="stringliteral">"lComputeNetWidth"</span>); |
|
99 <a name="l00089"></a>00089 |
|
100 <a name="l00090"></a>00090 fail(pAnchor == NULL); |
|
101 <a name="l00091"></a>00091 |
|
102 <a name="l00092"></a>00092 <span class="comment">/* Step 1: Count all but the last sub-string */</span> |
|
103 <a name="l00093"></a>00093 lNetWidth = 0; |
|
104 <a name="l00094"></a>00094 <span class="keywordflow">for</span> (pTmp = pAnchor; pTmp->pNext != NULL; pTmp = pTmp->pNext) { |
|
105 <a name="l00095"></a>00095 fail(pTmp->lStringWidth < 0); |
|
106 <a name="l00096"></a>00096 lNetWidth += pTmp->lStringWidth; |
|
107 <a name="l00097"></a>00097 } |
|
108 <a name="l00098"></a>00098 fail(pTmp == NULL); |
|
109 <a name="l00099"></a>00099 fail(pTmp->pNext != NULL); |
|
110 <a name="l00100"></a>00100 |
|
111 <a name="l00101"></a>00101 <span class="comment">/* Step 2: remove the white-space from the end of the string */</span> |
|
112 <a name="l00102"></a>00102 <span class="keywordflow">while</span> (pTmp->tNextFree != 0 && |
|
113 <a name="l00103"></a>00103 isspace((<span class="keywordtype">int</span>)(UCHAR)pTmp->szStorage[pTmp->tNextFree - 1])) { |
|
114 <a name="l00104"></a>00104 pTmp->szStorage[pTmp->tNextFree - 1] = <span class="charliteral">'\0'</span>; |
|
115 <a name="l00105"></a>00105 pTmp->tNextFree--; |
|
116 <a name="l00106"></a>00106 NO_DBG_DEC(pTmp->lStringWidth); |
|
117 <a name="l00107"></a>00107 pTmp->lStringWidth = lComputeStringWidth( |
|
118 <a name="l00108"></a>00108 pTmp->szStorage, |
|
119 <a name="l00109"></a>00109 pTmp->tNextFree, |
|
120 <a name="l00110"></a>00110 pTmp->tFontRef, |
|
121 <a name="l00111"></a>00111 pTmp->usFontSize); |
|
122 <a name="l00112"></a>00112 NO_DBG_DEC(pTmp->lStringWidth); |
|
123 <a name="l00113"></a>00113 } |
|
124 <a name="l00114"></a>00114 |
|
125 <a name="l00115"></a>00115 <span class="comment">/* Step 3: Count the last sub-string */</span> |
|
126 <a name="l00116"></a>00116 lNetWidth += pTmp->lStringWidth; |
|
127 <a name="l00117"></a>00117 <span class="keywordflow">return</span> lNetWidth; |
|
128 <a name="l00118"></a>00118 } <span class="comment">/* end of lComputeNetWidth */</span> |
|
129 <a name="l00119"></a>00119 |
|
130 <a name="l00120"></a>00120 <span class="comment">/*</span> |
|
131 <a name="l00121"></a>00121 <span class="comment"> * iComputeHoles - compute number of holes</span> |
|
132 <a name="l00122"></a>00122 <span class="comment"> * (A hole is a number of whitespace characters followed by a</span> |
|
133 <a name="l00123"></a>00123 <span class="comment"> * non-whitespace character)</span> |
|
134 <a name="l00124"></a>00124 <span class="comment"> */</span> |
|
135 <a name="l00125"></a>00125 <span class="keyword">static</span> <span class="keywordtype">int</span> |
|
136 <a name="l00126"></a>00126 iComputeHoles(output_type *pAnchor) |
|
137 <a name="l00127"></a>00127 { |
|
138 <a name="l00128"></a>00128 output_type *pTmp; |
|
139 <a name="l00129"></a>00129 <span class="keywordtype">size_t</span> tIndex; |
|
140 <a name="l00130"></a>00130 <span class="keywordtype">int</span> iCounter; |
|
141 <a name="l00131"></a>00131 BOOL bWasSpace, bIsSpace; |
|
142 <a name="l00132"></a>00132 |
|
143 <a name="l00133"></a>00133 TRACE_MSG(<span class="stringliteral">"iComputeHoles"</span>); |
|
144 <a name="l00134"></a>00134 |
|
145 <a name="l00135"></a>00135 fail(pAnchor == NULL); |
|
146 <a name="l00136"></a>00136 |
|
147 <a name="l00137"></a>00137 iCounter = 0; |
|
148 <a name="l00138"></a>00138 bIsSpace = FALSE; |
|
149 <a name="l00139"></a>00139 <span class="comment">/* Count the holes */</span> |
|
150 <a name="l00140"></a>00140 <span class="keywordflow">for</span> (pTmp = pAnchor; pTmp != NULL; pTmp = pTmp->pNext) { |
|
151 <a name="l00141"></a>00141 fail(pTmp->tNextFree != strlen(pTmp->szStorage)); |
|
152 <a name="l00142"></a>00142 <span class="keywordflow">for</span> (tIndex = 0; tIndex <= pTmp->tNextFree; tIndex++) { |
|
153 <a name="l00143"></a>00143 bWasSpace = bIsSpace; |
|
154 <a name="l00144"></a>00144 bIsSpace = isspace((<span class="keywordtype">int</span>)(UCHAR)pTmp->szStorage[tIndex]); |
|
155 <a name="l00145"></a>00145 <span class="keywordflow">if</span> (bWasSpace && !bIsSpace) { |
|
156 <a name="l00146"></a>00146 iCounter++; |
|
157 <a name="l00147"></a>00147 } |
|
158 <a name="l00148"></a>00148 } |
|
159 <a name="l00149"></a>00149 } |
|
160 <a name="l00150"></a>00150 <span class="keywordflow">return</span> iCounter; |
|
161 <a name="l00151"></a>00151 } <span class="comment">/* end of iComputeHoles */</span> |
|
162 <a name="l00152"></a>00152 |
|
163 <a name="l00153"></a>00153 <span class="comment">/*</span> |
|
164 <a name="l00154"></a>00154 <span class="comment"> * vAlign2Window - Align a string and insert it into the text</span> |
|
165 <a name="l00155"></a>00155 <span class="comment"> */</span> |
|
166 <a name="l00156"></a>00156 <span class="keywordtype">void</span> |
|
167 <a name="l00157"></a>00157 vAlign2Window(diagram_type *pDiag, output_type *pAnchor, |
|
168 <a name="l00158"></a>00158 <span class="keywordtype">long</span> lScreenWidth, UCHAR ucAlignment) |
|
169 <a name="l00159"></a>00159 { |
|
170 <a name="l00160"></a>00160 <span class="keywordtype">long</span> lNetWidth, lLeftIndentation; |
|
171 <a name="l00161"></a>00161 |
|
172 <a name="l00162"></a>00162 TRACE_MSG(<span class="stringliteral">"vAlign2Window"</span>); |
|
173 <a name="l00163"></a>00163 |
|
174 <a name="l00164"></a>00164 fail(pDiag == NULL || pAnchor == NULL); |
|
175 <a name="l00165"></a>00165 fail(lScreenWidth < lChar2MilliPoints(MIN_SCREEN_WIDTH)); |
|
176 <a name="l00166"></a>00166 |
|
177 <a name="l00167"></a>00167 lNetWidth = lComputeNetWidth(pAnchor); |
|
178 <a name="l00168"></a>00168 |
|
179 <a name="l00169"></a>00169 <span class="keywordflow">if</span> (lScreenWidth > lChar2MilliPoints(MAX_SCREEN_WIDTH) || |
|
180 <a name="l00170"></a>00170 lNetWidth <= 0) { |
|
181 <a name="l00171"></a>00171 <span class="comment">/*</span> |
|
182 <a name="l00172"></a>00172 <span class="comment"> * Screenwidth is "infinite", so no alignment is possible</span> |
|
183 <a name="l00173"></a>00173 <span class="comment"> * Don't bother to align an empty line</span> |
|
184 <a name="l00174"></a>00174 <span class="comment"> */</span> |
|
185 <a name="l00175"></a>00175 vString2Diagram(pDiag, pAnchor); |
|
186 <a name="l00176"></a>00176 TRACE_MSG(<span class="stringliteral">"leaving vAlign2Window #1"</span>); |
|
187 <a name="l00177"></a>00177 <span class="keywordflow">return</span>; |
|
188 <a name="l00178"></a>00178 } |
|
189 <a name="l00179"></a>00179 |
|
190 <a name="l00180"></a>00180 <span class="keywordflow">switch</span> (ucAlignment) { |
|
191 <a name="l00181"></a>00181 <span class="keywordflow">case</span> ALIGNMENT_CENTER: |
|
192 <a name="l00182"></a>00182 lLeftIndentation = (lScreenWidth - lNetWidth) / 2; |
|
193 <a name="l00183"></a>00183 DBG_DEC_C(lLeftIndentation < 0, lLeftIndentation); |
|
194 <a name="l00184"></a>00184 <span class="keywordflow">if</span> (lLeftIndentation > 0) { |
|
195 <a name="l00185"></a>00185 vSetLeftIndentation(pDiag, lLeftIndentation); |
|
196 <a name="l00186"></a>00186 } |
|
197 <a name="l00187"></a>00187 <span class="keywordflow">break</span>; |
|
198 <a name="l00188"></a>00188 <span class="keywordflow">case</span> ALIGNMENT_RIGHT: |
|
199 <a name="l00189"></a>00189 lLeftIndentation = lScreenWidth - lNetWidth; |
|
200 <a name="l00190"></a>00190 DBG_DEC_C(lLeftIndentation < 0, lLeftIndentation); |
|
201 <a name="l00191"></a>00191 <span class="keywordflow">if</span> (lLeftIndentation > 0) { |
|
202 <a name="l00192"></a>00192 vSetLeftIndentation(pDiag, lLeftIndentation); |
|
203 <a name="l00193"></a>00193 } |
|
204 <a name="l00194"></a>00194 <span class="keywordflow">break</span>; |
|
205 <a name="l00195"></a>00195 <span class="keywordflow">case</span> ALIGNMENT_JUSTIFY: |
|
206 <a name="l00196"></a>00196 <span class="keywordflow">case</span> ALIGNMENT_LEFT: |
|
207 <a name="l00197"></a>00197 <span class="keywordflow">default</span>: |
|
208 <a name="l00198"></a>00198 <span class="keywordflow">break</span>; |
|
209 <a name="l00199"></a>00199 } |
|
210 <a name="l00200"></a>00200 vString2Diagram(pDiag, pAnchor); |
|
211 <a name="l00201"></a>00201 TRACE_MSG(<span class="stringliteral">"leaving vAlign2Window #2"</span>); |
|
212 <a name="l00202"></a>00202 } <span class="comment">/* end of vAlign2Window */</span> |
|
213 <a name="l00203"></a>00203 |
|
214 <a name="l00204"></a>00204 <span class="comment">/*</span> |
|
215 <a name="l00205"></a>00205 <span class="comment"> * vJustify2Window - Justify a string and insert it into the text</span> |
|
216 <a name="l00206"></a>00206 <span class="comment"> */</span> |
|
217 <a name="l00207"></a>00207 <span class="keywordtype">void</span> |
|
218 <a name="l00208"></a>00208 vJustify2Window(diagram_type *pDiag, output_type *pAnchor, |
|
219 <a name="l00209"></a>00209 <span class="keywordtype">long</span> lScreenWidth, <span class="keywordtype">long</span> lRightIndentation, UCHAR ucAlignment) |
|
220 <a name="l00210"></a>00210 { |
|
221 <a name="l00211"></a>00211 output_type *pTmp; |
|
222 <a name="l00212"></a>00212 <span class="keywordtype">char</span> *pcNew, *pcOld, *szStorage; |
|
223 <a name="l00213"></a>00213 <span class="keywordtype">long</span> lNetWidth, lSpaceWidth, lToAdd; |
|
224 <a name="l00214"></a>00214 <span class="keywordtype">int</span> iFillerLen, iHoles; |
|
225 <a name="l00215"></a>00215 |
|
226 <a name="l00216"></a>00216 TRACE_MSG(<span class="stringliteral">"vJustify2Window"</span>); |
|
227 <a name="l00217"></a>00217 |
|
228 <a name="l00218"></a>00218 fail(pDiag == NULL || pAnchor == NULL); |
|
229 <a name="l00219"></a>00219 fail(lScreenWidth < MIN_SCREEN_WIDTH); |
|
230 <a name="l00220"></a>00220 fail(lRightIndentation > 0); |
|
231 <a name="l00221"></a>00221 |
|
232 <a name="l00222"></a>00222 <span class="keywordflow">if</span> (ucAlignment != ALIGNMENT_JUSTIFY) { |
|
233 <a name="l00223"></a>00223 vAlign2Window(pDiag, pAnchor, lScreenWidth, ucAlignment); |
|
234 <a name="l00224"></a>00224 <span class="keywordflow">return</span>; |
|
235 <a name="l00225"></a>00225 } |
|
236 <a name="l00226"></a>00226 |
|
237 <a name="l00227"></a>00227 lNetWidth = lComputeNetWidth(pAnchor); |
|
238 <a name="l00228"></a>00228 |
|
239 <a name="l00229"></a>00229 <span class="keywordflow">if</span> (lScreenWidth > lChar2MilliPoints(MAX_SCREEN_WIDTH) || |
|
240 <a name="l00230"></a>00230 lNetWidth <= 0) { |
|
241 <a name="l00231"></a>00231 <span class="comment">/*</span> |
|
242 <a name="l00232"></a>00232 <span class="comment"> * Screenwidth is "infinite", so justify is not possible</span> |
|
243 <a name="l00233"></a>00233 <span class="comment"> * Don't bother to justify an empty line</span> |
|
244 <a name="l00234"></a>00234 <span class="comment"> */</span> |
|
245 <a name="l00235"></a>00235 vString2Diagram(pDiag, pAnchor); |
|
246 <a name="l00236"></a>00236 TRACE_MSG(<span class="stringliteral">"leaving vJustify2Window #1"</span>); |
|
247 <a name="l00237"></a>00237 <span class="keywordflow">return</span>; |
|
248 <a name="l00238"></a>00238 } |
|
249 <a name="l00239"></a>00239 |
|
250 <a name="l00240"></a>00240 <span class="comment">/* Justify */</span> |
|
251 <a name="l00241"></a>00241 fail(ucAlignment != ALIGNMENT_JUSTIFY); |
|
252 <a name="l00242"></a>00242 lSpaceWidth = lComputeStringWidth(<span class="stringliteral">" "</span>, 1, |
|
253 <a name="l00243"></a>00243 pAnchor->tFontRef, pAnchor->usFontSize); |
|
254 <a name="l00244"></a>00244 lToAdd = lScreenWidth - |
|
255 <a name="l00245"></a>00245 lNetWidth - |
|
256 <a name="l00246"></a>00246 lDrawUnits2MilliPoints(pDiag->lXleft) + |
|
257 <a name="l00247"></a>00247 lRightIndentation; |
|
258 <a name="l00248"></a>00248 <span class="preprocessor">#if defined(DEBUG)</span> |
|
259 <a name="l00249"></a>00249 <span class="preprocessor"></span> <span class="keywordflow">if</span> (lToAdd / lSpaceWidth < -1) { |
|
260 <a name="l00250"></a>00250 DBG_DEC(lSpaceWidth); |
|
261 <a name="l00251"></a>00251 DBG_DEC(lToAdd); |
|
262 <a name="l00252"></a>00252 DBG_DEC(lScreenWidth); |
|
263 <a name="l00253"></a>00253 DBG_DEC(lNetWidth); |
|
264 <a name="l00254"></a>00254 DBG_DEC(lDrawUnits2MilliPoints(pDiag->lXleft)); |
|
265 <a name="l00255"></a>00255 DBG_DEC(pDiag->lXleft); |
|
266 <a name="l00256"></a>00256 DBG_DEC(lRightIndentation); |
|
267 <a name="l00257"></a>00257 } |
|
268 <a name="l00258"></a>00258 <span class="preprocessor">#endif </span><span class="comment">/* DEBUG */</span> |
|
269 <a name="l00259"></a>00259 lToAdd /= lSpaceWidth; |
|
270 <a name="l00260"></a>00260 DBG_DEC_C(lToAdd < 0, lToAdd); |
|
271 <a name="l00261"></a>00261 <span class="keywordflow">if</span> (lToAdd <= 0) { |
|
272 <a name="l00262"></a>00262 vString2Diagram(pDiag, pAnchor); |
|
273 <a name="l00263"></a>00263 TRACE_MSG(<span class="stringliteral">"leaving vJustify2Window #2"</span>); |
|
274 <a name="l00264"></a>00264 <span class="keywordflow">return</span>; |
|
275 <a name="l00265"></a>00265 } |
|
276 <a name="l00266"></a>00266 |
|
277 <a name="l00267"></a>00267 <span class="comment">/* Justify by adding spaces */</span> |
|
278 <a name="l00268"></a>00268 iHoles = iComputeHoles(pAnchor); |
|
279 <a name="l00269"></a>00269 <span class="keywordflow">for</span> (pTmp = pAnchor; pTmp != NULL; pTmp = pTmp->pNext) { |
|
280 <a name="l00270"></a>00270 fail(pTmp->tNextFree != strlen(pTmp->szStorage)); |
|
281 <a name="l00271"></a>00271 fail(lToAdd < 0); |
|
282 <a name="l00272"></a>00272 szStorage = xmalloc(pTmp->tNextFree + (<span class="keywordtype">size_t</span>)lToAdd + 1); |
|
283 <a name="l00273"></a>00273 pcNew = szStorage; |
|
284 <a name="l00274"></a>00274 <span class="keywordflow">for</span> (pcOld = pTmp->szStorage; *pcOld != <span class="charliteral">'\0'</span>; pcOld++) { |
|
285 <a name="l00275"></a>00275 *pcNew++ = *pcOld; |
|
286 <a name="l00276"></a>00276 <span class="keywordflow">if</span> (*pcOld == <span class="charliteral">' '</span> && |
|
287 <a name="l00277"></a>00277 *(pcOld + 1) != <span class="charliteral">' '</span> && |
|
288 <a name="l00278"></a>00278 iHoles > 0) { |
|
289 <a name="l00279"></a>00279 iFillerLen = (int)(lToAdd / iHoles); |
|
290 <a name="l00280"></a>00280 lToAdd -= iFillerLen; |
|
291 <a name="l00281"></a>00281 iHoles--; |
|
292 <a name="l00282"></a>00282 <span class="keywordflow">for</span> (; iFillerLen > 0; iFillerLen--) { |
|
293 <a name="l00283"></a>00283 *pcNew++ = <span class="charliteral">' '</span>; |
|
294 <a name="l00284"></a>00284 } |
|
295 <a name="l00285"></a>00285 } |
|
296 <a name="l00286"></a>00286 } |
|
297 <a name="l00287"></a>00287 *pcNew = <span class="charliteral">'\0'</span>; |
|
298 <a name="l00288"></a>00288 pTmp->szStorage = xfree(pTmp->szStorage); |
|
299 <a name="l00289"></a>00289 pTmp->szStorage = szStorage; |
|
300 <a name="l00290"></a>00290 pTmp->tStorageSize = pTmp->tNextFree + (size_t)lToAdd + 1; |
|
301 <a name="l00291"></a>00291 pTmp->lStringWidth += |
|
302 <a name="l00292"></a>00292 (pcNew - szStorage - (long)pTmp->tNextFree) * |
|
303 <a name="l00293"></a>00293 lSpaceWidth; |
|
304 <a name="l00294"></a>00294 fail(pcNew < szStorage); |
|
305 <a name="l00295"></a>00295 pTmp->tNextFree = (size_t)(pcNew - szStorage); |
|
306 <a name="l00296"></a>00296 fail(pTmp->tNextFree != strlen(pTmp->szStorage)); |
|
307 <a name="l00297"></a>00297 } |
|
308 <a name="l00298"></a>00298 DBG_DEC_C(lToAdd != 0, lToAdd); |
|
309 <a name="l00299"></a>00299 vString2Diagram(pDiag, pAnchor); |
|
310 <a name="l00300"></a>00300 TRACE_MSG(<span class="stringliteral">"leaving vJustify2Window #3"</span>); |
|
311 <a name="l00301"></a>00301 } <span class="comment">/* end of vJustify2Window */</span> |
|
312 <a name="l00302"></a>00302 |
|
313 <a name="l00303"></a>00303 <span class="comment">/*</span> |
|
314 <a name="l00304"></a>00304 <span class="comment"> * vResetStyles - reset the style information variables</span> |
|
315 <a name="l00305"></a>00305 <span class="comment"> */</span> |
|
316 <a name="l00306"></a>00306 <span class="keywordtype">void</span> |
|
317 <a name="l00307"></a>00307 vResetStyles(<span class="keywordtype">void</span>) |
|
318 <a name="l00308"></a>00308 { |
|
319 <a name="l00309"></a>00309 TRACE_MSG(<span class="stringliteral">"vResetStyles"</span>); |
|
320 <a name="l00310"></a>00310 |
|
321 <a name="l00311"></a>00311 (void)memset(auiHdrCounter, 0, <span class="keyword">sizeof</span>(auiHdrCounter)); |
|
322 <a name="l00312"></a>00312 } <span class="comment">/* end of vResetStyles */</span> |
|
323 <a name="l00313"></a>00313 |
|
324 <a name="l00314"></a>00314 <span class="comment">/*</span> |
|
325 <a name="l00315"></a>00315 <span class="comment"> * tStyle2Window - Add the style characters to the line</span> |
|
326 <a name="l00316"></a>00316 <span class="comment"> *</span> |
|
327 <a name="l00317"></a>00317 <span class="comment"> * Returns the length of the resulting string</span> |
|
328 <a name="l00318"></a>00318 <span class="comment"> */</span> |
|
329 <a name="l00319"></a>00319 <span class="keywordtype">size_t</span> |
|
330 <a name="l00320"></a>00320 tStyle2Window(<span class="keywordtype">char</span> *szLine, <span class="keywordtype">size_t</span> tLineSize, <span class="keyword">const</span> style_block_type *pStyle, |
|
331 <a name="l00321"></a>00321 <span class="keyword">const</span> section_block_type *pSection) |
|
332 <a name="l00322"></a>00322 { |
|
333 <a name="l00323"></a>00323 <span class="keywordtype">char</span> *pcTxt; |
|
334 <a name="l00324"></a>00324 <span class="keywordtype">size_t</span> tIndex, tStyleIndex; |
|
335 <a name="l00325"></a>00325 BOOL bNeedPrevLvl; |
|
336 <a name="l00326"></a>00326 level_type_enum eNumType; |
|
337 <a name="l00327"></a>00327 UCHAR ucNFC; |
|
338 <a name="l00328"></a>00328 |
|
339 <a name="l00329"></a>00329 TRACE_MSG(<span class="stringliteral">"tStyle2Window"</span>); |
|
340 <a name="l00330"></a>00330 |
|
341 <a name="l00331"></a>00331 fail(szLine == NULL || pStyle == NULL || pSection == NULL); |
|
342 <a name="l00332"></a>00332 |
|
343 <a name="l00333"></a>00333 <span class="keywordflow">if</span> (pStyle->usIstd == 0 || pStyle->usIstd > 9) { |
|
344 <a name="l00334"></a>00334 szLine[0] = <span class="charliteral">'\0'</span>; |
|
345 <a name="l00335"></a>00335 <span class="keywordflow">return</span> 0; |
|
346 <a name="l00336"></a>00336 } |
|
347 <a name="l00337"></a>00337 |
|
348 <a name="l00338"></a>00338 <span class="comment">/* Set the numbers */</span> |
|
349 <a name="l00339"></a>00339 tStyleIndex = (size_t)pStyle->usIstd - 1; |
|
350 <a name="l00340"></a>00340 <a class="code" href="interfacefor.html">for</a> (tIndex = 0; tIndex < 9; tIndex++) { |
|
351 <a name="l00341"></a>00341 <span class="keywordflow">if</span> (tIndex == tStyleIndex) { |
|
352 <a name="l00342"></a>00342 auiHdrCounter[tIndex]++; |
|
353 <a name="l00343"></a>00343 } <span class="keywordflow">else</span> <span class="keywordflow">if</span> (tIndex > tStyleIndex) { |
|
354 <a name="l00344"></a>00344 auiHdrCounter[tIndex] = 0; |
|
355 <a name="l00345"></a>00345 } <span class="keywordflow">else</span> <span class="keywordflow">if</span> (auiHdrCounter[tIndex] == 0) { |
|
356 <a name="l00346"></a>00346 auiHdrCounter[tIndex] = 1; |
|
357 <a name="l00347"></a>00347 } |
|
358 <a name="l00348"></a>00348 } |
|
359 <a name="l00349"></a>00349 |
|
360 <a name="l00350"></a>00350 eNumType = eGetNumType(pStyle->ucNumLevel); |
|
361 <a name="l00351"></a>00351 <span class="keywordflow">if</span> (eNumType != level_type_outline) { |
|
362 <a name="l00352"></a>00352 szLine[0] = <span class="charliteral">'\0'</span>; |
|
363 <a name="l00353"></a>00353 <span class="keywordflow">return</span> 0; |
|
364 <a name="l00354"></a>00354 } |
|
365 <a name="l00355"></a>00355 |
|
366 <a name="l00356"></a>00356 <span class="comment">/* Print the numbers */</span> |
|
367 <a name="l00357"></a>00357 pcTxt = szLine; |
|
368 <a name="l00358"></a>00358 bNeedPrevLvl = (pSection->usNeedPrevLvl & BIT(tStyleIndex)) != 0; |
|
369 <a name="l00359"></a>00359 <span class="keywordflow">for</span> (tIndex = 0; tIndex <= tStyleIndex; tIndex++) { |
|
370 <a name="l00360"></a>00360 <span class="keywordflow">if</span> (tIndex == tStyleIndex || |
|
371 <a name="l00361"></a>00361 (bNeedPrevLvl && tIndex < tStyleIndex)) { |
|
372 <a name="l00362"></a>00362 <span class="keywordflow">if</span> (pcTxt - szLine >= tLineSize - 25) { |
|
373 <a name="l00363"></a>00363 <span class="comment">/* Prevent a possible buffer overflow */</span> |
|
374 <a name="l00364"></a>00364 DBG_DEC(pcTxt - szLine); |
|
375 <a name="l00365"></a>00365 DBG_DEC(tLineSize - 25); |
|
376 <a name="l00366"></a>00366 DBG_FIXME(); |
|
377 <a name="l00367"></a>00367 szLine[0] = <span class="charliteral">'\0'</span>; |
|
378 <a name="l00368"></a>00368 <span class="keywordflow">return</span> 0; |
|
379 <a name="l00369"></a>00369 } |
|
380 <a name="l00370"></a>00370 ucNFC = pSection->aucNFC[tIndex]; |
|
381 <a name="l00371"></a>00371 <span class="keywordflow">switch</span>(ucNFC) { |
|
382 <a name="l00372"></a>00372 <span class="keywordflow">case</span> LIST_ARABIC_NUM: |
|
383 <a name="l00373"></a>00373 <span class="keywordflow">case</span> LIST_NUMBER_TXT: |
|
384 <a name="l00374"></a>00374 <span class="keywordflow">case</span> LIST_ORDINAL_TXT: |
|
385 <a name="l00375"></a>00375 pcTxt += sprintf(pcTxt, <span class="stringliteral">"%u"</span>, |
|
386 <a name="l00376"></a>00376 auiHdrCounter[tIndex]); |
|
387 <a name="l00377"></a>00377 <span class="keywordflow">break</span>; |
|
388 <a name="l00378"></a>00378 <span class="keywordflow">case</span> LIST_UPPER_ROMAN: |
|
389 <a name="l00379"></a>00379 <span class="keywordflow">case</span> LIST_LOWER_ROMAN: |
|
390 <a name="l00380"></a>00380 pcTxt += tNumber2Roman( |
|
391 <a name="l00381"></a>00381 auiHdrCounter[tIndex], |
|
392 <a name="l00382"></a>00382 ucNFC == LIST_UPPER_ROMAN, |
|
393 <a name="l00383"></a>00383 pcTxt); |
|
394 <a name="l00384"></a>00384 <span class="keywordflow">break</span>; |
|
395 <a name="l00385"></a>00385 <span class="keywordflow">case</span> LIST_UPPER_ALPHA: |
|
396 <a name="l00386"></a>00386 <span class="keywordflow">case</span> LIST_LOWER_ALPHA: |
|
397 <a name="l00387"></a>00387 pcTxt += tNumber2Alpha( |
|
398 <a name="l00388"></a>00388 auiHdrCounter[tIndex], |
|
399 <a name="l00389"></a>00389 ucNFC == LIST_UPPER_ALPHA, |
|
400 <a name="l00390"></a>00390 pcTxt); |
|
401 <a name="l00391"></a>00391 <span class="keywordflow">break</span>; |
|
402 <a name="l00392"></a>00392 <span class="keywordflow">case</span> LIST_OUTLINE_NUM: |
|
403 <a name="l00393"></a>00393 pcTxt += sprintf(pcTxt, <span class="stringliteral">"%02u"</span>, |
|
404 <a name="l00394"></a>00394 auiHdrCounter[tIndex]); |
|
405 <a name="l00395"></a>00395 <span class="keywordflow">break</span>; |
|
406 <a name="l00396"></a>00396 <span class="keywordflow">default</span>: |
|
407 <a name="l00397"></a>00397 DBG_DEC(ucNFC); |
|
408 <a name="l00398"></a>00398 DBG_FIXME(); |
|
409 <a name="l00399"></a>00399 pcTxt += sprintf(pcTxt, <span class="stringliteral">"%u"</span>, |
|
410 <a name="l00400"></a>00400 auiHdrCounter[tIndex]); |
|
411 <a name="l00401"></a>00401 <span class="keywordflow">break</span>; |
|
412 <a name="l00402"></a>00402 } |
|
413 <a name="l00403"></a>00403 <span class="keywordflow">if</span> (tIndex < tStyleIndex) { |
|
414 <a name="l00404"></a>00404 *pcTxt++ = <span class="charliteral">'.'</span>; |
|
415 <a name="l00405"></a>00405 } <span class="keywordflow">else</span> <span class="keywordflow">if</span> (tIndex == tStyleIndex) { |
|
416 <a name="l00406"></a>00406 *pcTxt++ = <span class="charliteral">' '</span>; |
|
417 <a name="l00407"></a>00407 } |
|
418 <a name="l00408"></a>00408 } |
|
419 <a name="l00409"></a>00409 } |
|
420 <a name="l00410"></a>00410 *pcTxt = <span class="charliteral">'\0'</span>; |
|
421 <a name="l00411"></a>00411 NO_DBG_MSG_C((<span class="keywordtype">int</span>)pStyle->usIstd >= 1 && |
|
422 <a name="l00412"></a>00412 (<span class="keywordtype">int</span>)pStyle->usIstd <= 9 && |
|
423 <a name="l00413"></a>00413 eNumType != level_type_none && |
|
424 <a name="l00414"></a>00414 eNumType != level_type_outline, szLine); |
|
425 <a name="l00415"></a>00415 NO_DBG_MSG_C(szLine[0] != <span class="charliteral">'\0'</span>, szLine); |
|
426 <a name="l00416"></a>00416 fail(pcTxt < szLine); |
|
427 <a name="l00417"></a>00417 <span class="keywordflow">return</span> (<span class="keywordtype">size_t</span>)(pcTxt - szLine); |
|
428 <a name="l00418"></a>00418 } <span class="comment">/* end of tStyle2Window */</span> |
|
429 <a name="l00419"></a>00419 |
|
430 <a name="l00420"></a>00420 <span class="comment">/*</span> |
|
431 <a name="l00421"></a>00421 <span class="comment"> * vRemoveRowEnd - remove the end of table row indicator</span> |
|
432 <a name="l00422"></a>00422 <span class="comment"> *</span> |
|
433 <a name="l00423"></a>00423 <span class="comment"> * Remove the double TABLE_SEPARATOR characters from the end of the string.</span> |
|
434 <a name="l00424"></a>00424 <span class="comment"> * Special: remove the TABLE_SEPARATOR, 0x0a sequence</span> |
|
435 <a name="l00425"></a>00425 <span class="comment"> */</span> |
|
436 <a name="l00426"></a>00426 <span class="keyword">static</span> <span class="keywordtype">void</span> |
|
437 <a name="l00427"></a>00427 vRemoveRowEnd(<span class="keywordtype">char</span> *szRowTxt) |
|
438 <a name="l00428"></a>00428 { |
|
439 <a name="l00429"></a>00429 <span class="keywordtype">int</span> iLastIndex; |
|
440 <a name="l00430"></a>00430 |
|
441 <a name="l00431"></a>00431 TRACE_MSG(<span class="stringliteral">"vRemoveRowEnd"</span>); |
|
442 <a name="l00432"></a>00432 |
|
443 <a name="l00433"></a>00433 fail(szRowTxt == NULL || szRowTxt[0] == <span class="charliteral">'\0'</span>); |
|
444 <a name="l00434"></a>00434 |
|
445 <a name="l00435"></a>00435 iLastIndex = (int)strlen(szRowTxt) - 1; |
|
446 <a name="l00436"></a>00436 |
|
447 <a name="l00437"></a>00437 <span class="keywordflow">if</span> (szRowTxt[iLastIndex] == TABLE_SEPARATOR || |
|
448 <a name="l00438"></a>00438 szRowTxt[iLastIndex] == (<span class="keywordtype">char</span>)0x0a) { |
|
449 <a name="l00439"></a>00439 szRowTxt[iLastIndex] = <span class="charliteral">'\0'</span>; |
|
450 <a name="l00440"></a>00440 iLastIndex--; |
|
451 <a name="l00441"></a>00441 } <span class="keywordflow">else</span> { |
|
452 <a name="l00442"></a>00442 DBG_HEX(szRowTxt[iLastIndex]); |
|
453 <a name="l00443"></a>00443 } |
|
454 <a name="l00444"></a>00444 |
|
455 <a name="l00445"></a>00445 <span class="keywordflow">if</span> (iLastIndex >= 0 && szRowTxt[iLastIndex] == (<span class="keywordtype">char</span>)0x0a) { |
|
456 <a name="l00446"></a>00446 szRowTxt[iLastIndex] = <span class="charliteral">'\0'</span>; |
|
457 <a name="l00447"></a>00447 iLastIndex--; |
|
458 <a name="l00448"></a>00448 } |
|
459 <a name="l00449"></a>00449 |
|
460 <a name="l00450"></a>00450 <span class="keywordflow">if</span> (iLastIndex >= 0 && szRowTxt[iLastIndex] == TABLE_SEPARATOR) { |
|
461 <a name="l00451"></a>00451 szRowTxt[iLastIndex] = <span class="charliteral">'\0'</span>; |
|
462 <a name="l00452"></a>00452 <span class="keywordflow">return</span>; |
|
463 <a name="l00453"></a>00453 } |
|
464 <a name="l00454"></a>00454 |
|
465 <a name="l00455"></a>00455 DBG_DEC(iLastIndex); |
|
466 <a name="l00456"></a>00456 DBG_HEX(szRowTxt[iLastIndex]); |
|
467 <a name="l00457"></a>00457 DBG_MSG(szRowTxt); |
|
468 <a name="l00458"></a>00458 } <span class="comment">/* end of vRemoveRowEnd */</span> |
|
469 <a name="l00459"></a>00459 |
|
470 <a name="l00460"></a>00460 <span class="comment">/*</span> |
|
471 <a name="l00461"></a>00461 <span class="comment"> * tComputeStringLengthMax - max string length in relation to max column width</span> |
|
472 <a name="l00462"></a>00462 <span class="comment"> *</span> |
|
473 <a name="l00463"></a>00463 <span class="comment"> * Return the maximum string length</span> |
|
474 <a name="l00464"></a>00464 <span class="comment"> */</span> |
|
475 <a name="l00465"></a>00465 <span class="keyword">static</span> <span class="keywordtype">size_t</span> |
|
476 <a name="l00466"></a>00466 tComputeStringLengthMax(<span class="keyword">const</span> <span class="keywordtype">char</span> *szString, <span class="keywordtype">size_t</span> tColumnWidthMax) |
|
477 <a name="l00467"></a>00467 { |
|
478 <a name="l00468"></a>00468 <span class="keyword">const</span> <span class="keywordtype">char</span> *pcTmp; |
|
479 <a name="l00469"></a>00469 <span class="keywordtype">size_t</span> tLengthMax, tLenPrev, tLen, tWidth; |
|
480 <a name="l00470"></a>00470 |
|
481 <a name="l00471"></a>00471 TRACE_MSG(<span class="stringliteral">"tComputeStringLengthMax"</span>); |
|
482 <a name="l00472"></a>00472 |
|
483 <a name="l00473"></a>00473 fail(szString == NULL); |
|
484 <a name="l00474"></a>00474 fail(tColumnWidthMax == 0); |
|
485 <a name="l00475"></a>00475 |
|
486 <a name="l00476"></a>00476 pcTmp = strchr(szString, <span class="charliteral">'\n'</span>); |
|
487 <a name="l00477"></a>00477 <span class="keywordflow">if</span> (pcTmp != NULL) { |
|
488 <a name="l00478"></a>00478 tLengthMax = (size_t)(pcTmp - szString + 1); |
|
489 <a name="l00479"></a>00479 } <span class="keywordflow">else</span> { |
|
490 <a name="l00480"></a>00480 tLengthMax = strlen(szString); |
|
491 <a name="l00481"></a>00481 } |
|
492 <a name="l00482"></a>00482 <span class="keywordflow">if</span> (tLengthMax == 0) { |
|
493 <a name="l00483"></a>00483 <span class="keywordflow">return</span> 0; |
|
494 <a name="l00484"></a>00484 } |
|
495 <a name="l00485"></a>00485 |
|
496 <a name="l00486"></a>00486 tLen = 0; |
|
497 <a name="l00487"></a>00487 tWidth = 0; |
|
498 <a name="l00488"></a>00488 <span class="keywordflow">for</span> (;;) { |
|
499 <a name="l00489"></a>00489 tLenPrev = tLen; |
|
500 <a name="l00490"></a>00490 tLen += tGetCharacterLength(szString + tLen); |
|
501 <a name="l00491"></a>00491 DBG_DEC_C(tLen > tLengthMax, tLen); |
|
502 <a name="l00492"></a>00492 DBG_DEC_C(tLen > tLengthMax, tLengthMax); |
|
503 <a name="l00493"></a>00493 fail(tLen > tLengthMax); |
|
504 <a name="l00494"></a>00494 tWidth = tCountColumns(szString, tLen); |
|
505 <a name="l00495"></a>00495 <span class="keywordflow">if</span> (tWidth > tColumnWidthMax) { |
|
506 <a name="l00496"></a>00496 <span class="keywordflow">return</span> tLenPrev; |
|
507 <a name="l00497"></a>00497 } |
|
508 <a name="l00498"></a>00498 <span class="keywordflow">if</span> (tLen >= tLengthMax) { |
|
509 <a name="l00499"></a>00499 <span class="keywordflow">return</span> tLengthMax; |
|
510 <a name="l00500"></a>00500 } |
|
511 <a name="l00501"></a>00501 } |
|
512 <a name="l00502"></a>00502 } <span class="comment">/* end of tComputeStringLengthMax */</span> |
|
513 <a name="l00503"></a>00503 |
|
514 <a name="l00504"></a>00504 <span class="comment">/*</span> |
|
515 <a name="l00505"></a>00505 <span class="comment"> * tGetBreakingPoint - get the number of bytes that fit the column</span> |
|
516 <a name="l00506"></a>00506 <span class="comment"> *</span> |
|
517 <a name="l00507"></a>00507 <span class="comment"> * Returns the number of bytes that fit the column</span> |
|
518 <a name="l00508"></a>00508 <span class="comment"> */</span> |
|
519 <a name="l00509"></a>00509 <span class="keyword">static</span> <span class="keywordtype">size_t</span> |
|
520 <a name="l00510"></a>00510 tGetBreakingPoint(<span class="keyword">const</span> <span class="keywordtype">char</span> *szString, |
|
521 <a name="l00511"></a>00511 <span class="keywordtype">size_t</span> tLen, <span class="keywordtype">size_t</span> tWidth, <span class="keywordtype">size_t</span> tColumnWidthMax) |
|
522 <a name="l00512"></a>00512 { |
|
523 <a name="l00513"></a>00513 <span class="keywordtype">int</span> iIndex; |
|
524 <a name="l00514"></a>00514 |
|
525 <a name="l00515"></a>00515 TRACE_MSG(<span class="stringliteral">"tGetBreakingPoint"</span>); |
|
526 <a name="l00516"></a>00516 |
|
527 <a name="l00517"></a>00517 fail(szString == NULL); |
|
528 <a name="l00518"></a>00518 fail(tLen > strlen(szString)); |
|
529 <a name="l00519"></a>00519 fail(tWidth > tColumnWidthMax); |
|
530 <a name="l00520"></a>00520 |
|
531 <a name="l00521"></a>00521 <span class="keywordflow">if</span> (tWidth < tColumnWidthMax || |
|
532 <a name="l00522"></a>00522 (tWidth == tColumnWidthMax && |
|
533 <a name="l00523"></a>00523 (szString[tLen] == <span class="charliteral">' '</span> || |
|
534 <a name="l00524"></a>00524 szString[tLen] == <span class="charliteral">'\n'</span> || |
|
535 <a name="l00525"></a>00525 szString[tLen] == <span class="charliteral">'\0'</span>))) { |
|
536 <a name="l00526"></a>00526 <span class="comment">/* The string already fits, do nothing */</span> |
|
537 <a name="l00527"></a>00527 <span class="keywordflow">return</span> tLen; |
|
538 <a name="l00528"></a>00528 } |
|
539 <a name="l00529"></a>00529 <span class="comment">/* Search for a breaking point */</span> |
|
540 <a name="l00530"></a>00530 <span class="keywordflow">for</span> (iIndex = (<span class="keywordtype">int</span>)tLen - 1; iIndex >= 0; iIndex--) { |
|
541 <a name="l00531"></a>00531 <span class="keywordflow">if</span> (szString[iIndex] == <span class="charliteral">' '</span>) { |
|
542 <a name="l00532"></a>00532 <span class="keywordflow">return</span> (<span class="keywordtype">size_t</span>)iIndex; |
|
543 <a name="l00533"></a>00533 } |
|
544 <a name="l00534"></a>00534 } |
|
545 <a name="l00535"></a>00535 <span class="comment">/* No breaking point found, just fill the column */</span> |
|
546 <a name="l00536"></a>00536 <span class="keywordflow">return</span> tLen; |
|
547 <a name="l00537"></a>00537 } <span class="comment">/* end of tGetBreakingPoint */</span> |
|
548 <a name="l00538"></a>00538 |
|
549 <a name="l00539"></a>00539 <span class="comment">/*</span> |
|
550 <a name="l00540"></a>00540 <span class="comment"> * tComputeColumnWidthMax - compute the maximum column width</span> |
|
551 <a name="l00541"></a>00541 <span class="comment"> */</span> |
|
552 <a name="l00542"></a>00542 <span class="keyword">static</span> <span class="keywordtype">size_t</span> |
|
553 <a name="l00543"></a>00543 tComputeColumnWidthMax(<span class="keywordtype">short</span> sWidth, <span class="keywordtype">long</span> lCharWidth, <span class="keywordtype">double</span> dFactor) |
|
554 <a name="l00544"></a>00544 { |
|
555 <a name="l00545"></a>00545 <span class="keywordtype">size_t</span> tColumnWidthMax; |
|
556 <a name="l00546"></a>00546 |
|
557 <a name="l00547"></a>00547 TRACE_MSG(<span class="stringliteral">"tComputeColumnWidthMax"</span>); |
|
558 <a name="l00548"></a>00548 |
|
559 <a name="l00549"></a>00549 fail(sWidth < 0); |
|
560 <a name="l00550"></a>00550 fail(lCharWidth <= 0); |
|
561 <a name="l00551"></a>00551 fail(dFactor <= 0.0); |
|
562 <a name="l00552"></a>00552 |
|
563 <a name="l00553"></a>00553 tColumnWidthMax = (size_t)( |
|
564 <a name="l00554"></a>00554 (lTwips2MilliPoints(sWidth) * dFactor + lCharWidth / 2.0) / |
|
565 <a name="l00555"></a>00555 lCharWidth); |
|
566 <a name="l00556"></a>00556 <span class="keywordflow">if</span> (tColumnWidthMax == 0) { |
|
567 <a name="l00557"></a>00557 <span class="comment">/* Minimum column width */</span> |
|
568 <a name="l00558"></a>00558 <span class="keywordflow">return</span> 1; |
|
569 <a name="l00559"></a>00559 } |
|
570 <a name="l00560"></a>00560 <span class="keywordflow">if</span> (tColumnWidthMax > 1) { |
|
571 <a name="l00561"></a>00561 <span class="comment">/* Make room for the TABLE_SEPARATOR_CHAR */</span> |
|
572 <a name="l00562"></a>00562 tColumnWidthMax--; |
|
573 <a name="l00563"></a>00563 } |
|
574 <a name="l00564"></a>00564 NO_DBG_DEC(tColumnWidthMax); |
|
575 <a name="l00565"></a>00565 <span class="keywordflow">return</span> tColumnWidthMax; |
|
576 <a name="l00566"></a>00566 } <span class="comment">/* end of tComputeColumnWidthMax */</span> |
|
577 <a name="l00567"></a>00567 |
|
578 <a name="l00568"></a>00568 <span class="comment">/*</span> |
|
579 <a name="l00569"></a>00569 <span class="comment"> * vTableRow2Window - put a table row into a diagram</span> |
|
580 <a name="l00570"></a>00570 <span class="comment"> */</span> |
|
581 <a name="l00571"></a>00571 <span class="keywordtype">void</span> |
|
582 <a name="l00572"></a>00572 vTableRow2Window(diagram_type *pDiag, output_type *pOutput, |
|
583 <a name="l00573"></a>00573 <span class="keyword">const</span> row_block_type *pRowInfo, |
|
584 <a name="l00574"></a>00574 conversion_type eConversionType, <span class="keywordtype">int</span> iParagraphBreak) |
|
585 <a name="l00575"></a>00575 { |
|
586 <a name="l00576"></a>00576 output_type tRow; |
|
587 <a name="l00577"></a>00577 <span class="keywordtype">char</span> *aszColTxt[TABLE_COLUMN_MAX]; |
|
588 <a name="l00578"></a>00578 <span class="keywordtype">char</span> *szLine, *pcTxt; |
|
589 <a name="l00579"></a>00579 <span class="keywordtype">double</span> dMagnify; |
|
590 <a name="l00580"></a>00580 <span class="keywordtype">long</span> lCharWidthLarge, lCharWidthSmall; |
|
591 <a name="l00581"></a>00581 <span class="keywordtype">size_t</span> tColumnWidthTotal, atColumnWidthMax[TABLE_COLUMN_MAX]; |
|
592 <a name="l00582"></a>00582 <span class="keywordtype">size_t</span> tSize, tColumnWidthMax, tWidth, tLen; |
|
593 <a name="l00583"></a>00583 <span class="keywordtype">int</span> iIndex, iNbrOfColumns, iTmp; |
|
594 <a name="l00584"></a>00584 BOOL bNotReady; |
|
595 <a name="l00585"></a>00585 |
|
596 <a name="l00586"></a>00586 TRACE_MSG(<span class="stringliteral">"vTableRow2Window"</span>); |
|
597 <a name="l00587"></a>00587 |
|
598 <a name="l00588"></a>00588 fail(pDiag == NULL || pOutput == NULL || pRowInfo == NULL); |
|
599 <a name="l00589"></a>00589 fail(pOutput->szStorage == NULL); |
|
600 <a name="l00590"></a>00590 fail(pOutput->pNext != NULL); |
|
601 <a name="l00591"></a>00591 fail(iParagraphBreak < 0); |
|
602 <a name="l00592"></a>00592 |
|
603 <a name="l00593"></a>00593 <span class="comment">/* Character sizes */</span> |
|
604 <a name="l00594"></a>00594 lCharWidthLarge = lComputeStringWidth(<span class="stringliteral">"W"</span>, 1, |
|
605 <a name="l00595"></a>00595 pOutput->tFontRef, pOutput->usFontSize); |
|
606 <a name="l00596"></a>00596 NO_DBG_DEC(lCharWidthLarge); |
|
607 <a name="l00597"></a>00597 lCharWidthSmall = lComputeStringWidth(<span class="stringliteral">"i"</span>, 1, |
|
608 <a name="l00598"></a>00598 pOutput->tFontRef, pOutput->usFontSize); |
|
609 <a name="l00599"></a>00599 NO_DBG_DEC(lCharWidthSmall); |
|
610 <a name="l00600"></a>00600 <span class="comment">/* For the time being: use a fixed width font */</span> |
|
611 <a name="l00601"></a>00601 fail(lCharWidthLarge != lCharWidthSmall); |
|
612 <a name="l00602"></a>00602 |
|
613 <a name="l00603"></a>00603 vRemoveRowEnd(pOutput->szStorage); |
|
614 <a name="l00604"></a>00604 |
|
615 <a name="l00605"></a>00605 <span class="comment">/* Split the row text into a set of column texts */</span> |
|
616 <a name="l00606"></a>00606 aszColTxt[0] = pOutput->szStorage; |
|
617 <a name="l00607"></a>00607 <span class="keywordflow">for</span> (iNbrOfColumns = 1; |
|
618 <a name="l00608"></a>00608 iNbrOfColumns < TABLE_COLUMN_MAX; |
|
619 <a name="l00609"></a>00609 iNbrOfColumns++) { |
|
620 <a name="l00610"></a>00610 aszColTxt[iNbrOfColumns] = |
|
621 <a name="l00611"></a>00611 strchr(aszColTxt[iNbrOfColumns - 1], |
|
622 <a name="l00612"></a>00612 TABLE_SEPARATOR); |
|
623 <a name="l00613"></a>00613 <span class="keywordflow">if</span> (aszColTxt[iNbrOfColumns] == NULL) { |
|
624 <a name="l00614"></a>00614 <span class="keywordflow">break</span>; |
|
625 <a name="l00615"></a>00615 } |
|
626 <a name="l00616"></a>00616 *aszColTxt[iNbrOfColumns] = <span class="charliteral">'\0'</span>; |
|
627 <a name="l00617"></a>00617 aszColTxt[iNbrOfColumns]++; |
|
628 <a name="l00618"></a>00618 NO_DBG_DEC(iNbrOfColumns); |
|
629 <a name="l00619"></a>00619 NO_DBG_MSG(aszColTxt[iNbrOfColumns]); |
|
630 <a name="l00620"></a>00620 } |
|
631 <a name="l00621"></a>00621 |
|
632 <a name="l00622"></a>00622 <span class="comment">/* Work around a bug in Word */</span> |
|
633 <a name="l00623"></a>00623 <span class="keywordflow">while</span> (iNbrOfColumns > (<span class="keywordtype">int</span>)pRowInfo->ucNumberOfColumns && |
|
634 <a name="l00624"></a>00624 pRowInfo->asColumnWidth[iNbrOfColumns] == 0) { |
|
635 <a name="l00625"></a>00625 iNbrOfColumns--; |
|
636 <a name="l00626"></a>00626 } |
|
637 <a name="l00627"></a>00627 |
|
638 <a name="l00628"></a>00628 DBG_DEC_C(iNbrOfColumns != (<span class="keywordtype">int</span>)pRowInfo->ucNumberOfColumns, |
|
639 <a name="l00629"></a>00629 iNbrOfColumns); |
|
640 <a name="l00630"></a>00630 DBG_DEC_C(iNbrOfColumns != (<span class="keywordtype">int</span>)pRowInfo->ucNumberOfColumns, |
|
641 <a name="l00631"></a>00631 pRowInfo->ucNumberOfColumns); |
|
642 <a name="l00632"></a>00632 <span class="keywordflow">if</span> (iNbrOfColumns != (<span class="keywordtype">int</span>)pRowInfo->ucNumberOfColumns) { |
|
643 <a name="l00633"></a>00633 werr(0, <span class="stringliteral">"Skipping an unmatched table row"</span>); |
|
644 <a name="l00634"></a>00634 <span class="keywordflow">return</span>; |
|
645 <a name="l00635"></a>00635 } |
|
646 <a name="l00636"></a>00636 |
|
647 <a name="l00637"></a>00637 <span class="preprocessor">#if defined(__FULL_TEXT_SEARCH)</span> |
|
648 <a name="l00638"></a>00638 <span class="preprocessor"></span> <span class="comment">/* No table formatting: use for full-text search (untested) */</span> |
|
649 <a name="l00639"></a>00639 <span class="keywordflow">for</span> (iIndex = 0; iIndex < iNbrOfColumns; iIndex++) { |
|
650 <a name="l00640"></a>00640 fprintf(pDiag->pOutFile, <span class="stringliteral">"%s\n"</span> , aszColTxt[iIndex]); |
|
651 <a name="l00641"></a>00641 } |
|
652 <a name="l00642"></a>00642 <span class="preprocessor">#else</span> |
|
653 <a name="l00643"></a>00643 <span class="preprocessor"></span> <span class="keywordflow">if</span> (bAddTableRow(pDiag, aszColTxt, iNbrOfColumns, |
|
654 <a name="l00644"></a>00644 pRowInfo->asColumnWidth, pRowInfo->ucBorderInfo)) { |
|
655 <a name="l00645"></a>00645 <span class="comment">/* All work has been done */</span> |
|
656 <a name="l00646"></a>00646 <span class="keywordflow">return</span>; |
|
657 <a name="l00647"></a>00647 } |
|
658 <a name="l00648"></a>00648 |
|
659 <a name="l00649"></a>00649 <span class="comment">/* Fill the table with maximum column widths */</span> |
|
660 <a name="l00650"></a>00650 <span class="keywordflow">if</span> (eConversionType == conversion_text || |
|
661 <a name="l00651"></a>00651 eConversionType == conversion_fmt_text) { |
|
662 <a name="l00652"></a>00652 <span class="keywordflow">if</span> (iParagraphBreak == 0 || |
|
663 <a name="l00653"></a>00653 iParagraphBreak >= MAX_SCREEN_WIDTH) { |
|
664 <a name="l00654"></a>00654 dMagnify = (double)MAX_SCREEN_WIDTH; |
|
665 <a name="l00655"></a>00655 } <span class="keywordflow">else</span> <span class="keywordflow">if</span> (iParagraphBreak <= MIN_SCREEN_WIDTH) { |
|
666 <a name="l00656"></a>00656 dMagnify = (double)MIN_SCREEN_WIDTH; |
|
667 <a name="l00657"></a>00657 } <span class="keywordflow">else</span> { |
|
668 <a name="l00658"></a>00658 dMagnify = (double)iParagraphBreak; |
|
669 <a name="l00659"></a>00659 } |
|
670 <a name="l00660"></a>00660 dMagnify /= (double)DEFAULT_SCREEN_WIDTH; |
|
671 <a name="l00661"></a>00661 DBG_FLT_C(dMagnify < 0.99 || dMagnify > 1.01, dMagnify); |
|
672 <a name="l00662"></a>00662 } <span class="keywordflow">else</span> { |
|
673 <a name="l00663"></a>00663 dMagnify = 1.0; |
|
674 <a name="l00664"></a>00664 } |
|
675 <a name="l00665"></a>00665 tColumnWidthTotal = 0; |
|
676 <a name="l00666"></a>00666 <span class="keywordflow">for</span> (iIndex = 0; iIndex < iNbrOfColumns; iIndex++) { |
|
677 <a name="l00667"></a>00667 atColumnWidthMax[iIndex] = tComputeColumnWidthMax( |
|
678 <a name="l00668"></a>00668 pRowInfo->asColumnWidth[iIndex], |
|
679 <a name="l00669"></a>00669 lCharWidthLarge, |
|
680 <a name="l00670"></a>00670 dMagnify); |
|
681 <a name="l00671"></a>00671 tColumnWidthTotal += atColumnWidthMax[iIndex]; |
|
682 <a name="l00672"></a>00672 } |
|
683 <a name="l00673"></a>00673 |
|
684 <a name="l00674"></a>00674 <span class="comment">/*</span> |
|
685 <a name="l00675"></a>00675 <span class="comment"> * Get enough space for the row.</span> |
|
686 <a name="l00676"></a>00676 <span class="comment"> * Worst case: three bytes per UTF-8 character</span> |
|
687 <a name="l00677"></a>00677 <span class="comment"> */</span> |
|
688 <a name="l00678"></a>00678 tSize = 3 * (1 + tColumnWidthTotal + (size_t)iNbrOfColumns + 3); |
|
689 <a name="l00679"></a>00679 szLine = xmalloc(tSize); |
|
690 <a name="l00680"></a>00680 |
|
691 <a name="l00681"></a>00681 <span class="keywordflow">do</span> { |
|
692 <a name="l00682"></a>00682 <span class="comment">/* Print one line of a table row */</span> |
|
693 <a name="l00683"></a>00683 bNotReady = FALSE; |
|
694 <a name="l00684"></a>00684 pcTxt = szLine; |
|
695 <a name="l00685"></a>00685 *pcTxt++ = TABLE_SEPARATOR_CHAR; |
|
696 <a name="l00686"></a>00686 <span class="keywordflow">for</span> (iIndex = 0; iIndex < iNbrOfColumns; iIndex++) { |
|
697 <a name="l00687"></a>00687 tColumnWidthMax = atColumnWidthMax[iIndex]; |
|
698 <a name="l00688"></a>00688 <span class="keywordflow">if</span> (aszColTxt[iIndex] == NULL) { |
|
699 <a name="l00689"></a>00689 <span class="comment">/* Add an empty column */</span> |
|
700 <a name="l00690"></a>00690 <span class="keywordflow">for</span> (iTmp = 0; |
|
701 <a name="l00691"></a>00691 iTmp < (int)tColumnWidthMax; |
|
702 <a name="l00692"></a>00692 iTmp++) { |
|
703 <a name="l00693"></a>00693 *pcTxt++ = (char)FILLER_CHAR; |
|
704 <a name="l00694"></a>00694 } |
|
705 <a name="l00695"></a>00695 *pcTxt++ = TABLE_SEPARATOR_CHAR; |
|
706 <a name="l00696"></a>00696 *pcTxt = <span class="charliteral">'\0'</span>; |
|
707 <a name="l00697"></a>00697 <span class="keywordflow">continue</span>; |
|
708 <a name="l00698"></a>00698 } |
|
709 <a name="l00699"></a>00699 <span class="comment">/* Compute the length and width of the column text */</span> |
|
710 <a name="l00700"></a>00700 tLen = tComputeStringLengthMax( |
|
711 <a name="l00701"></a>00701 aszColTxt[iIndex], tColumnWidthMax); |
|
712 <a name="l00702"></a>00702 NO_DBG_DEC(tLen); |
|
713 <a name="l00703"></a>00703 <span class="keywordflow">while</span> (tLen != 0 && |
|
714 <a name="l00704"></a>00704 (aszColTxt[iIndex][tLen - 1] == <span class="charliteral">'\n'</span> || |
|
715 <a name="l00705"></a>00705 aszColTxt[iIndex][tLen - 1] == <span class="charliteral">' '</span>)) { |
|
716 <a name="l00706"></a>00706 aszColTxt[iIndex][tLen - 1] = <span class="charliteral">' '</span>; |
|
717 <a name="l00707"></a>00707 tLen--; |
|
718 <a name="l00708"></a>00708 } |
|
719 <a name="l00709"></a>00709 tWidth = tCountColumns(aszColTxt[iIndex], tLen); |
|
720 <a name="l00710"></a>00710 fail(tWidth > tColumnWidthMax); |
|
721 <a name="l00711"></a>00711 tLen = tGetBreakingPoint(aszColTxt[iIndex], |
|
722 <a name="l00712"></a>00712 tLen, tWidth, tColumnWidthMax); |
|
723 <a name="l00713"></a>00713 tWidth = tCountColumns(aszColTxt[iIndex], tLen); |
|
724 <a name="l00714"></a>00714 <span class="keywordflow">if</span> (tLen == 0 && *aszColTxt[iIndex] == <span class="charliteral">'\0'</span>) { |
|
725 <a name="l00715"></a>00715 <span class="comment">/* No text at all */</span> |
|
726 <a name="l00716"></a>00716 aszColTxt[iIndex] = NULL; |
|
727 <a name="l00717"></a>00717 } <span class="keywordflow">else</span> { |
|
728 <a name="l00718"></a>00718 <span class="comment">/* Add the text */</span> |
|
729 <a name="l00719"></a>00719 pcTxt += sprintf(pcTxt, |
|
730 <a name="l00720"></a>00720 <span class="stringliteral">"%.*s"</span>, (<span class="keywordtype">int</span>)tLen, aszColTxt[iIndex]); |
|
731 <a name="l00721"></a>00721 <span class="keywordflow">if</span> (tLen == 0 && *aszColTxt[iIndex] != <span class="charliteral">' '</span>) { |
|
732 <a name="l00722"></a>00722 tLen = tGetCharacterLength( |
|
733 <a name="l00723"></a>00723 aszColTxt[iIndex]); |
|
734 <a name="l00724"></a>00724 DBG_CHR(*aszColTxt[iIndex]); |
|
735 <a name="l00725"></a>00725 DBG_FIXME(); |
|
736 <a name="l00726"></a>00726 fail(tLen == 0); |
|
737 <a name="l00727"></a>00727 } |
|
738 <a name="l00728"></a>00728 aszColTxt[iIndex] += tLen; |
|
739 <a name="l00729"></a>00729 <span class="keywordflow">while</span> (*aszColTxt[iIndex] == <span class="charliteral">' '</span>) { |
|
740 <a name="l00730"></a>00730 aszColTxt[iIndex]++; |
|
741 <a name="l00731"></a>00731 } |
|
742 <a name="l00732"></a>00732 <span class="keywordflow">if</span> (*aszColTxt[iIndex] == <span class="charliteral">'\0'</span>) { |
|
743 <a name="l00733"></a>00733 <span class="comment">/* This row is now complete */</span> |
|
744 <a name="l00734"></a>00734 aszColTxt[iIndex] = NULL; |
|
745 <a name="l00735"></a>00735 } <span class="keywordflow">else</span> { |
|
746 <a name="l00736"></a>00736 <span class="comment">/* This row needs more lines */</span> |
|
747 <a name="l00737"></a>00737 bNotReady = TRUE; |
|
748 <a name="l00738"></a>00738 } |
|
749 <a name="l00739"></a>00739 } |
|
750 <a name="l00740"></a>00740 <span class="comment">/* Fill up the rest */</span> |
|
751 <a name="l00741"></a>00741 <span class="keywordflow">for</span> (iTmp = 0; |
|
752 <a name="l00742"></a>00742 iTmp < (int)tColumnWidthMax - (<span class="keywordtype">int</span>)tWidth; |
|
753 <a name="l00743"></a>00743 iTmp++) { |
|
754 <a name="l00744"></a>00744 *pcTxt++ = (char)FILLER_CHAR; |
|
755 <a name="l00745"></a>00745 } |
|
756 <a name="l00746"></a>00746 <span class="comment">/* End of column */</span> |
|
757 <a name="l00747"></a>00747 *pcTxt++ = TABLE_SEPARATOR_CHAR; |
|
758 <a name="l00748"></a>00748 *pcTxt = <span class="charliteral">'\0'</span>; |
|
759 <a name="l00749"></a>00749 } |
|
760 <a name="l00750"></a>00750 <span class="comment">/* Output the table row line */</span> |
|
761 <a name="l00751"></a>00751 *pcTxt = <span class="charliteral">'\0'</span>; |
|
762 <a name="l00752"></a>00752 tRow = *pOutput; |
|
763 <a name="l00753"></a>00753 tRow.szStorage = szLine; |
|
764 <a name="l00754"></a>00754 fail(pcTxt < szLine); |
|
765 <a name="l00755"></a>00755 tRow.tNextFree = (size_t)(pcTxt - szLine); |
|
766 <a name="l00756"></a>00756 tRow.lStringWidth = lComputeStringWidth( |
|
767 <a name="l00757"></a>00757 tRow.szStorage, |
|
768 <a name="l00758"></a>00758 tRow.tNextFree, |
|
769 <a name="l00759"></a>00759 tRow.tFontRef, |
|
770 <a name="l00760"></a>00760 tRow.usFontSize); |
|
771 <a name="l00761"></a>00761 vString2Diagram(pDiag, &tRow); |
|
772 <a name="l00762"></a>00762 TRACE_MSG(<span class="stringliteral">"after vString2Diagram in vTableRow2Window"</span>); |
|
773 <a name="l00763"></a>00763 } <span class="keywordflow">while</span> (bNotReady); |
|
774 <a name="l00764"></a>00764 <span class="comment">/* Clean up before you leave */</span> |
|
775 <a name="l00765"></a>00765 szLine = xfree(szLine); |
|
776 <a name="l00766"></a>00766 TRACE_MSG(<span class="stringliteral">"leaving vTableRow2Window"</span>); |
|
777 <a name="l00767"></a>00767 <span class="preprocessor">#endif </span><span class="comment">/* __FULL_TEXT_SEARCH */</span> |
|
778 <a name="l00768"></a>00768 } <span class="comment">/* end of vTableRow2Window */</span> |
|
779 </pre></div></div> |
|
780 <hr size="1"/><address style="text-align: right;"><small>Generated by |
|
781 <a href="http://www.doxygen.org/index.html"> |
|
782 <img class="footer" src="doxygen.png" alt="doxygen"/></a> 1.6.2 </small></address> |
|
783 </body> |
|
784 </html> |
|