src/html/m_pre.cpp

   1 /////////////////////////////////////////////////////////////////////////////
   2 // Name:        m_pre.cpp
   3 // Purpose:     wxHtml module for <PRE> ... </PRE> tag (code citation)
   4 // Author:      Vaclav Slavik
   5 // RCS-ID:      $Id$
   6 // Copyright:   (c) 1999 Vaclav Slavik
   7 // Licence:     wxWindows Licence
   8 /////////////////////////////////////////////////////////////////////////////
   9
  10 #ifdef __GNUG__
  11 #pragma implementation
  12 #endif
  13
  14 #include "wx/wxprec.h"
  15
  16 #include "wx/defs.h"
  17 #if wxUSE_HTML && wxUSE_STREAMS
  18 #ifdef __BORDLANDC__
  19 #pragma hdrstop
  20 #endif
  21
  22 #ifndef WXPRECOMP
  23 #endif
  24
  25 #include "wx/html/forcelnk.h"
  26 #include "wx/html/m_templ.h"
  27
  28 #include "wx/html/htmlcell.h"
  29 #include "wx/tokenzr.h"
  30 #include "wx/encconv.h"
  31
  32 FORCE_LINK_ME(m_pre)
  33
  34 // replaces '\t', ' ' and '\n' with HTML markup:
  35 static wxString LINKAGEMODE HtmlizeWhitespaces(const wxString& str)
  36 {
  37     wxString out;
  38     size_t i = 0, j = 0, len = str.Len();
  39     for (i = 0; i < len; i++)
  40     {
  41         switch (str[i])
  42         {
  43             case wxT('<'):
  44                 while (i < len && str[i] != wxT('>'))
  45                     out << str[i++];
  46                 out << wxT('>');
  47                 break;
  48             case wxT(' '):
  49                 out << wxT("&nbsp;");
  50                 break;
  51             case wxT('\n'):
  52                 out << wxT("<br>");
  53                 break;
  54             case wxT('\t'):
  55                 for (j = 8 - i%8; j > 0; j--) out << wxT("&nbsp;");
  56                 break;
  57             default:
  58                 out << str[i];
  59                 break;
  60         }
  61     }
  62     return out;
  63 }
  64
  65
  66 //-----------------------------------------------------------------------------
  67 // The list handler:
  68 //-----------------------------------------------------------------------------
  69
  70
  71 TAG_HANDLER_BEGIN(PRE, "PRE")
  72
  73     TAG_HANDLER_PROC(tag)
  74     {
  75         wxHtmlContainerCell *c;
  76
  77         int fixed = m_WParser->GetFontFixed(),
  78             italic = m_WParser->GetFontItalic(),
  79             underlined = m_WParser->GetFontUnderlined(),
  80             bold = m_WParser->GetFontBold(),
  81             fsize = m_WParser->GetFontSize();
  82
  83         c = m_WParser->GetContainer();
  84         m_WParser->SetFontUnderlined(FALSE);
  85         m_WParser->SetFontBold(FALSE);
  86         m_WParser->SetFontItalic(FALSE);
  87         m_WParser->SetFontFixed(TRUE);
  88         m_WParser->SetFontSize(3);
  89         c->InsertCell(new wxHtmlFontCell(m_WParser->CreateCurrentFont()));
  90
  91         m_WParser->CloseContainer();
  92         c = m_WParser->OpenContainer();
  93         c->SetAlignHor(wxHTML_ALIGN_LEFT);
  94
  95         wxString srcMid =
  96             m_WParser->GetSource()->Mid(tag.GetBeginPos(),
  97                                         tag.GetEndPos1() - tag.GetBeginPos());
  98         // It is safe to temporarily change the source being parsed,
  99         // provided we restore the state back after parsing
 100         m_Parser->SetSourceAndSaveState(HtmlizeWhitespaces(srcMid));
 101         m_Parser->DoParsing();
 102         m_Parser->RestoreState();
 103
 104         m_WParser->CloseContainer();
 105         c = m_WParser->OpenContainer();
 106
 107         m_WParser->SetFontUnderlined(underlined);
 108         m_WParser->SetFontBold(bold);
 109         m_WParser->SetFontItalic(italic);
 110         m_WParser->SetFontFixed(fixed);
 111         m_WParser->SetFontSize(fsize);
 112         c->InsertCell(new wxHtmlFontCell(m_WParser->CreateCurrentFont()));
 113
 114         return TRUE;
 115     }
 116
 117 TAG_HANDLER_END(PRE)
 118
 119
 120
 121
 122
 123 TAGS_MODULE_BEGIN(Pre)
 124
 125     TAGS_MODULE_ADD(PRE)
 126
 127 TAGS_MODULE_END(Pre)
 128
 129 #endif