webservices: Implement WsFillReader.

dlls/webservices/reader.c

@@ -336,6 +336,8 @@ reader_props[] =
 
 struct reader
 {
+    ULONG                   read_size;
+    ULONG                   read_pos;
     struct list             nodes;
     struct node            *current;
     const char             *input_data;
@@ -446,6 +448,26 @@ void WINAPI WsFreeReader( WS_XML_READER *handle )
 }
 
 /**************************************************************************
+ *          WsFillReader		[webservices.@]
+ */
+HRESULT WINAPI WsFillReader( WS_XML_READER *handle, ULONG min_size, const WS_ASYNC_CONTEXT *ctx,
+                             WS_ERROR *error )
+{
+    struct reader *reader = (struct reader *)handle;
+
+    TRACE( "%p %u %p %p\n", handle, min_size, ctx, error );
+    if (error) FIXME( "ignoring error parameter\n" );
+
+    if (!reader) return E_INVALIDARG;
+
+    /* FIXME: add support for stream input */
+    reader->read_size = min( min_size, reader->input_size );
+    reader->read_pos  = 0;
+
+    return S_OK;
+}
+
+/**************************************************************************
  *          WsGetErrorProperty		[webservices.@]
  */
 HRESULT WINAPI WsGetErrorProperty( WS_ERROR *handle, WS_ERROR_PROPERTY_ID id, void *buf,

dlls/webservices/webservices.spec

@@ -44,7 +44,7 @@
 @ stub WsEndWriterCanonicalization
 @ stub WsFileTimeToDateTime
 @ stub WsFillBody
-@ stub WsFillReader
+@ stdcall WsFillReader(ptr long ptr ptr)
 @ stub WsFindAttribute
 @ stub WsFlushBody
 @ stub WsFlushWriter