view nt/ddeclient.c @ 81387:c0681aed938d

(rcirc-format-response-string): Use rcirc-nick-syntax around bright and dim regexps. Make sure bright and dim matches use word anchors. Send text through rcirc-markup functions. (rcirc-url-regexp): Add single quote character. (rcirc-connect): Write logs to disk on auto-save-hook. Make server a non-optional argument. (rcirc-log-alist): New variable. (rcirc-log-directory): Make customizable. (rcirc-log-flag): New customizable variable. (rcirc-log): New function. (rcirc-print): Use above function. (rcirc-log-write): New function. (rcirc-generate-new-buffer-name): Strip text properties. (rcirc-switch-to-buffer-function): Remove variable. (rcirc-last-non-irc-buffer): Remove variable. (rcirc-non-irc-buffer): Add function. (rcirc-next-active-buffer): Use above function. (rcirc-keepalive): Send KEEPALIVE ctcp instead of a PING. (rcirc-handler-ctcp-KEEPALIVE): Add handler. (rcirc-handler-CTCP): Don't print KEEPALIVE responses. (rcirc-omit-mode): Add minor-mode. (rcirc-mode-map): Change C-c C-o binding. (rcirc-mode): Clear mode-line-process. Use a custom fill-paragraph-function. Set up buffer-invisibility-spec. (rcirc-response-formats): Remove timestamp code. (rcirc-omit-responses): Add variable. (rcirc-print): Don't put the overlay arrow on potentially omitted lines. Log line to disk. Record activity for private messages from /dim nicks. Facify the fill-prefix with rcirc-timestamp face. (rcirc-jump-to-first-unread-line): Print message if there is no unread text. (rcirc-clear-unread): New function. (rcirc-markup-text-functions): Add variable. (rcirc-markup-timestamp, rcirc-markup-fill): Add functions. (rcirc-debug): Don't mess with window configuration. (rcirc-send-message): Send message before printing locally. Add SILENT argument, do not print message if non-nil. (rcirc-visible-buffers): New function and variable. (rcirc-window-configuration-change-1): Add function. (rcirc-target-buffer): Make sure ACTIONs don't get sent to the server buffer. (rcirc-clean-up-buffer): Set rcirc-target to nil when finished. (rcirc-fill-paragraph): Add function. (rcirc-record-activity, rcirc-window-configuration-change-1): Only update the activity string if it has actually changed. (rcirc-update-activity-string): Remove padding characters from the mode-line string. (rcirc-disconnect-buffer): New function to be called when a channel is parted or the user quits. (rcirc-server-name): Warn when the server-name hasn't been set. (rcirc-window-configuration-change): Postpone work until post-command-hook. (rcirc-window-configuration-change-1): Update mode-line and overlay arrows here. (rcirc-authenticate): Fix chanserv identification. (rcirc-default-server): Remove variable. (rcirc): Connect according to rcirc-connections. (rcirc-connections): Add variable. (rcirc-startup-channels-alist): Remove variable. (rcirc-startup-channels): Remove function.

/* Simple client interface to DDE servers.
   Copyright (C) 1998, 2001, 2002, 2003, 2004, 2005,
      2006, 2007  Free Software Foundation, Inc.

This file is part of GNU Emacs.

GNU Emacs is free software; you can redistribute it and/or modify
it under the terms of the GNU General Public License as published by
the Free Software Foundation; either version 2, or (at your option)
any later version.

GNU Emacs is distributed in the hope that it will be useful,
but WITHOUT ANY WARRANTY; without even the implied warranty of
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
GNU General Public License for more details.

You should have received a copy of the GNU General Public License
along with GNU Emacs; see the file COPYING.  If not, write to
the Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor,
Boston, MA 02110-1301, USA.  */

#include <windows.h>
#include <ddeml.h>
#include <stdlib.h>
#include <stdio.h>

HDDEDATA CALLBACK
DdeCallback (UINT uType, UINT uFmt, HCONV hconv,
	     HSZ hsz1, HSZ hsz2, HDDEDATA hdata,
	     DWORD dwData1, DWORD dwData2)
{
  return ((HDDEDATA) NULL);
}

#define DdeCommand(str) 	\
	DdeClientTransaction (str, strlen (str)+1, HConversation, (HSZ)NULL, \
		              CF_TEXT, XTYP_EXECUTE, 30000, NULL)

int
main (argc, argv)
     int argc;
     char *argv[];
{
  DWORD idDde = 0;
  HCONV HConversation;
  HSZ   Server;
  HSZ   Topic = 0;
  char  command[1024];

  if (argc < 2)
    {
      fprintf (stderr, "usage: ddeclient server [topic]\n");
      exit (1);
    }

  DdeInitialize (&idDde, (PFNCALLBACK)DdeCallback, APPCMD_CLIENTONLY, 0);

  Server = DdeCreateStringHandle (idDde, argv[1], CP_WINANSI);
  if (argc > 2)
    Topic = DdeCreateStringHandle (idDde, argv[2], CP_WINANSI);

  HConversation = DdeConnect (idDde, Server, Topic, NULL);
  if (HConversation != 0)
    {
      while (fgets (command, sizeof(command), stdin) != NULL)
	DdeCommand (command);

      DdeDisconnect (HConversation);
    }

  DdeFreeStringHandle (idDde, Server);
  if (Topic)
    DdeFreeStringHandle (idDde, Topic);
  DdeUninitialize (idDde);

  return (0);
}

/* arch-tag: 360d7a99-2cae-447e-8d06-41ca41987e30
   (do not change this comment) */