389-ds-base/lib/libnt/pmddeml.c

/** BEGIN COPYRIGHT BLOCK
 * This Program 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; version 2 of the License.
 * 
 * This Program 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
 * this Program; if not, write to the Free Software Foundation, Inc., 59 Temple
 * Place, Suite 330, Boston, MA 02111-1307 USA.
 * 
 * In addition, as a special exception, Red Hat, Inc. gives You the additional
 * right to link the code of this Program with code not covered under the GNU
 * General Public License ("Non-GPL Code") and to distribute linked combinations
 * including the two, subject to the limitations in this paragraph. Non-GPL Code
 * permitted under this exception must only link to the code of this Program
 * through those well defined interfaces identified in the file named EXCEPTION
 * found in the source code files (the "Approved Interfaces"). The files of
 * Non-GPL Code may instantiate templates or use macros or inline functions from
 * the Approved Interfaces without causing the resulting work to be covered by
 * the GNU General Public License. Only Red Hat, Inc. may make changes or
 * additions to the list of Approved Interfaces. You must obey the GNU General
 * Public License in all respects for all of the Program code and other code used
 * in conjunction with the Program except the Non-GPL Code covered by this
 * exception. If you modify this file, you may extend this exception to your
 * version of the file, but you are not obligated to do so. If you do not wish to
 * provide this exception without modification, you must delete this exception
 * statement from your version and license this file solely under the GPL without
 * exception. 
 * 
 * 
 * Copyright (C) 2001 Sun Microsystems, Inc. Used by permission.
 * Copyright (C) 2005 Red Hat, Inc.
 * All rights reserved.
 * END COPYRIGHT BLOCK **/

#ifdef HAVE_CONFIG_H
#  include <config.h>
#endif

/****************************************************************************
    PROGRAM: pmddeml.c

    PURPOSE: DDEML interface with ProgMan

****************************************************************************/

#include <windows.h>    // required for all Windows applications
#include <ddeml.h>      // required for DDEML
#include <stdio.h>     // required for strcpy and strlen
#include "nt/ntos.h"    // specific to this program

BOOL PMDDEML_SendShellCommand (DWORD idInst, LPSTR lpCommand);

HDDEDATA CALLBACK PMDDEML_DdeCallback(  UINT  uType,	// transaction type
                                UINT  uFmt,	    // clipboard data format
                                HCONV  hconv,	// handle of the conversation
                                HSZ  hsz1,	    // handle of a string
                                HSZ  hsz2,	    // handle of a string
                                HDDEDATA  hdata,// handle of a global memory object
                                DWORD  dwData1,	// transaction-specific data
                                DWORD  dwData2 	// transaction-specific data
                               );	
/****************************************************************************
    FUNCTION: PMDDEML_Open()

    PURPOSE:  Open PMDDEML interface

    PARAMETERS:

    RETURNS:
        DWORD   handle used in subsequent calls
****************************************************************************/

DWORD PMDDEML_Open ( void )
{
    DWORD idInst = 0L;      // instance identifier

    // register this app with the DDEML
    if (DdeInitialize(&idInst,                      // receives instance ID
                      (PFNCALLBACK)PMDDEML_DdeCallback,       // address of callback function
                      APPCMD_CLIENTONLY,            // this is a client app
                      0L))                          // reserved
        return 0;
    return idInst;
}
/****************************************************************************
    FUNCTION: PMDDEML_Close()

    PURPOSE:  Closes PMDDEML interface

    PARAMETERS:
        DWORD idInst                handle returned by  PMDDEML_Open

    RETURNS:
        TRUE, if successful                        
****************************************************************************/

BOOL PMDDEML_Close ( DWORD idInst )
{
    // free all DDEML resources associated with this app
    return DdeUninitialize ( idInst );
}
/****************************************************************************
    FUNCTION: PMDDEML_CreateProgramManagerGroup()

    PURPOSE:  Creates a program group

    PARAMETERS:
        DWORD idInst                handle returned by  PMDDEML_Open
        LPCTSTR lpszGroupNamee      name of group

    RETURNS:
        TRUE, if successful                        
****************************************************************************/

BOOL PMDDEML_CreateProgramManagerGroup ( DWORD idInst, LPCTSTR lpszGroupName )
{
    char szDDEMsg[256];      // instance identifier

    if ( lpszGroupName == NULL )
        return FALSE;

    sprintf ( szDDEMsg, "[CreateGroup(%s)]", lpszGroupName );

    if ( !PMDDEML_SendShellCommand(idInst, (LPSTR)szDDEMsg ) )
        return FALSE;
    return TRUE;
}
/****************************************************************************
    FUNCTION: PMDDEML_DeleteProgramManagerGroup()

    PURPOSE:  Deletes a program group

    PARAMETERS:
        DWORD idInst                handle returned by  PMDDEML_Open
        LPCTSTR lpszGroupNamee      name of group

    RETURNS:
        TRUE, if successful                        
****************************************************************************/

BOOL PMDDEML_DeleteProgramManagerGroup ( DWORD idInst, LPCTSTR lpszGroupName )
{
    char szDDEMsg[256];      // instance identifier

    if ( lpszGroupName == NULL )
        return FALSE;

    sprintf ( szDDEMsg, "[DeleteGroup(%s)]", lpszGroupName );

    if ( !PMDDEML_SendShellCommand(idInst, (LPSTR)szDDEMsg ) )
        return FALSE;
    return TRUE;
}

BOOL PMDDEML_DeleteProgramCommonManagerGroup ( DWORD idInst,
											   LPCTSTR lpszGroupName )
{
    char szDDEMsg[256];      // instance identifier

    if ( lpszGroupName == NULL )
        return FALSE;

    sprintf ( szDDEMsg, "[DeleteGroup(%s,1)]", lpszGroupName );

    if ( !PMDDEML_SendShellCommand(idInst, (LPSTR)szDDEMsg ) )
        return FALSE;
    return TRUE;
}

/****************************************************************************
    FUNCTION: PMDDEML_ShowProgramManagerGroup()

    PURPOSE:  Deletes a program group

    PARAMETERS:
        DWORD idInst                handle returned by  PMDDEML_Open
        LPCTSTR lpszGroupNamee      name of group

    RETURNS:
        TRUE, if successful                        
****************************************************************************/

BOOL PMDDEML_ShowProgramManagerGroup ( DWORD idInst, LPCTSTR lpszGroupName )
{
    char szDDEMsg[256];      // instance identifier

    if ( lpszGroupName == NULL )
        return FALSE;

    sprintf ( szDDEMsg, "[ShowGroup(%s,1)]", lpszGroupName );

    if ( !PMDDEML_SendShellCommand(idInst, (LPSTR)szDDEMsg ) )
        return FALSE;
    return TRUE;
}

BOOL PMDDEML_ShowProgramManagerCommonGroup ( DWORD idInst,
											 LPCTSTR lpszGroupName )
{
    char szDDEMsg[256];      // instance identifier

    if ( lpszGroupName == NULL )
        return FALSE;

    sprintf ( szDDEMsg, "[ShowGroup(%s,1,1)]", lpszGroupName );

    if ( !PMDDEML_SendShellCommand(idInst, (LPSTR)szDDEMsg ) )
        return FALSE;
    return TRUE;
}

/****************************************************************************
    FUNCTION: PMDDEML_AddIconToProgramManagerGroup()

    PURPOSE:  Deletes icon a program group

    PARAMETERS:
        DWORD idInst                handle returned by  PMDDEML_Open
        LPCTSTR lpszCmdLine           title of icon in group
        LPCTSTR lpszTitle           title of icon in group
        LPCTSTR lpszWorkingDir           title of icon in group
        BOOL bReplace               True, if icon should be replaced

    RETURNS:
        TRUE, if successful                        
****************************************************************************/

BOOL PMDDEML_AddIconToProgramManagerGroup ( DWORD idInst, LPCTSTR lpszCmdLine,
                 LPCTSTR lpszTitle, LPCTSTR lpszIconPath, LPCTSTR lpszWorkingDir, BOOL bReplace )
{
    char szDDEMsg[256];      // instance identifier

    if ( ( lpszCmdLine == NULL ) || ( lpszTitle == NULL ) || ( lpszWorkingDir == NULL )  )
        return FALSE;

    if ( bReplace ) {
        sprintf ( szDDEMsg, "[ReplaceItem(%s)]", lpszTitle );
        PMDDEML_SendShellCommand(idInst, (LPSTR)szDDEMsg );
    }

    sprintf ( szDDEMsg, "[AddItem(%s,%s,%s,,,,%s)]", lpszCmdLine, lpszTitle,
                         lpszIconPath, lpszWorkingDir );

    if ( !PMDDEML_SendShellCommand(idInst, (LPSTR)szDDEMsg ) )
        return FALSE;
    return TRUE;
}

/****************************************************************************
    FUNCTION: PMDDEML_DeleteIconInProgramManagerGroup()

    PURPOSE:  Deletes icon a program group

    PARAMETERS:
        DWORD idInst                handle returned by  PMDDEML_Open
        LPCTSTR lpszTitle           title of icon in group

    RETURNS:
        TRUE, if successful                        
****************************************************************************/

BOOL PMDDEML_DeleteIconInProgramManagerGroup ( DWORD idInst, LPCTSTR lpszTitle )
{
    char szDDEMsg[256];      // instance identifier

    if ( lpszTitle == NULL )
        return FALSE;

    sprintf ( szDDEMsg, "[DeleteItem(%s)]", lpszTitle );

    if ( !PMDDEML_SendShellCommand(idInst, (LPSTR)szDDEMsg ) )
        return FALSE;
    return TRUE;
}

/****************************************************************************
    FUNCTION: PMDDEML_DdeCallback()

    PURPOSE:  Processes messages for DDEML conversation

    PARAMETERS:
        UINT  uType,	// transaction type
        UINT  uFmt,	    // clipboard data format
        HCONV  hconv,	// handle of the conversation
        HSZ  hsz1,	    // handle of a string
        HSZ  hsz2,	    // handle of a string
        HDDEDATA  hdata,// handle of a global memory object
        DWORD  dwData1,	// transaction-specific data
        DWORD  dwData2 	// transaction-specific data

    RETURNS:
        HDDEDATA
****************************************************************************/

HDDEDATA CALLBACK PMDDEML_DdeCallback(  UINT  uType,	// transaction type
                                UINT  uFmt,	    // clipboard data format
                                HCONV  hconv,	// handle of the conversation
                                HSZ  hsz1,	    // handle of a string
                                HSZ  hsz2,	    // handle of a string
                                HDDEDATA  hdata,// handle of a global memory object
                                DWORD  dwData1,	// transaction-specific data
                                DWORD  dwData2 	// transaction-specific data
                               )	
{
    // Nothing need be done here...
    return (HDDEDATA)NULL;
}


/****************************************************************************
    FUNCTION: PMDDEML_SendShellCommand()

    PURPOSE:  Sends the given command string to Program Manager

    PARAMETERS:
        LPSTR - pointer to command string

    RETURNS:
        BOOL  - TRUE if this function succeeds, FALSE otherwise
****************************************************************************/

BOOL PMDDEML_SendShellCommand (DWORD idInst,    // instance identifier
                       LPSTR lpCommand) // command string to execute
{
    HSZ      hszServTop;    // Service and Topic name are "PROGMAN"
    HCONV    hconv;         // handle of conversation
    int      nLen;          // length of command string
    HDDEDATA hData;         // return value of DdeClientTransaction
    DWORD    dwResult;      // result of transaction
    BOOL     bResult=FALSE; // TRUE if this function is successful

    // create string handle to service/topic
    hszServTop = DdeCreateStringHandle(idInst, "PROGMAN", CP_WINANSI);

    // attempt to start conversation with server app
    if ((hconv = DdeConnect(idInst, hszServTop, hszServTop, NULL))!= NULL)
    {
        // get length of the command string
        nLen = lstrlen((LPSTR)lpCommand);

        // send command to server app
        hData = DdeClientTransaction((LPBYTE)lpCommand, // data to pass
                                     nLen + 1,          // length of data
                                     hconv,             // handle of conversation
                                     NULL,              // handle of name-string
                                     CF_TEXT,           // clipboard format
                                     XTYP_EXECUTE,      // transaction type
                                     1000,              // timeout duration
                                     &dwResult);        // points to transaction result

        if (hData)
            bResult = TRUE;

        // end conversation
        DdeDisconnect(hconv);
    }

    // free service/topic string handle
    DdeFreeStringHandle(idInst, hszServTop);

    return bResult;
}


/****************************************************************************
    FUNCTION: PMDDEML_GetProgramGroupInfo()

    PURPOSE:  Gets group info from progman

    PARAMETERS:
        LPSTR - pointer to command string

    RETURNS:
        BOOL  - TRUE if this function succeeds, FALSE otherwise
****************************************************************************/
BOOL PMDDEML_GetProgramGroupInfo(DWORD idInst, LPSTR lpProgramGroup, char *szBuffer, DWORD cbBuffer)
{
    HSZ      hszServTop;    // Service and Topic name are "PROGMAN"
    HSZ      hszTopic;      // Topic name is the lpRequest
    HCONV    hconv;         // handle of conversation
    HDDEDATA hData = 0;     // return value of DdeClientTransaction
    DWORD    dwResult;      // result of transaction
    BOOL     bResult=FALSE; // TRUE if this function is successful

    hszServTop = DdeCreateStringHandle(idInst, "PROGMAN", CP_WINANSI);
    hszTopic = DdeCreateStringHandle(idInst, lpProgramGroup, CP_WINANSI);

    if((hconv = DdeConnect(idInst, hszServTop, hszServTop, NULL)) != NULL)
    {
        hData = DdeClientTransaction((LPBYTE)NULL,      // data to pass
                                     0L,                // length of data
                                     hconv,             // handle of conversation
                                     hszTopic,          // handle of name-string
                                     CF_TEXT,           // clipboard format
                                     XTYP_REQUEST,      // transaction type
                                     5000,              // timeout duration
                                     &dwResult);        // points to transaction result

        bResult = (BOOL)DdeGetData(hData, (void FAR*)szBuffer, cbBuffer, 0);
        DdeDisconnect(hconv);
    }

    // free service/topic string handle
    DdeFreeStringHandle(idInst, hszServTop);
    DdeFreeStringHandle(idInst, hszTopic);

    return bResult;
}