]> git.lyx.org Git - lyx.git/blob - src/output_xhtml.cpp
Better control for tag output. This helps a little.
[lyx.git] / src / output_xhtml.cpp
1 /**
2  * \file output_xhtml.cpp
3  * This file is part of LyX, the document processor.
4  * Licence details can be found in the file COPYING.
5  *
6  * \author Richard Heck
7  * 
8  * This code is based upon output_docbook.cpp
9  *
10  * Full author contact details are available in file CREDITS.
11  */
12
13 #include <config.h>
14
15 #include "output_xhtml.h"
16
17 #include "Buffer.h"
18 #include "buffer_funcs.h"
19 #include "BufferParams.h"
20 #include "Counters.h"
21 #include "Layout.h"
22 #include "OutputParams.h"
23 #include "Paragraph.h"
24 #include "paragraph_funcs.h"
25 #include "ParagraphList.h"
26 #include "ParagraphParameters.h"
27 #include "sgml.h"
28 #include "TextClass.h"
29
30 #include "support/lassert.h"
31 #include "support/debug.h"
32 #include "support/lstrings.h"
33
34 #include <boost/next_prior.hpp>
35 #include <vector>
36
37 using namespace std;
38 using namespace lyx::support;
39
40 namespace lyx {
41
42 namespace html {
43
44 docstring escapeChar(char_type c)
45 {
46         docstring str;
47         switch (c) {
48         case ' ':
49                 str += " ";
50                 break;
51         case '&':
52                 str += "&amp;";
53                 break;
54         case '<':
55                 str += "&lt;";
56                 break;
57         case '>':
58                 str += "&gt;";
59                 break;
60         default:
61                 str += c;
62                 break;
63         }
64         return str;
65 }
66
67
68 // FIXME This needs to be protected somehow.
69 static vector<string> taglist;
70
71 bool openTag(odocstream & os, string tag, string attr)
72 {
73         if (tag.empty())
74                 return false;
75         // FIXME This is completely primitive. We need something
76         // a lot better.
77         // Now do some checks on nesting of tags.
78         if (tag == "p")
79                 if (find(taglist.begin(), taglist.end(), "p") != taglist.end())
80                         return false;
81         if (!attr.empty())
82                 attr = ' ' + attr;
83         os << from_ascii("<" + tag + attr + ">");
84         taglist.push_back(tag);
85         return true;
86 }
87
88
89 bool closeTag(odocstream & os, string tag)
90 {
91         if (tag.empty())
92                 return false;
93         // FIXME Check for proper nesting
94         if (taglist.empty()){
95                 LYXERR0("Last tag not found when closing `" << tag << "'!");
96                 return false;
97         }
98         string const & lasttag = taglist.back();
99         if (lasttag != tag)  {
100                 LYXERR0("Last tag was `" << lasttag << "' when closing `" << tag << "'!");
101                 return false;
102         }
103         taglist.pop_back();
104         os << from_ascii("</" + tag + ">");
105         return true;
106 }
107
108
109
110 } // html
111
112 namespace {
113
114 bool openTag(odocstream & os, Layout const & lay)
115 {
116         return html::openTag(os, lay.htmltag(), lay.htmlattr());
117 }
118
119
120 bool closeTag(odocstream & os, Layout const & lay)
121 {
122         return html::closeTag(os, lay.htmltag());
123 }
124
125
126 bool openLabelTag(odocstream & os, Layout const & lay)
127 {
128         return html::openTag(os, lay.htmllabel(), lay.htmllabelattr());
129 }
130
131
132 bool closeLabelTag(odocstream & os, Layout const & lay)
133 {
134         return html::closeTag(os, lay.htmllabel());
135 }
136
137
138 bool openItemTag(odocstream & os, Layout const & lay)
139 {
140         return html::openTag(os, lay.htmlitem(), lay.htmlitemattr());
141 }
142
143
144 bool closeItemTag(odocstream & os, Layout const & lay)
145 {
146         return html::closeTag(os, lay.htmlitem());
147 }
148
149 ParagraphList::const_iterator searchParagraph(
150         ParagraphList::const_iterator p,
151   ParagraphList::const_iterator const & pend)
152 {
153         for (++p; p != pend && p->layout().latextype == LATEX_PARAGRAPH; ++p)
154                 ;
155
156         return p;
157 }
158
159
160 ParagraphList::const_iterator searchEnvironment(
161                 ParagraphList::const_iterator p,
162                 ParagraphList::const_iterator const & pend)
163 {
164         Layout const & bstyle = p->layout();
165         size_t const depth = p->params().depth();
166         for (++p; p != pend; ++p) {
167                 Layout const & style = p->layout();
168                 // It shouldn't happen that e.g. a section command occurs inside
169                 // a quotation environment, at a higher depth, but as of 6/2009,
170                 // it can happen. We pretend that it's just at lowest depth.
171                 if (style.latextype == LATEX_COMMAND)
172                         return p;
173                 // If depth is down, we're done
174                 if (p->params().depth() < depth)
175                         return p;
176                 // If depth is up, we're not done
177                 if (p->params().depth() > depth)
178                         continue;
179                 // Now we know we are at the same depth
180                 if (style.latextype == LATEX_PARAGRAPH
181                     || style.latexname() != bstyle.latexname())
182                         return p;
183
184         }
185         return pend;
186 }
187
188
189 ParagraphList::const_iterator makeParagraph(Buffer const & buf,
190                                             odocstream & os,
191                                             OutputParams const & runparams,
192                                             ParagraphList const & paragraphs,
193                                             ParagraphList::const_iterator const & pbegin,
194                                             ParagraphList::const_iterator const & pend)
195 {
196         ParagraphList::const_iterator par = pbegin;
197         for (; par != pend; ++par) {
198                 Layout const & lay = par->layout();
199                 if (par != pbegin)
200                         os << '\n';
201                 bool const opened = openTag(os, lay);
202                 par->simpleLyXHTMLOnePar(buf, os, runparams, 
203                                 outerFont(distance(paragraphs.begin(), par), paragraphs));
204                 if (opened)
205                         closeTag(os, lay);
206                 os << '\n';
207         }
208         return pend;
209 }
210
211 ParagraphList::const_iterator makeEnvironment(Buffer const & buf,
212                                               odocstream & os,
213                                               OutputParams const & runparams,
214                                               ParagraphList const & paragraphs,
215                                               ParagraphList::const_iterator const & pbegin,
216                                               ParagraphList::const_iterator const & pend) {
217         
218         ParagraphList::const_iterator par = pbegin;
219         Layout const & bstyle = par->layout();
220         depth_type const origdepth = pbegin->params().depth();
221
222         // Open tag for this environment
223         bool const main_tag_opened = openTag(os, bstyle);
224         os << '\n';
225
226         // we will on occasion need to remember a layout from before.
227         Layout const * lastlay = 0;
228
229         while (par != pend) {
230                 Layout const & style = par->layout();
231                 ParagraphList::const_iterator send;
232                 // this will be positive, if we want to skip the initial word
233                 // (if it's been taken for the label).
234                 pos_type sep = 0;
235
236                 switch (style.latextype) {
237                 case LATEX_ENVIRONMENT:
238                 // case LATEX_LIST_ENVIRONMENT??
239                 case LATEX_ITEM_ENVIRONMENT: {
240                         // There are two possiblities in this case. 
241                         // One is that we are still in the environment in which we 
242                         // started---which we will be if the depth is the same.
243                         if (par->params().depth() == origdepth) {
244                                 if (lastlay != 0) {
245                                         closeItemTag(os, *lastlay);
246                                         lastlay = 0;
247                                 }
248                                 Layout const & cstyle = par->layout();
249                                 if (cstyle.labeltype == LABEL_MANUAL) {
250                                         bool const label_tag_opened = openLabelTag(os, cstyle);
251                                         sep = par->firstWordLyXHTML(os, runparams);
252                                         if (label_tag_opened)
253                                                 closeLabelTag(os, cstyle);
254                                         os << '\n';
255                                 } else if (style.latextype == LATEX_ENVIRONMENT 
256                                            && style.labeltype != LABEL_NO_LABEL) {
257                                         bool const label_tag_opened = openLabelTag(os, cstyle);
258                                         if (!style.counter.empty())
259                                                 buf.params().documentClass().counters().step(cstyle.counter);
260                                         os << pbegin->expandLabel(style, buf.params(), false);
261                                         if (label_tag_opened)
262                                                 closeLabelTag(os, cstyle);
263                                         os << '\n';
264                                 }
265
266                                 bool const item_tag_opened = openItemTag(os, cstyle);
267                                 par->simpleLyXHTMLOnePar(buf, os, runparams, 
268                                         outerFont(distance(paragraphs.begin(), par), paragraphs), sep);
269                                 ++par;
270                                 // We may not want to close the tag yet, in particular,
271                                 if (item_tag_opened 
272                                                 // if we're not at the end...
273                                     && par != pend 
274                                     //  and are doing items...
275                                     && style.latextype == LATEX_ITEM_ENVIRONMENT
276                                     // and if the depth has changed...
277                                     && par->params().depth() != origdepth) {
278                                                 // then we'll save this layout for later, and close it when
279                                                 // we get another item.
280                                                 lastlay = &cstyle;
281                                 } else {
282                                                 closeItemTag(os, cstyle); // FIXME
283                                         os << '\n';
284                                 }
285                         } 
286                         // The other possibility is that the depth has increased, in which
287                         // case we need to recurse.
288                         else {
289                                 send = searchEnvironment(par, pend);
290                                 par = makeEnvironment(buf, os, runparams, paragraphs, par, send);
291                         }
292                         break;
293                 }
294                 case LATEX_PARAGRAPH:
295                         send = searchParagraph(par, pend);
296                         par = makeParagraph(buf, os, runparams, paragraphs, par, send);
297                         break;
298                 // FIXME
299                 case LATEX_BIB_ENVIRONMENT:
300                 case LATEX_COMMAND:
301                         break;
302                 }
303         }
304
305         if (lastlay != 0)
306                 closeItemTag(os, *lastlay);
307         if (main_tag_opened)
308                 closeTag(os, bstyle);
309         os << '\n';
310         return pend;
311 }
312
313
314 void makeCommand(Buffer const & buf,
315                                           odocstream & os,
316                                           OutputParams const & runparams,
317                                           ParagraphList const & paragraphs,
318                                           ParagraphList::const_iterator const & pbegin)
319 {
320         Layout const & style = pbegin->layout();
321
322         bool const main_tag_opened = openTag(os, style);
323
324         // Label around sectioning number:
325         if (style.labeltype != LABEL_NO_LABEL) {
326                 bool const label_tag_opened = openLabelTag(os, style);
327                 if (!style.counter.empty())
328                         buf.params().documentClass().counters().step(style.counter);
329                 os << pbegin->expandLabel(style, buf.params(), false);
330                 if (label_tag_opened)
331                         closeLabelTag(os, style);
332                 // Otherwise the label might run together with the text
333                 os << ' ';
334         }
335
336         pbegin->simpleLyXHTMLOnePar(buf, os, runparams,
337                         outerFont(distance(paragraphs.begin(), pbegin), paragraphs));
338         if (main_tag_opened)
339                 closeTag(os, style);
340 }
341
342 } // end anonymous namespace
343
344
345 void xhtmlParagraphs(ParagraphList const & paragraphs,
346                        Buffer const & buf,
347                        odocstream & os,
348                        OutputParams const & runparams)
349 {
350         ParagraphList::const_iterator par = paragraphs.begin();
351         ParagraphList::const_iterator pend = paragraphs.end();
352
353         while (par != pend) {
354                 Layout const & style = par->layout();
355                 ParagraphList::const_iterator lastpar = par;
356                 ParagraphList::const_iterator send;
357
358                 switch (style.latextype) {
359                 case LATEX_COMMAND: {
360                         // The files with which we are working never have more than
361                         // one paragraph in a command structure.
362                         makeCommand(buf, os, runparams, paragraphs, par);
363                         ++par;
364                         break;
365                 }
366                 case LATEX_ENVIRONMENT:
367                 case LATEX_ITEM_ENVIRONMENT: {
368                         send = searchEnvironment(par, pend);
369                         par = makeEnvironment(buf, os, runparams, paragraphs, par,send);
370                         break;
371                 }
372                 case LATEX_PARAGRAPH:
373                         send = searchParagraph(par, pend);
374                         par = makeParagraph(buf, os, runparams, paragraphs, par,send);
375                         break;
376                 default:
377                         break;
378                 }
379                 os << '\n';
380                 // makeEnvironment may process more than one paragraphs and bypass pend
381                 if (distance(lastpar, par) >= distance(lastpar, pend))
382                         break;
383         }
384 }
385
386
387 } // namespace lyx