Hans Leidekker : webservices: Implement WsMoveReader.

[Alexandre Julliard]

Module: wine
Branch: master
Commit: 2bfcd98c306649cb00dfdb31d09c5c4e64644e9a
URL:    http://source.winehq.org/git/wine.git/?a=commit;h=2bfcd98c306649cb00dfdb31d09c5c4e64644e9a

Author: Hans Leidekker <hans at codeweavers.com>
Date:   Tue Nov 10 10:46:39 2015 +0100

webservices: Implement WsMoveReader.

Signed-off-by: Hans Leidekker <hans at codeweavers.com>
Signed-off-by: Alexandre Julliard <julliard at winehq.org>

---

 dlls/webservices/reader.c         | 87 +++++++++++++++++++++++++++++++++++++++
 dlls/webservices/webservices.spec |  2 +-
 2 files changed, 88 insertions(+), 1 deletion(-)

diff --git a/dlls/webservices/reader.c b/dlls/webservices/reader.c
index 0e9d533..3e5a107 100644
--- a/dlls/webservices/reader.c
+++ b/dlls/webservices/reader.c
@@ -1218,6 +1218,93 @@ HRESULT WINAPI WsReadToStartElement( WS_XML_READER *handle, const WS_XML_STRING
     return read_to_startelement( reader, found );
 }
 
+static HRESULT read_move_to( struct reader *reader, WS_MOVE_TO move, BOOL *found )
+{
+    struct list *ptr;
+    BOOL success = FALSE;
+    HRESULT hr = S_OK;
+
+    if (!read_end_of_data( reader ))
+    {
+        while (reader->state != READER_STATE_EOF && (hr = read_node( reader )) == S_OK) { /* nothing */ };
+        if (hr != S_OK) return hr;
+    }
+    switch (move)
+    {
+    case WS_MOVE_TO_FIRST_NODE:
+        if ((ptr = list_head( &reader->current->parent->children )))
+        {
+            reader->current = LIST_ENTRY( ptr, struct node, entry );
+            success = TRUE;
+        }
+        break;
+
+    case WS_MOVE_TO_NEXT_NODE:
+        if ((ptr = list_next( &reader->current->parent->children, &reader->current->entry )))
+        {
+            reader->current = LIST_ENTRY( ptr, struct node, entry );
+            success = TRUE;
+        }
+        break;
+
+    case WS_MOVE_TO_PREVIOUS_NODE:
+        if ((ptr = list_prev( &reader->current->parent->children, &reader->current->entry )))
+        {
+            reader->current = LIST_ENTRY( ptr, struct node, entry );
+            success = TRUE;
+        }
+        break;
+
+    case WS_MOVE_TO_CHILD_NODE:
+        if ((ptr = list_head( &reader->current->children )))
+        {
+            reader->current = LIST_ENTRY( ptr, struct node, entry );
+            success = TRUE;
+        }
+        break;
+
+    case WS_MOVE_TO_BOF:
+        reader->current = reader->root;
+        success = TRUE;
+        break;
+
+    case WS_MOVE_TO_EOF:
+        if ((ptr = list_tail( &reader->root->children )))
+        {
+            reader->current = LIST_ENTRY( ptr, struct node, entry );
+            success = TRUE;
+        }
+        break;
+
+    default:
+        FIXME( "unhandled move %u\n", move );
+        return E_NOTIMPL;
+    }
+
+    if (found)
+    {
+        *found = success;
+        return S_OK;
+    }
+    return success ? S_OK : WS_E_INVALID_FORMAT;
+}
+
+/**************************************************************************
+ *          WsMoveReader		[webservices.@]
+ */
+HRESULT WINAPI WsMoveReader( WS_XML_READER *handle, WS_MOVE_TO move, BOOL *found, WS_ERROR *error )
+{
+    struct reader *reader = (struct reader *)handle;
+
+    TRACE( "%p %u %p %p\n", handle, move, found, error );
+    if (error) FIXME( "ignoring error parameter\n" );
+
+    if (!reader) return E_INVALIDARG;
+    if (!reader->input_type) return WS_E_INVALID_OPERATION;
+
+    return read_move_to( reader, move, found );
+}
+
 static WCHAR *xmltext_to_widechar( WS_HEAP *heap, const WS_XML_TEXT *text )
 {
     WCHAR *ret;
diff --git a/dlls/webservices/webservices.spec b/dlls/webservices/webservices.spec
index 1f0bfdc..9fb96fb 100644
--- a/dlls/webservices/webservices.spec
+++ b/dlls/webservices/webservices.spec
@@ -93,7 +93,7 @@
 @ stub WsInitializeMessage
 @ stub WsMarkHeaderAsUnderstood
 @ stub WsMatchPolicyAlternative
-@ stub WsMoveReader
+@ stdcall WsMoveReader(ptr long ptr ptr)
 @ stub WsMoveWriter
 @ stub WsOpenChannel
 @ stub WsOpenListener