[DllImport(@"D:\\ProjectsC++\\DLL\\DLLPodolog\\Debug\\DLLPodolog.dll",
            EntryPoint = "GetSomeText",
            ExactSpelling = true,
            CharSet = CharSet.Unicode,
            CallingConvention = CallingConvention.Cdecl)]

public static extern int GetSomeText(IntPtr pComputerName);

var pComputerName = Marshal.AllocHGlobal(4096);
            GetSomeText(pComputerName);
            var str = Marshal.PtrToStringUni(pComputerName);
            Marshal.FreeHGlobal(pComputerName);

#pragma once
#include "HardWareData.h"



extern "C" __declspec(dllexport)  int GetSomeText(wchar_t* pResult)
{

	HardWareData objHW;
	_bstr_t resValue;
	int result = objHW.GetStringID(resValue);

	const size_t widesize = resValue.length() + 1;
	wcscpy_s(pResult, widesize, (wchar_t *)resValue);
	wcscat_s(pResult, widesize, L"\0");

	return 0;
};

#pragma once
#pragma comment(lib, "wbemuuid.lib")  //Библиотека для работы с WMI 
#define _WIN32_DCOM
#include <comdef.h>  //Для работы с COM  (типы параметров в методах класса)
#include <Wbemidl.h> // Для работы с WMI 
using namespace std;

class HardWareData
{
private:
	int GetWmiInfo(char[], wchar_t[], bstr_t &);

public:
	HardWareData();
	~HardWareData();
	int GetStringID(_bstr_t &);
};

#pragma once
#include "HardWareData.h"

HardWareData::HardWareData()
{
}

HardWareData::~HardWareData()
{
}
int HardWareData::GetWmiInfo(char strSQL[], wchar_t NamePrt[], bstr_t & resValue)
{
	HRESULT hres;
	// Step 1: Initialize COM ------------------------------------------
	hres = CoInitializeEx(0, COINIT_MULTITHREADED);
	if (FAILED(hres))
	{
		resValue = "Failed to initialize COM library. Error code = 0x";
		return 1;                  // Program has failed.
	}

	// Step 2: Set general COM security levels --------------------------
	hres = CoInitializeSecurity(
		NULL,
		-1,                          // COM authentication
		NULL,                        // Authentication services
		NULL,                        // Reserved
		RPC_C_AUTHN_LEVEL_DEFAULT,   // Default authentication 
		RPC_C_IMP_LEVEL_IMPERSONATE, // Default Impersonation  
		NULL,                        // Authentication info
		EOAC_NONE,                   // Additional capabilities 
		NULL                         // Reserved
		);

	if (FAILED(hres))
	{
		resValue = "Failed to initialize security. Error code = 0x";
		CoUninitialize();
		return 1;                    // Program has failed.
	}

	// Step 3: Obtain the initial locator to WMI -------------------------
	IWbemLocator *pLoc = NULL;
	hres = CoCreateInstance(
		CLSID_WbemLocator,
		0,
		CLSCTX_INPROC_SERVER,
		IID_IWbemLocator, (LPVOID *)&pLoc);

	if (FAILED(hres))
	{
		resValue = "Failed to create IWbemLocator object. Err code = 0x";
		CoUninitialize();
		return 1;                 // Program has failed.
	}

	// Step 4: Connect to WMI through the IWbemLocator::ConnectServer method
	IWbemServices *pSvc = NULL;
	// Connect to the root\cimv2 namespace with the current user and obtain pointer pSvc to make IWbemServices calls.
	hres = pLoc->ConnectServer(
		_bstr_t(L"ROOT\\CIMV2"), // Object path of WMI namespace
		NULL,                    // User name. NULL = current user
		NULL,                    // User password. NULL = current
		0,                       // Locale. NULL indicates current
		NULL,                    // Security flags.
		0,                       // Authority (for example, Kerberos)
		0,                       // Context object 
		&pSvc                    // pointer to IWbemServices proxy
		);

	if (FAILED(hres))
	{
		resValue = "Could not connect. Error code = 0x";
		pLoc->Release();
		CoUninitialize();
		return 1;                // Program has failed.
	}
	resValue = "Connected to ROOT\\CIMV2 WMI namespace";

	// Step 5: Set security levels on the proxy -------------------------
	hres = CoSetProxyBlanket(
		pSvc,                        // Indicates the proxy to set
		RPC_C_AUTHN_WINNT,           // RPC_C_AUTHN_xxx
		RPC_C_AUTHZ_NONE,            // RPC_C_AUTHZ_xxx
		NULL,                        // Server principal name 
		RPC_C_AUTHN_LEVEL_CALL,      // RPC_C_AUTHN_LEVEL_xxx 
		RPC_C_IMP_LEVEL_IMPERSONATE, // RPC_C_IMP_LEVEL_xxx
		NULL,                        // client identity
		EOAC_NONE                    // proxy capabilities 
		);

	if (FAILED(hres))
	{
		resValue = "Could not set proxy blanket. Error code = 0x";
		pSvc->Release();
		pLoc->Release();
		CoUninitialize();
		return 1;               // Program has failed.
	}

	// Step 6: Use the IWbemServices pointer to make requests of WMI ----
	IEnumWbemClassObject* pEnumerator = NULL;
	hres = pSvc->ExecQuery(
		bstr_t("WQL"),
		//bstr_t("SELECT * FROM Win32_BaseBoard"),    //Серийный номер BaseBoard
		bstr_t(strSQL),
		WBEM_FLAG_FORWARD_ONLY | WBEM_FLAG_RETURN_IMMEDIATELY,
		NULL,
		&pEnumerator);

	if (FAILED(hres))
	{
		resValue = "Query for operating system name failed. Error code = 0x";
		pSvc->Release();
		pLoc->Release();
		CoUninitialize();
		return 1;               // Program has failed.
	}

	// Step 7: -------------------------------------------------
	// Get the data from the query in step 6 -------------------
	IWbemClassObject *pclsObj = NULL;
	ULONG uReturn = 0;

	while (pEnumerator)
	{
		HRESULT hr = pEnumerator->Next(WBEM_INFINITE, 1,
			&pclsObj, &uReturn);

		if (0 == uReturn)
		{
			break;
		}

		VARIANT vtProp;
		// Get the value of the Name property
		//hr = pclsObj->Get(NamePrt, 0, &vtProp, 0, 0)
		hr = pclsObj->Get(NamePrt, 0, &vtProp, 0, 0);  		//+vtProp	BSTR = 0x005205b4 L"PF05TBD8"	tagVARIANT
		resValue = vtProp.bstrVal;
		VariantClear(&vtProp);
		pclsObj->Release();
	}

	// Cleanup
	// ========
	pSvc->Release();
	pLoc->Release();
	pEnumerator->Release();

	CoUninitialize();

	return 0;   // Program successfully completed.
}

int HardWareData::GetStringID(bstr_t & ID)
{	
	bstr_t resValue;
	//BaseBoard
	char strSQL1[] = "SELECT * FROM Win32_BaseBoard";
	wchar_t NamePrt1[] = L"SerialNumber";
	int result = GetWmiInfo(strSQL1, NamePrt1, resValue);
	bstr_t BaseBoard(resValue);



	ID = L"BaseBoard=" + BaseBoard;

	return 0;
}