dlls/webservices/error.c

   1 /*
   2  * Copyright 2015, 2016 Hans Leidekker for CodeWeavers
   3  *
   4  * This library is free software; you can redistribute it and/or
   5  * modify it under the terms of the GNU Lesser General Public
   6  * License as published by the Free Software Foundation; either
   7  * version 2.1 of the License, or (at your option) any later version.
   8  *
   9  * This library is distributed in the hope that it will be useful,
  10  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  11  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  12  * Lesser General Public License for more details.
  13  *
  14  * You should have received a copy of the GNU Lesser General Public
  15  * License along with this library; if not, write to the Free Software
  16  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
  17  */
  18
  19 #include <stdarg.h>
  20
  21 #include "windef.h"
  22 #include "winbase.h"
  23 #include "winnls.h"
  24 #include "webservices.h"
  25
  26 #include "wine/debug.h"
  27 #include "wine/heap.h"
  28 #include "wine/list.h"
  29 #include "webservices_private.h"
  30
  31 WINE_DEFAULT_DEBUG_CHANNEL(webservices);
  32
  33 static const struct prop_desc error_props[] =
  34 {
  35     { sizeof(ULONG), TRUE },    /* WS_ERROR_PROPERTY_STRING_COUNT */
  36     { sizeof(ULONG), FALSE },   /* WS_ERROR_PROPERTY_ORIGINAL_ERROR_CODE */
  37     { sizeof(LANGID), FALSE }   /* WS_ERROR_PROPERTY_LANGID */
  38 };
  39
  40 struct error
  41 {
  42     ULONG            magic;
  43     CRITICAL_SECTION cs;
  44     ULONG            prop_count;
  45     struct prop      prop[ARRAY_SIZE( error_props )];
  46 };
  47
  48 #define ERROR_MAGIC (('E' << 24) | ('R' << 16) | ('R' << 8) | 'O')
  49
  50 static struct error *alloc_error(void)
  51 {
  52     static const ULONG count = ARRAY_SIZE( error_props );
  53     struct error *ret;
  54     ULONG size = sizeof(*ret) + prop_size( error_props, count );
  55
  56     if (!(ret = heap_alloc_zero( size ))) return NULL;
  57
  58     ret->magic      = ERROR_MAGIC;
  59     InitializeCriticalSection( &ret->cs );
  60 #ifndef __MINGW32__
  61     ret->cs.DebugInfo->Spare[0] = (DWORD_PTR)(__FILE__ ": error.cs");
  62 #endif
  63
  64     prop_init( error_props, count, ret->prop, &ret[1] );
  65     ret->prop_count = count;
  66     return ret;
  67 }
  68
  69 static void free_error( struct error *error )
  70 {
  71 #ifndef __MINGW32__
  72     error->cs.DebugInfo->Spare[0] = 0;
  73 #endif
  74     DeleteCriticalSection( &error->cs );
  75     heap_free( error );
  76 }
  77
  78 /**************************************************************************
  79  *          WsCreateError               [webservices.@]
  80  */
  81 HRESULT WINAPI WsCreateError( const WS_ERROR_PROPERTY *properties, ULONG count, WS_ERROR **handle )
  82 {
  83     struct error *error;
  84     LANGID langid = GetUserDefaultUILanguage();
  85     HRESULT hr;
  86     ULONG i;
  87
  88     TRACE( "%p %u %p\n", properties, count, handle );
  89
  90     if (!handle) return E_INVALIDARG;
  91     if (!(error = alloc_error())) return E_OUTOFMEMORY;
  92
  93     prop_set( error->prop, error->prop_count, WS_ERROR_PROPERTY_LANGID, &langid, sizeof(langid) );
  94     for (i = 0; i < count; i++)
  95     {
  96         if (properties[i].id == WS_ERROR_PROPERTY_ORIGINAL_ERROR_CODE)
  97         {
  98             free_error( error );
  99             return E_INVALIDARG;
 100         }
 101         hr = prop_set( error->prop, error->prop_count, properties[i].id, properties[i].value,
 102                        properties[i].valueSize );
 103         if (hr != S_OK)
 104         {
 105             free_error( error );
 106             return hr;
 107         }
 108     }
 109
 110     TRACE( "created %p\n", error );
 111     *handle = (WS_ERROR *)error;
 112     return S_OK;
 113 }
 114
 115 static void reset_error( struct error *error )
 116 {
 117     ULONG code = 0;
 118     /* FIXME: release strings added with WsAddErrorString when it's implemented, reset string count */
 119     prop_set( error->prop, error->prop_count, WS_ERROR_PROPERTY_ORIGINAL_ERROR_CODE, &code, sizeof(code) );
 120 }
 121
 122 /**************************************************************************
 123  *          WsFreeError         [webservices.@]
 124  */
 125 void WINAPI WsFreeError( WS_ERROR *handle )
 126 {
 127     struct error *error = (struct error *)handle;
 128
 129     TRACE( "%p\n", handle );
 130
 131     if (!error) return;
 132
 133     EnterCriticalSection( &error->cs );
 134
 135     if (error->magic != ERROR_MAGIC)
 136     {
 137         LeaveCriticalSection( &error->cs );
 138         return;
 139     }
 140
 141     reset_error( error );
 142     error->magic = 0;
 143
 144     LeaveCriticalSection( &error->cs );
 145     free_error( error );
 146 }
 147
 148 /**************************************************************************
 149  *          WsResetError        [webservices.@]
 150  */
 151 HRESULT WINAPI WsResetError( WS_ERROR *handle )
 152 {
 153     struct error *error = (struct error *)handle;
 154     HRESULT hr = S_OK;
 155
 156     TRACE( "%p\n", handle );
 157
 158     if (!error) return E_INVALIDARG;
 159
 160     EnterCriticalSection( &error->cs );
 161
 162     if (error->magic != ERROR_MAGIC)
 163     {
 164         LeaveCriticalSection( &error->cs );
 165         return E_INVALIDARG;
 166     }
 167
 168     reset_error( error );
 169
 170     LeaveCriticalSection( &error->cs );
 171     TRACE( "returning %08x\n", hr );
 172     return hr;
 173 }
 174
 175 /**************************************************************************
 176  *          WsGetErrorProperty          [webservices.@]
 177  */
 178 HRESULT WINAPI WsGetErrorProperty( WS_ERROR *handle, WS_ERROR_PROPERTY_ID id, void *buf,
 179                                    ULONG size )
 180 {
 181     struct error *error = (struct error *)handle;
 182     HRESULT hr;
 183
 184     TRACE( "%p %u %p %u\n", handle, id, buf, size );
 185
 186     if (!error) return E_INVALIDARG;
 187
 188     EnterCriticalSection( &error->cs );
 189
 190     if (error->magic != ERROR_MAGIC)
 191     {
 192         LeaveCriticalSection( &error->cs );
 193         return E_INVALIDARG;
 194     }
 195
 196     hr = prop_get( error->prop, error->prop_count, id, buf, size );
 197
 198     LeaveCriticalSection( &error->cs );
 199     TRACE( "returning %08x\n", hr );
 200     return hr;
 201 }
 202
 203 /**************************************************************************
 204  *          WsGetErrorString            [webservices.@]
 205  */
 206 HRESULT WINAPI WsGetErrorString( WS_ERROR *handle, ULONG index, WS_STRING *str )
 207 {
 208     FIXME( "%p %u %p: stub\n", handle, index, str );
 209     return E_NOTIMPL;
 210 }
 211
 212 /**************************************************************************
 213  *          WsSetErrorProperty          [webservices.@]
 214  */
 215 HRESULT WINAPI WsSetErrorProperty( WS_ERROR *handle, WS_ERROR_PROPERTY_ID id, const void *value,
 216                                    ULONG size )
 217 {
 218     struct error *error = (struct error *)handle;
 219     HRESULT hr;
 220
 221     TRACE( "%p %u %p %u\n", handle, id, value, size );
 222
 223     if (!error) return E_INVALIDARG;
 224
 225     EnterCriticalSection( &error->cs );
 226
 227     if (error->magic != ERROR_MAGIC)
 228     {
 229         LeaveCriticalSection( &error->cs );
 230         return E_INVALIDARG;
 231     }
 232
 233     if (id == WS_ERROR_PROPERTY_LANGID) hr = WS_E_INVALID_OPERATION;
 234     else hr = prop_set( error->prop, error->prop_count, id, value, size );
 235
 236     LeaveCriticalSection( &error->cs );
 237     TRACE( "returning %08x\n", hr );
 238     return hr;
 239 }