static void loopOnChildCount(ClassRegister *cReg, char *cn, int *i, int ignprov)
{
UtilList *ul = getChildren(cReg,cn);
char *child;
_SFCB_ENTER(TRACE_PROVIDERS, "loopOnChildCount");
if (ul) for (child = (char *) ul->ft->getFirst(ul); child;
child=(char*)ul->ft->getNext(ul)) {
if (ignprov || repCandidate(cReg, child)) *i=(*i)+1;
loopOnChildCount(cReg, child,i,ignprov);
}
_SFCB_EXIT();
}
static void
method2xml(CMPIType type, CMPIString *name, char *bTag, char *eTag,
UtilStringBuffer * sb, UtilStringBuffer * qsb)
{
_SFCB_ENTER(TRACE_CIMXMLPROC, "method2xml");
sb->ft->appendChars(sb, bTag);
sb->ft->appendChars(sb, (char *) name->hdl);
SFCB_APPENDCHARS_BLOCK(sb, "\" TYPE=\"");
sb->ft->appendChars(sb, dataType(type));
SFCB_APPENDCHARS_BLOCK(sb, "\">\n");
if (qsb)
sb->ft->appendChars(sb, (char *) qsb->hdl);
sb->ft->appendChars(sb, eTag);
_SFCB_EXIT();
}
static void loopOnChildChars(ClassRegister *cReg, char *cn, CMPIArray *ar, int *i, int ignprov)
{
UtilList *ul = getChildren(cReg,cn);
char *child;
_SFCB_ENTER(TRACE_PROVIDERS, "loopOnChildChars");
_SFCB_TRACE(1,("--- class %s",cn));
if (ul) for (child = (char *) ul->ft->getFirst(ul); child;
child=(char*)ul->ft->getNext(ul)) {
if (ignprov || repCandidate(cReg, child)) {
CMSetArrayElementAt(ar, *i, child, CMPI_chars);
*i=(*i)+1;
}
loopOnChildChars(cReg, child,ar,i,ignprov);
}
_SFCB_EXIT();
}
static void prepResultBuffer(NativeResult *nr, int length)
{
_SFCB_ENTER(TRACE_PROVIDERDRV, "prepResultBuffer");
if (getControlNum("chunkSize",(long*)&nr->dMax)) nr->dMax=50000;
/* if what we're returning is > chunkSize, make chunkSize bigger */
while (length>=nr->dMax) nr->dMax*=2;
nr->dNext=0;
nr->data=(char*)malloc(nr->dMax);
nr->sMax=nr->dMax/400;
nr->sNext=0;
nr->resp=(BinResponseHdr*)calloc(1,sizeof(BinResponseHdr)+
((nr->sMax-1)*sizeof(MsgSegment)));
_SFCB_EXIT();
}
/*
* S E M A P H O R E
*/
static void handleDbpSession(int connFd) {
CommHndl conn_fd;
struct sembuf procReleaseUnDo = {0,1,SEM_UNDO};
int r,b2,c, by=0, h;
char buffer[1024],bc[1];
char buffer2[500];
char *response=NULL; //Fehlermeldung reinschreiben und an Client zurückschicken.
//Vermutlich später nicht mehr notwendig!!
char *header=NULL;char *payload;
int nbytes;
_SFCB_ENTER(TRACE_DBPDAEMON, "handledbpRequest");
_SFCB_TRACE(1, ("--- Forking sql handler"));
// printf("dbpProcSem %p dbpProcId: %d hMax: %d doFork: %d\n",dbpProcSem,dbpProcId,hMax,doFork);
// printf("dbpProcId: %d hMax: %d doFork: %d\n",dbpProcId,hMax,doFork);
if (doFork) {
semAcquire(dbpWorkSem,0);
semAcquire(dbpProcSem,0);
for (dbpProcId=0; dbpProcId<hMax; dbpProcId++)
if (semGetValue(dbpProcSem,dbpProcId+1)==0) break;
printf("dbpProcId: %d hMax: %d\n",dbpProcId,hMax);
procReleaseUnDo.sem_num=dbpProcId+1;
r = fork();
if (r==0) {
currentProc=getpid();
processName="CIMSQL-Processor";
semRelease(dbpProcSem,0);
semAcquireUnDo(dbpProcSem,0);
semReleaseUnDo(dbpProcSem,dbpProcId+1);
semRelease(dbpWorkSem,0);
if (sfcbSSLMode) {
#if defined USE_SSL
conn_fd.socket=-2;
conn_fd.bio=BIO_new(BIO_s_socket());
BIO_set_fd(conn_fd.bio,connFd,BIO_CLOSE);
if (!(conn_fd.ssl = SSL_new(ctx)))
intSSLerror("Error creating SSL context");
SSL_set_bio(conn_fd.ssl, conn_fd.bio, conn_fd.bio);
if (SSL_accept(conn_fd.ssl) <= 0)
intSSLerror("Error accepting SSL connection");
#endif
}
else {
conn_fd.socket=connFd;
#if defined USE_SSL
conn_fd.bio=NULL;
conn_fd.ssl=NULL;
#endif
}
}
else if (r>0) {
running++;
_SFCB_EXIT();
}
}
else r = 0;
if (r < 0) {
char *emsg=strerror(errno);
mlogf(M_ERROR,M_SHOW,"--- fork handler: %s\n",emsg);
exit(1);
}
if (r == 0) {
if (doFork) {
_SFCB_TRACE(1,("--- Forked sql handler %d", currentProc))
resultSockets=sPairs[hBase+dbpProcId];
}
_SFCB_TRACE(1,("--- Started sql handler %d %d", currentProc,
resultSockets.receive));
if (getenv("SFCB_PAUSE_HTTP")) for (;;) {
fprintf(stderr,"-#- Pausing - pid: %d\n",currentProc);
sleep(5);
}
conn_fd.socket=connFd;
#if defined USE_SSL
conn_fd.bio=NULL;
conn_fd.ssl=NULL;
#endif
for(;;){
//c onn_fd.socket=connFd;
// doHttpRequest(conn_fd);
nbytes = read (connFd, buffer, HEADER);
header = (char *) malloc(nbytes);//sowas wie \n Steuerzeichen
strncpy(header,buffer,nbytes);
header[nbytes]=0;
h = atoi(header);
printd("Ein Client h: %d header: %s nbytes: %d\n",h,header,nbytes);
//Sonderfall, noch nicht eingeloggt
if(by&h){
//login
nbytes = read(connFd, buffer, 2);
c = atoi((char*)&buffer);
if(c==CONNECT){
printd("Ein Client hat sich korrekt angemeldet\n");
response = "1 1 1\n";//"Sie sind angemeldet. Warte auf Anfragen:\n";
write(connFd, response , strlen(response));
by=0;
h=CONTINUE;//dummy, um switch sofort zu verlassen
}
else{
printd("Ein Client hat sich NICHT korrekt angemeldet %d\n",c);
response = "1 1 0\n";//"Sie sind nicht angemeldet. Auf wiedersehen.\n";
write(connFd, response , strlen(response));
break;
}
while((nbytes = read(connFd, bc, 1))>0)//
if(bc[0]=='\n')
break;
}
if(by){
printd("Ein Client hat sich NICHT korrekt angemeldet %d\n",h);
response = "1 1 0\n";//"Sie sind nicht angemeldet. Auf wiedersehen.\n";
write(connFd, response , strlen(response));
break;
}
switch(h){
case CONTINUE: break;
case PROTOCOL: {
nbytes = read(connFd, buffer, 2);
c = atoi((char*)&buffer);
//Pipe leersaugen
while((nbytes = read(connFd, bc, 1))>0)//
if(bc[0]=='\n')
break;
if(c==CONNECT){
response = "1 1 0\n"; //"Sie sind bereits angemeldet, Operation wird ignoriert:\n";
write(connFd, response , strlen(response));
}
else if(c==LOGOUT){
printd("Der Client hat die Verbindung beendet\n");
response = "1 2 1\n";//"By\n";
write(connFd, response ,strlen(response));
by=1;
}
else{
b2 = sprintf(buffer2,"%d %d %d",1,c,0);//sprintf(buffer2, "Syntxfehler: Operation %d ist keine Protokolloperation\n",c);
printd("%s",buffer2);
write(connFd, buffer2 , b2);
}
break;
}
case SQL:
while((nbytes = read(connFd, buffer, 1024))>0){
if(buffer[nbytes-1]=='\n')
break;
//falls Anweisung laenerg als 1024, muss buffer mit vorgaengerbuffer konkadiniert werden. vgl. adrian
}
// abschließendes $ finden:
//printd("SQL: %d\n",nbytes);
nbytes--;
while((nbytes>0) && (buffer[nbytes]!='$'))
nbytes--;
//printf("malloc %d bytes",nbytes);
payload = (char *) malloc(nbytes+1+1);
//ein \n voranstellen, yyerror()s wegen
//*payload = '\n';
strcpy(payload,"\n");
strncat(payload,buffer,nbytes);
response = processSQLQuery(payload,conn_fd); //--> Datenstruktur, in die das Statement reinkommt
free(payload);payload=NULL;
//ResultMetaData
write(connFd, response , strlen(response));
free(response);response=NULL;
break;
case META:
nbytes = read(connFd, buffer, 2);
c = atoi((char*)&buffer);
if(c==METADB){
response = (char *) malloc(strlen(metaDB)+7);
response = strcpy(response,"3 1 1\n");
response = strcat(response,metaDB);
write(connFd, response , strlen(response));
free(response);
break;
}
if(c==TABLES||c==STABLES||c==KEYS||c==COLS){
//printf("UND los\n");
while((nbytes = read(connFd, buffer, 1024))>0){
if(buffer[nbytes-1]=='\n')
break;
//falls Anweisung laenerg als 1024, muss buffer mit vorgaengerbuffer konkadiniert werden. vgl. adrian
}
// abschließendes $ finden:
printd("SQL: %d\n",nbytes);
nbytes--;
while((nbytes>0) && (buffer[nbytes]!='$'))
nbytes--;
//printf("malloc %d bytes",nbytes);
buffer[nbytes] = 0;
if(nbytes==0)
payload = NULL;
else{
payload = (char *) malloc(nbytes+1);
strcpy(payload,buffer);
//printd(">%s< %d\n",payload,c);
}
if(c==TABLES)
response = processMetaTables(payload,"root/cimv2");
else if(c==STABLES)
response = processSuperTables(payload,"root/cimv2");
else if(c==KEYS)
response = processKeyTable(payload,"root/cimv2");
else if(c==COLS){
char *arg2 = strstr(payload,"::");
char *arg1 = strtok(payload,"::");
//printf("lllllll\n");
//printf(">%s< >%s< >%s< >%s<\n",payload,arg2,arg1,arg2+2);
response = processMetaColumns(arg1,arg2+2,"root/cimv2");
//printf("zurück\n");
}
//printf(">>%s<<",response);
free(payload);payload=NULL;
write(connFd, response , strlen(response));
//free(response);
//dieses free tut nicht, weil irgendwo anders was nicht stimmt!!!
break;
}
break;
case SPOOLIN: break;
case SPOOLOUT: break;
default:
printd("Unbekannter Befehl: \"%s\"\n",header);
b2 = sprintf(buffer2,"Fehler: unbekannter Befehl: %s \n", header);
//strncpy(response,buffer2,b2);
//response = "Fehler: Unbekannter Befehl\n";
write(connFd, buffer2 , b2);
break;
}
free(header);
if(by)
break;
}
if (!doFork) return;
_SFCB_TRACE(1, ("--- SQL handler exiting %d", currentProc));
printf("--- SQL handler exiting %d\n", currentProc);
dumpTiming(currentProc);
exit(0);
}
}
