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)
1756정성태9/23/201427486기타: 48. NVidia 제품의 과다한 디스크 사용 [2]
1755정성태9/22/201434280오류 유형: 241. Unity Web Player를 설치해도 여전히 설치하라는 화면이 나오는 경우 [4]
1754정성태9/22/201424651VC++: 80. 내 컴퓨터에서 C++ AMP 코드가 실행이 될까요? [1]
1753정성태9/22/201420611오류 유형: 240. Lync로 세미나 참여 시 소리만 들리지 않는 경우 [1]
1752정성태9/21/201441071Windows: 100. 윈도우 8 - RDP 연결을 이용해 VNC처럼 사용자 로그온 화면을 공유하는 방법 [5]
1751정성태9/20/201438945.NET Framework: 464. 프로세스 간 통신 시 소켓 필요 없이 간단하게 Pipe를 열어 통신하는 방법 [1]파일 다운로드1
1750정성태9/20/201423832.NET Framework: 463. PInvoke 호출을 이용한 비동기 파일 작업파일 다운로드1
1749정성태9/20/201423732.NET Framework: 462. 커널 객체를 위한 null DACL 생성 방법파일 다운로드1
1748정성태9/19/201425385개발 환경 구성: 238. [Synergy] 여러 컴퓨터에서 키보드, 마우스 공유
1747정성태9/19/201428479오류 유형: 239. psexec 실행 오류 - The system cannot find the file specified.
1746정성태9/18/201426106.NET Framework: 461. .NET EXE 파일을 닷넷 프레임워크 버전에 상관없이 실행할 수 있을까요? - 두 번째 이야기 [6]파일 다운로드1
1745정성태9/17/201423037개발 환경 구성: 237. 리눅스 Integration Services 버전 업그레이드 하는 방법 [1]
1744정성태9/17/201431063.NET Framework: 460. GetTickCount / GetTickCount64와 0x7FFE0000 주솟값 [4]파일 다운로드1
1743정성태9/16/201420985오류 유형: 238. 설치 오류 - Failed to get size of pseudo bundle
1742정성태8/27/201426972개발 환경 구성: 236. Hyper-V에 설치한 리눅스 VM의 VHD 크기 늘리는 방법 [2]
1741정성태8/26/201421334.NET Framework: 459. GetModuleHandleEx로 알아보는 .NET 메서드의 DLL 모듈 관계파일 다운로드1
1740정성태8/25/201432522.NET Framework: 458. 닷넷 GC가 순환 참조를 해제할 수 있을까요? [2]파일 다운로드1
1739정성태8/24/201426543.NET Framework: 457. 교착상태(Dead-lock) 해결 방법 - Lock Leveling [2]파일 다운로드1
1738정성태8/23/201422049.NET Framework: 456. C# - CAS를 이용한 Lock 래퍼 클래스파일 다운로드1
1737정성태8/20/201419765VS.NET IDE: 93. Visual Studio 2013 동기화 문제
1736정성태8/19/201425577VC++: 79. [부연] CAS Lock 알고리즘은 과연 빠른가? [2]파일 다운로드1
1735정성태8/19/201418214.NET Framework: 455. 닷넷 사용자 정의 예외 클래스의 최소 구현 코드 - 두 번째 이야기
1734정성태8/13/201419875오류 유형: 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/201426362.NET Framework: 454. EmptyWorkingSet Win32 API를 사용하는 C# 예제파일 다운로드1
1732정성태8/13/201434479Windows: 99. INetCache 폴더가 다르게 보이는 이유
1731정성태8/11/201427083개발 환경 구성: 235. 점(.)으로 시작하는 파일명을 탐색기에서 만드는 방법
... 121  122  123  124  125  126  127  128  129  130  131  [132]  133  134  135  ...