2 * IAssemblyName implementation
4 * Copyright 2012 Hans Leidekker for CodeWeavers
6 * This library is free software; you can redistribute it and/or
7 * modify it under the terms of the GNU Lesser General Public
8 * License as published by the Free Software Foundation; either
9 * version 2.1 of the License, or (at your option) any later version.
11 * This library is distributed in the hope that it will be useful,
12 * but WITHOUT ANY WARRANTY; without even the implied warranty of
13 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
14 * Lesser General Public License for more details.
16 * You should have received a copy of the GNU Lesser General Public
17 * License along with this library; if not, write to the Free Software
18 * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
30 #include "wine/debug.h"
31 #include "sxs_private.h"
33 WINE_DEFAULT_DEBUG_CHANNEL(sxs
);
37 IAssemblyName IAssemblyName_iface
;
46 static const WCHAR archW
[] = {'p','r','o','c','e','s','s','o','r','A','r','c','h','i','t','e','c','t','u','r','e',0};
47 static const WCHAR tokenW
[] = {'p','u','b','l','i','c','K','e','y','T','o','k','e','n',0};
48 static const WCHAR typeW
[] = {'t','y','p','e',0};
49 static const WCHAR versionW
[] = {'v','e','r','s','i','o','n',0};
51 static inline struct name
*impl_from_IAssemblyName( IAssemblyName
*iface
)
53 return CONTAINING_RECORD( iface
, struct name
, IAssemblyName_iface
);
56 static HRESULT WINAPI
name_QueryInterface(
61 TRACE("%p, %s, %p\n", iface
, debugstr_guid(riid
), ret_iface
);
65 if (IsEqualIID( riid
, &IID_IUnknown
) ||
66 IsEqualIID( riid
, &IID_IAssemblyName
))
68 IAssemblyName_AddRef( iface
);
76 static ULONG WINAPI
name_AddRef(
77 IAssemblyName
*iface
)
79 struct name
*name
= impl_from_IAssemblyName( iface
);
80 return InterlockedIncrement( &name
->refs
);
83 static ULONG WINAPI
name_Release( IAssemblyName
*iface
)
85 struct name
*name
= impl_from_IAssemblyName( iface
);
86 ULONG refs
= InterlockedDecrement( &name
->refs
);
90 TRACE("destroying %p\n", name
);
95 free( name
->version
);
101 static HRESULT WINAPI
name_SetProperty(
102 IAssemblyName
*iface
,
107 FIXME("%p, %ld, %p, %ld\n", iface
, id
, property
, size
);
111 static HRESULT WINAPI
name_GetProperty(
112 IAssemblyName
*iface
,
117 FIXME("%p, %ld, %p, %p\n", iface
, id
, buffer
, buflen
);
121 static HRESULT WINAPI
name_Finalize(
122 IAssemblyName
*iface
)
124 FIXME("%p\n", iface
);
128 static HRESULT WINAPI
name_GetDisplayName(
129 IAssemblyName
*iface
,
134 static const WCHAR fmtW
[] = {',','%','s','=','\"','%','s','\"',0};
135 struct name
*name
= impl_from_IAssemblyName( iface
);
138 TRACE("%p, %p, %p, 0x%08lx\n", iface
, buffer
, buflen
, flags
);
140 if (!buflen
|| flags
) return E_INVALIDARG
;
142 len
= lstrlenW( name
->name
) + 1;
143 if (name
->arch
) len
+= lstrlenW( archW
) + lstrlenW( name
->arch
) + 4;
144 if (name
->token
) len
+= lstrlenW( tokenW
) + lstrlenW( name
->token
) + 4;
145 if (name
->type
) len
+= lstrlenW( typeW
) + lstrlenW( name
->type
) + 4;
146 if (name
->version
) len
+= lstrlenW( versionW
) + lstrlenW( name
->version
) + 4;
150 return HRESULT_FROM_WIN32( ERROR_INSUFFICIENT_BUFFER
);
152 lstrcpyW( buffer
, name
->name
);
153 len
= lstrlenW( buffer
);
154 if (name
->arch
) len
+= swprintf( buffer
+ len
, *buflen
- len
, fmtW
, archW
, name
->arch
);
155 if (name
->token
) len
+= swprintf( buffer
+ len
, *buflen
- len
, fmtW
, tokenW
, name
->token
);
156 if (name
->type
) len
+= swprintf( buffer
+ len
, *buflen
- len
, fmtW
, typeW
, name
->type
);
157 if (name
->version
) len
+= swprintf( buffer
+ len
, *buflen
- len
, fmtW
, versionW
, name
->version
);
161 static HRESULT WINAPI
name_Reserved(
162 IAssemblyName
*iface
,
164 IUnknown
*pUnkReserved1
,
165 IUnknown
*pUnkReserved2
,
166 LPCOLESTR szReserved
,
172 FIXME("%p, %s, %p, %p, %s, %s, %p, %ld, %p\n", iface
,
173 debugstr_guid(riid
), pUnkReserved1
, pUnkReserved2
,
174 debugstr_w(szReserved
), wine_dbgstr_longlong(llReserved
),
175 pvReserved
, cbReserved
, ppReserved
);
179 const WCHAR
*get_name_attribute( IAssemblyName
*iface
, enum name_attr_id id
)
181 struct name
*name
= impl_from_IAssemblyName( iface
);
185 case NAME_ATTR_ID_NAME
: return name
->name
;
186 case NAME_ATTR_ID_ARCH
: return name
->arch
;
187 case NAME_ATTR_ID_TOKEN
: return name
->token
;
188 case NAME_ATTR_ID_TYPE
: return name
->type
;
189 case NAME_ATTR_ID_VERSION
: return name
->version
;
191 ERR("unhandled name attribute %u\n", id
);
197 static HRESULT WINAPI
name_GetName(
198 IAssemblyName
*iface
,
205 TRACE("%p, %p, %p\n", iface
, buflen
, buffer
);
207 if (!buflen
|| !buffer
) return E_INVALIDARG
;
209 name
= get_name_attribute( iface
, NAME_ATTR_ID_NAME
);
210 len
= lstrlenW( name
) + 1;
214 return HRESULT_FROM_WIN32( ERROR_INSUFFICIENT_BUFFER
);
216 lstrcpyW( buffer
, name
);
221 static HRESULT
parse_version( WCHAR
*version
, DWORD
*high
, DWORD
*low
)
227 memset( ver
, 0, sizeof(ver
) );
228 for (i
= 0, p
= version
; i
< 4; i
++)
231 q
= wcschr( p
, '.' );
233 ver
[i
] = wcstol( p
, NULL
, 10 );
234 if (!q
&& i
< 3) break;
237 *high
= (ver
[0] << 16) + ver
[1];
238 *low
= (ver
[2] << 16) + ver
[3];
242 static HRESULT WINAPI
name_GetVersion(
243 IAssemblyName
*iface
,
247 struct name
*name
= impl_from_IAssemblyName( iface
);
251 TRACE("%p, %p, %p\n", iface
, high
, low
);
253 if (!name
->version
) return HRESULT_FROM_WIN32( ERROR_NOT_FOUND
);
254 if (!(version
= wcsdup( name
->version
))) return E_OUTOFMEMORY
;
255 hr
= parse_version( version
, high
, low
);
260 static HRESULT WINAPI
name_IsEqual(
261 IAssemblyName
*name1
,
262 IAssemblyName
*name2
,
265 FIXME("%p, %p, 0x%08lx\n", name1
, name2
, flags
);
269 static HRESULT WINAPI
name_Clone(
270 IAssemblyName
*iface
,
271 IAssemblyName
**name
)
273 FIXME("%p, %p\n", iface
, name
);
277 static const IAssemblyNameVtbl name_vtbl
=
293 static WCHAR
*parse_value( const WCHAR
*str
, unsigned int *len
)
296 const WCHAR
*p
= str
;
298 if (*p
++ != '\"') return NULL
;
299 while (*p
&& *p
!= '\"') p
++;
300 if (!*p
) return NULL
;
303 if (!(ret
= malloc( *len
* sizeof(WCHAR
) ))) return NULL
;
304 memcpy( ret
, str
+ 1, (*len
- 1) * sizeof(WCHAR
) );
309 static HRESULT
parse_displayname( struct name
*name
, const WCHAR
*displayname
)
315 while (*q
&& *q
!= ',') q
++;
317 if (!(name
->name
= malloc( (len
+ 1) * sizeof(WCHAR
) ))) return E_OUTOFMEMORY
;
318 memcpy( name
->name
, p
, len
* sizeof(WCHAR
) );
320 if (!*q
) return S_OK
;
325 while (*q
&& *q
!= '=') q
++;
326 if (!*q
) return E_INVALIDARG
;
328 if (len
== ARRAY_SIZE(archW
) - 1 && !memcmp( p
, archW
, len
* sizeof(WCHAR
) ))
331 if (!(name
->arch
= parse_value( p
, &len
))) return E_INVALIDARG
;
334 else if (len
== ARRAY_SIZE(tokenW
) - 1 && !memcmp( p
, tokenW
, len
* sizeof(WCHAR
) ))
337 if (!(name
->token
= parse_value( p
, &len
))) return E_INVALIDARG
;
340 else if (len
== ARRAY_SIZE(typeW
) - 1 && !memcmp( p
, typeW
, len
* sizeof(WCHAR
) ))
343 if (!(name
->type
= parse_value( p
, &len
))) return E_INVALIDARG
;
346 else if (len
== ARRAY_SIZE(versionW
) - 1 && !memcmp( p
, versionW
, len
* sizeof(WCHAR
) ))
349 if (!(name
->version
= parse_value( p
, &len
))) return E_INVALIDARG
;
352 else return HRESULT_FROM_WIN32( ERROR_SXS_INVALID_ASSEMBLY_IDENTITY_ATTRIBUTE_NAME
);
353 while (*q
&& *q
!= ',') q
++;
359 /******************************************************************
360 * CreateAssemblyNameObject (SXS.@)
362 HRESULT WINAPI
CreateAssemblyNameObject(
371 TRACE("%p, %s, 0x%08lx, %p\n", obj
, debugstr_w(assembly
), flags
, reserved
);
373 if (!obj
) return E_INVALIDARG
;
376 if (!assembly
|| !assembly
[0] || flags
!= CANOF_PARSE_DISPLAY_NAME
)
379 if (!(name
= calloc(1, sizeof(*name
) )))
380 return E_OUTOFMEMORY
;
382 name
->IAssemblyName_iface
.lpVtbl
= &name_vtbl
;
385 hr
= parse_displayname( name
, assembly
);
392 free( name
->version
);
396 *obj
= &name
->IAssemblyName_iface
;