NCBI C Toolkit Cross Reference

   /*  $Id: mmdb_pubstruct.c,v 6.4 2001/05/25 01:42:10 kimelman Exp $
   * ===========================================================================
   *
   *                            PUBLIC DOMAIN NOTICE
   *            National Center for Biotechnology Information (NCBI)
   *
   *  This software/database is a "United States Government Work" under the
   *  terms of the United States Copyright Act.  It was written as part of
   *  the author's official duties as a United States Government employee and
  *  thus cannot be copyrighted.  This software/database is freely available
  *  to the public for use. The National Library of Medicine and the U.S.
  *  Government do not place any restriction on its use or reproduction.
  *  We would, however, appreciate having the NCBI and the author cited in
  *  any work or product based on this material
  *
  *  Although all reasonable efforts have been taken to ensure the accuracy
  *  and reliability of the software and data, the NLM and the U.S.
  *  Government do not and cannot warrant the performance or results that
  *  may be obtained by using this software or data. The NLM and the U.S.
  *  Government disclaim all warranties, express or implied, including
  *  warranties of performance, merchantability or fitness for any particular
  *  purpose.
  *
  * ===========================================================================
  *
  * File Name:  $Id: mmdb_pubstruct.c,v 6.4 2001/05/25 01:42:10 kimelman Exp $
  *
  * File Description: Defines MMDB access using sybase retrival.
  *                   
  * Modifications:  
  * --------------------------------------------------------------------------
  * Date     Name        Description of modification
  * -------  ----------  -----------------------------------------------------
  *
  * $Log: mmdb_pubstruct.c,v $
  * Revision 6.4  2001/05/25 01:42:10  kimelman
  * mmdb2livemmdb
  *
  * Revision 6.3  1999/12/01 23:27:26  kimelman
  * added guards to avoid repeatable connect/disconnect
  *
  * Revision 6.2  1999/08/02 19:50:51  kimelman
  * keep connection alive foor mmdbsrv & vastsrv sessions
  *
  * Revision 6.1  1999/05/17 21:29:20  kimelman
  * extracted version of pubstruct specific implementations of MMDBBiostrucGET & Co..
  *
  *
  * ==========================================================================
  */
  
  /*********************************************************************************/
  /* This file abstracts the calls to Network Entrez that were previously          */
  /* embedded in mmdbapi1.c  Linking with this file forces sysbase retrival        */
  /********   NOTE - .mmdbrc (UNIX) mmdb.ini (Win) mmdb.cnf (Mac) required   *******/
  /* containing paths to database and index file name:                         ****** 
   *
   * [MMDB]
   * PubStruct  = PUBSEQ_OS:PubStruct=anyone:allowed
   * 
   */
  
  #include <ncbi.h>
  #include <mmdbapi1.h>
  #include <mmdbdata.h>
  #include <mmdblocl.h>
  #include <accentr.h>
  #include <accutils.h>
  #include "PubStructAsn.h"
  #include <assert.h>
  
  
  static int  pubstruct_init=0;
  static Char pubstruct[PATH_MAX];
  static ps_handle_t db = NULL;
  
  /**************************************************************
   *  PUBLIC INTERFACE
   **************************************************************/
  Boolean  LIBCALL
  MMDB2liveMMDB(DocUid *mmdb,Int4Ptr live,CharPtr pdb)
  {
    Boolean b;
    if (!db && pubstruct[0]==0) {
      strcpy(pubstruct,"BACH:PubStruct=anyone,allowed");
    }
    MMDBInit();
    b = PubStruct_mmdb2livemmdb(db,*mmdb,mmdb,live,pdb);
    MMDBFini();
    return b;
  }
  
  DocUid  LIBCALL
  MMDBEvalPDB (CharPtr str)
  {
    Char eval[10];
    DocUid id=0;
    
    StringNCpy(eval,  str,  4);
   eval[4] = '\0';
   StrUpper(eval);
   { /* let's be paranoid */
     int i,is_mmdb=1;
     for(i=0;i<4;i++)if(eval[i]>='A') { is_mmdb=0; break; }
     if(is_mmdb)
       id=atol(eval);
   }
   MMDBInit();
   id = PubStruct_pdb2mmdb1(db, eval);
   MMDBFini();
   return  id;
 }
 
 BiostrucPtr LIBCALL
 MMDBBiostrucGet (DocUid uid, Int4 mdlLvl, Int4 maxModels)
 {
   extern WWWInfoPtr     info; /* mmdbsrv:info */
 
   AsnIoPtr    aip = NULL;
   BiostrucPtr pbs = NULL;
   int         index;
   char       *item;
   Int4        sat_key   = 0;
   Int4        state     = 0;
   /*   char       *dbserver = (pubstruct[0]?pubstruct:NULL); */
 
   MMDBInit();
 
   /*
    * THE following block should be defined ONLY for server which show up internal blob revisions in DB
    */
 #ifdef INTERNAL_SERVER
   /* printf("MMDBBiostrucGet_pubstruct(%s,%d)\n",dbserver,uid); */
   if(WWWFindName(info, "sat_key") >=0) 
     {
       index = WWWFindName(info, "sat_key");
       item  = WWWGetValueByIndex(info,index);
       sat_key=atol(item);
       if (sat_key<=0) {
         ErrPostEx(SEV_ERROR,0,0, "cant convert Pubstruct..Struct.acc (sat_key) <%s> into integer",item);
         return NULL;
       }
     }
   if (WWWFindName(info, "state"))
     {
       index = WWWFindName(info, "state");
       item = WWWGetValueByIndex(info,index);
       state=-1;
       state=atol(item);
       if (state<0) {
         ErrPostEx(SEV_ERROR,0,0, "cant convert Pubstruct..Struct.state<%s> into integer",item);
         return NULL;
       }
     }
 #endif
   
   if(state>0 && sat_key==0) {
     sat_key = PubStruct_lookup1(db,uid, state);
   }
   if(sat_key>0)
     aip = PubStruct_readasn1(db, sat_key);
   else if (state==0)
     aip = PubStruct_viewasn1(db, uid);
 
   if(aip)
     {
       pbs = BiostrucAsnGet(aip, NULL,  mdlLvl,  maxModels);
       PubStruct_closeasn (aip,1);
     }
   MMDBFini();
   return pbs;
 }
 
 Boolean LIBCALL
 MMDBInit (void)
 {
   pubstruct_init++;
   if(db)
     return TRUE;
   if(pubstruct_init==1)
     {
       GetAppParam("mmdb", "MMDB", "PubStruct", "", pubstruct, sizeof(pubstruct));
       if (pubstruct[0]==0) {
         strcpy(pubstruct,"PUBSEQ_OS:PubStruct=anyone,allowed");
       }
     }
   db = PubStruct_connect(pubstruct);
   if(!db)
     {
       ErrPostEx(SEV_ERROR,0,0, "cant connect to Pubstruct (%s)",pubstruct);
       return FALSE;
     }
   return TRUE;
 }
 
 void LIBCALL
 MMDBFini (void)
 {
   pubstruct_init--;
   if(pubstruct_init>0)
     return;
   if(db)
     {
       PubStruct_disconnect(db);
       db = NULL;
     }
   return;
 }
 
 CharPtr LIBCALL
 MMDB_configuration(void)
 {
   return "Version:\t$Id: mmdb_pubstruct.c,v 6.4 2001/05/25 01:42:10 kimelman Exp $\nConfiguration: PubStruct" ;
 }