git.sesse.net Git - vlc/blob - activex/utils.cpp

   1 /*****************************************************************************
   2  * utils.cpp: ActiveX control for VLC
   3  *****************************************************************************
   4  * Copyright (C) 2005 the VideoLAN team
   5  *
   6  * Authors: Damien Fouilleul <Damien.Fouilleul@laposte.net>
   7  *
   8  * This program is free software; you can redistribute it and/or modify
   9  * it under the terms of the GNU General Public License as published by
  10  * the Free Software Foundation; either version 2 of the License, or
  11  * (at your option) any later version.
  12  *
  13  * This program is distributed in the hope that it will be useful,
  14  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  15  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  16  * GNU General Public License for more details.
  17  *
  18  * You should have received a copy of the GNU General Public License
  19  * along with this program; if not, write to the Free Software
  20  * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA  02111, USA.
  21  *****************************************************************************/
  22
  23 #include "utils.h"
  24
  25 /*
  26 ** conversion facilities
  27 */
  28
  29 using namespace std;
  30
  31 char *CStrFromBSTR(UINT codePage, BSTR bstr)
  32 {
  33     UINT len = SysStringLen(bstr);
  34     if( len > 0 )
  35     {
  36         size_t mblen = WideCharToMultiByte(codePage,
  37                 0, bstr, len, NULL, 0, NULL, NULL);
  38         if( mblen > 0 )
  39         {
  40             char *buffer = (char *)CoTaskMemAlloc(mblen+1);
  41             ZeroMemory(buffer, mblen+1);
  42             if( WideCharToMultiByte(codePage, 0, bstr, len, buffer, mblen, NULL, NULL) )
  43             {
  44                 buffer[mblen] = '\0';
  45                 return buffer;
  46             }
  47         }
  48     }
  49     return NULL;
  50 };
  51
  52 BSTR BSTRFromCStr(UINT codePage, LPCSTR s)
  53 {
  54     int wideLen = MultiByteToWideChar(codePage, 0, s, -1, NULL, 0);
  55     if( wideLen > 0 )
  56     {
  57         WCHAR* wideStr = (WCHAR*)CoTaskMemAlloc(wideLen*sizeof(WCHAR));
  58         if( NULL != wideStr )
  59         {
  60             BSTR bstr;
  61
  62             ZeroMemory(wideStr, wideLen*sizeof(WCHAR));
  63             MultiByteToWideChar(codePage, 0, s, -1, wideStr, wideLen);
  64             bstr = SysAllocStringLen(wideStr, wideLen);
  65             free(wideStr);
  66
  67             return bstr;
  68         }
  69     }
  70     return NULL;
  71 };
  72
  73 /*
  74 **  properties
  75 */
  76
  77 HRESULT GetObjectProperty(LPUNKNOWN object, DISPID dispID, VARIANT& v)
  78 {
  79     IDispatch *pDisp;
  80     HRESULT hr = object->QueryInterface(IID_IDispatch, (LPVOID *)&pDisp);
  81     if( SUCCEEDED(hr) )
  82     {
  83         DISPPARAMS dispparamsNoArgs = {NULL, NULL, 0, 0};
  84         VARIANT vres;
  85         hr = pDisp->Invoke(dispID, IID_NULL, LOCALE_USER_DEFAULT,
  86                 DISPATCH_PROPERTYGET, &dispparamsNoArgs, &vres, NULL, NULL);
  87         if( SUCCEEDED(hr) )
  88         {
  89             if( V_VT(&v) != V_VT(&vres) )
  90             {
  91                 hr = VariantChangeType(&v, &vres, 0, V_VT(&v));
  92                 VariantClear(&vres);
  93             }
  94             else
  95             {
  96                 v = vres;
  97             }
  98         }
  99         pDisp->Release();
 100     }
 101     return hr;
 102 };
 103
 104 HDC CreateDevDC(DVTARGETDEVICE *ptd)
 105 {
 106         HDC hdc=NULL;
 107         LPDEVNAMES lpDevNames;
 108         LPDEVMODE lpDevMode;
 109         LPTSTR lpszDriverName;
 110         LPTSTR lpszDeviceName;
 111         LPTSTR lpszPortName;
 112
 113         if (ptd == NULL) {
 114                 hdc = CreateDC(TEXT("DISPLAY"), NULL, NULL, NULL);
 115                 goto errReturn;
 116         }
 117
 118         lpDevNames = (LPDEVNAMES) ptd; // offset for size field
 119
 120         if (ptd->tdExtDevmodeOffset == 0) {
 121                 lpDevMode = NULL;
 122         }else{
 123                 lpDevMode  = (LPDEVMODE) ((LPTSTR)ptd + ptd->tdExtDevmodeOffset);
 124         }
 125
 126         lpszDriverName = (LPTSTR) lpDevNames + ptd->tdDriverNameOffset;
 127         lpszDeviceName = (LPTSTR) lpDevNames + ptd->tdDeviceNameOffset;
 128         lpszPortName   = (LPTSTR) lpDevNames + ptd->tdPortNameOffset;
 129
 130         hdc = CreateDC(lpszDriverName, lpszDeviceName, lpszPortName, lpDevMode);
 131
 132 errReturn:
 133         return hdc;
 134 };
 135
 136 #define HIMETRIC_PER_INCH 2540
 137
 138 void DPFromHimetric(HDC hdc, LPPOINT pt, int count)
 139 {
 140     LONG lpX = GetDeviceCaps(hdc, LOGPIXELSX);
 141     LONG lpY = GetDeviceCaps(hdc, LOGPIXELSY);
 142     while( count-- )
 143     {
 144         pt->x = pt->x*lpX/HIMETRIC_PER_INCH;
 145         pt->y = pt->y*lpY/HIMETRIC_PER_INCH;
 146         ++pt;
 147     }
 148 };
 149
 150 void HimetricFromDP(HDC hdc, LPPOINT pt, int count)
 151 {
 152     LONG lpX = GetDeviceCaps(hdc, LOGPIXELSX);
 153     LONG lpY = GetDeviceCaps(hdc, LOGPIXELSY);
 154     while( count-- )
 155     {
 156         pt->x = pt->x*HIMETRIC_PER_INCH/lpX;
 157         pt->y = pt->y*HIMETRIC_PER_INCH/lpY;
 158         ++pt;
 159     }
 160 };
 161