]> git.saurik.com Git - wxWidgets.git/blobdiff - src/richtext/richtexthtml.cpp
fixed client<->window coords translations in DoMoveWindow and DoSetSize
[wxWidgets.git] / src / richtext / richtexthtml.cpp
index c1e9c9c584703f9947b823503bea18042ac2aeda..6ec0aed2d17fb7fd10e910dac1d863c6dda775e2 100644 (file)
@@ -1,5 +1,5 @@
 /////////////////////////////////////////////////////////////////////////////
-// Name:        richtext/richtexthtml.cpp
+// Name:        src/richtext/richtexthtml.cpp
 // Purpose:     HTML I/O for wxRichTextCtrl
 // Author:      Julian Smart
 // Modified by:
@@ -13,7 +13,7 @@
 #include "wx/wxprec.h"
 
 #ifdef __BORLANDC__
-  #pragma hdrstop
+    #pragma hdrstop
 #endif
 
 #if wxUSE_RICHTEXT
@@ -21,7 +21,6 @@
 #include "wx/richtext/richtexthtml.h"
 
 #ifndef WX_PRECOMP
-  #include "wx/wx.h"
 #endif
 
 #include "wx/filename.h"
@@ -61,6 +60,36 @@ bool wxRichTextHTMLHandler::DoSaveFile(wxRichTextBuffer *buffer, wxOutputStream&
 
     str << wxT("<html><head></head><body>\n");
 
+    /*
+    wxRichText may be support paper formats like a1/a2/a3/a4
+    when this widget grown enough, i should turn back and support its new features
+    but not yet
+
+      str << wxT("<table border=0 cellpadding=0 cellspacing=0><tr><td>");
+
+        wxString left_indent = SymbolicIndent(currentParaStyle.GetLeftIndent());
+        wxString right_indent = SymbolicIndent(currentParaStyle.GetRightIndent());
+
+          str << wxString::Format(wxT("%s</td><td></td><td>%s</td></tr><tr>"),
+          left_indent.c_str(), //Document-Wide Left Indent
+          right_indent.c_str()); //Document-Wide Right Indent
+
+            str << wxT("<td></td><td width=\"100%\">");
+    */
+
+    str << wxT("<table border=0 cellpadding=0 cellspacing=0><tr><td width=\"100%\">");
+
+    str << wxString::Format(wxT("<font face=\"%s\" size=\"%ld\" color=\"%s\" >"),
+        currentParaStyle.GetFont().GetFaceName().c_str(), Pt_To_Size( currentParaStyle.GetFont().GetPointSize() ),
+        currentParaStyle.GetTextColour().GetAsString(wxC2S_HTML_SYNTAX).c_str());
+
+    //wxString align = GetAlignment( currentParaStyle.GetAlignment() );
+    //str << wxString::Format(wxT("<p align=\"%s\">"), align );
+
+    m_font = false;
+    m_indent = 0;
+    m_list = false;
+
     wxRichTextObjectList::compatibility_iterator node = buffer->GetChildren().GetFirst();
     while (node)
     {
@@ -69,7 +98,7 @@ bool wxRichTextHTMLHandler::DoSaveFile(wxRichTextBuffer *buffer, wxOutputStream&
 
         if (para)
         {
-            OutputParagraphFormatting(currentParaStyle, para->GetAttributes(), stream, true);
+            OutputParagraphFormatting(currentParaStyle, para->GetAttributes(), stream);
 
             wxRichTextObjectList::compatibility_iterator node2 = para->GetChildren().GetFirst();
             while (node2)
@@ -78,99 +107,483 @@ bool wxRichTextHTMLHandler::DoSaveFile(wxRichTextBuffer *buffer, wxOutputStream&
                 wxRichTextPlainText* textObj = wxDynamicCast(obj, wxRichTextPlainText);
                 if (textObj && !textObj->IsEmpty())
                 {
-                    OutputCharacterFormatting(currentCharStyle, obj->GetAttributes(), stream, true);
+                    BeginCharacterFormatting(currentCharStyle, obj->GetAttributes(), stream);
 
                     str << textObj->GetText();
 
-                    OutputCharacterFormatting(currentCharStyle, obj->GetAttributes(), stream, false);
+                    EndCharacterFormatting(currentCharStyle, obj->GetAttributes(), stream);
                 }
 
+                wxRichTextImage* image = wxDynamicCast(obj, wxRichTextImage);
+                if( image && !image->IsEmpty())
+                    Image_to_Base64( image, stream );
+
                 node2 = node2->GetNext();
             }
-
-            OutputParagraphFormatting(currentParaStyle, para->GetAttributes(), stream, false);
-
-            str << wxT("<P>\n");
+            str << wxT("\n");
+            //OutputParagraphFormatting(currentParaStyle, para->GetAttributes(), stream, false);
         }
-
         node = node->GetNext();
     }
 
-    str << wxT("</body></html>\n");
+    str << wxT("</font></td></tr></table></body></html>\n");
 
     return true;
 }
 
-/// Output character formatting
-void wxRichTextHTMLHandler::OutputCharacterFormatting(const wxTextAttrEx& WXUNUSED(currentStyle), const wxTextAttrEx& thisStyle, wxOutputStream& stream, bool start)
+void wxRichTextHTMLHandler::BeginCharacterFormatting(const wxTextAttrEx& currentStyle, const wxTextAttrEx& thisStyle, wxOutputStream& stream)
 {
     wxTextOutputStream str(stream);
 
-    bool isBold = false;
-    bool isItalic = false;
-    bool isUnderline = false;
-    wxString faceName;
+    //Is the item bulleted one?
+    if( thisStyle.GetBulletStyle() != wxTEXT_ATTR_BULLET_STYLE_NONE )
+    {
+        //Is there any opened list?
+        if( m_list )
+        {
+            //Yes there is
+
+            //Is the item among the previous ones
+            //Is the item one of the previous list tag's child items
+            if( (thisStyle.GetLeftIndent() == (m_indent + 100)) || (thisStyle.GetLeftIndent() < 100) )
+                str << wxT("<li>");//Yes it is
+            else
+            {
+                //No it isn't
+
+                //So we should close the list tag
+                str << (m_is_ul ? wxT("</ul>") : wxT("</ol>"));
+
+                //And renavigate to new list's horizontal position
+                NavigateToListPosition(thisStyle, str);
+                //Ok it's done
+
+                //Get the appropriate tag, an ol for numerical values, an ul for dot, square etc.
+                wxString tag;
+                TypeOfList(thisStyle, tag);
+                str << tag << wxT("<li>");
+            }
+        }
+        else
+        {
+            //No there isn't a list
+
+            //navigate to new list's horizontal position(indent)
+            NavigateToListPosition(thisStyle, str);
 
-    if (thisStyle.GetFont().Ok())
+            //Get the appropriate tag, an ol for numerical values, an ul for dot, square etc.
+            wxString tag;
+            TypeOfList(thisStyle, tag);
+            str << tag << wxT("<li>");
+
+            //Now we have a list, mark it.
+            m_list = true;
+        }
+    }
+    else if( m_list )
+    {
+        //The item is not bulleted and there is a list what should be closed now.
+        //So close the list
+
+        str << (m_is_ul ? wxT("</ul>") : wxT("</ol>"));
+        //And mark as there is no an opened list
+        m_list = false;
+    }
+
+    // does the item have an indentation ?
+    if( thisStyle.GetLeftIndent() )
+    {
+        if( thisStyle.GetBulletStyle() == wxTEXT_ATTR_BULLET_STYLE_NONE )
+        {
+            if( m_indent )
+            {
+                if( (thisStyle.GetLeftIndent() + thisStyle.GetLeftSubIndent()) == m_indent )
+                {
+                    if( thisStyle.GetLeftSubIndent() < 0 )
+                    {
+                        str << SymbolicIndent(~thisStyle.GetLeftSubIndent());
+                    }
+                }
+                else
+                {
+                    if( thisStyle.GetLeftIndent() + thisStyle.GetLeftSubIndent() > m_indent )
+                    {
+                        Indent(thisStyle, str);
+                        m_indent = thisStyle.GetLeftIndent() + thisStyle.GetLeftSubIndent();
+                        m_indents.Add( m_indent );
+                    }
+                    else
+                    {
+                        int i = m_indents.size() - 1;
+                        for(; i > -1; i--)
+                        {
+                            if( m_indent < (thisStyle.GetLeftIndent() + thisStyle.GetLeftSubIndent()) )
+                            {
+                                Indent(thisStyle, str);
+                                m_indent = thisStyle.GetLeftIndent() + thisStyle.GetLeftSubIndent();
+                                m_indents.Add( m_indent );
+
+                                break;
+                            }
+                            else if( m_indent == (thisStyle.GetLeftIndent() + thisStyle.GetLeftSubIndent()) )
+                            {
+                                if( thisStyle.GetLeftSubIndent() < 0 )
+                                {
+                                    str << SymbolicIndent(~thisStyle.GetLeftSubIndent());
+                                }
+                                break;
+                            }
+                            else
+                            {
+                                str << wxT("</td></tr></table>");
+
+                                m_indents.RemoveAt(i);
+
+                                if( i < 1 ){m_indent=0; break;}
+                                m_indent = m_indents[i-1];
+                            }
+                        }
+                    }
+                }
+            }
+            else
+            {
+                Indent(thisStyle, str);
+                m_indent = thisStyle.GetLeftIndent() + thisStyle.GetLeftSubIndent();
+                m_indents.Add( m_indent );
+            }
+        }
+    }
+    else if( m_indent )
     {
-        if (thisStyle.GetFont().GetWeight() == wxBOLD)
-            isBold = true;
-        if (thisStyle.GetFont().GetStyle() == wxITALIC)
-            isItalic = true;
-        if (thisStyle.GetFont().GetUnderlined())
-            isUnderline = true;
-
-        faceName = thisStyle.GetFont().GetFaceName();
+        //The item is not indented and there is a table(s) what should be closed now.
+
+        //So close them
+        for(unsigned int i = 0; i < m_indents.size(); i++ )
+            str << wxT("</td></tr></table>");
+
+        m_indent = 0;
+        m_indents.Clear();
     }
 
-    if (start)
+
+    wxString style;
+
+    //Is there any change on the font properties of the item
+    if( thisStyle.GetFont().GetFaceName() != currentStyle.GetFont().GetFaceName() )
+        style += wxString::Format(wxT(" face=\"%s\""), thisStyle.GetFont().GetFaceName().c_str());
+    if( thisStyle.GetFont().GetPointSize() != currentStyle.GetFont().GetPointSize() )
+        style += wxString::Format(wxT(" size=\"%ld\""), Pt_To_Size(thisStyle.GetFont().GetPointSize()) );
+    if( thisStyle.GetTextColour() != currentStyle.GetTextColour() )
+        style += wxString::Format(wxT(" color=\"%s\""), thisStyle.GetTextColour().GetAsString(wxC2S_HTML_SYNTAX).c_str());
+
+    if( style.size() )
     {
-        if (isBold)
-            str << wxT("<b>");
-        if (isItalic)
-            str << wxT("<i>");
-        if (isUnderline)
-            str << wxT("<u>");
+        str << wxString::Format(wxT("<font %s >"), style.c_str());
+        m_font = true;
     }
-    else
+
+    if( thisStyle.GetFont().GetWeight() == wxBOLD )
+        str << wxT("<b>");
+    if( thisStyle.GetFont().GetStyle() == wxITALIC )
+        str << wxT("<i>");
+    if( thisStyle.GetFont().GetUnderlined() )
+        str << wxT("<u>");
+}
+
+void wxRichTextHTMLHandler::EndCharacterFormatting(const wxTextAttrEx& WXUNUSED(currentStyle), const wxTextAttrEx& thisStyle, wxOutputStream& stream)
+{
+    wxTextOutputStream str(stream);
+
+    if( thisStyle.GetFont().GetUnderlined() )
+        str << wxT("</u>");
+    if( thisStyle.GetFont().GetStyle() == wxITALIC )
+        str << wxT("</i>");
+    if( thisStyle.GetFont().GetWeight() == wxBOLD )
+        str << wxT("</b>");
+
+    if( m_font )
     {
-        if (isUnderline)
-            str << wxT("</u>");
-        if (isItalic)
-            str << wxT("</i>");
-        if (isBold)
-            str << wxT("</b>");
+        m_font = false;
+        str << wxT("</font>");
     }
 }
 
 /// Output paragraph formatting
-void wxRichTextHTMLHandler::OutputParagraphFormatting(const wxTextAttrEx& WXUNUSED(currentStyle), const wxTextAttrEx& thisStyle, wxOutputStream& stream, bool start)
+void wxRichTextHTMLHandler::OutputParagraphFormatting(const wxTextAttrEx& WXUNUSED(currentStyle), const wxTextAttrEx& thisStyle, wxOutputStream& stream)
 {
-    // TODO: lists, indentation (using tables), fonts, right-align, ...
+    //If there is no opened list currently, insert a <p> after every paragraph
+    if(!m_list)
+    {
+        wxTextOutputStream str(stream);
+        wxString align = GetAlignment( thisStyle );
+        str << wxString::Format(wxT("<p align=\"%s\">"), align.c_str());
+    }
+}
 
-    wxTextOutputStream str(stream);
-    bool isCentered = false;
+void wxRichTextHTMLHandler::NavigateToListPosition(const wxTextAttrEx& thisStyle, wxTextOutputStream& str)
+{
+    //indenting an item using an ul/ol tag is equal to inserting 5 x &nbsp; on its left side.
+    //so we should start from 100 point left
 
-    if (thisStyle.GetAlignment() == wxTEXT_ALIGNMENT_CENTRE)
+    //Is the second td's left wall of the current indentaion table at the 100+ point-left-side
+    //of the item, horizontally?
+    if( m_indent + 100 < thisStyle.GetLeftIndent() )
     {
-        isCentered = true;
+        //yes it is
+        LIndent(thisStyle, str);
+        m_indent = thisStyle.GetLeftIndent() - 100;
+        m_indents.Add( m_indent );
+        return;
     }
+    //No it isn't
 
-    if (start)
+    int i = m_indents.size() - 1;
+    for(; i > -1; i--)
     {
-        if (isCentered)
-            str << wxT("<center>");
+        //Is the second td's left wall of the current indentaion table at the 100+ point-left-side
+        //of the item ?
+        if( m_indent + 100 < thisStyle.GetLeftIndent() )
+        {
+            //Yes it is
+            LIndent(thisStyle, str);
+            m_indent = thisStyle.GetLeftIndent() - 100;
+            m_indents.Add( m_indent );
+            break;
+        }
+        else if( m_indent + 100 == thisStyle.GetLeftIndent() )
+            break;//exact match
+        else
+        {
+            //No it is not, the second td's left wall of the current indentaion table is at the
+            //right side of the current item horizontally, so close it.
+            str << wxT("</td></tr></table>");
+
+            m_indents.RemoveAt(i);
+
+            if( i < 1 ){m_indent=0; break;}
+            m_indent = m_indents[i-1];
+        }
+    }
+}
+void wxRichTextHTMLHandler::Indent( const wxTextAttrEx& thisStyle, wxTextOutputStream& str )
+{
+    //As a five year experienced web developer i assure you there is no way to indent an item
+    //in html way, but we can use tables.
+
+
+
+    //Item -> "Hello world"
+    //Its Left Indentation -> 100
+    //Its Left Sub-Indentation ->40
+    //A typical indentation-table for the item will be construct as the following
+
+    //3 x nbsp = 60
+    //2 x nbsp = 40
+    //LSI = Left Sub Indent
+    //LI = Left Indent - LSI
+    //
+    //-------------------------------------------
+    //|&nbsp;&nbsp;nbsp;|nbsp;nbsp;Hello World  |
+    //|      |          |    |                  |
+    //|        V        |    V                  |
+    //|      --LI--     | --LSI--               |
+    //-------------------------------------------
+
+    str << wxT("<table width=\"100%\" border=\"0\" cellpadding=\"0\" cellspacing=\"0\"><tr>");
+
+    wxString symbolic_indent = SymbolicIndent( (thisStyle.GetLeftIndent() + thisStyle.GetLeftSubIndent()) - m_indent );
+    str << wxString::Format( wxT("<td>%s</td>"), symbolic_indent.c_str() );
+    str << wxT("<td width=\"100%\">");
+
+    if( thisStyle.GetLeftSubIndent() < 0 )
+    {
+        str << SymbolicIndent(~thisStyle.GetLeftSubIndent());
     }
+}
+
+void wxRichTextHTMLHandler::LIndent( const wxTextAttrEx& thisStyle, wxTextOutputStream& str )
+{
+    //Code:
+    //r.BeginNumberedBullet(1, 200, 60);
+    //r.Newline();
+    //r.WriteText(wxT("first item"));
+    //r.EndNumberedBullet();
+    //r.BeginNumberedBullet(2, 200, 60);
+    //r.Newline();
+    //r.WriteText(wxT("second item."));
+    //r.EndNumberedBullet();
+    //
+    //A typical indentation-table for the item will be construct as the following
+
+    //1 x nbsp = 20 point
+    //ULI -> 100pt (UL/OL tag indents its sub element by 100 point)
+    //<--------- 100 pt ---------->|
+    //------------------------------------------------------
+    //|&nbsp;&nbsp;nbsp;&nbsp;nbsp;|<ul>                   |
+    //|                            |<-ULI-><li>first item  |
+    //|                            |<-ULI-><li>second item |
+    //|                            |</ul>                  |
+    //------------------------------------------------------
+    //                             |<-100->|
+
+
+    str << wxT("<table width=\"100%\" border=\"0\" cellpadding=\"0\" cellspacing=\"0\"><tr>");
+
+    wxString symbolic_indent = SymbolicIndent( (thisStyle.GetLeftIndent() - m_indent) - 100);
+    str << wxString::Format( wxT("<td>%s</td>"), symbolic_indent.c_str() );
+    str << wxT("<td width=\"100%\">");
+}
+
+void wxRichTextHTMLHandler::TypeOfList( const wxTextAttrEx& thisStyle, wxString& tag )
+{
+    //We can use number attribute of li tag but not all the browsers support it.
+    //also wxHtmlWindow doesn't support type attribute.
+
+    m_is_ul = false;
+    if( thisStyle.GetBulletStyle() == (wxTEXT_ATTR_BULLET_STYLE_ARABIC|wxTEXT_ATTR_BULLET_STYLE_PERIOD))
+        tag = wxT("<ol type=\"1\">");
+    else if( thisStyle.GetBulletStyle() == wxTEXT_ATTR_BULLET_STYLE_LETTERS_UPPER )
+        tag = wxT("<ol type=\"A\">");
+    else if( thisStyle.GetBulletStyle() == wxTEXT_ATTR_BULLET_STYLE_LETTERS_LOWER )
+        tag = wxT("<ol type=\"a\">");
+    else if( thisStyle.GetBulletStyle() == wxTEXT_ATTR_BULLET_STYLE_ROMAN_UPPER )
+        tag = wxT("<ol type=\"I\">");
+    else if( thisStyle.GetBulletStyle() == wxTEXT_ATTR_BULLET_STYLE_ROMAN_LOWER )
+        tag = wxT("<ol type=\"i\">");
     else
     {
-        if (isCentered)
-            str << wxT("</center>");
+        tag = wxT("<ul>");
+        m_is_ul = true;
+    }
+}
+
+wxString wxRichTextHTMLHandler::GetAlignment( const wxTextAttrEx& thisStyle )
+{
+    switch( thisStyle.GetAlignment() )
+    {
+    case wxTEXT_ALIGNMENT_LEFT:
+        return  wxT("left");
+    case wxTEXT_ALIGNMENT_RIGHT:
+        return wxT("right");
+    case wxTEXT_ALIGNMENT_CENTER:
+        return wxT("center");
+    case wxTEXT_ALIGNMENT_JUSTIFIED:
+        return wxT("justify");
+    default:
+        return wxT("left");
     }
 }
 
+void wxRichTextHTMLHandler::Image_to_Base64(wxRichTextImage* image, wxOutputStream& stream)
+{
+    wxTextOutputStream str(stream);
+
+    str << wxT("<img src=\"");
+    str << wxT("data:");
+    str << GetMimeType(image->GetImageBlock().GetImageType());
+    str << wxT(";base64,");
+
+    if (image->GetImage().Ok() && !image->GetImageBlock().GetData())
+        image->MakeBlock();
+
+    wxChar* data = b64enc( image->GetImageBlock().GetData(), image->GetImageBlock().GetDataSize() );
+    str << data;
+
+    delete[] data;
+
+    str << wxT("\" />");
+}
+
+long wxRichTextHTMLHandler::Pt_To_Size(long size)
+{
+    //return most approximate size
+    if(size < 9 ) return 1;
+    else if( size < 11 ) return 2;
+    else if( size < 14 ) return 3;
+    else if( size < 18 ) return 4;
+    else if( size < 23 ) return 5;
+    else if( size < 30 ) return 6;
+    else return 7;
+}
+
+wxString wxRichTextHTMLHandler::SymbolicIndent(long indent)
+{
+    wxString in;
+    for(;indent > 0; indent -= 20)
+        in.Append( wxT("&nbsp;") );
+    return in;
+}
+
+const wxChar* wxRichTextHTMLHandler::GetMimeType(int imageType)
+{
+    switch(imageType)
+    {
+    case wxBITMAP_TYPE_BMP:
+        return wxT("image/bmp");
+    case wxBITMAP_TYPE_TIF:
+        return wxT("image/tiff");
+    case wxBITMAP_TYPE_GIF:
+        return wxT("image/gif");
+    case wxBITMAP_TYPE_PNG:
+        return wxT("image/png");
+    case wxBITMAP_TYPE_JPEG:
+        return wxT("image/jpeg");
+    default:
+        return wxT("image/unknown");
+    }
+}
+
+//exim-style base64 encoder
+wxChar* wxRichTextHTMLHandler::b64enc( unsigned char* input, size_t in_len )
+{
+    //elements of enc64 array must be 8 bit values
+    //otherwise encoder will fail
+    //hmmm.. Does wxT macro define a char as 16 bit value
+    //when compiling with UNICODE option?
+    static const wxChar enc64[] = wxT("ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789+/");
+    wxChar* output = new wxChar[4*((in_len+2)/3)+1];
+    wxChar* p = output;
+
+    while( in_len-- > 0 )
+    {
+        register wxChar a, b;
+
+        a = *input++;
+
+        *p++ = enc64[ (a >> 2) & 0x3f ];
+
+        if( in_len-- <= 0 )
+        {
+            *p++ = enc64[ (a << 4 ) & 0x30 ];
+            *p++ = '=';
+            *p++ = '=';
+            break;
+        }
+
+        b = *input++;
+
+        *p++ = enc64[(( a << 4 ) | ((b >> 4) &0xf )) & 0x3f];
+
+        if( in_len-- <= 0 )
+        {
+            *p++ = enc64[ (b << 2) & 0x3f ];
+            *p++ = '=';
+            break;
+        }
+
+        a = *input++;
+
+        *p++ = enc64[ ((( b << 2 ) & 0x3f ) | ((a >> 6)& 0x3)) & 0x3f ];
+
+        *p++ = enc64[ a & 0x3f ];
+    }
+    *p = 0;
+
+    return output;
+}
 #endif
-    // wxUSE_STREAMS
+// wxUSE_STREAMS
 
 #endif
-    // wxUSE_RICHTEXT
-    
+// wxUSE_RICHTEXT