1 files changed, 149 insertions, 0 deletions
diff --git a/DropURL.cpp b/DropURL.cpp
new file mode 100644
index 0000000..9394889
--- a/dev/null
+++ b/DropURL.cpp
@@ -0,0 +1,149 @@
+// DropURL.cpp : implementation file
+//
+#include "stdafx.h"
+#include "Dipstick.h"
+#include "DropURL.h"
+#include "DragPad.h"
+#include "Dipstick.h"
+#ifdef _DEBUG
+#define new DEBUG_NEW
+#undef THIS_FILE
+static char THIS_FILE[] = __FILE__;
+#endif
+/////////////////////////////////////////////////////////////////////////////
+// CDropURL
+IMPLEMENT_DYNCREATE(CDropURL, CCmdTarget)
+CDropURL::CDropURL()
+        : m_Pad(NULL)
+{
+}
+CDropURL::~CDropURL()
+{
+}
+BEGIN_MESSAGE_MAP(CDropURL, CCmdTarget)
+        //{{AFX_MSG_MAP(CDropURL)
+        //}}AFX_MSG_MAP
+END_MESSAGE_MAP()
+BEGIN_INTERFACE_MAP(CDropURL, CCmdTarget)
+        INTERFACE_PART(CDropURL, IID_IDropTarget, DDropTarget)
+END_INTERFACE_MAP()
+/////////////////////////////////////////////////////////////////////////////
+// CDropURL message handlers
+STDMETHODIMP_(ULONG) CDropURL::XDDropTarget::AddRef()
+{
+        METHOD_PROLOGUE(CDropURL, DDropTarget)
+        return pThis->ExternalAddRef();
+}
+STDMETHODIMP_(ULONG) CDropURL::XDDropTarget::Release()
+{
+        METHOD_PROLOGUE(CDropURL, DDropTarget)
+        return pThis->ExternalRelease();
+}
+STDMETHODIMP_(HRESULT) CDropURL::XDDropTarget::QueryInterface(REFIID iid,void FAR* FAR * ppvObj)
+{
+        METHOD_PROLOGUE(CDropURL, DDropTarget)
+        return pThis->ExternalQueryInterface(&iid,ppvObj);
+}
+STDMETHODIMP_(HRESULT) CDropURL::XDDropTarget::DragEnter(IDataObject *pDataObject,DWORD grfKeyState,POINTL pt,DWORD *pdwEffect)
+{
+        METHOD_PROLOGUE(CDropURL, DDropTarget)
+        TRACE0("DragEnter\n");
+        return pThis->DragEnter(pDataObject,grfKeyState,pt,pdwEffect);
+}
+STDMETHODIMP_(HRESULT) CDropURL::XDDropTarget::DragOver(DWORD grfKeyState,POINTL pt,DWORD *pdwEffect)
+{
+        METHOD_PROLOGUE(CDropURL, DDropTarget)
+        return S_OK;
+}
+STDMETHODIMP_(HRESULT) CDropURL::XDDropTarget::DragLeave(void)
+{
+        METHOD_PROLOGUE(CDropURL, DDropTarget)
+        TRACE0("DragLeave\n");
+        return S_OK;
+}
+STDMETHODIMP_(HRESULT) CDropURL::XDDropTarget::Drop(IDataObject *pDataObject,DWORD grfKeyState,POINTL pt,DWORD *pdwEffect)
+{
+        METHOD_PROLOGUE(CDropURL, DDropTarget)
+        TRACE0("Drop\n");
+        return pThis->Drop(pDataObject,grfKeyState,pt,pdwEffect);
+}
+HRESULT CDropURL::DragEnter(IDataObject *pDataObject,DWORD grfKeyState,POINTL pt,DWORD *pdwEffect)
+{
+CString host = GetHostName(pDataObject);
+        if(host.IsEmpty()){
+                (*pdwEffect)=DROPEFFECT_NONE;
+                return S_FALSE;
+        }else{
+                (*pdwEffect)=DROPEFFECT_LINK;
+                return S_OK;
+        }
+}
+CString CDropURL::GetHostName(IDataObject *pDataObject,CString *_url)
+{
+FORMATETC fetc;
+        fetc.cfFormat=CF_TEXT;
+        fetc.ptd=NULL;
+        fetc.dwAspect=DVASPECT_CONTENT;
+        fetc.lindex=-1;
+        fetc.tymed=TYMED_HGLOBAL;
+STGMEDIUM stgm;
+        LPVOIDglobe = NULL;
+        CStringurl;
+CString rv;
+        stgm.pUnkForRelease=NULL;
+        do{
+                if(pDataObject->GetData(&fetc,&stgm)!=S_OK)
+                        break;
+                ASSERT(stgm.tymed==TYMED_HGLOBAL);
+                if(GlobalSize(stgm.hGlobal)>=1024)
+                        break;
+                VERIFY(globe=GlobalLock(stgm.hGlobal));
+                url=(LPTSTR)globe;
+                TRACE0("["+url+"]\n");
+                if(_url)
+                        (*_url) = url;
+                rv = m_Pad->m_Daddy->GetHostName(url);
+        }while(FALSE);
+        if(globe)
+                GlobalUnlock(stgm.hGlobal);
+        if(stgm.pUnkForRelease)
+                stgm.pUnkForRelease->Release();
+        return rv;
+}
+HRESULT CDropURL::Drop(IDataObject *pDataObject,DWORD grfKeyState,POINTL pt,DWORD *pwdEffect)
+{
+CString url;
+CString host = GetHostName(pDataObject,&url);
+        if(host.IsEmpty())
+                return S_FALSE;
+        #ifdefTRUE
+        // URL Mode
+CString *u = new CString(url);
+        m_Pad->m_Daddy->PostMessage(WM_DNP_URLPING,0,(LPARAM)u);
+#else
+CString *hn = new CString(host);
+        m_Pad->m_Daddy->PostMessage(WM_DNP_HOSTPING,0,(LPARAM)hn);
+#endif
+        return S_OK;
+}
+void CDropURL::OnFinalRelease() 
+{
+        TRACE0("Final Release\n");
+        CCmdTarget::OnFinalRelease();
+}

diff --git a/DropURL.cpp b/DropURL.cpp new file mode 100644 index 0000000..9394889 --- a/dev/null +++ b/DropURL.cpp
@@ -0,0 +1,149 @@
	1	// DropURL.cpp : implementation file
	2	//
	3
	4	#include "stdafx.h"
	5	#include "Dipstick.h"
	6	#include "DropURL.h"
	7	#include "DragPad.h"
	8	#include "Dipstick.h"
	9
	10	#ifdef _DEBUG
	11	#define new DEBUG_NEW
	12	#undef THIS_FILE
	13	static char THIS_FILE[] = __FILE__;
	14	#endif
	15
	16	/////////////////////////////////////////////////////////////////////////////
	17	// CDropURL
	18
	19	IMPLEMENT_DYNCREATE(CDropURL, CCmdTarget)
	20
	21	CDropURL::CDropURL()
	22	: m_Pad(NULL)
	23	{
	24	}
	25
	26	CDropURL::~CDropURL()
	27	{
	28	}
	29
	30
	31	BEGIN_MESSAGE_MAP(CDropURL, CCmdTarget)
	32	//{{AFX_MSG_MAP(CDropURL)
	33	//}}AFX_MSG_MAP
	34	END_MESSAGE_MAP()
	35
	36	BEGIN_INTERFACE_MAP(CDropURL, CCmdTarget)
	37	INTERFACE_PART(CDropURL, IID_IDropTarget, DDropTarget)
	38	END_INTERFACE_MAP()
	39
	40	/////////////////////////////////////////////////////////////////////////////
	41	// CDropURL message handlers
	42
	43	STDMETHODIMP_(ULONG) CDropURL::XDDropTarget::AddRef()
	44	{
	45	METHOD_PROLOGUE(CDropURL, DDropTarget)
	46	return pThis->ExternalAddRef();
	47	}
	48	STDMETHODIMP_(ULONG) CDropURL::XDDropTarget::Release()
	49	{
	50	METHOD_PROLOGUE(CDropURL, DDropTarget)
	51	return pThis->ExternalRelease();
	52	}
	53	STDMETHODIMP_(HRESULT) CDropURL::XDDropTarget::QueryInterface(REFIID iid,void FAR* FAR * ppvObj)
	54	{
	55	METHOD_PROLOGUE(CDropURL, DDropTarget)
	56	return pThis->ExternalQueryInterface(&iid,ppvObj);
	57	}
	58
	59	STDMETHODIMP_(HRESULT) CDropURL::XDDropTarget::DragEnter(IDataObject pDataObject,DWORD grfKeyState,POINTL pt,DWORD pdwEffect)
	60	{
	61	METHOD_PROLOGUE(CDropURL, DDropTarget)
	62	TRACE0("DragEnter\n");
	63	return pThis->DragEnter(pDataObject,grfKeyState,pt,pdwEffect);
	64	}
	65	STDMETHODIMP_(HRESULT) CDropURL::XDDropTarget::DragOver(DWORD grfKeyState,POINTL pt,DWORD *pdwEffect)
	66	{
	67	METHOD_PROLOGUE(CDropURL, DDropTarget)
	68	return S_OK;
	69	}
	70	STDMETHODIMP_(HRESULT) CDropURL::XDDropTarget::DragLeave(void)
	71	{
	72	METHOD_PROLOGUE(CDropURL, DDropTarget)
	73	TRACE0("DragLeave\n");
	74	return S_OK;
	75	}
	76	STDMETHODIMP_(HRESULT) CDropURL::XDDropTarget::Drop(IDataObject pDataObject,DWORD grfKeyState,POINTL pt,DWORD pdwEffect)
	77	{
	78	METHOD_PROLOGUE(CDropURL, DDropTarget)
	79	TRACE0("Drop\n");
	80	return pThis->Drop(pDataObject,grfKeyState,pt,pdwEffect);
	81	}
	82
	83
	84	HRESULT CDropURL::DragEnter(IDataObject pDataObject,DWORD grfKeyState,POINTL pt,DWORD pdwEffect)
	85	{
	86	CString host = GetHostName(pDataObject);
	87	if(host.IsEmpty()){
	88	(*pdwEffect)=DROPEFFECT_NONE;
	89	return S_FALSE;
	90	}else{
	91	(*pdwEffect)=DROPEFFECT_LINK;
	92	return S_OK;
	93	}
	94	}
	95
	96	CString CDropURL::GetHostName(IDataObject pDataObject,CString _url)
	97	{
	98	FORMATETC fetc;
	99	fetc.cfFormat=CF_TEXT;
	100	fetc.ptd=NULL;
	101	fetc.dwAspect=DVASPECT_CONTENT;
	102	fetc.lindex=-1;
	103	fetc.tymed=TYMED_HGLOBAL;
	104	STGMEDIUM stgm;
	105	LPVOIDglobe = NULL;
	106	CStringurl;
	107	CString rv;
	108	stgm.pUnkForRelease=NULL;
	109	do{
	110	if(pDataObject->GetData(&fetc,&stgm)!=S_OK)
	111	break;
	112	ASSERT(stgm.tymed==TYMED_HGLOBAL);
	113	if(GlobalSize(stgm.hGlobal)>=1024)
	114	break;
	115	VERIFY(globe=GlobalLock(stgm.hGlobal));
	116	url=(LPTSTR)globe;
	117	TRACE0("["+url+"]\n");
	118	if(_url)
	119	(*_url) = url;
	120	rv = m_Pad->m_Daddy->GetHostName(url);
	121	}while(FALSE);
	122	if(globe)
	123	GlobalUnlock(stgm.hGlobal);
	124	if(stgm.pUnkForRelease)
	125	stgm.pUnkForRelease->Release();
	126	return rv;
	127	}
	128
	129	HRESULT CDropURL::Drop(IDataObject pDataObject,DWORD grfKeyState,POINTL pt,DWORD pwdEffect)
	130	{
	131	CString url;
	132	CString host = GetHostName(pDataObject,&url);
	133	if(host.IsEmpty())
	134	return S_FALSE;
	135	#ifdefTRUE
	136	// URL Mode
	137	CString *u = new CString(url);
	138	m_Pad->m_Daddy->PostMessage(WM_DNP_URLPING,0,(LPARAM)u);
	139	#else
	140	CString *hn = new CString(host);
	141	m_Pad->m_Daddy->PostMessage(WM_DNP_HOSTPING,0,(LPARAM)hn);
	142	#endif
	143	return S_OK;
	144	}
	145	void CDropURL::OnFinalRelease()
	146	{
	147	TRACE0("Final Release\n");
	148	CCmdTarget::OnFinalRelease();
	149	}