netstat: Initial implementation.
[wine] / dlls / shell32 / dde.c
1 /*
2  * Shell DDE Handling
3  *
4  * Copyright 2004 Robert Shearman
5  *
6  * This library is free software; you can redistribute it and/or
7  * modify it under the terms of the GNU Lesser General Public
8  * License as published by the Free Software Foundation; either
9  * version 2.1 of the License, or (at your option) any later version.
10  *
11  * This library is distributed in the hope that it will be useful,
12  * but WITHOUT ANY WARRANTY; without even the implied warranty of
13  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
14  * Lesser General Public License for more details.
15  *
16  * You should have received a copy of the GNU Lesser General Public
17  * License along with this library; if not, write to the Free Software
18  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
19  */
20
21 #include <stdarg.h>
22
23 #include "windef.h"
24 #include "winbase.h"
25 #include "winuser.h"
26 #include "ddeml.h"
27 #include "shellapi.h"
28
29 #include "wine/debug.h"
30
31 WINE_DEFAULT_DEBUG_CHANNEL(shell);
32
33 /* String handles */
34 static HSZ hszProgmanTopic;
35 static HSZ hszProgmanService;
36 static HSZ hszAsterisk;
37 static HSZ hszShell;
38 static HSZ hszAppProperties;
39 static HSZ hszFolders;
40 static HSZ hszGroups;
41 /* DDE Instance ID */
42 static DWORD dwDDEInst;
43
44 static const char *debugstr_hsz( HSZ hsz )
45 {
46     WCHAR buffer[256];
47     if (!DdeQueryStringW( dwDDEInst, hsz, buffer, sizeof(buffer)/sizeof(WCHAR), CP_WINUNICODE ))
48         return "<unknown>";
49     return debugstr_w( buffer );
50 }
51
52 static inline BOOL Dde_OnConnect(HSZ hszTopic, HSZ hszService)
53 {
54     if ((hszTopic == hszProgmanTopic) && (hszService == hszProgmanService))
55         return TRUE;
56     if ((hszTopic == hszProgmanTopic) && (hszService == hszAppProperties))
57         return TRUE;
58     if ((hszTopic == hszShell) && (hszService == hszFolders))
59         return TRUE;
60     if ((hszTopic == hszShell) && (hszService == hszAppProperties))
61         return TRUE;
62     return FALSE;
63 }
64
65 static inline void Dde_OnConnectConfirm(HCONV hconv, HSZ hszTopic, HSZ hszService)
66 {
67     TRACE( "%p %s %s\n", hconv, debugstr_hsz(hszTopic), debugstr_hsz(hszService) );
68 }
69
70 static inline BOOL Dde_OnWildConnect(HSZ hszTopic, HSZ hszService)
71 {
72     FIXME("stub\n");
73     return FALSE;
74 }
75
76 static inline HDDEDATA Dde_OnRequest(UINT uFmt, HCONV hconv, HSZ hszTopic,
77                                      HSZ hszItem)
78 {
79     if (hszTopic == hszProgmanTopic && hszItem == hszGroups && uFmt == CF_TEXT)
80     {
81         static BYTE groups_data[] = "Accessories\r\nStartup\r\n";
82         FIXME( "returning fake program groups list\n" );
83         return DdeCreateDataHandle( dwDDEInst, groups_data, sizeof(groups_data), 0, hszGroups, uFmt, 0 );
84     }
85     else if (hszTopic == hszProgmanTopic && hszItem == hszProgmanService && uFmt == CF_TEXT)
86     {
87         static BYTE groups_data[] = "\r\n";
88         FIXME( "returning empty groups list\n" );
89         /* This is a workaround for an application which expects some data
90          * and cannot handle NULL. */
91         return DdeCreateDataHandle( dwDDEInst, groups_data, sizeof(groups_data), 0, hszProgmanService, uFmt, 0 );
92     }
93     FIXME( "%u %p %s %s: stub\n", uFmt, hconv, debugstr_hsz(hszTopic), debugstr_hsz(hszItem) );
94     return NULL;
95 }
96
97 static inline DWORD Dde_OnExecute(HCONV hconv, HSZ hszTopic, HDDEDATA hdata)
98 {
99     WCHAR * pszCommand;
100
101     pszCommand = (WCHAR *)DdeAccessData(hdata, NULL);
102     if (!pszCommand)
103         return DDE_FNOTPROCESSED;
104
105     FIXME("stub: %s %s\n", debugstr_hsz(hszTopic), debugstr_w(pszCommand));
106
107     DdeUnaccessData(hdata);
108
109     return DDE_FNOTPROCESSED;
110 }
111
112 static inline void Dde_OnDisconnect(HCONV hconv)
113 {
114     TRACE( "%p\n", hconv );
115 }
116
117 static HDDEDATA CALLBACK DdeCallback(      
118     UINT uType,
119     UINT uFmt,
120     HCONV hconv,
121     HSZ hsz1,
122     HSZ hsz2,
123     HDDEDATA hdata,
124     ULONG_PTR dwData1,
125     ULONG_PTR dwData2)
126 {
127     switch (uType)
128     {
129     case XTYP_CONNECT:
130         return (HDDEDATA)(DWORD_PTR)Dde_OnConnect(hsz1, hsz2);
131     case XTYP_CONNECT_CONFIRM:
132         Dde_OnConnectConfirm(hconv, hsz1, hsz2);
133         return NULL;
134     case XTYP_WILDCONNECT:
135         return (HDDEDATA)(DWORD_PTR)Dde_OnWildConnect(hsz1, hsz2);
136     case XTYP_REQUEST:
137         return Dde_OnRequest(uFmt, hconv, hsz1, hsz2);
138     case XTYP_EXECUTE:
139         return (HDDEDATA)(DWORD_PTR)Dde_OnExecute(hconv, hsz1, hdata);
140     case XTYP_DISCONNECT:
141         Dde_OnDisconnect(hconv);
142         return NULL;
143     default:
144         return NULL;
145     }
146 }
147
148 /*************************************************************************
149  * ShellDDEInit (SHELL32.@)
150  *
151  * Registers the Shell DDE services with the system so that applications
152  * can use them.
153  *
154  * PARAMS
155  *  bInit [I] TRUE to initialize the services, FALSE to uninitialize.
156  *
157  * RETURNS
158  *  Nothing.
159  */
160 void WINAPI ShellDDEInit(BOOL bInit)
161 {
162     TRACE("bInit = %s\n", bInit ? "TRUE" : "FALSE");
163
164     if (bInit)
165     {
166         static const WCHAR wszProgman[] = {'P','r','o','g','m','a','n',0};
167         static const WCHAR wszAsterisk[] = {'*',0};
168         static const WCHAR wszShell[] = {'S','h','e','l','l',0};
169         static const WCHAR wszAppProperties[] =
170             {'A','p','p','P','r','o','p','e','r','t','i','e','s',0};
171         static const WCHAR wszFolders[] = {'F','o','l','d','e','r','s',0};
172         static const WCHAR wszGroups[] = {'G','r','o','u','p','s',0};
173
174         DdeInitializeW(&dwDDEInst, DdeCallback, CBF_FAIL_ADVISES | CBF_FAIL_POKES, 0);
175
176         hszProgmanTopic = DdeCreateStringHandleW(dwDDEInst, wszProgman, CP_WINUNICODE);
177         hszProgmanService = DdeCreateStringHandleW(dwDDEInst, wszProgman, CP_WINUNICODE);
178         hszAsterisk = DdeCreateStringHandleW(dwDDEInst, wszAsterisk, CP_WINUNICODE);
179         hszShell = DdeCreateStringHandleW(dwDDEInst, wszShell, CP_WINUNICODE);
180         hszAppProperties = DdeCreateStringHandleW(dwDDEInst, wszAppProperties, CP_WINUNICODE);
181         hszFolders = DdeCreateStringHandleW(dwDDEInst, wszFolders, CP_WINUNICODE);
182         hszGroups = DdeCreateStringHandleW(dwDDEInst, wszGroups, CP_WINUNICODE);
183
184         DdeNameService(dwDDEInst, hszFolders, 0, DNS_REGISTER);
185         DdeNameService(dwDDEInst, hszProgmanService, 0, DNS_REGISTER);
186         DdeNameService(dwDDEInst, hszShell, 0, DNS_REGISTER);
187     }
188     else
189     {
190         /* unregister all services */
191         DdeNameService(dwDDEInst, 0, 0, DNS_UNREGISTER);
192
193         DdeFreeStringHandle(dwDDEInst, hszFolders);
194         DdeFreeStringHandle(dwDDEInst, hszAppProperties);
195         DdeFreeStringHandle(dwDDEInst, hszShell);
196         DdeFreeStringHandle(dwDDEInst, hszAsterisk);
197         DdeFreeStringHandle(dwDDEInst, hszProgmanService);
198         DdeFreeStringHandle(dwDDEInst, hszProgmanTopic);
199
200         DdeUninitialize(dwDDEInst);
201     }
202 }