Como transmitir fragmentos XML de um XmlReader (LINQ to XML)

Quando você tem que processar arquivos XML grandes, pode não ser viável carregar toda a árvore XML na memória. Este artigo mostra como transmitir fragmentos usando um XmlReader em C# e Visual Basic.

Uma das maneiras mais eficazes de usar um XmlReader para ler XElement objetos é escrever seu próprio método de eixo personalizado. Um método de eixo normalmente retorna uma coleção como IEnumerable<T> de XElement, conforme mostrado no exemplo deste artigo. No método de eixo personalizado, depois de criar o fragmento XML chamando o ReadFrom método, retorne a coleção usando yield return. Isso fornece semântica de execução adiada para seu método de eixo personalizado.

Quando você cria uma árvore XML a partir de um XmlReader objeto, o deve ser posicionado XmlReader em um elemento . O ReadFrom método não retorna até que ele tenha lido a marca close do elemento.

Se quiser criar uma árvore parcial, você pode instanciar um XmlReader, posicionar o leitor no nó que deseja converter em uma XElement árvore e, em seguida, criar o XElement objeto.

O artigo Como transmitir fragmentos XML com acesso a informações de cabeçalho contém informações sobre o streaming de um documento mais complexo.

O artigo How to perform streaming transform of large XML documents contém um exemplo de como usar o LINQ to XML para transformar documentos XML extremamente grandes, mantendo um pequeno espaço de memória.

Exemplo: Criar um método de eixo personalizado

Este exemplo cria um método de eixo personalizado. Você pode consultá-lo usando uma consulta LINQ. O método StreamRootChildDoc de eixo personalizado pode ler um documento que tem um elemento de Child repetição.

static IEnumerable<XElement> StreamRootChildDoc(StringReader stringReader)
{
    using (XmlReader reader = XmlReader.Create(stringReader))
    {
        reader.MoveToContent();
        // Parse the file and display each of the nodes.
        while (reader.Read())
        {
            switch (reader.NodeType)
            {
                case XmlNodeType.Element:
                    if (reader.Name == "Child") {
                        XElement el = XElement.ReadFrom(reader) as XElement;
                        if (el != null)
                            yield return el;
                    }
                    break;
            }
        }
    }
}

static void Main(string[] args)
{
    string markup = @"<Root>
      <Child Key=""01"">
        <GrandChild>aaa</GrandChild>
      </Child>
      <Child Key=""02"">
        <GrandChild>bbb</GrandChild>
      </Child>
      <Child Key=""03"">
        <GrandChild>ccc</GrandChild>
      </Child>
    </Root>";

    IEnumerable<string> grandChildData =
        from el in StreamRootChildDoc(new StringReader(markup))
        where (int)el.Attribute("Key") > 1
        select (string)el.Element("GrandChild");

    foreach (string str in grandChildData) {
        Console.WriteLine(str);
    }
}

Module Module1
    Sub Main()
        Dim markup = "<Root>" &
                     "  <Child Key=""01"">" &
                     "    <GrandChild>aaa</GrandChild>" &
                     "  </Child>" &
                     "  <Child Key=""02"">" &
                     "    <GrandChild>bbb</GrandChild>" &
                     "  </Child>" &
                     "  <Child Key=""03"">" &
                     "    <GrandChild>ccc</GrandChild>" &
                     "  </Child>" &
                     "</Root>"

        Dim grandChildData =
             From el In New StreamRootChildDoc(New IO.StringReader(markup))
             Where CInt(el.@Key) > 1
             Select el.<GrandChild>.Value

        For Each s In grandChildData
            Console.WriteLine(s)
        Next
    End Sub
End Module

Public Class StreamRootChildDoc
    Implements IEnumerable(Of XElement)

    Private _stringReader As IO.StringReader

    Public Sub New(ByVal stringReader As IO.StringReader)
        _stringReader = stringReader
    End Sub

    Public Function GetEnumerator() As IEnumerator(Of XElement) Implements IEnumerable(Of XElement).GetEnumerator
        Return New StreamChildEnumerator(_stringReader)
    End Function

    Public Function GetEnumerator1() As IEnumerator Implements IEnumerable.GetEnumerator
        Return Me.GetEnumerator()
    End Function
End Class

Public Class StreamChildEnumerator
    Implements IEnumerator(Of XElement)

    Private _current As XElement
    Private _reader As Xml.XmlReader
    Private _stringReader As IO.StringReader

    Public Sub New(ByVal stringReader As IO.StringReader)
        _stringReader = stringReader
        _reader = Xml.XmlReader.Create(_stringReader)
        _reader.MoveToContent()
    End Sub

    Public ReadOnly Property Current As XElement Implements IEnumerator(Of XElement).Current
        Get
            Return _current
        End Get
    End Property

    Public ReadOnly Property Current1 As Object Implements IEnumerator.Current
        Get
            Return Me.Current
        End Get
    End Property

    Public Function MoveNext() As Boolean Implements IEnumerator.MoveNext
        While _reader.Read()
            Select Case _reader.NodeType
                Case Xml.XmlNodeType.Element
                    Dim el = TryCast(XElement.ReadFrom(_reader), XElement)
                    If el IsNot Nothing Then
                        _current = el
                        Return True
                    End If
            End Select
        End While

        Return False
    End Function

    Public Sub Reset() Implements IEnumerator.Reset
        _reader = Xml.XmlReader.Create(_stringReader)
        _reader.MoveToContent()
    End Sub

#Region "IDisposable Support"

    Private disposedValue As Boolean ' To detect redundant calls

    ' IDisposable
    Protected Overridable Sub Dispose(ByVal disposing As Boolean)
        If Not Me.disposedValue Then
            If disposing Then
                _reader.Close()
            End If
        End If
        Me.disposedValue = True
    End Sub

    Public Sub Dispose() Implements IDisposable.Dispose
        Dispose(True)
        GC.SuppressFinalize(Me)
    End Sub
#End Region

End Class

Este exemplo produz a seguinte saída:

bbb
ccc

A técnica usada neste exemplo mantém uma pequena pegada de memória mesmo para milhões de Child elementos.

Consulte também

• Analisar XML