TnbStrEx.h

[詳解]

#pragma once
#include "TnbStr.h"
 
 
 
//T-TestCaseコードカバレッジDisable
#pragma comment(user, "T-Coverage Disable")
 
 
 
//TNB Library
namespace TNB
{
 
 
 
inline CStr GetComputerName(void)
{
    CStr str;
    #ifndef _WIN32_WCE
        DWORD dwLength = MAX_COMPUTERNAME_LENGTH + 1;
        ::GetComputerName(str.GetBuffer(dwLength), &dwLength);
        str.ReleaseBuffer();
    #else
        str = _T("CE");
    #endif
    return str;
}
 
 
 
inline CStr GetProcessPath(void)
{
    CStr str;
    DWORD dwRc = ::GetModuleFileName(NULL, str.GetBuffer(MAX_PATH), MAX_PATH);
    str.ReleaseBuffer();
    if ( dwRc != 0 )
    {
//      INT_PTR p1 = str.ReverseFind('\\');
//      INT_PTR p2 = str.ReverseFind('/');
//      INT_PTR p0 = (p1 < p2) ? p2 : p1;
        INT_PTR p = str.ReverseFindOneOf(_T("\\/"));
        if ( p >= 0 )
        {
            return str.Left(p);
        }
    }
    return str;
}
 
 
 
inline CStr GetProcessName(void)
{
    CStr str;
    DWORD dwRc = ::GetModuleFileName(NULL, str.GetBuffer(MAX_PATH), MAX_PATH);
    str.ReleaseBuffer();
    if ( dwRc != 0 )
    {
//      INT_PTR p1 = str.ReverseFind('\\');
//      INT_PTR p2 = str.ReverseFind('/');
//      INT_PTR p0 = (p1 < p2) ? p2 : p1;
        INT_PTR p = str.ReverseFindOneOf(_T("\\/"));
        if ( p >= 0 )
        {
            return str.Mid(static_cast<INDEX>(p + 1));
        }
    }
    return str;
}
 
 
 
inline CStr LoadStr(UINT nID, HINSTANCE hInst = NULL)
{
    if ( hInst == NULL )
    {
        hInst = GetInstanceHandleByTnb(EI_String);
    }
    CStr str;
    int iLen = 256;
    while ( true )
    {
        int r = ::LoadString(hInst, nID, str.GetBuffer(iLen), iLen);
        str.ReleaseBuffer();
        if ( r == 0 )
        {
            str.Empty();
            break;
        }
        if ( r < iLen - 2 )
        {
            break;
        }
        iLen *= 2;
    }
    return str;
}
 
 
 
inline CAscii LocalMapString(LPCSTR lpsz, DWORD dwFlags)
{
    // 半角→全角変換で最大2倍のサイズになる
    size_t iLen = (STRLIB::GetLen(lpsz) + 1) * 2;
    CWorkMemT<char> work(iLen);
    int iRc = ::LCMapStringA(::GetUserDefaultLCID(),
                dwFlags,
                lpsz, -1,   // 入力文字列と長さ(NULL終端なら長さに-1指定可能)
                work, ToInt(iLen));// 変換後の文字列を格納するバッファとバッファ長
    if ( iRc <= 0 )
    {
        work.Free();
    }
    return CAscii(work);
}
 
 
 
inline CUnicode LocalMapString(LPCWSTR lpsz, DWORD dwFlags)
{
    size_t iLen = STRLIB::GetLen(lpsz) + 1;
    CWorkMemT<WCHAR> work(iLen);
    int iRc = ::LCMapStringW(::GetUserDefaultLCID(),
                dwFlags,
                lpsz, -1,   // 入力文字列と長さ(NULL終端なら長さに-1指定可能)
                work, ToInt(iLen));// 変換後の文字列を格納するバッファとバッファ長
    if ( iRc <= 0 )
    {
        work.Free();
    }
    return CUnicode(work);
}
 
 
 
inline CAscii LowerString(LPCSTR lpsz)
{
    return LocalMapString(lpsz, LCMAP_LOWERCASE);
}
 
 
 
inline CUnicode LowerString(LPCWSTR lpsz)
{
    return LocalMapString(lpsz, LCMAP_LOWERCASE);
}
 
 
 
inline CAscii UpperString(LPCSTR lpsz)
{
    return LocalMapString(lpsz, LCMAP_UPPERCASE);
}
 
 
 
inline CUnicode UpperString(LPCWSTR lpsz)
{
    return LocalMapString(lpsz, LCMAP_UPPERCASE);
}
 
 
 
inline CStr SystemErrorToMessageText(DWORD dwError, bool withRowValue = false)
{
    LPTSTR lpBuffer = NULL;
    const DWORD dwFlag  = FORMAT_MESSAGE_ALLOCATE_BUFFER 
                        | FORMAT_MESSAGE_FROM_SYSTEM
                        | FORMAT_MESSAGE_IGNORE_INSERTS;
    DWORD r = ::FormatMessage( 
                    dwFlag,
                    NULL,
                    dwError,
                    LANG_USER_DEFAULT,
                    reinterpret_cast<LPTSTR>(&lpBuffer),
                    0,
                    NULL);
    CStr strErrMessage;
    if ( r == 0 )
    {
        strErrMessage = _T("Unknown");
    }
    else
    {
        strErrMessage = lpBuffer;
        strErrMessage.TrimRight(_T("\n\r"));
        ::LocalFree(lpBuffer);
    }
    if ( withRowValue )
    {
        strErrMessage += CStr::Fmt(_T("(%d)"), dwError);
    }
    return strErrMessage;
}
 
 
 
}; //TNB
 
 
 
//T-TestCaseコードカバレッジEnable
#pragma comment(user,"T-Coverage Enable")