* mh-customize.el (mh-toolbar): Rename to mh-tool-bar.
[bpt/emacs.git] / nt / ddeclient.c
CommitLineData
983d2b33 1/* Simple client interface to DDE servers.
b65d8176 2 Copyright (C) 1998, 2002, 2003, 2004, 2005 Free Software Foundation, Inc.
983d2b33
GV
3
4This file is part of GNU Emacs.
5
6GNU Emacs is free software; you can redistribute it and/or modify
7it under the terms of the GNU General Public License as published by
8the Free Software Foundation; either version 2, or (at your option)
9any later version.
10
11GNU Emacs is distributed in the hope that it will be useful,
12but WITHOUT ANY WARRANTY; without even the implied warranty of
13MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
14GNU General Public License for more details.
15
16You should have received a copy of the GNU General Public License
17along with GNU Emacs; see the file COPYING. If not, write to
364c38d3
LK
18the Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor,
19Boston, MA 02110-1301, USA. */
983d2b33
GV
20
21#include <windows.h>
22#include <ddeml.h>
23#include <stdlib.h>
24#include <stdio.h>
25
177c0ea7 26HDDEDATA CALLBACK
983d2b33
GV
27DdeCallback (UINT uType, UINT uFmt, HCONV hconv,
28 HSZ hsz1, HSZ hsz2, HDDEDATA hdata,
29 DWORD dwData1, DWORD dwData2)
30{
31 return ((HDDEDATA) NULL);
32}
33
34#define DdeCommand(str) \
35 DdeClientTransaction (str, strlen (str)+1, HConversation, (HSZ)NULL, \
36 CF_TEXT, XTYP_EXECUTE, 30000, NULL)
37
38int
39main (argc, argv)
40 int argc;
41 char *argv[];
42{
43 DWORD idDde = 0;
44 HCONV HConversation;
45 HSZ Server;
46 HSZ Topic = 0;
47 char command[1024];
48
49 if (argc < 2)
50 {
51 fprintf (stderr, "usage: ddeclient server [topic]\n");
52 exit (1);
53 }
54
55 DdeInitialize (&idDde, (PFNCALLBACK)DdeCallback, APPCMD_CLIENTONLY, 0);
56
57 Server = DdeCreateStringHandle (idDde, argv[1], CP_WINANSI);
58 if (argc > 2)
59 Topic = DdeCreateStringHandle (idDde, argv[2], CP_WINANSI);
60
61 HConversation = DdeConnect (idDde, Server, Topic, NULL);
62 if (HConversation != 0)
63 {
64 while (fgets (command, sizeof(command), stdin) != NULL)
65 DdeCommand (command);
66
67 DdeDisconnect (HConversation);
68 }
69
70 DdeFreeStringHandle (idDde, Server);
71 if (Topic)
72 DdeFreeStringHandle (idDde, Topic);
73 DdeUninitialize (idDde);
74
75 return (0);
76}
ab5796a9
MB
77
78/* arch-tag: 360d7a99-2cae-447e-8d06-41ca41987e30
79 (do not change this comment) */