76 lines
2.4 KiB
C
76 lines
2.4 KiB
C
|
#include "geminc.h"
|
||
|
|
#include "gemprm.h"
|
||
|
|
#include "dbcmn.h"
|
||
|
|
#include <sys/timeb.h>
|
||
|
|
|
||
|
|
void db_rdtrgrid ( char *dimx, char *dimy, char *dataUri,
|
||
|
|
float *rdata, int *nword, int *iret )
|
||
|
|
/************************************************************************
|
||
|
|
* *
|
||
|
|
* db_dataquery *
|
||
|
|
* *
|
||
|
|
* m.gamazaychikov/SAIC 11/08 Created *
|
||
|
|
************************************************************************/
|
||
|
|
{
|
||
|
|
int jj, ier, ier1;
|
||
|
|
char message[1024], diagMessage[720];
|
||
|
|
struct timeb t_callback, t_current;
|
||
|
|
/*---------------------------------------------------------------------*/
|
||
|
|
diagMessage[0] = '\0';
|
||
|
|
message[0] = '\0';
|
||
|
|
/*
|
||
|
|
* If the pointer to the callback function is not set, return
|
||
|
|
*/
|
||
|
|
if ( dataClbkPtr == NULL ) {
|
||
|
|
ier = -17;
|
||
|
|
er_wmsg ( "DB", &ier, "db_rdtrgrid", &ier1, 2, strlen("db_rdtrgrid") );
|
||
|
|
*iret = -1;
|
||
|
|
return;
|
||
|
|
}
|
||
|
|
|
||
|
|
/*
|
||
|
|
* If the data uri is not set, return
|
||
|
|
*/
|
||
|
|
if ( strlen(dataUri) == 0 ) {
|
||
|
|
ier = -19;
|
||
|
|
er_wmsg ( "DB", &ier, "db_rdtrgrid", &ier1, 2, strlen("db_rdtrgrid") );
|
||
|
|
*iret = -1;
|
||
|
|
return;
|
||
|
|
}
|
||
|
|
|
||
|
|
sprintf(message,"%s", dataUri);
|
||
|
|
strcat (message, ";");
|
||
|
|
strcat (message, dimx);
|
||
|
|
strcat (message, ";");
|
||
|
|
strcat (message, dimy);
|
||
|
|
sprintf (diagMessage, "%s %s", "calling the callback function with ", message);
|
||
|
|
db_msgcave ("db_rdtrgrid", "debug", diagMessage, &ier);
|
||
|
|
|
||
|
|
ftime(&t_callback);
|
||
|
|
|
||
|
|
dataClbkPtr(message);
|
||
|
|
|
||
|
|
ftime(&t_current);
|
||
|
|
sprintf (diagMessage, "%s %d", "time spent in callback ", (int) (1000.0 * (t_current.time - t_callback.time) + (t_current.millitm - t_callback.millitm)));
|
||
|
|
db_msgcave ("db_rdtrgrid", "debug", diagMessage, &ier);
|
||
|
|
sprintf (diagMessage, "%s %d", "got rdataBackSize=", rdataBackSize);
|
||
|
|
db_msgcave ("db_rdtrgrid", "debug", diagMessage, &ier);
|
||
|
|
if ( rdataBackSize > 0 && rdataBack != NULL ) {
|
||
|
|
sprintf (diagMessage, "%s %f", "got rdataBack[0]=", rdataBack[0]);
|
||
|
|
db_msgcave ("db_rdtrgrid", "debug", diagMessage, &ier);
|
||
|
|
for( jj=0; jj < rdataBackSize; jj++ ) {
|
||
|
|
rdata[jj] = rdataBack[jj];
|
||
|
|
}
|
||
|
|
*iret = 0;
|
||
|
|
*nword = rdataBackSize;
|
||
|
|
G_FREE ( rdataBack, float );
|
||
|
|
rdataBackSize = 0;
|
||
|
|
}
|
||
|
|
else {
|
||
|
|
db_msgcave ("db_rdtrgrid", "error","!!! *could not get data* !!!", &ier);
|
||
|
|
*iret = -1;
|
||
|
|
*nword = 0;
|
||
|
|
}
|
||
|
|
return;
|
||
|
|
}
|