msd_japi.cc

//-----------------------------------------------------
// msd_japi.cc
//
// Project: PDBe API Framework, EBI  
// Module:  Implementation of User Layer Java Native Interface methods 
// for PDBe API Framework 
//
// 
// User Layer
// Last updated: 25 February 2004 10:17
// (C) Siamak Sobhany
//------------------------------------------------------


#include <stdio.h>
#include <jni.h>
#include "MSDJapi.h"
#ifndef __MSD_USER_H__
#include "msd_user.h"
#endif 


extern "C" {static pMSDEnv ptr2MSDEnv = new MSDEnv;} 




JNIEXPORT jint JNICALL Java_MSDJapi_initMSDJapi(
         JNIEnv * env ,
         jobject this_object //,

         )
 {    
      msd_init(ptr2MSDEnv);
          if (ptr2MSDEnv->stat==INIT){
          printf ("\nConnection to the PDBe initialized.\n");
          }
          
 
        
}

JNIEXPORT jint JNICALL Java_MSDJapi_rloginMSDJapi(
         JNIEnv * env ,
         jobject this_object,
     jstring loginstring
         )
 { 
   char buf[128];
   if (ptr2MSDEnv->stat==INIT){
   const char * cloginstring= env->GetStringUTFChars(loginstring, 0);
   strcpy(buf, cloginstring);
    msd_rlogin(ptr2MSDEnv,buf);
          if (ptr2MSDEnv->stat==LOGGEDIN)
    {
           printf ("\nrlogin to the '%s' server successfully.\n", buf);
    }
    env->ReleaseStringUTFChars(loginstring, cloginstring);

   }    
}


JNIEXPORT jint JNICALL Java_MSDJapi_attachMSDJapi(
         JNIEnv * env ,
         jobject this_object ,
     jstring host
         )
 { 

  char buf[128];
  const char * chost= env->GetStringUTFChars(host, 0);
  strcpy(buf, chost);
          if (msd_attach(ptr2MSDEnv,buf)==0)
  {
           printf ("\nAttached to '%s' server successfully.\n", buf);
  }
  
  
          env->ReleaseStringUTFChars(host, chost);

        
}

JNIEXPORT jint JNICALL Java_MSDJapi_beginMSDJapi(
        JNIEnv * env ,
        jobject this_object ,
        jstring user ,
        jstring pass
        )
        {char buf1[128];
         char buf2[128];
         const char * cuser= env->GetStringUTFChars(user, 0);
     strcpy(buf1, cuser);
         env->ReleaseStringUTFChars(user, cuser);
         const char * cpass= env->GetStringUTFChars(pass, 0);
         strcpy(buf2, cpass);
         env->ReleaseStringUTFChars(pass, cpass);
         printf ("\nUser '%s' logging...\n", buf1);
         if (msd_begin(ptr2MSDEnv,buf1,buf2)==0)
     {
      printf ("\nUser '%s' logged in successfully.\n", buf1);
     }else fprintf(stderr, "Login failed");
        
        
        }

JNIEXPORT jint JNICALL Java_MSDJapi_sqlinitMSDJapi(
   JNIEnv * env ,
   jobject this_object ,
   jstring sql
   )
   { 
        char buf[3072];
    const char * csql= env->GetStringUTFChars(sql, 0);
    sprintf(buf, "%s", csql);
        
        msd_sqlinit(ptr2MSDEnv,buf);
          if (ptr2MSDEnv->stat==LOGGEDIN)
  {
           printf ("\nSQL sratement: '%s' initialized successfully.\n", csql);
  }
     env->ReleaseStringUTFChars(sql, csql);
  }


JNIEXPORT jint JNICALL Java_MSDJapi_setcriteriaMSDJapi(
   JNIEnv * env ,
   jobject this_object ,
   jstring fmt ,
   jobjectArray arglist
   )
  {char buf[16];
   if (ptr2MSDEnv->conn==NULL) {return(2);}
   const char * ps= env->GetStringUTFChars(fmt, 0);
   char  p[128];
   sprintf(p,ps);
   int j=0;
  
   while(p[j] != '\0'){
   if (p[j]=='i') //int
   {
    jstring s =(jstring)env->GetObjectArrayElement(arglist, j);
    const char * cs= env->GetStringUTFChars(s, 0);
        strcpy(buf, cs);
        int i = atoi(buf);
        ((MSDSelect *) ptr2MSDEnv->select)->SetCriteria(i);
        env->ReleaseStringUTFChars(s, cs);
   }
   else if (p[j]=='d') //double or float
   {
    jstring s =(jstring)env->GetObjectArrayElement(arglist, j);
    const char * cs= env->GetStringUTFChars(s, 0);
        strcpy(buf, cs);
        double d = atof(buf);
        ((MSDSelect *) ptr2MSDEnv->select)->SetCriteria(d);
        env->ReleaseStringUTFChars(s, cs);
   }
   else if (p[j]=='s') //string
   {
    jstring s =(jstring)env->GetObjectArrayElement(arglist, j);
    const char * cs= env->GetStringUTFChars(s, 0);
        strcpy(buf, cs);
        ((MSDSelect *) ptr2MSDEnv->select)->SetCriteria(buf);
        env->ReleaseStringUTFChars(s, cs);
   }
    else 
   {
    fprintf(stderr,"\nunsupported format flag");
    break;
   }
   j++;
   } // end while
        env->ReleaseStringUTFChars(fmt, ps);
        ((MSDSelect *) ptr2MSDEnv->select)->MakeRecord();
        
 }




JNIEXPORT jint JNICALL Java_MSDJapi_getrownumMSDJapi(
   JNIEnv * env ,
   jobject this_object //,
   )
   {
   return ((MSDSelect *) ptr2MSDEnv->select)->GetRowNum();
   }


JNIEXPORT jint JNICALL Java_MSDJapi_getnextMSDJapi(
     JNIEnv * env ,
         jobject this_object //,
         )
         {msd_getnext(ptr2MSDEnv);
      
     }

JNIEXPORT jfloat JNICALL Java_MSDJapi_getfloatMSDJapi(
     JNIEnv * env ,
         jobject this_object ,
         jint col
         )
         {return msd_ugetfloat(ptr2MSDEnv,col);
     }

JNIEXPORT jint JNICALL Java_MSDJapi_getintMSDJapi(
     JNIEnv * env ,
         jobject this_object ,
         jint col
         )
         {return msd_ugetint(ptr2MSDEnv,col);
     }

JNIEXPORT jdouble JNICALL Java_MSDJapi_getdoubleMSDJapi(
     JNIEnv * env ,
         jobject this_object ,
         jint col
         )
         {return msd_ugetdouble(ptr2MSDEnv,col);
     }

JNIEXPORT jstring JNICALL Java_MSDJapi_getstrMSDJapi(
     JNIEnv * env ,
         jobject this_object ,
         jint col
         )
         {char* strval;
          static char buf[1024];
      sprintf(buf,"%s",msd_ugetstr(ptr2MSDEnv,col,strval));
          return env->NewStringUTF( buf);
         }

JNIEXPORT jint JNICALL Java_MSDJapi_endMSDJapi(
    JNIEnv * env ,       
    jobject this_object
    )             
    { return msd_end(ptr2MSDEnv);
        }

JNIEXPORT jint JNICALL Java_MSDJapi_detachMSDJapi(
    JNIEnv * env ,       
    jobject this_object
    )             
    { return msd_detach(ptr2MSDEnv);
        }

JNIEXPORT jint JNICALL Java_MSDJapi_logoffMSDJapi(
    JNIEnv * env ,       
    jobject this_object
    )             
    { return msd_logoff(ptr2MSDEnv);
        }

JNIEXPORT jint JNICALL Java_MSDJapi_freeMSDJapi(
    JNIEnv * env ,       
    jobject this_object
    )             
    { return msd_free(ptr2MSDEnv);
        }


JNIEXPORT jstring JNICALL Java_MSDJapi_getAccessionCodeMSDJapi(
    JNIEnv * env ,      
        jobject this_object ,
        jint eID
        )
        { static char buf[16];
      sprintf(buf,"%s", msd_get_accession_code(ptr2MSDEnv, eID));
          return env->NewStringUTF( buf );
        }
        
JNIEXPORT jint JNICALL Java_MSDJapi_getEntryIDMSDJapi(
    JNIEnv * env ,      
        jobject this_object ,
        jstring acc_code
        )
        {char buf[16];
     const char * cacc_code= env->GetStringUTFChars(acc_code, 0);
     sprintf(buf, "%s", cacc_code);
         jint ret = msd_get_entry_id(ptr2MSDEnv,buf);
         env->ReleaseStringUTFChars(acc_code, cacc_code);
         return ret;
        }


JNIEXPORT jint JNICALL Java_MSDJapi_managerMSDJapi(
    JNIEnv * env ,       
    jobject this_object
    )             
    { return msd_manager(ptr2MSDEnv);
        }

JNIEXPORT jint JNICALL Java_MSDJapi_getObjectEntryMSDJapi(
    JNIEnv * env ,       
        jobject this_object ,
        jint eID
        )
        {return msd_get_object_entry(ptr2MSDEnv,eID);
        }

JNIEXPORT jint JNICALL Java_MSDJapi_getNumOfAtomsMSDJapi(
    JNIEnv * env ,       
        jobject this_object 
        )
        {return msd_get_number_of_atoms(ptr2MSDEnv);
        }



JNIEXPORT jint JNICALL Java_MSDJapi_printfMSDJapi(
         JNIEnv * env ,
         jobject this_object,
         jstring text
         )
 { 
  char buf[128];
          const char * ctext= env->GetStringUTFChars(text, 0);
           strcpy(buf, ctext);
          printf( "MSDJapi.printfMSDJapi( \"%s\" )\n", buf);
          env->ReleaseStringUTFChars(text, ctext);
}

---