1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103 104 105 106 107 108 109 110 111 112 113 114 115 116 117 118 119 120 121 122 123 124 125 126 127 128 129 130 131 132 133 134 135 136 137 138 139 140 141 142 143 144 145 146 147 148 149 150 151 152 153 154 155 156 157 158 159 160 161 162 163 164 165 166 167 168 169 170 171
|
#include <windows.h>
#include <stdio.h>
#include "toto_DDE.h"
HCONV hDdeConv = 0;
DWORD idInst = 0;
// Exécute une commande DDE et place le résultat dans pData
bool DoDdeCommand( const char * pCmd, /* -> Command string */
const char * pParms, /* -> Command parameters */
char * pData) /* -> Buffer for returned data */
{
HSZ hDdeString;
HDDEDATA hDdeResult;
DWORD data_len;
char * pString;
/* Add parameters to command line. */
if ( pParms == NULL ) {
pParms = "";
}
int length = strlen( pCmd ) + strlen( pParms ) + 2 ;
pString = new char[length];
strcpy_s(pString, length, pCmd );
strcat_s( pString, length, " " );
strcat_s( pString, length, pParms );
/* Perform OnDemand DDE command. */
hDdeString = DdeCreateStringHandle( idInst, pCmd, 0 );
UINT type = XTYP_REQUEST;
hDdeResult = DdeClientTransaction( NULL,
0,
hDdeConv,
hDdeString,
CF_TEXT,
type,
10000L,
NULL );
DdeFreeStringHandle( idInst, hDdeString );
delete pString;
/* Process command result. */
if ( hDdeResult == NULL )
{
/* This should never happen. */
printf( "DDE Timeout.\n" );
return false;
}
else
{
pString = (char*)DdeAccessData( hDdeResult, &data_len );
DdeUnaccessData( hDdeResult );
if (pString == NULL) {
pData[0] = '\0';
return false;
}
else {
strcpy_s(pData, 100, pString);
return true;
}
}
}
// Sert à rien pour l'instant
HDDEDATA CALLBACK DdeCallback(
UINT uType, // transaction type
UINT uFmt, // clipboard data format
HCONV hconv, // handle to conversation
HSZ hsz1, // handle to string
HSZ hsz2, // handle to string
HDDEDATA hdata, // handle to global memory object
DWORD dwData1, // transaction-specific data
DWORD dwData2 // transaction-specific data
)
{
printf("DdeCallback\n");
switch (uType)
{
case XTYP_REGISTER:
case XTYP_UNREGISTER:
return (HDDEDATA) NULL;
case XTYP_ADVDATA:
return (HDDEDATA) DDE_FACK;
case XTYP_XACT_COMPLETE:
//
return (HDDEDATA) NULL;
case XTYP_DISCONNECT:
//
return (HDDEDATA) NULL;
default:
return (HDDEDATA) NULL;
}
}
/*
* public native void Connecter(String serveur, String topic);
* Initialise une connexion avec le serveur
*/
JNIEXPORT void JNICALL Java_toto_DDE_Connecter
(JNIEnv *env, jobject, jstring serveurNameUTF, jstring topicNameUTF)
{
const char *serveurName = env->GetStringUTFChars(serveurNameUTF, 0);
const char *topicName = env->GetStringUTFChars(topicNameUTF, 0);
DdeInitialize(&idInst, // receives instance identifier
(PFNCALLBACK) DdeCallback, // pointer to callback function
CBF_FAIL_EXECUTES | // filter XTYPE_EXECUTE
CBF_SKIP_ALLNOTIFICATIONS, // filter notifications
0);
printf("init ok : idInst = %d\n", idInst);
HSZ hszServName;
HSZ hszSysTopic;
hszServName = DdeCreateStringHandle(
idInst, // instance identifier
serveurName, // string to register
CP_WINANSI); // Windows ANSI code page
hszSysTopic = DdeCreateStringHandle(
idInst, // instance identifier
topicName, // System topic
CP_WINANSI); // Windows ANSI code page
hDdeConv = DdeConnect(idInst, hszServName, hszSysTopic, NULL);
env->ReleaseStringUTFChars(serveurNameUTF, serveurName);
env->ReleaseStringUTFChars(topicNameUTF, topicName);
}
/*
* public native String getValue(String name);
* renvoie la valeur correspondant à l'item "name"
*/
JNIEXPORT jstring JNICALL Java_toto_DDE_getValue
(JNIEnv * env, jobject, jstring itemNameUTF)
{
const char *itemName = env->GetStringUTFChars(itemNameUTF, 0);
char pData[100];
bool result = DoDdeCommand( itemName, /* -> Command string */
NULL, /* -> Command parameters */
pData); /* -> Buffer for returned data */
if (!result) {
pData[0] = '\0';
}
env->ReleaseStringUTFChars(itemNameUTF, itemName);
return env->NewStringUTF(pData);
} |
Partager