Microsoft MVP성태의 닷넷 이야기
글쓴 사람
정성태 (techsharer at outlook.com)
홈페이지
첨부 파일

C# 관리 코드에서 IMetaDataDispenserEx, IMetaDataImport 관련 인터페이스를 얻는 방법

이에 대해서는 다음의 글에 잘 나와 있습니다.

Introduction to CLR metadata
; https://iobservable.net/blog/2013/05/12/introduction-to-clr-metadata/

전체 소스 코드를 실어보면 다음과 같습니다.

using System;
using System.Runtime.InteropServices;
using System.Runtime.InteropServices.ComTypes;

namespace ConsoleApplication1
{
    [ComImport, GuidAttribute("E5CB7A31-7512-11D2-89CE-0080C792E5D8")]
    class CorMetaDataDispenserExClass
    {
    }

    [ComImport, GuidAttribute("31BCFCE2-DAFB-11D2-9F81-00C04F79A0A3"), InterfaceType(ComInterfaceType.InterfaceIsIUnknown)]
    interface IMetaDataDispenserEx
    {
        uint DefineScope(ref Guid rclsid, uint dwCreateFlags, ref Guid riid, out object ppIUnk);

        uint OpenScope(string szScope, uint dwOpenFlags, ref Guid riid, out object ppIUnk);

        uint OpenScopeOnMemory(IntPtr pData, uint cbData, uint dwOpenFlags, ref Guid riid, out object ppIUnk);

        uint SetOption(ref Guid optionid, object value);

        uint GetOption(ref Guid optionid, out object pvalue);

        uint OpenScopeOnITypeInfo(ITypeInfo pITI, uint dwOpenFlags, ref Guid riid, out object ppIUnk);

        uint GetCORSystemDirectory(char[] szBuffer, uint cchBuffer, out uint pchBuffer);

        uint FindAssembly(string szAppBase, string szPrivateBin, string szGlobalBin, string szAssemblyName, char[] szName, uint cchName, out uint pcName);

        uint FindAssemblyModule(string szAppBase, string szPrivateBin, string szGlobalBin, string szAssemblyName, string szModuleName, char[] szName, uint cchName, out uint pcName);
    }

    [ComImport, GuidAttribute("7DAC8207-D3AE-4C75-9B67-92801A497D44"), InterfaceType(ComInterfaceType.InterfaceIsIUnknown)]
    interface IMetaDataImport
    {
        void CloseEnum(IntPtr hEnum);

        uint GetScopeProps(char[] szName, uint cchName, out uint pchName, ref Guid pmvid);

        uint GetTypeRefProps(uint tr, out uint ptkResolutionScope, char[] szName, uint cchName, out uint pchName);

        uint ResolveTypeRef(uint tr, ref Guid riid, out object ppIScope, out uint ptd);

        uint EnumMethods(ref IntPtr phEnum, uint cl, uint[] rMethods, uint cMax, out uint pcTokens);

        uint GetMethodProps(uint mb, out uint pClass, char[] szMethod, uint cchMethod, out uint pchMethod, out uint pdwAttr, out IntPtr ppvSigBlob, out uint pcbSigBlob, out uint pulCodeRVA, out uint pdwImplFlags);

        uint GetMemberRefProps(uint mr, out uint ptk, char[] szMember, uint cchMember, out uint pchMember, out IntPtr ppvSigBlob, out uint pbSigBlob);

        // for brevity, the rest of the methods are omitted
    }

    class Program
    {
        static void Main(string[] args)
        {
            Guid clsid = new Guid("E5CB7A31-7512-11D2-89CE-0080C792E5D8");

            Type dispenserType = Type.GetTypeFromCLSID(clsid);
            object dispenser = Activator.CreateInstance(dispenserType);

            var dispenserEx = dispenser as IMetaDataDispenserEx;

            Guid metaDataImportGuid = new Guid("7DAC8207-D3AE-4c75-9B67-92801A497D44");
            object rawScope;
            uint hr = dispenserEx.OpenScope("ClassLibrary1.dll", 0, ref metaDataImportGuid, out rawScope);
            var import = rawScope as IMetaDataImport;

            Console.WriteLine(import);
        }
    }
}

그런데, dispenserEx.OpenScope 코드에서 다음과 같은 오류가 발생합니다.

Managed Debugging Assistant 'InvalidVariant' has detected a problem in 'C:\...\ConsoleApplication1\bin\Debug\ConsoleApplication1.exe'.

Additional information: An invalid VARIANT was detected during a conversion from an unmanaged VARIANT to a managed object. Passing invalid VARIANTs to the CLR can cause unexpected exceptions, corruption or data loss.


아마 저 때 당시에는 Managed Debugging Assistant가 해당 변환을 오류로 인식하지 않은 듯 한데... 어쨌든 지금은 명백히 예외를 던지고 있습니다. 릴리스 버전으로 빌드해도 다음과 같이 예외가 발생합니다.

Unhandled Exception: System.Runtime.InteropServices.InvalidOleVariantTypeException: Specified OLE variant is invalid.
   at System.StubHelpers.ObjectMarshaler.ConvertToManaged(IntPtr pSrcVariant)
   at ConsoleApplication1.IMetaDataDispenserEx.OpenScope(String szScope, UInt32 dwOpenFlags, Guid& riid, Object& ppIUnk)
   at ConsoleApplication1.Program.Main(String[] args) in C:\...\ConsoleApplication1\Program.cs:line 68

해결책은 간단합니다. ^^ 다음과 같이 OpenScope 메서드에 마샬링 관련 힌트를 주시면 됩니다.

uint OpenScope(string szScope, uint dwOpenFlags, ref Guid riid, [Out, MarshalAs(UnmanagedType.Interface)] out object ppIUnk);

IMetaDataDispenserEx를 이용해 IMetaDataImport를 구했으면 비관리 코드에서 했던 것처럼 동일한 방식으로 사용해 주시면 됩니다. ^^

string path = typeof(ClassLibrary1.Class1).Assembly.Location;
uint hr = dispenserEx.OpenScope(path, 0, ref metaDataImportGuid, out rawScope);
{
    var import = rawScope as IMetaDataImport;
    {
        uint typeDef = 0; //  (uint)typeof(ClassLibrary1.Class1).MetadataToken;
        import.FindTypeDefByName("ClassLibrary1.Class1", 0, out typeDef);

        var hEnum = IntPtr.Zero;
        var methodTokens = new uint[1024];
        var methodName = new char[1024];
        uint len;

        import.EnumMethods(ref hEnum, typeDef, methodTokens, (uint)methodTokens.Length, out len);
        for (var i = 0; i < len; i++)
        {
            uint tmpTypeDef;
            uint attrs;
            var sig = IntPtr.Zero;
            uint sigLen;
            uint rva;
            uint flags;
            uint methodNameLen;
            hr = import.GetMethodProps(methodTokens[i], out tmpTypeDef, methodName, (uint)methodName.Length, out methodNameLen, out attrs, out sig, out sigLen, out rva, out flags);

            var curName = new string(methodName, 0, (int)methodNameLen - 1);
            Console.WriteLine(curName);
        }

        import.CloseEnum(hEnum);

        Marshal.ReleaseComObject(import);
    }

    Marshal.ReleaseComObject(rawScope);
}

Marshal.ReleaseComObject(dispenser);
Marshal.ReleaseComObject(dispenserEx);

(첨부 파일은 위의 소스 코드를 포함합니다.)




[이 글에 대해서 여러분들과 의견을 공유하고 싶습니다. 틀리거나 미흡한 부분 또는 의문 사항이 있으시면 언제든 댓글 남겨주십시오.]







[최초 등록일: ]
[최종 수정일: 7/5/2021]

Creative Commons License
이 저작물은 크리에이티브 커먼즈 코리아 저작자표시-비영리-변경금지 2.0 대한민국 라이센스에 따라 이용하실 수 있습니다.
by SeongTae Jeong, mailto:techsharer at outlook.com

비밀번호

댓글 작성자
 




... 121  122  123  124  125  126  127  128  129  130  131  132  133  [134]  135  ...
NoWriterDateCnt.TitleFile(s)
1739정성태8/24/201427805.NET Framework: 457. 교착상태(Dead-lock) 해결 방법 - Lock Leveling [2]파일 다운로드1
1738정성태8/23/201423453.NET Framework: 456. C# - CAS를 이용한 Lock 래퍼 클래스파일 다운로드1
1737정성태8/20/201420942VS.NET IDE: 93. Visual Studio 2013 동기화 문제
1736정성태8/19/201426925VC++: 79. [부연] CAS Lock 알고리즘은 과연 빠른가? [2]파일 다운로드1
1735정성태8/19/201419484.NET Framework: 455. 닷넷 사용자 정의 예외 클래스의 최소 구현 코드 - 두 번째 이야기
1734정성태8/13/201421239오류 유형: 237. Windows Media Player cannot access the file. The file might be in use, you might not have access to the computer where the file is stored, or your proxy settings might not be correct.
1733정성태8/13/201427528.NET Framework: 454. EmptyWorkingSet Win32 API를 사용하는 C# 예제파일 다운로드1
1732정성태8/13/201435847Windows: 99. INetCache 폴더가 다르게 보이는 이유
1731정성태8/11/201428315개발 환경 구성: 235. 점(.)으로 시작하는 파일명을 탐색기에서 만드는 방법
1730정성태8/11/201423497개발 환경 구성: 234. Royal TS의 터미널(Terminal) 연결에서 한글이 깨지는 현상 해결 방법
1729정성태8/11/201419496오류 유형: 236. SqlConnection - The requested Performance Counter is not a custom counter, it has to be initialized as ReadOnly.
1728정성태8/8/201431728.NET Framework: 453. C# - 오피스 파워포인트(Powerpoint) 파일을 WinForm에서 보는 방법파일 다운로드1
1727정성태8/6/201421932오류 유형: 235. SignalR 오류 메시지 - Counter 'Messages Bus Messages Published Total' does not exist in the specified Category. [2]
1726정성태8/6/201420714오류 유형: 234. IIS Express에서 COM+ 사용 시 SecurityException - "Requested registry access is not allowed" 발생
1725정성태8/6/201422663오류 유형: 233. Visual Studio 2013 Update3 적용 후 Microsoft.VisualStudio.Web.PageInspector.Runtime 모듈에 대한 FileNotFoundException 예외 발생
1724정성태8/5/201427461.NET Framework: 452. .NET System.Threading.Thread 개체에서 Native Thread Id를 구하는 방법 - 두 번째 이야기 [1]파일 다운로드1
1723정성태7/29/201459867개발 환경 구성: 233. DirectX 9 예제 프로젝트 빌드하는 방법 [3]파일 다운로드1
1722정성태7/25/201422230오류 유형: 232. IIS 500 Internal Server Error - NTFS 암호화된 폴더에 웹 애플리케이션이 위치한 경우
1721정성태7/24/201425534.NET Framework: 451. 함수형 프로그래밍 개념 - 리스트 해석(List Comprehension)과 순수 함수 [2]
1720정성태7/23/201423476개발 환경 구성: 232. C:\WINDOWS\system32\LogFiles\HTTPERR 폴더에 로그 파일을 남기지 않는 설정
1719정성태7/22/201427381Math: 13. 동전을 여러 더미로 나누는 경우의 수 세기(Partition Number) - 두 번째 이야기파일 다운로드1
1718정성태7/19/201436828Math: 12. HTML에서 수학 관련 기호/수식을 표현하기 위한 방법 - MathJax.js [4]
1716정성태7/17/201436508개발 환경 구성: 231. PC 용 무료 안드로이드 에뮬레이터 - genymotion
1715정성태7/13/201431609기타: 47. 운영체제 종료 후에도 USB 외장 하드의 전원이 꺼지지 않는 경우 [3]
1714정성태7/11/201421574VS.NET IDE: 92. Visual Studio 2013을 지원하는 IL Support 확장 도구
1713정성태7/11/201445356Windows: 98. 윈도우 시스템 디스크 용량 확보를 위한 "Package Cache" 폴더 이동 [1]
... 121  122  123  124  125  126  127  128  129  130  131  132  133  [134]  135  ...