After copy and paste, cursor may appear to be above the bottom of content
[WebKit-https.git] / Source / WebCore / editing / markup.cpp
1 /*
2  * Copyright (C) 2004, 2005, 2006, 2007, 2008, 2009, 2013 Apple Inc. All rights reserved.
3  * Copyright (C) 2008, 2009, 2010, 2011 Google Inc. All rights reserved.
4  * Copyright (C) 2011 Igalia S.L.
5  * Copyright (C) 2011 Motorola Mobility. All rights reserved.
6  *
7  * Redistribution and use in source and binary forms, with or without
8  * modification, are permitted provided that the following conditions
9  * are met:
10  * 1. Redistributions of source code must retain the above copyright
11  *    notice, this list of conditions and the following disclaimer.
12  * 2. Redistributions in binary form must reproduce the above copyright
13  *    notice, this list of conditions and the following disclaimer in the
14  *    documentation and/or other materials provided with the distribution.
15  *
16  * THIS SOFTWARE IS PROVIDED BY APPLE COMPUTER, INC. ``AS IS'' AND ANY
17  * EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
18  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
19  * PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL APPLE COMPUTER, INC. OR
20  * CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL,
21  * EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO,
22  * PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR
23  * PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY
24  * OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
25  * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE
26  * OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. 
27  */
28
29 #include "config.h"
30 #include "markup.h"
31
32 #include "CDATASection.h"
33 #include "CSSPrimitiveValue.h"
34 #include "CSSPropertyNames.h"
35 #include "CSSValue.h"
36 #include "CSSValueKeywords.h"
37 #include "ChildListMutationScope.h"
38 #include "DocumentFragment.h"
39 #include "DocumentType.h"
40 #include "Editor.h"
41 #include "ElementIterator.h"
42 #include "ExceptionCode.h"
43 #include "ExceptionCodePlaceholder.h"
44 #include "Frame.h"
45 #include "HTMLBodyElement.h"
46 #include "HTMLElement.h"
47 #include "HTMLNames.h"
48 #include "HTMLTableElement.h"
49 #include "HTMLTextAreaElement.h"
50 #include "HTMLTextFormControlElement.h"
51 #include "URL.h"
52 #include "MarkupAccumulator.h"
53 #include "Range.h"
54 #include "RenderBlock.h"
55 #include "Settings.h"
56 #include "StyleProperties.h"
57 #include "VisibleSelection.h"
58 #include "VisibleUnits.h"
59 #include "htmlediting.h"
60 #include <wtf/StdLibExtras.h>
61 #include <wtf/text/StringBuilder.h>
62
63 #if ENABLE(DELETION_UI)
64 #include "DeleteButtonController.h"
65 #endif
66
67 namespace WebCore {
68
69 using namespace HTMLNames;
70
71 static bool propertyMissingOrEqualToNone(StyleProperties*, CSSPropertyID);
72
73 class AttributeChange {
74 public:
75     AttributeChange()
76         : m_name(nullAtom, nullAtom, nullAtom)
77     {
78     }
79
80     AttributeChange(PassRefPtr<Element> element, const QualifiedName& name, const String& value)
81         : m_element(element), m_name(name), m_value(value)
82     {
83     }
84
85     void apply()
86     {
87         m_element->setAttribute(m_name, m_value);
88     }
89
90 private:
91     RefPtr<Element> m_element;
92     QualifiedName m_name;
93     String m_value;
94 };
95
96 static void completeURLs(DocumentFragment* fragment, const String& baseURL)
97 {
98     Vector<AttributeChange> changes;
99
100     URL parsedBaseURL(ParsedURLString, baseURL);
101
102     for (auto& element : descendantsOfType<Element>(*fragment)) {
103         if (!element.hasAttributes())
104             continue;
105         for (const Attribute& attribute : element.attributesIterator()) {
106             if (element.isURLAttribute(attribute) && !attribute.value().isEmpty())
107                 changes.append(AttributeChange(&element, attribute.name(), URL(parsedBaseURL, attribute.value()).string()));
108         }
109     }
110
111     size_t numChanges = changes.size();
112     for (size_t i = 0; i < numChanges; ++i)
113         changes[i].apply();
114 }
115     
116 class StyledMarkupAccumulator final : public MarkupAccumulator {
117 public:
118     enum RangeFullySelectsNode { DoesFullySelectNode, DoesNotFullySelectNode };
119
120     StyledMarkupAccumulator(Vector<Node*>* nodes, EAbsoluteURLs, EAnnotateForInterchange, const Range*, bool needsPositionStyleConversion, Node* highestNodeToBeSerialized = 0);
121
122     Node* serializeNodes(Node* startNode, Node* pastEnd);
123     void wrapWithNode(Node&, bool convertBlocksToInlines = false, RangeFullySelectsNode = DoesFullySelectNode);
124     void wrapWithStyleNode(StyleProperties*, Document&, bool isBlock = false);
125     String takeResults();
126     
127     bool needRelativeStyleWrapper() const { return m_needRelativeStyleWrapper; }
128     bool needClearingDiv() const { return m_needClearingDiv; }
129
130     using MarkupAccumulator::appendString;
131
132 private:
133     void appendStyleNodeOpenTag(StringBuilder&, StyleProperties*, Document&, bool isBlock = false);
134     const String& styleNodeCloseTag(bool isBlock = false);
135
136     String renderedText(const Node&, const Range*);
137     String stringValueForRange(const Node&, const Range*);
138
139     void appendElement(StringBuilder& out, const Element&, bool addDisplayInline, RangeFullySelectsNode);
140
141     virtual void appendText(StringBuilder& out, const Text&) override;
142     virtual void appendElement(StringBuilder& out, const Element& element, Namespaces*) override
143     {
144         appendElement(out, element, false, DoesFullySelectNode);
145     }
146
147     enum NodeTraversalMode { EmitString, DoNotEmitString };
148     Node* traverseNodesForSerialization(Node* startNode, Node* pastEnd, NodeTraversalMode);
149
150     bool shouldAnnotate()
151     {
152         return m_shouldAnnotate == AnnotateForInterchange;
153     }
154
155     bool shouldApplyWrappingStyle(const Node& node) const
156     {
157         return m_highestNodeToBeSerialized && m_highestNodeToBeSerialized->parentNode() == node.parentNode() && m_wrappingStyle && m_wrappingStyle->style();
158     }
159
160     Vector<String> m_reversedPrecedingMarkup;
161     const EAnnotateForInterchange m_shouldAnnotate;
162     Node* m_highestNodeToBeSerialized;
163     RefPtr<EditingStyle> m_wrappingStyle;
164     bool m_needRelativeStyleWrapper;
165     bool m_needsPositionStyleConversion;
166     bool m_needClearingDiv;
167 };
168
169 inline StyledMarkupAccumulator::StyledMarkupAccumulator(Vector<Node*>* nodes, EAbsoluteURLs shouldResolveURLs, EAnnotateForInterchange shouldAnnotate, const Range* range, bool needsPositionStyleConversion, Node* highestNodeToBeSerialized)
170     : MarkupAccumulator(nodes, shouldResolveURLs, range)
171     , m_shouldAnnotate(shouldAnnotate)
172     , m_highestNodeToBeSerialized(highestNodeToBeSerialized)
173     , m_needRelativeStyleWrapper(false)
174     , m_needsPositionStyleConversion(needsPositionStyleConversion)
175     , m_needClearingDiv(false)
176 {
177 }
178
179 void StyledMarkupAccumulator::wrapWithNode(Node& node, bool convertBlocksToInlines, RangeFullySelectsNode rangeFullySelectsNode)
180 {
181     StringBuilder markup;
182     if (node.isElementNode())
183         appendElement(markup, toElement(node), convertBlocksToInlines && isBlock(&node), rangeFullySelectsNode);
184     else
185         appendStartMarkup(markup, node, 0);
186     m_reversedPrecedingMarkup.append(markup.toString());
187     appendEndTag(node);
188     if (m_nodes)
189         m_nodes->append(&node);
190 }
191
192 void StyledMarkupAccumulator::wrapWithStyleNode(StyleProperties* style, Document& document, bool isBlock)
193 {
194     StringBuilder openTag;
195     appendStyleNodeOpenTag(openTag, style, document, isBlock);
196     m_reversedPrecedingMarkup.append(openTag.toString());
197     appendString(styleNodeCloseTag(isBlock));
198 }
199
200 void StyledMarkupAccumulator::appendStyleNodeOpenTag(StringBuilder& out, StyleProperties* style, Document& document, bool isBlock)
201 {
202     // wrappingStyleForSerialization should have removed -webkit-text-decorations-in-effect
203     ASSERT(propertyMissingOrEqualToNone(style, CSSPropertyWebkitTextDecorationsInEffect));
204     if (isBlock)
205         out.appendLiteral("<div style=\"");
206     else
207         out.appendLiteral("<span style=\"");
208     appendAttributeValue(out, style->asText(), document.isHTMLDocument());
209     out.appendLiteral("\">");
210 }
211
212 const String& StyledMarkupAccumulator::styleNodeCloseTag(bool isBlock)
213 {
214     DEFINE_STATIC_LOCAL(const String, divClose, (ASCIILiteral("</div>")));
215     DEFINE_STATIC_LOCAL(const String, styleSpanClose, (ASCIILiteral("</span>")));
216     return isBlock ? divClose : styleSpanClose;
217 }
218
219 String StyledMarkupAccumulator::takeResults()
220 {
221     StringBuilder result;
222     result.reserveCapacity(totalLength(m_reversedPrecedingMarkup) + length());
223
224     for (size_t i = m_reversedPrecedingMarkup.size(); i > 0; --i)
225         result.append(m_reversedPrecedingMarkup[i - 1]);
226
227     concatenateMarkup(result);
228
229     // We remove '\0' characters because they are not visibly rendered to the user.
230     return result.toString().replaceWithLiteral('\0', "");
231 }
232
233 void StyledMarkupAccumulator::appendText(StringBuilder& out, const Text& text)
234 {    
235     const bool parentIsTextarea = text.parentElement() && isHTMLTextAreaElement(text.parentElement());
236     const bool wrappingSpan = shouldApplyWrappingStyle(text) && !parentIsTextarea;
237     if (wrappingSpan) {
238         RefPtr<EditingStyle> wrappingStyle = m_wrappingStyle->copy();
239         // FIXME: <rdar://problem/5371536> Style rules that match pasted content can change it's appearance
240         // Make sure spans are inline style in paste side e.g. span { display: block }.
241         wrappingStyle->forceInline();
242         // FIXME: Should this be included in forceInline?
243         wrappingStyle->style()->setProperty(CSSPropertyFloat, CSSValueNone);
244
245         appendStyleNodeOpenTag(out, wrappingStyle->style(), text.document());
246     }
247
248     if (!shouldAnnotate() || parentIsTextarea)
249         MarkupAccumulator::appendText(out, text);
250     else {
251         const bool useRenderedText = !enclosingNodeWithTag(firstPositionInNode(const_cast<Text*>(&text)), selectTag);
252         String content = useRenderedText ? renderedText(text, m_range) : stringValueForRange(text, m_range);
253         StringBuilder buffer;
254         appendCharactersReplacingEntities(buffer, content, 0, content.length(), EntityMaskInPCDATA);
255         out.append(convertHTMLTextToInterchangeFormat(buffer.toString(), &text));
256     }
257
258     if (wrappingSpan)
259         out.append(styleNodeCloseTag());
260 }
261     
262 String StyledMarkupAccumulator::renderedText(const Node& node, const Range* range)
263 {
264     if (!node.isTextNode())
265         return String();
266
267     const Text& textNode = toText(node);
268     unsigned startOffset = 0;
269     unsigned endOffset = textNode.length();
270
271     TextIteratorBehavior behavior = TextIteratorDefaultBehavior;
272     if (range && &node == range->startContainer())
273         startOffset = range->startOffset();
274     if (range && &node == range->endContainer())
275         endOffset = range->endOffset();
276     else if (range)
277         behavior = TextIteratorBehavesAsIfNodesFollowing;
278
279     Position start = createLegacyEditingPosition(const_cast<Node*>(&node), startOffset);
280     Position end = createLegacyEditingPosition(const_cast<Node*>(&node), endOffset);
281     return plainText(Range::create(node.document(), start, end).get(), behavior);
282 }
283
284 String StyledMarkupAccumulator::stringValueForRange(const Node& node, const Range* range)
285 {
286     if (!range)
287         return node.nodeValue();
288
289     String nodeValue = node.nodeValue();
290     if (&node == range->endContainer())
291         nodeValue.truncate(range->endOffset());
292     if (&node == range->startContainer())
293         nodeValue.remove(0, range->startOffset());
294     return nodeValue;
295 }
296
297 void StyledMarkupAccumulator::appendElement(StringBuilder& out, const Element& element, bool addDisplayInline, RangeFullySelectsNode rangeFullySelectsNode)
298 {
299     const bool documentIsHTML = element.document().isHTMLDocument();
300     appendOpenTag(out, element, 0);
301
302     const bool shouldAnnotateOrForceInline = element.isHTMLElement() && (shouldAnnotate() || addDisplayInline);
303     const bool shouldOverrideStyleAttr = shouldAnnotateOrForceInline || shouldApplyWrappingStyle(element);
304     if (element.hasAttributes()) {
305         for (const Attribute& attribute : element.attributesIterator()) {
306             // We'll handle the style attribute separately, below.
307             if (attribute.name() == styleAttr && shouldOverrideStyleAttr)
308                 continue;
309             appendAttribute(out, element, attribute, 0);
310         }
311     }
312
313     if (shouldOverrideStyleAttr) {
314         RefPtr<EditingStyle> newInlineStyle;
315
316         if (shouldApplyWrappingStyle(element)) {
317             newInlineStyle = m_wrappingStyle->copy();
318             newInlineStyle->removePropertiesInElementDefaultStyle(const_cast<Element*>(&element));
319             newInlineStyle->removeStyleConflictingWithStyleOfNode(const_cast<Element*>(&element));
320         } else
321             newInlineStyle = EditingStyle::create();
322
323         if (element.isStyledElement() && toStyledElement(element).inlineStyle())
324             newInlineStyle->overrideWithStyle(toStyledElement(element).inlineStyle());
325
326         if (shouldAnnotateOrForceInline) {
327             if (shouldAnnotate())
328                 newInlineStyle->mergeStyleFromRulesForSerialization(toHTMLElement(const_cast<Element*>(&element)));
329
330             if (addDisplayInline)
331                 newInlineStyle->forceInline();
332             
333             if (m_needsPositionStyleConversion) {
334                 m_needRelativeStyleWrapper |= newInlineStyle->convertPositionStyle();
335                 m_needClearingDiv |= newInlineStyle->isFloating();
336             }
337
338             // If the node is not fully selected by the range, then we don't want to keep styles that affect its relationship to the nodes around it
339             // only the ones that affect it and the nodes within it.
340             if (rangeFullySelectsNode == DoesNotFullySelectNode && newInlineStyle->style())
341                 newInlineStyle->style()->removeProperty(CSSPropertyFloat);
342         }
343
344         if (!newInlineStyle->isEmpty()) {
345             out.appendLiteral(" style=\"");
346             appendAttributeValue(out, newInlineStyle->style()->asText(), documentIsHTML);
347             out.append('\"');
348         }
349     }
350
351     appendCloseTag(out, element);
352 }
353
354 Node* StyledMarkupAccumulator::serializeNodes(Node* startNode, Node* pastEnd)
355 {
356     if (!m_highestNodeToBeSerialized) {
357         Node* lastClosed = traverseNodesForSerialization(startNode, pastEnd, DoNotEmitString);
358         m_highestNodeToBeSerialized = lastClosed;
359     }
360
361     if (m_highestNodeToBeSerialized && m_highestNodeToBeSerialized->parentNode())
362         m_wrappingStyle = EditingStyle::wrappingStyleForSerialization(m_highestNodeToBeSerialized->parentNode(), shouldAnnotate());
363
364     return traverseNodesForSerialization(startNode, pastEnd, EmitString);
365 }
366
367 Node* StyledMarkupAccumulator::traverseNodesForSerialization(Node* startNode, Node* pastEnd, NodeTraversalMode traversalMode)
368 {
369     const bool shouldEmit = traversalMode == EmitString;
370     Vector<Node*> ancestorsToClose;
371     Node* next;
372     Node* lastClosed = 0;
373     for (Node* n = startNode; n != pastEnd; n = next) {
374         // According to <rdar://problem/5730668>, it is possible for n to blow
375         // past pastEnd and become null here. This shouldn't be possible.
376         // This null check will prevent crashes (but create too much markup)
377         // and the ASSERT will hopefully lead us to understanding the problem.
378         ASSERT(n);
379         if (!n)
380             break;
381         
382         next = NodeTraversal::next(n);
383         bool openedTag = false;
384
385         if (isBlock(n) && canHaveChildrenForEditing(n) && next == pastEnd)
386             // Don't write out empty block containers that aren't fully selected.
387             continue;
388
389         if (!n->renderer() && !enclosingNodeWithTag(firstPositionInOrBeforeNode(n), selectTag)) {
390             next = NodeTraversal::nextSkippingChildren(n);
391             // Don't skip over pastEnd.
392             if (pastEnd && pastEnd->isDescendantOf(n))
393                 next = pastEnd;
394         } else {
395             // Add the node to the markup if we're not skipping the descendants
396             if (shouldEmit)
397                 appendStartTag(*n);
398
399             // If node has no children, close the tag now.
400             if (!n->childNodeCount()) {
401                 if (shouldEmit)
402                     appendEndTag(*n);
403                 lastClosed = n;
404             } else {
405                 openedTag = true;
406                 ancestorsToClose.append(n);
407             }
408         }
409
410         // If we didn't insert open tag and there's no more siblings or we're at the end of the traversal, take care of ancestors.
411         // FIXME: What happens if we just inserted open tag and reached the end?
412         if (!openedTag && (!n->nextSibling() || next == pastEnd)) {
413             // Close up the ancestors.
414             while (!ancestorsToClose.isEmpty()) {
415                 Node* ancestor = ancestorsToClose.last();
416                 if (next != pastEnd && next->isDescendantOf(ancestor))
417                     break;
418                 // Not at the end of the range, close ancestors up to sibling of next node.
419                 if (shouldEmit)
420                     appendEndTag(*ancestor);
421                 lastClosed = ancestor;
422                 ancestorsToClose.removeLast();
423             }
424
425             // Surround the currently accumulated markup with markup for ancestors we never opened as we leave the subtree(s) rooted at those ancestors.
426             ContainerNode* nextParent = next ? next->parentNode() : 0;
427             if (next != pastEnd && n != nextParent) {
428                 Node* lastAncestorClosedOrSelf = n->isDescendantOf(lastClosed) ? lastClosed : n;
429                 for (ContainerNode* parent = lastAncestorClosedOrSelf->parentNode(); parent && parent != nextParent; parent = parent->parentNode()) {
430                     // All ancestors that aren't in the ancestorsToClose list should either be a) unrendered:
431                     if (!parent->renderer())
432                         continue;
433                     // or b) ancestors that we never encountered during a pre-order traversal starting at startNode:
434                     ASSERT(startNode->isDescendantOf(parent));
435                     if (shouldEmit)
436                         wrapWithNode(*parent);
437                     lastClosed = parent;
438                 }
439             }
440         }
441     }
442
443     return lastClosed;
444 }
445
446 static Node* ancestorToRetainStructureAndAppearanceForBlock(Node* commonAncestorBlock)
447 {
448     if (!commonAncestorBlock)
449         return 0;
450
451     if (commonAncestorBlock->hasTagName(tbodyTag) || commonAncestorBlock->hasTagName(trTag)) {
452         ContainerNode* table = commonAncestorBlock->parentNode();
453         while (table && !isHTMLTableElement(table))
454             table = table->parentNode();
455
456         return table;
457     }
458
459     if (isNonTableCellHTMLBlockElement(commonAncestorBlock))
460         return commonAncestorBlock;
461
462     return 0;
463 }
464
465 static inline Node* ancestorToRetainStructureAndAppearance(Node* commonAncestor)
466 {
467     return ancestorToRetainStructureAndAppearanceForBlock(enclosingBlock(commonAncestor));
468 }
469
470 static bool propertyMissingOrEqualToNone(StyleProperties* style, CSSPropertyID propertyID)
471 {
472     if (!style)
473         return false;
474     RefPtr<CSSValue> value = style->getPropertyCSSValue(propertyID);
475     if (!value)
476         return true;
477     if (!value->isPrimitiveValue())
478         return false;
479     return toCSSPrimitiveValue(value.get())->getValueID() == CSSValueNone;
480 }
481
482 static bool needInterchangeNewlineAfter(const VisiblePosition& v)
483 {
484     VisiblePosition next = v.next();
485     Node* upstreamNode = next.deepEquivalent().upstream().deprecatedNode();
486     Node* downstreamNode = v.deepEquivalent().downstream().deprecatedNode();
487     // Add an interchange newline if a paragraph break is selected and a br won't already be added to the markup to represent it.
488     return isEndOfParagraph(v) && isStartOfParagraph(next) && !(upstreamNode->hasTagName(brTag) && upstreamNode == downstreamNode);
489 }
490
491 static PassRefPtr<EditingStyle> styleFromMatchedRulesAndInlineDecl(const Node* node)
492 {
493     if (!node->isHTMLElement())
494         return 0;
495
496     // FIXME: Having to const_cast here is ugly, but it is quite a bit of work to untangle
497     // the non-const-ness of styleFromMatchedRulesForElement.
498     HTMLElement* element = const_cast<HTMLElement*>(static_cast<const HTMLElement*>(node));
499     RefPtr<EditingStyle> style = EditingStyle::create(element->inlineStyle());
500     style->mergeStyleFromRules(element);
501     return style.release();
502 }
503
504 static bool isElementPresentational(const Node* node)
505 {
506     return node->hasTagName(uTag) || node->hasTagName(sTag) || node->hasTagName(strikeTag)
507         || node->hasTagName(iTag) || node->hasTagName(emTag) || node->hasTagName(bTag) || node->hasTagName(strongTag);
508 }
509
510 static Node* highestAncestorToWrapMarkup(const Range* range, EAnnotateForInterchange shouldAnnotate)
511 {
512     Node* commonAncestor = range->commonAncestorContainer(IGNORE_EXCEPTION);
513     ASSERT(commonAncestor);
514     Node* specialCommonAncestor = 0;
515     if (shouldAnnotate == AnnotateForInterchange) {
516         // Include ancestors that aren't completely inside the range but are required to retain 
517         // the structure and appearance of the copied markup.
518         specialCommonAncestor = ancestorToRetainStructureAndAppearance(commonAncestor);
519
520         if (Node* parentListNode = enclosingNodeOfType(firstPositionInOrBeforeNode(range->firstNode()), isListItem)) {
521             if (WebCore::areRangesEqual(VisibleSelection::selectionFromContentsOfNode(parentListNode).toNormalizedRange().get(), range)) {
522                 specialCommonAncestor = parentListNode->parentNode();
523                 while (specialCommonAncestor && !isListElement(specialCommonAncestor))
524                     specialCommonAncestor = specialCommonAncestor->parentNode();
525             }
526         }
527
528         // Retain the Mail quote level by including all ancestor mail block quotes.
529         if (Node* highestMailBlockquote = highestEnclosingNodeOfType(firstPositionInOrBeforeNode(range->firstNode()), isMailBlockquote, CanCrossEditingBoundary))
530             specialCommonAncestor = highestMailBlockquote;
531     }
532
533     Node* checkAncestor = specialCommonAncestor ? specialCommonAncestor : commonAncestor;
534     if (checkAncestor->renderer() && checkAncestor->renderer()->containingBlock()) {
535         Node* newSpecialCommonAncestor = highestEnclosingNodeOfType(firstPositionInNode(checkAncestor), &isElementPresentational, CanCrossEditingBoundary, checkAncestor->renderer()->containingBlock()->element());
536         if (newSpecialCommonAncestor)
537             specialCommonAncestor = newSpecialCommonAncestor;
538     }
539
540     // If a single tab is selected, commonAncestor will be a text node inside a tab span.
541     // If two or more tabs are selected, commonAncestor will be the tab span.
542     // In either case, if there is a specialCommonAncestor already, it will necessarily be above 
543     // any tab span that needs to be included.
544     if (!specialCommonAncestor && isTabSpanTextNode(commonAncestor))
545         specialCommonAncestor = commonAncestor->parentNode();
546     if (!specialCommonAncestor && isTabSpanNode(commonAncestor))
547         specialCommonAncestor = commonAncestor;
548
549     if (Node *enclosingAnchor = enclosingNodeWithTag(firstPositionInNode(specialCommonAncestor ? specialCommonAncestor : commonAncestor), aTag))
550         specialCommonAncestor = enclosingAnchor;
551
552     return specialCommonAncestor;
553 }
554
555 // FIXME: Shouldn't we omit style info when annotate == DoNotAnnotateForInterchange? 
556 // FIXME: At least, annotation and style info should probably not be included in range.markupString()
557 static String createMarkupInternal(Document& document, const Range& range, const Range& updatedRange, Vector<Node*>* nodes,
558     EAnnotateForInterchange shouldAnnotate, bool convertBlocksToInlines, EAbsoluteURLs shouldResolveURLs)
559 {
560     DEFINE_STATIC_LOCAL(const String, interchangeNewlineString, (ASCIILiteral("<br class=\"" AppleInterchangeNewline "\">")));
561
562     bool collapsed = updatedRange.collapsed(ASSERT_NO_EXCEPTION);
563     if (collapsed)
564         return emptyString();
565     Node* commonAncestor = updatedRange.commonAncestorContainer(ASSERT_NO_EXCEPTION);
566     if (!commonAncestor)
567         return emptyString();
568
569     document.updateLayoutIgnorePendingStylesheets();
570
571     Node* body = enclosingNodeWithTag(firstPositionInNode(commonAncestor), bodyTag);
572     Node* fullySelectedRoot = 0;
573     // FIXME: Do this for all fully selected blocks, not just the body.
574     if (body && areRangesEqual(VisibleSelection::selectionFromContentsOfNode(body).toNormalizedRange().get(), &range))
575         fullySelectedRoot = body;
576     Node* specialCommonAncestor = highestAncestorToWrapMarkup(&updatedRange, shouldAnnotate);
577
578     bool needsPositionStyleConversion = body && fullySelectedRoot == body
579         && document.settings() && document.settings()->shouldConvertPositionStyleOnCopy();
580     StyledMarkupAccumulator accumulator(nodes, shouldResolveURLs, shouldAnnotate, &updatedRange, needsPositionStyleConversion, specialCommonAncestor);
581     Node* pastEnd = updatedRange.pastLastNode();
582
583     Node* startNode = updatedRange.firstNode();
584     VisiblePosition visibleStart(updatedRange.startPosition(), VP_DEFAULT_AFFINITY);
585     VisiblePosition visibleEnd(updatedRange.endPosition(), VP_DEFAULT_AFFINITY);
586     if (shouldAnnotate == AnnotateForInterchange && needInterchangeNewlineAfter(visibleStart)) {
587         if (visibleStart == visibleEnd.previous())
588             return interchangeNewlineString;
589
590         accumulator.appendString(interchangeNewlineString);
591         startNode = visibleStart.next().deepEquivalent().deprecatedNode();
592
593         if (pastEnd && Range::compareBoundaryPoints(startNode, 0, pastEnd, 0, ASSERT_NO_EXCEPTION) >= 0)
594             return interchangeNewlineString;
595     }
596
597     Node* lastClosed = accumulator.serializeNodes(startNode, pastEnd);
598
599     if (specialCommonAncestor && lastClosed) {
600         // Also include all of the ancestors of lastClosed up to this special ancestor.
601         for (ContainerNode* ancestor = lastClosed->parentNode(); ancestor; ancestor = ancestor->parentNode()) {
602             if (ancestor == fullySelectedRoot && !convertBlocksToInlines) {
603                 RefPtr<EditingStyle> fullySelectedRootStyle = styleFromMatchedRulesAndInlineDecl(fullySelectedRoot);
604
605                 // Bring the background attribute over, but not as an attribute because a background attribute on a div
606                 // appears to have no effect.
607                 if ((!fullySelectedRootStyle || !fullySelectedRootStyle->style() || !fullySelectedRootStyle->style()->getPropertyCSSValue(CSSPropertyBackgroundImage))
608                     && toElement(fullySelectedRoot)->hasAttribute(backgroundAttr))
609                     fullySelectedRootStyle->style()->setProperty(CSSPropertyBackgroundImage, "url('" + toElement(fullySelectedRoot)->getAttribute(backgroundAttr) + "')");
610
611                 if (fullySelectedRootStyle->style()) {
612                     // Reset the CSS properties to avoid an assertion error in addStyleMarkup().
613                     // This assertion is caused at least when we select all text of a <body> element whose
614                     // 'text-decoration' property is "inherit", and copy it.
615                     if (!propertyMissingOrEqualToNone(fullySelectedRootStyle->style(), CSSPropertyTextDecoration))
616                         fullySelectedRootStyle->style()->setProperty(CSSPropertyTextDecoration, CSSValueNone);
617                     if (!propertyMissingOrEqualToNone(fullySelectedRootStyle->style(), CSSPropertyWebkitTextDecorationsInEffect))
618                         fullySelectedRootStyle->style()->setProperty(CSSPropertyWebkitTextDecorationsInEffect, CSSValueNone);
619                     accumulator.wrapWithStyleNode(fullySelectedRootStyle->style(), document, true);
620                 }
621             } else {
622                 // Since this node and all the other ancestors are not in the selection we want to set RangeFullySelectsNode to DoesNotFullySelectNode
623                 // so that styles that affect the exterior of the node are not included.
624                 accumulator.wrapWithNode(*ancestor, convertBlocksToInlines, StyledMarkupAccumulator::DoesNotFullySelectNode);
625             }
626             if (nodes)
627                 nodes->append(ancestor);
628             
629             lastClosed = ancestor;
630             
631             if (ancestor == specialCommonAncestor)
632                 break;
633         }
634     }
635     
636     if (accumulator.needRelativeStyleWrapper() && needsPositionStyleConversion) {
637         if (accumulator.needClearingDiv())
638             accumulator.appendString("<div style=\"clear: both;\"></div>");
639         RefPtr<EditingStyle> positionRelativeStyle = styleFromMatchedRulesAndInlineDecl(body);
640         positionRelativeStyle->style()->setProperty(CSSPropertyPosition, CSSValueRelative);
641         accumulator.wrapWithStyleNode(positionRelativeStyle->style(), document, true);
642     }
643
644     // FIXME: The interchange newline should be placed in the block that it's in, not after all of the content, unconditionally.
645     if (shouldAnnotate == AnnotateForInterchange && needInterchangeNewlineAfter(visibleEnd.previous()))
646         accumulator.appendString(interchangeNewlineString);
647
648     return accumulator.takeResults();
649 }
650
651 String createMarkup(const Range& range, Vector<Node*>* nodes, EAnnotateForInterchange shouldAnnotate, bool convertBlocksToInlines, EAbsoluteURLs shouldResolveURLs)
652 {
653     Document& document = range.ownerDocument();
654     const Range* updatedRange = &range;
655
656 #if ENABLE(DELETION_UI)
657     // Disable the delete button so it's elements are not serialized into the markup,
658     // but make sure neither endpoint is inside the delete user interface.
659     Frame* frame = document.frame();
660     DeleteButtonControllerDisableScope deleteButtonControllerDisableScope(frame);
661
662     RefPtr<Range> updatedRangeRef;
663     if (frame) {
664         updatedRangeRef = frame->editor().avoidIntersectionWithDeleteButtonController(&range);
665         updatedRange = updatedRangeRef.get();
666         if (!updatedRange)
667             return emptyString();
668     }
669 #endif
670
671     return createMarkupInternal(document, range, *updatedRange, nodes, shouldAnnotate, convertBlocksToInlines, shouldResolveURLs);
672 }
673
674 PassRefPtr<DocumentFragment> createFragmentFromMarkup(Document& document, const String& markup, const String& baseURL, ParserContentPolicy parserContentPolicy)
675 {
676     // We use a fake body element here to trick the HTML parser to using the InBody insertion mode.
677     RefPtr<HTMLBodyElement> fakeBody = HTMLBodyElement::create(document);
678     RefPtr<DocumentFragment> fragment = DocumentFragment::create(document);
679
680     fragment->parseHTML(markup, fakeBody.get(), parserContentPolicy);
681
682     if (!baseURL.isEmpty() && baseURL != blankURL() && baseURL != document.baseURL())
683         completeURLs(fragment.get(), baseURL);
684
685     return fragment.release();
686 }
687
688 String createMarkup(const Node& node, EChildrenOnly childrenOnly, Vector<Node*>* nodes, EAbsoluteURLs shouldResolveURLs, Vector<QualifiedName>* tagNamesToSkip, EFragmentSerialization fragmentSerialization)
689 {
690     HTMLElement* deleteButtonContainerElement = 0;
691 #if ENABLE(DELETION_UI)
692     if (Frame* frame = node.document().frame()) {
693         deleteButtonContainerElement = frame->editor().deleteButtonController().containerElement();
694         if (node.isDescendantOf(deleteButtonContainerElement))
695             return emptyString();
696     }
697 #endif
698
699     MarkupAccumulator accumulator(nodes, shouldResolveURLs, 0, fragmentSerialization);
700     return accumulator.serializeNodes(const_cast<Node&>(node), deleteButtonContainerElement, childrenOnly, tagNamesToSkip);
701 }
702
703 static void fillContainerFromString(ContainerNode* paragraph, const String& string)
704 {
705     Document& document = paragraph->document();
706
707     if (string.isEmpty()) {
708         paragraph->appendChild(createBlockPlaceholderElement(document), ASSERT_NO_EXCEPTION);
709         return;
710     }
711
712     ASSERT(string.find('\n') == notFound);
713
714     Vector<String> tabList;
715     string.split('\t', true, tabList);
716     String tabText = emptyString();
717     bool first = true;
718     size_t numEntries = tabList.size();
719     for (size_t i = 0; i < numEntries; ++i) {
720         const String& s = tabList[i];
721
722         // append the non-tab textual part
723         if (!s.isEmpty()) {
724             if (!tabText.isEmpty()) {
725                 paragraph->appendChild(createTabSpanElement(document, tabText), ASSERT_NO_EXCEPTION);
726                 tabText = emptyString();
727             }
728             RefPtr<Node> textNode = document.createTextNode(stringWithRebalancedWhitespace(s, first, i + 1 == numEntries));
729             paragraph->appendChild(textNode.release(), ASSERT_NO_EXCEPTION);
730         }
731
732         // there is a tab after every entry, except the last entry
733         // (if the last character is a tab, the list gets an extra empty entry)
734         if (i + 1 != numEntries)
735             tabText.append('\t');
736         else if (!tabText.isEmpty())
737             paragraph->appendChild(createTabSpanElement(document, tabText), ASSERT_NO_EXCEPTION);
738
739         first = false;
740     }
741 }
742
743 bool isPlainTextMarkup(Node *node)
744 {
745     if (!node->isElementNode() || !node->hasTagName(divTag) || toElement(node)->hasAttributes())
746         return false;
747     
748     if (node->childNodeCount() == 1 && (node->firstChild()->isTextNode() || (node->firstChild()->firstChild())))
749         return true;
750     
751     return (node->childNodeCount() == 2 && isTabSpanTextNode(node->firstChild()->firstChild()) && node->firstChild()->nextSibling()->isTextNode());
752 }
753
754 static bool contextPreservesNewline(const Range& context)
755 {
756     VisiblePosition position(context.startPosition());
757     Node* container = position.deepEquivalent().containerNode();
758     if (!container || !container->renderer())
759         return false;
760
761     return container->renderer()->style().preserveNewline();
762 }
763
764 PassRefPtr<DocumentFragment> createFragmentFromText(Range& context, const String& text)
765 {
766     Document& document = context.ownerDocument();
767     RefPtr<DocumentFragment> fragment = document.createDocumentFragment();
768     
769     if (text.isEmpty())
770         return fragment.release();
771
772     String string = text;
773     string.replace("\r\n", "\n");
774     string.replace('\r', '\n');
775
776     if (contextPreservesNewline(context)) {
777         fragment->appendChild(document.createTextNode(string), ASSERT_NO_EXCEPTION);
778         if (string.endsWith('\n')) {
779             RefPtr<Element> element = createBreakElement(document);
780             element->setAttribute(classAttr, AppleInterchangeNewline);            
781             fragment->appendChild(element.release(), ASSERT_NO_EXCEPTION);
782         }
783         return fragment.release();
784     }
785
786     // A string with no newlines gets added inline, rather than being put into a paragraph.
787     if (string.find('\n') == notFound) {
788         fillContainerFromString(fragment.get(), string);
789         return fragment.release();
790     }
791
792     // Break string into paragraphs. Extra line breaks turn into empty paragraphs.
793     Node* blockNode = enclosingBlock(context.firstNode());
794     Element* block = toElement(blockNode);
795     bool useClonesOfEnclosingBlock = blockNode
796         && blockNode->isElementNode()
797         && !block->hasTagName(bodyTag)
798         && !block->hasTagName(htmlTag)
799         && block != editableRootForPosition(context.startPosition());
800     bool useLineBreak = enclosingTextFormControl(context.startPosition());
801
802     Vector<String> list;
803     string.split('\n', true, list); // true gets us empty strings in the list
804     size_t numLines = list.size();
805     for (size_t i = 0; i < numLines; ++i) {
806         const String& s = list[i];
807
808         RefPtr<Element> element;
809         if (s.isEmpty() && i + 1 == numLines) {
810             // For last line, use the "magic BR" rather than a P.
811             element = createBreakElement(document);
812             element->setAttribute(classAttr, AppleInterchangeNewline);
813         } else if (useLineBreak) {
814             element = createBreakElement(document);
815             fillContainerFromString(fragment.get(), s);
816         } else {
817             if (useClonesOfEnclosingBlock)
818                 element = block->cloneElementWithoutChildren();
819             else
820                 element = createDefaultParagraphElement(document);
821             fillContainerFromString(element.get(), s);
822         }
823         fragment->appendChild(element.release(), ASSERT_NO_EXCEPTION);
824     }
825     return fragment.release();
826 }
827
828 String documentTypeString(const Document& document)
829 {
830     DocumentType* documentType = document.doctype();
831     if (!documentType)
832         return emptyString();
833     return createMarkup(*documentType);
834 }
835
836 String createFullMarkup(const Node& node)
837 {
838     // FIXME: This is never "for interchange". Is that right?
839     String markupString = createMarkup(node, IncludeNode, 0);
840
841     Node::NodeType nodeType = node.nodeType();
842     if (nodeType != Node::DOCUMENT_NODE && nodeType != Node::DOCUMENT_TYPE_NODE)
843         markupString = documentTypeString(node.document()) + markupString;
844
845     return markupString;
846 }
847
848 String createFullMarkup(const Range& range)
849 {
850     Node* node = range.startContainer();
851     if (!node)
852         return String();
853
854     // FIXME: This is always "for interchange". Is that right?
855     return documentTypeString(node->document()) + createMarkup(range, 0, AnnotateForInterchange);
856 }
857
858 String urlToMarkup(const URL& url, const String& title)
859 {
860     StringBuilder markup;
861     markup.append("<a href=\"");
862     markup.append(url.string());
863     markup.append("\">");
864     MarkupAccumulator::appendCharactersReplacingEntities(markup, title, 0, title.length(), EntityMaskInPCDATA);
865     markup.append("</a>");
866     return markup.toString();
867 }
868
869 PassRefPtr<DocumentFragment> createFragmentForInnerOuterHTML(const String& markup, Element* contextElement, ParserContentPolicy parserContentPolicy, ExceptionCode& ec)
870 {
871     Document* document = &contextElement->document();
872 #if ENABLE(TEMPLATE_ELEMENT)
873     if (contextElement->hasTagName(templateTag))
874         document = document->ensureTemplateDocument();
875 #endif
876     RefPtr<DocumentFragment> fragment = DocumentFragment::create(*document);
877
878     if (document->isHTMLDocument()) {
879         fragment->parseHTML(markup, contextElement, parserContentPolicy);
880         return fragment;
881     }
882
883     bool wasValid = fragment->parseXML(markup, contextElement, parserContentPolicy);
884     if (!wasValid) {
885         ec = SYNTAX_ERR;
886         return 0;
887     }
888     return fragment.release();
889 }
890
891 PassRefPtr<DocumentFragment> createFragmentForTransformToFragment(const String& sourceString, const String& sourceMIMEType, Document* outputDoc)
892 {
893     RefPtr<DocumentFragment> fragment = outputDoc->createDocumentFragment();
894     
895     if (sourceMIMEType == "text/html") {
896         // As far as I can tell, there isn't a spec for how transformToFragment is supposed to work.
897         // Based on the documentation I can find, it looks like we want to start parsing the fragment in the InBody insertion mode.
898         // Unfortunately, that's an implementation detail of the parser.
899         // We achieve that effect here by passing in a fake body element as context for the fragment.
900         RefPtr<HTMLBodyElement> fakeBody = HTMLBodyElement::create(*outputDoc);
901         fragment->parseHTML(sourceString, fakeBody.get());
902     } else if (sourceMIMEType == "text/plain")
903         fragment->parserAppendChild(Text::create(*outputDoc, sourceString));
904     else {
905         bool successfulParse = fragment->parseXML(sourceString, 0);
906         if (!successfulParse)
907             return 0;
908     }
909     
910     // FIXME: Do we need to mess with URLs here?
911     
912     return fragment.release();
913 }
914
915 static Vector<Ref<HTMLElement>> collectElementsToRemoveFromFragment(ContainerNode& container)
916 {
917     Vector<Ref<HTMLElement>> toRemove;
918     for (auto& element : childrenOfType<HTMLElement>(container)) {
919         if (isHTMLHtmlElement(element)) {
920             toRemove.append(element);
921             collectElementsToRemoveFromFragment(element);
922             continue;
923         }
924         if (isHTMLHeadElement(element) || isHTMLBodyElement(element))
925             toRemove.append(element);
926     }
927     return toRemove;
928 }
929
930 static void removeElementFromFragmentPreservingChildren(DocumentFragment& fragment, HTMLElement& element)
931 {
932     RefPtr<Node> nextChild;
933     for (RefPtr<Node> child = element.firstChild(); child; child = nextChild) {
934         nextChild = child->nextSibling();
935         element.removeChild(child.get(), ASSERT_NO_EXCEPTION);
936         fragment.insertBefore(child, &element, ASSERT_NO_EXCEPTION);
937     }
938     fragment.removeChild(&element, ASSERT_NO_EXCEPTION);
939 }
940
941 PassRefPtr<DocumentFragment> createContextualFragment(const String& markup, HTMLElement* element, ParserContentPolicy parserContentPolicy, ExceptionCode& ec)
942 {
943     ASSERT(element);
944     if (element->ieForbidsInsertHTML()) {
945         ec = NOT_SUPPORTED_ERR;
946         return 0;
947     }
948
949     if (element->hasLocalName(colTag) || element->hasLocalName(colgroupTag) || element->hasLocalName(framesetTag)
950         || element->hasLocalName(headTag) || element->hasLocalName(styleTag) || element->hasLocalName(titleTag)) {
951         ec = NOT_SUPPORTED_ERR;
952         return 0;
953     }
954
955     RefPtr<DocumentFragment> fragment = createFragmentForInnerOuterHTML(markup, element, parserContentPolicy, ec);
956     if (!fragment)
957         return 0;
958
959     // We need to pop <html> and <body> elements and remove <head> to
960     // accommodate folks passing complete HTML documents to make the
961     // child of an element.
962     auto toRemove = collectElementsToRemoveFromFragment(*fragment);
963     for (unsigned i = 0; i < toRemove.size(); ++i)
964         removeElementFromFragmentPreservingChildren(*fragment, toRemove[i].get());
965
966     return fragment.release();
967 }
968
969 static inline bool hasOneChild(ContainerNode* node)
970 {
971     Node* firstChild = node->firstChild();
972     return firstChild && !firstChild->nextSibling();
973 }
974
975 static inline bool hasOneTextChild(ContainerNode* node)
976 {
977     return hasOneChild(node) && node->firstChild()->isTextNode();
978 }
979
980 void replaceChildrenWithFragment(ContainerNode& container, PassRefPtr<DocumentFragment> fragment, ExceptionCode& ec)
981 {
982     Ref<ContainerNode> containerNode(container);
983     ChildListMutationScope mutation(containerNode.get());
984
985     if (!fragment->firstChild()) {
986         containerNode->removeChildren();
987         return;
988     }
989
990     if (hasOneTextChild(&containerNode.get()) && hasOneTextChild(fragment.get())) {
991         toText(containerNode->firstChild())->setData(toText(fragment->firstChild())->data(), ec);
992         return;
993     }
994
995     if (hasOneChild(&containerNode.get())) {
996         containerNode->replaceChild(fragment, containerNode->firstChild(), ec);
997         return;
998     }
999
1000     containerNode->removeChildren();
1001     containerNode->appendChild(fragment, ec);
1002 }
1003
1004 void replaceChildrenWithText(ContainerNode& container, const String& text, ExceptionCode& ec)
1005 {
1006     Ref<ContainerNode> containerNode(container);
1007     ChildListMutationScope mutation(containerNode.get());
1008
1009     if (hasOneTextChild(&containerNode.get())) {
1010         toText(containerNode->firstChild())->setData(text, ec);
1011         return;
1012     }
1013
1014     RefPtr<Text> textNode = Text::create(containerNode->document(), text);
1015
1016     if (hasOneChild(&containerNode.get())) {
1017         containerNode->replaceChild(textNode.release(), containerNode->firstChild(), ec);
1018         return;
1019     }
1020
1021     containerNode->removeChildren();
1022     containerNode->appendChild(textNode.release(), ec);
1023 }
1024
1025 }