Boolean LIBCALL VASTInit (void) { Char fname[PATH_MAX]; database[0] = gunzip[0] = '\0'; GetAppParam("vast", "VASTSRV", "Database", "", database, PATH_MAX); if (database[0] == '\0') { ErrPostEx(SEV_FATAL,0,0, "MMDB config file / path to VAST data missing.\n"); return FALSE; } GetAppParam("vast", "VASTSRV", "Gunzip", "", gunzip, (size_t) 256 * (sizeof(char))); if (gunzip[0] == '\0') { ErrPostEx(SEV_FATAL,0,0, "VASTInit failed: gunzip path missing.\n"); return FALSE; } GetAppParam("vast", "VASTSRV", "SubsetFile", "", fname, PATH_MAX); if (fname[0] == '\0') { ErrPostEx(SEV_FATAL, 0, 0, "VASTInit failed: no subset file name.\n"); return FALSE; } if (LoadSubsetTable(fname) != 1) { ErrPostEx(SEV_FATAL, 0, 0, "VASTInit failed: can't load subset table.\n"); return FALSE; } return TRUE; }
int main(int argc, char *argv[]) { if (argc>=2 && strcmp(argv[1], "-help") && strcmp(argv[1], "--help") && strcmp(argv[1], "-h") ) { // recognize parameter file as argument if (!lemur::api::ParamPushFile(argv[1])) { cerr << "Unable to load parameter file: " << argv[1] << endl;; exit(1); } } else { // handle "-help", display parameters GetAppParam(); // called only to "register" parameters cerr << "Parameters for " << argv[0] << endl; lemur::api::ParamDisplay(); exit(0); } GetAppParam(); int result = 1; try { result = AppMain(argc,argv); } catch (lemur::api::Exception &ex) { ex.writeMessage(); cerr << "Program aborted due to exception" << endl;; exit(1); } // clean up lemur::api::ParamClear(); return result; }
static Int2 GetEntrezAppParam (CharPtr section, CharPtr type, CharPtr dflt, CharPtr buf, Int2 buflen) { Int2 rsult; rsult = GetAppParam ("ENTREZCUSTOM", section, type, NULL, buf, buflen); if (rsult) return rsult; rsult = GetAppParam ("ENTREZ", section, type, dflt, buf, buflen); return rsult; }
extern Uint4 NI_GetEnvParamEx (const Char *conf_file, const Char *conf_section, const Char *env_name, const Char *conf_name, Char *buf, Uint4 bufsize, const Char *dflt) { ASSERT ( (env_name && *env_name) || (conf_name && *conf_name) ); ASSERT ( buf && bufsize ); buf[0] = '\0'; #ifdef USE_GETENV if (env_name && *env_name) { const Char *str = getenv(env_name); if (str && *str) { Uint4 len = StrLen(str); if (len >= bufsize) return 0; StrCpy(buf, str); return len; } } #endif if (conf_name && *conf_name) { if ( !conf_file ) conf_file = DEF_CONFIG_FILE; if ( !conf_section ) conf_section = DEF_CONFIG_SECTION; return GetAppParam ((CharPtr)conf_file, (CharPtr)conf_section, (CharPtr)conf_name, (CharPtr)dflt, buf, (Int2)bufsize); } return 0; }
static Boolean SetEntrezAppParam (CharPtr section, CharPtr type, CharPtr value) { Char tmp [32]; if (GetAppParam ("ENTREZCUSTOM", section, type, NULL, tmp, sizeof (tmp) - 1)) { return SetAppParam ("ENTREZCUSTOM", section, type, value); } return SetAppParam ("ENTREZ", section, type, value); }
/***************************************************************************** Function: DDV_UseNetwork() Purpose: Determines if DDV should use the network Returns: TRUE if yes *****************************************************************************/ static Boolean DDV_UseNetwork(void) { Char str[64]; if (GetAppParam ("DDV", "SETTINGS", "NETWORKAVAILABLE", NULL, str, sizeof(str))) { if (StringICmp(str, "TRUE") == 0) return TRUE; } return FALSE; }
static Boolean NoEntryExists (CharPtr sect, CharPtr type) { Char str [256]; if (GetAppParam ("NCBI", sect, type, NULL, str, sizeof (str))) { if (! StringHasNoText (str)) return FALSE; } return TRUE; }
Boolean LIBCALL VASTInit (void) { GetAppParam("mmdb", "VAST", "Database", "", database, PATH_MAX); if (database[0] == NULL) { ErrPostEx(SEV_FATAL,0,0, "MMDB config file / path to VAST data missing.\n"); return FALSE; } return TRUE; }
/*Initialize codebase for the taxonomy database*/ void InitCodeBaseTax(void) { /*CHANGE : so the user name and database comes out of the seqhound config files.*/ SQLCHAR db2alias[10]; SQLCHAR usr[10]; SQLCHAR passwd[10]; Char instance[10]; Char instancebuf[25]; GetAppParam("intrez", "datab", "username", NULL,(Char*) usr, (size_t)10 * (sizeof(Char))); GetAppParam("intrez", "datab", "password", NULL, (Char*)passwd, (size_t)10 * (sizeof(Char))); GetAppParam("intrez", "datab", "db2alias", NULL, (Char*)db2alias, (size_t)10 * (sizeof(Char))); GetAppParam("intrez", "datab", "instance", NULL, (Char*)instance, (size_t)10 * (sizeof(Char))); /*make sure the the dbeinst3 variable is defined--only for aix system*/ sprintf(instancebuf,"DB2INSTANCE=%s",IsNullStr(instance)); putenv(instancebuf); /* allocate an envirnment handle */ if (SQLAllocHandle(SQL_HANDLE_ENV, SQL_NULL_HANDLE, &henv) != SQL_SUCCESS){ print_err(henv); ErrPostEx(SEV_ERROR,0,0, "Unable to allocate envirnment handle."); } /* allocate a connection handle */ if (SQLAllocHandle(SQL_HANDLE_DBC, henv, &hdbc) == SQL_ERROR){ print_err(henv); ErrPostEx(SEV_ERROR,0,0, "An error has occurred! Bastards!"); } if(SQLConnect( hdbc, db2alias, SQL_NTS, usr, SQL_NTS, passwd, SQL_NTS) != SQL_SUCCESS){ ErrPostEx(SEV_ERROR,0,0, "could not connect to the database. "); } }
extern Pointer ReadFromTPASmart (CharPtr accn, Uint2Ptr datatype, Uint2Ptr entityID) { Char cmmd [256]; Pointer dataptr; FILE* fp; Char path [PATH_MAX]; Char err_path [PATH_MAX]; if (datatype != NULL) { *datatype = 0; } if (entityID != NULL) { *entityID = 0; } if (StringHasNoText (accn)) return NULL; if (tpasmartfetchcmd == NULL) { if (GetAppParam ("SEQUIN", "TPASMART", "FETCHSCRIPT", NULL, cmmd, sizeof (cmmd))) { tpasmartfetchcmd = StringSaveNoNull (cmmd); } } if (tpasmartfetchcmd == NULL) return NULL; TmpNam (path); #ifdef OS_UNIX sprintf (err_path, "%s.err", path); sprintf (cmmd, "csh %s %s > %s 2>%s", tpasmartfetchcmd, accn, path, err_path); system (cmmd); #endif #ifdef OS_MSWIN sprintf (cmmd, "%s %s -o %s", tpasmartfetchcmd, accn, path); system (cmmd); #endif fp = FileOpen (path, "r"); if (fp == NULL) { FileRemove (path); return NULL; } dataptr = ReadAsnFastaOrFlatFile (fp, datatype, entityID, FALSE, FALSE, TRUE, FALSE); FileClose (fp); FileRemove (path); #ifdef OS_UNIX FileRemove (err_path); #endif return dataptr; }
Boolean MyOpenLL_GO(CharPtr name, Boolean Create) { Char pathdatab[PATH_MAX]; /*find path name of database (see NCBI toolkit corelib and file "prebind.ini" in windows directory)*/ pathdatab[0] = '\0'; GetAppParam("dbxref", "databases", "path", NULL, pathdatab, (size_t)PATH_MAX * (sizeof(Char))); StringCat(pathdatab, name); /*printf("%s\n", pathdatab);*/ if (Create == FALSE) { /*open the datafile or return error*/ pD4LL_GO = d4open(&codeBase, pathdatab); if (pD4LL_GO == NULL) return FALSE; } else { /*open the datafile or create the datafile or return error*/ pD4LL_GO = d4open(&codeBase, pathdatab); if (pD4LL_GO == NULL) pD4LL_GO = d4create(&codeBase, pathdatab, fieldInfo_GO, tagInfo_GO); if (codeBase.errorCode) return FALSE; } /*assign the field pointers*/ pF4LL_NP_GO = d4field(pD4LL_GO, "NP_GO" ); pF4LL_GOID = d4field(pD4LL_GO, "GO_ID" ); pF4LL_PMID = d4field(pD4LL_GO, "PMID" ); pF4LL_EVICODE = d4field(pD4LL_GO, "EVICODE" ); /*assign the tag pointers*/ pT4LL_NP_GO = d4tag(pD4LL_GO, "NP_TAG_GO"); pT4LL_GOID = d4tag(pD4LL_GO, "GOID_TAG"); pT4LL_PMID = d4tag(pD4LL_GO, "PMID_TAG"); return TRUE; }
/* create always true for this one */ Boolean LIBCALL OpenLL_GONoidx(CharPtr name) { Char pathdatab[PATH_MAX]; /*find path name of database (see NCBI toolkit corelib and file "prebind.ini" in windows directory)*/ pathdatab[0] = '\0'; GetAppParam("dbxref", "databases", "path", NULL, pathdatab, (size_t)PATH_MAX * (sizeof(Char))); StringCat(pathdatab, name); /* open RESULT without index */ pD4LL_GO = d4open(&codeBase, pathdatab ); /*assign the field pointers*/ pF4LL_NP_GO = d4field(pD4LL_GO, "NP_GO" ); pF4LL_GOID = d4field(pD4LL_GO, "GO_ID" ); pF4LL_PMID = d4field(pD4LL_GO, "PMID" ); pF4LL_EVICODE = d4field(pD4LL_GO, "EVICODE" ); return TRUE; }
static Int2 LIBCALLBACK TPASmartBioseqFetchFunc (Pointer data) { BioseqPtr bsp; Char cmmd [256]; Pointer dataptr; Uint2 datatype; Uint2 entityID; FILE* fp; OMProcControlPtr ompcp; ObjMgrProcPtr ompp; Char path [PATH_MAX]; Char err_path [PATH_MAX]; SeqEntryPtr sep = NULL; SeqIdPtr sip; TextSeqIdPtr tsip; ompcp = (OMProcControlPtr) data; if (ompcp == NULL) return OM_MSG_RET_ERROR; ompp = ompcp->proc; if (ompp == NULL) return OM_MSG_RET_ERROR; sip = (SeqIdPtr) ompcp->input_data; if (sip == NULL) return OM_MSG_RET_ERROR; if (sip->choice != SEQID_TPG) return OM_MSG_RET_ERROR; tsip = (TextSeqIdPtr) sip->data.ptrvalue; if (tsip == NULL || StringHasNoText (tsip->accession)) return OM_MSG_RET_ERROR; if (tpasmartfetchcmd == NULL) { if (GetAppParam ("SEQUIN", "TPASMART", "FETCHSCRIPT", NULL, cmmd, sizeof (cmmd))) { tpasmartfetchcmd = StringSaveNoNull (cmmd); } } if (tpasmartfetchcmd == NULL) return OM_MSG_RET_ERROR; TmpNam (path); #ifdef OS_UNIX sprintf (err_path, "%s.err", path); sprintf (cmmd, "csh %s %s > %s 2>%s", tpasmartfetchcmd, tsip->accession, path, err_path); system (cmmd); #endif #ifdef OS_MSWIN sprintf (cmmd, "%s %s -o %s", tpasmartfetchcmd, tsip->accession, path); system (cmmd); #endif fp = FileOpen (path, "r"); if (fp == NULL) { FileRemove (path); #ifdef OS_UNIX FileRemove (err_path); #endif return OM_MSG_RET_ERROR; } dataptr = ReadAsnFastaOrFlatFile (fp, &datatype, &entityID, FALSE, FALSE, TRUE, FALSE); FileClose (fp); FileRemove (path); #ifdef OS_UNIX FileRemove (err_path); #endif if (dataptr == NULL) return OM_MSG_RET_OK; sep = GetTopSeqEntryForEntityID (entityID); if (sep == NULL) return OM_MSG_RET_ERROR; bsp = BioseqFindInSeqEntry (sip, sep); ompcp->output_data = (Pointer) bsp; ompcp->output_entityID = ObjMgrGetEntityIDForChoice (sep); return OM_MSG_RET_DONE; }
static BioseqPtr FetchBioseqFromSmartNotId (CharPtr accn, Uint2Ptr pEntityID) { BioseqPtr bsp; Char cmmd [256]; Pointer dataptr; Uint2 datatype; Uint2 entityID; FILE* fp; OMProcControlPtr ompcp; ObjMgrProcPtr ompp; Char path [PATH_MAX]; Char err_path [PATH_MAX]; SeqEntryPtr sep = NULL; SeqIdPtr sip; TextSeqIdPtr tsip; Int4 gi = 0; ValNodePtr vnp; time_t t1, t2; if (srcchkfetchcmd == NULL) { if (GetAppParam ("SEQUIN", "TBL_CHK", "FETCHSCRIPT", NULL, cmmd, sizeof (cmmd))) { srcchkfetchcmd = StringSaveNoNull (cmmd); } } if (srcchkfetchcmd == NULL) { if (GetAppParam ("SEQUIN", "SMART", "FETCHSCRIPT", NULL, cmmd, sizeof (cmmd))) { srcchkfetchcmd = StringSaveNoNull (cmmd); } } if (srcchkfetchcmd == NULL) return NULL; TmpNam (path); t1 = time(NULL); #ifdef OS_UNIX sprintf (err_path, "%s.err", path); sprintf (cmmd, "csh %s %s > %s 2>%s", srcchkfetchcmd, accn, path, err_path); system (cmmd); #endif #ifdef OS_MSWIN sprintf (cmmd, "%s %s -o %s", srcchkfetchcmd, accn, path); system (cmmd); #endif fp = FileOpen (path, "r"); if (fp == NULL) { FileRemove (path); #ifdef OS_UNIX FileRemove (err_path); #endif return OM_MSG_RET_ERROR; } dataptr = ReadAsnFastaOrFlatFile (fp, &datatype, &entityID, FALSE, FALSE, TRUE, FALSE); FileClose (fp); FileRemove (path); #ifdef OS_UNIX FileRemove (err_path); #endif if (dataptr == NULL) return NULL; sep = GetTopSeqEntryForEntityID (entityID); if (sep == NULL) return NULL; sip = SmartGuessMakeId (accn); bsp = BioseqFindInSeqEntry (sip, sep); sip = SeqIdFree (sip); if (debug_mode) { t2 = time(NULL); if (t2 - t1 > 1) { printf("Time to download %s from SMART:%d\n", accn, t2 - t1); } } if (pEntityID != NULL) { *pEntityID = entityID; } return bsp; }
Int2 Main (void) { AsnIoPtr aip; AsnTypePtr atp; FILE *dfp = NULL; Boolean do_nuc = FALSE; Boolean do_prot = FALSE; XtraPtr extra; FILE *fp; GBSeq gbsq; GBSet gbst; Boolean get_var; Char line [256]; Boolean only_new; CharPtr str; Char xmlbuf [128]; XtraBlock xtra; ErrSetFatalLevel (SEV_MAX); ErrClearOptFlags (EO_SHOW_USERSTR); UseLocalAsnloadDataAndErrMsg (); ErrPathReset (); if (! AllObjLoad ()) { Message (MSG_FATAL, "AllObjLoad failed"); return 1; } if (! SubmitAsnLoad ()) { Message (MSG_FATAL, "SubmitAsnLoad failed"); return 1; } if (! SeqCodeSetLoad ()) { Message (MSG_FATAL, "SeqCodeSetLoad failed"); return 1; } if (! GeneticCodeTableLoad ()) { Message (MSG_FATAL, "GeneticCodeTableLoad failed"); return 1; } if (! objgbseqAsnLoad ()) { Message (MSG_POSTERR, "objgbseqAsnLoad failed"); return 1; } if (! GetArgs ("gbseqget", sizeof (myargs) / sizeof (Args), myargs)) { return 0; } fp = FileOpen (myargs [i_argInputFile].strvalue, "r"); if (fp == NULL) { return 1; } if (! StringHasNoText (myargs [d_argDateFile].strvalue)) { dfp = FileOpen (myargs [d_argDateFile].strvalue, "r"); if (dfp == NULL) { return 1; } } if (GetAppParam ("NCBI", "SETTINGS", "XMLPREFIX", NULL, xmlbuf, sizeof (xmlbuf))) { AsnSetXMLmodulePrefix (StringSave (xmlbuf)); } MemSet ((Pointer) &xtra, 0, sizeof (XtraBlock)); MemSet ((Pointer) &gbsq, 0, sizeof (GBSeq)); xtra.gbseq = &gbsq; aip = AsnIoOpen (myargs [o_argOutputFile].strvalue, "wx"); if (aip == NULL) { Message (MSG_POSTERR, "AsnIoOpen failed"); FileClose (fp); return 1; } only_new = (Boolean) myargs [n_argNewRecords].intvalue; get_var = (Boolean) myargs [v_argVariations].intvalue; str = myargs [m_argMolecule].strvalue; if (StringICmp (str, "n") == 0) { do_nuc = TRUE; } else if (StringICmp (str, "p") == 0) { do_prot = TRUE; } else if (StringICmp (str, "b") == 0) { do_nuc = TRUE; do_prot = TRUE; } else { do_nuc = TRUE; } PubSeqFetchEnable (); xtra.aip = aip; atp = AsnLinkType (NULL, AsnFind ("GBSet")); xtra.atp = AsnLinkType (NULL, AsnFind ("GBSet.E")); if (atp == NULL || xtra.atp == NULL) { Message (MSG_POSTERR, "AsnLinkType or AsnFind failed"); return 1; } extra = &xtra; MemSet ((Pointer) &gbst, 0, sizeof (GBSet)); AsnOpenStruct (aip, atp, (Pointer) &gbst); if (dfp != NULL) { DoQuery (fp, dfp, extra, get_var, do_nuc, do_prot); } else { str = ReadALine (line, sizeof (line), fp); while (str != NULL) { if (! StringHasNoText (str)) { ProcessAccession (str, extra, only_new, get_var, do_nuc, do_prot); } str = ReadALine (line, sizeof (line), fp); } } AsnCloseStruct (aip, atp, NULL); AsnPrintNewLine (aip); AsnIoClose (aip); FileClose (dfp); FileClose (fp); PubSeqFetchDisable (); return 0; }
extern void ShowNetConfigForm (WndActnProc activate, FormMessageFunc messages, VoidProc accepted, VoidProc cancelled, VoidProc turnedOff, Boolean netCurrentlyOn) { ButtoN b; GrouP c; GrouP g; GrouP h; GrouP j; Int2 len; NetConfigPtr ncp; PrompT ppt0, ppt1; ButtoN rb; Char str [256]; WindoW w; GrouP x; GrouP z; w = NULL; ncp = (NetConfigPtr) MemNew (sizeof (NetConfigData)); if (ncp != NULL) { w = FixedWindow (-50, -33, -10, -10, "Network Configuration", StdSendCloseWindowMessageProc); SetObjectExtra (w, ncp, StdCleanupFormProc); ncp->form = (ForM) w; ncp->formmessage = ConfigMessageProc; ncp->appmessage = messages; ncp->activate = activate; SetActivate (w, ConfigFormActivate); ncp->accepted = accepted; ncp->cancelled = cancelled; ncp->turnedOff = turnedOff; h = HiddenGroup (w, -1, 0, NULL); SetGroupSpacing (h, 5, 10); j = HiddenGroup (h, 2, 0, NULL); ppt0 = StaticPrompt (j, "Connection", 0, 0, programFont, 'l'); ncp->srvConnMode = HiddenGroup (j, 4, 0, ChangeConnection); SetObjectExtra (ncp->srvConnMode, ncp, NULL); rb = RadioButton (ncp->srvConnMode, "None"); RadioButton (ncp->srvConnMode, "Normal"); RadioButton (ncp->srvConnMode, "Firewall"); /* RadioButton (ncp->srvConnMode, "Stateless"); */ SetValue (ncp->srvConnMode, 2); if (turnedOff == NULL) { Disable (rb); } AlignObjects (ALIGN_MIDDLE, (HANDLE) ppt0, (HANDLE) ncp->srvConnMode, NULL); ncp->netGroup = HiddenGroup (h, -1, 0, NULL); SetGroupSpacing (ncp->netGroup, 5, 10); SelectFont (programFont); len = StringWidth ("HTTP Proxy Server ") + 2; SelectFont (systemFont); z = HiddenGroup (ncp->netGroup, -2, 0, NULL); StaticPrompt (z, "HTTP Proxy Server", len, dialogTextHeight, programFont, 'l'); ncp->proxyHost = DialogText (z, "", 12, ChangeProxy); SetObjectExtra (ncp->proxyHost, ncp, NULL); /* StaticPrompt (z, "", 0, 0, programFont, 'l'); StaticPrompt (z, "", 0, 0, programFont, 'l'); */ ppt0 = StaticPrompt (z, "HTTP Proxy Port ", len, dialogTextHeight, programFont, 'l'); ncp->proxyPort = DialogText (z, "", 3, NULL); x = MultiLinePrompt (z, "Non-transparent Proxy Server", len, programFont); ncp->firewallProxy = DialogText (z, "", 12, NULL); AlignObjects (ALIGN_MIDDLE, (HANDLE) x, (HANDLE) ncp->firewallProxy, NULL); /* AlignObjects (ALIGN_MIDDLE, (HANDLE) ppt0, (HANDLE) ncp->proxyPort, (HANDLE) ncp->firewallProxy, NULL); */ AlignObjects (ALIGN_RIGHT, (HANDLE) ncp->proxyHost, (HANDLE) ncp->firewallProxy, NULL); AlignObjects (ALIGN_LEFT, (HANDLE) ncp->proxyHost, (HANDLE) ncp->firewallProxy, NULL); g = HiddenGroup (ncp->netGroup, 5, 0, NULL); /* ppt0 = StaticPrompt (g, "Domain name server", 0, 0, programFont, 'l'); ncp->dnsAvailable = CheckBox (g, "Available", NULL); */ ncp->dnsAvailable = CheckBox (g, "Domain Name Server", NULL); SetStatus (ncp->dnsAvailable, TRUE); /* StaticPrompt (g, " ", 0, 0, programFont, 'l'); */ ppt1 = StaticPrompt (g, "Timeout", 0, popupMenuHeight, programFont, 'l'); ncp->timeOut = PopupList (g, TRUE, NULL); PopupItem (ncp->timeOut, "10 seconds"); PopupItem (ncp->timeOut, "30 seconds"); PopupItem (ncp->timeOut, "60 seconds"); PopupItem (ncp->timeOut, " 5 minutes"); SetValue (ncp->timeOut, 2); AlignObjects (ALIGN_MIDDLE, /* (HANDLE) ppt0, */ (HANDLE) ncp->dnsAvailable, (HANDLE) ppt1, (HANDLE) ncp->timeOut, NULL); c = HiddenGroup (w, 4, 0, NULL); SetGroupSpacing (c, 10, 2); ncp->accept = PushButton (c, "Accept", AcceptNetConfigForm); SetObjectExtra (ncp->accept, ncp, NULL); b = PushButton (c, "Cancel", StdSendCancelButtonMessageProc); SetObjectExtra (b, ncp, NULL); /* AlignObjects (ALIGN_CENTER, (HANDLE) h, (HANDLE) c, NULL); */ AlignObjects (ALIGN_CENTER, (HANDLE) j, (HANDLE) z, (HANDLE) g, (HANDLE) c, NULL); RealizeWindow (w); if (! netCurrentlyOn) { SafeSetValue (ncp->srvConnMode, 1); Hide (ncp->netGroup); } else if (GetAppParam ("NCBI", "CONN", "FIREWALL", NULL, str, sizeof (str))) { if (StringICmp (str, "TRUE") == 0) { SafeSetValue (ncp->srvConnMode, 3); } } if (GetAppParam ("NCBI", "CONN", "HTTP_PROXY_HOST", NULL, str, sizeof (str))) { if (! StringHasNoText (str)) { SafeSetTitle (ncp->proxyHost, str); if (GetValue (ncp->srvConnMode) == 2) { SafeSetValue (ncp->srvConnMode, 3); } } } if (GetAppParam ("NCBI", "CONN", "HTTP_PROXY_PORT", NULL, str, sizeof (str))) { if (! StringHasNoText (str)) { SafeSetTitle (ncp->proxyPort, str); } } if (GetAppParam ("NCBI", "CONN", "PROXY_HOST", NULL, str, sizeof (str))) { if (! StringHasNoText (str)) { SafeSetTitle (ncp->firewallProxy, str); } } if (GetAppParam ("NCBI", "CONN", "HOST", NULL, str, sizeof (str))) { if (StringICmp (str, "130.14.29.110") == 0) { SafeSetStatus (ncp->dnsAvailable, FALSE); } } if (GetAppParam ("NCBI", "CONN", "TIMEOUT", "30", str, sizeof (str))) { if (StringICmp (str, "10") == 0) { SafeSetValue (ncp->timeOut, 1); } else if (StringICmp (str, "60") == 0) { SafeSetValue (ncp->timeOut, 3); } else if (StringICmp (str, "300") == 0) { SafeSetValue (ncp->timeOut, 4); } else { SafeSetValue (ncp->timeOut, 2); } } ChangeConfigControls (ncp); Show (w); Select (w); Select (ncp->proxyHost); } }
static void SetupAppProperties (void) { Char str [32]; Int2 val; showAsnPage = TRUE; if (GetEntrezAppParam ("PREFERENCES", "SHOWASNPAGE", "", str, sizeof (str) - 1)) { if (StringICmp (str, "FALSE") == 0) { showAsnPage = FALSE; } } MemSet ((Pointer) (&medviewprocs), 0, sizeof (MedlineViewProcs)); medviewprocs.cleanupObjectPtr = FALSE; medviewprocs.activateForm = MedlineViewFormActivated; medviewprocs.closeForm = NULL; medviewprocs.useFolderTabs = CHANGE_VIEW_POPUP; /* medviewprocs.initPage = CITATION_PAGE; */ #ifndef WIN_MAC medviewprocs.createMenus = MedlineViewFormMenus; #endif medviewprocs.showAsnPage = showAsnPage; medviewprocs.useScrollText = FALSE; medviewprocs.handleMessages = EntrezMedlineFormMessage; medviewprocs.makeControls = DoMakeViewerLinkControls; SetAppProperty ("MedlineDisplayForm", &medviewprocs); MemSet ((Pointer) (&seqviewprocs), 0, sizeof (SeqViewProcs)); seqviewprocs.hasTargetControl = TRUE; seqviewprocs.hasDoneButton = FALSE; seqviewprocs.hasDuplicateButton = FALSE; seqviewprocs.launchEditors = FALSE; seqviewprocs.launchSubviewers = TRUE; seqviewprocs.sendSelectMessages = TRUE; seqviewprocs.highlightSelections = TRUE; seqviewprocs.cleanupObjectPtr = FALSE; seqviewprocs.activateForm = BioseqViewFormActivated; seqviewprocs.closeForm = NULL; seqviewprocs.useFolderTabs = CHANGE_VIEW_POPUP; /* seqviewprocs.initNucPage = NUCASN2FF_PAGE_1; seqviewprocs.initProtPage = PROTGENPEPT_PAGE; */ #ifndef WIN_MAC seqviewprocs.createMenus = BioseqViewFormMenus; #endif seqviewprocs.allowScrollText = FALSE; seqviewprocs.startInScrollText = FALSE; seqviewprocs.handleMessages = EntrezSeqViewFormMessage; seqviewprocs.makeControls = DoMakeViewerLinkControls; AddBioseqPageToList (&(seqviewprocs.pageSpecs), &mapPageData); AddBioseqPageToList (&(seqviewprocs.pageSpecs), &sumPageData); AddBioseqPageToList (&(seqviewprocs.pageSpecs), &gphPageData); AddBioseqPageToList (&(seqviewprocs.pageSpecs), &alnPageData); AddBioseqPageToList (&(seqviewprocs.pageSpecs), &seqPageData); AddBioseqPageToList (&(seqviewprocs.pageSpecs), &gbgnPageData); AddBioseqPageToList (&(seqviewprocs.pageSpecs), &gnbkPageData); AddBioseqPageToList (&(seqviewprocs.pageSpecs), &emblPageData); AddBioseqPageToList (&(seqviewprocs.pageSpecs), &gnptPageData); AddBioseqPageToList (&(seqviewprocs.pageSpecs), &fstaPageData); AddBioseqPageToList (&(seqviewprocs.pageSpecs), &qualPageData); if (showAsnPage) { AddBioseqPageToList (&(seqviewprocs.pageSpecs), &asnPageData); AddBioseqPageToList (&(seqviewprocs.pageSpecs), &dskPageData); } SetAppProperty ("SeqDisplayForm", &seqviewprocs); if (GetAppParam ("ENTREZ", "PREFERENCES", "TEXTEDITDISPLAYS", "", str, sizeof (str))) { if (StringICmp (str, "TRUE") == 0) { medviewprocs.useScrollText = TRUE; seqviewprocs.allowScrollText = TRUE; seqviewprocs.startInScrollText = TRUE; } } if (GetEntrezAppParam ("PREFERENCES", "MINPIXELWIDTH", "", str, sizeof (str))) { if (StrToInt (str, &val) && val > 0) { val = MIN (val, screenRect.right); medviewprocs.minPixelWidth = val; seqviewprocs.minPixelWidth = val; } } if (GetEntrezAppParam ("PREFERENCES", "MINPIXELHEIGHT", "", str, sizeof (str))) { if (StrToInt (str, &val) && val > 0) { val = MIN (val, screenRect.bottom); medviewprocs.minPixelHeight = val; seqviewprocs.minPixelHeight = val; } } if (GetEntrezAppParam ("PREFERENCES", "TEXTPIXELWIDTH", "", str, sizeof (str))) { if (StrToInt (str, &val) && val > 0) { val = MIN (val, screenRect.right); txtviewprocs.minPixelWidth = val; } } if (GetEntrezAppParam ("PREFERENCES", "TEXTPIXELHEIGHT", "", str, sizeof (str))) { if (StrToInt (str, &val) && val > 0) { val = MIN (val, screenRect.bottom); txtviewprocs.minPixelHeight = val; } } if (GetEntrezAppParam ("SETTINGS", "MEDPAGE", "Abstract", str, sizeof (str))) { medviewprocs.initMedLabel = StringSaveNoNull (str); } if (GetEntrezAppParam ("SETTINGS", "NUCPAGE", "GenBank", str, sizeof (str))) { seqviewprocs.initNucLabel = StringSaveNoNull (str); } if (GetEntrezAppParam ("SETTINGS", "PRTPAGE", "GenPept", str, sizeof (str))) { seqviewprocs.initProtLabel = StringSaveNoNull (str); } if (GetEntrezAppParam ("SETTINGS", "GENMPAGE", "Map", str, sizeof (str))) { seqviewprocs.initGenomeLabel = StringSaveNoNull (str); } MemSet ((Pointer) (&entrezglobals), 0, sizeof (EntrezGlobals)); entrezglobals.retrieveDocsProc = DoRetrieveDocuments; entrezglobals.loadNamedUidProc = DoLoadNamedUidList; entrezglobals.launchViewerProc = DoLaunchRecordViewer; #ifndef WIN_MAC entrezglobals.createTrmLstMenus = TermListFormMenus; entrezglobals.createDocSumMenus = DocSumFormMenus; #endif SetAppProperty ("EntrezGlobals", &entrezglobals); entrezglobals.showAsn = showAsnPage; entrezglobals.persistDefault = TRUE; if (GetEntrezAppParam ("PREFERENCES", "PARENTSPERSIST", "", str, sizeof (str) - 1)) { if (StringICmp (str, "FALSE") == 0) { entrezglobals.persistDefault = FALSE; } } entrezglobals.alignDefault = TRUE; if (GetEntrezAppParam ("PREFERENCES", "ALIGNCHECKED", NULL, str, sizeof (str) - 1)) { if (StringICmp (str, "FALSE") == 0) { entrezglobals.alignDefault = FALSE; } } if (GetAppParam ("ENTREZ", "PREFERENCES", "POPDOWN", "", str, sizeof (str) - 1)) { if (StringICmp (str, "TRUE") == 0) { entrezglobals.popdownBehavior = TRUE; } } if (GetEntrezAppParam ("PREFERENCES", "LOOKUPDIRECT", "", str, sizeof (str) - 1)) { if (StringICmp (str, "TRUE") == 0) { entrezglobals.lookupDirect = TRUE; } } entrezglobals.sortFields = TRUE; if (GetAppParam ("ENTREZ", "PREFERENCES", "SORTFIELDS", "", str, sizeof (str) - 1)) { if (StringICmp (str, "FALSE") == 0) { entrezglobals.sortFields = FALSE; } } if (GetEntrezAppParam ("SETTINGS", "DATABASE", "MEDLINE", str, sizeof (str))) { entrezglobals.initDatabase = StringSaveNoNull (str); } if (GetEntrezAppParam ("SETTINGS", "FIELD", "All Fields", str, sizeof (str))) { entrezglobals.initField = StringSaveNoNull (str); } if (GetEntrezAppParam ("SETTINGS", "MODE", "Automatic", str, sizeof (str))) { entrezglobals.initMode = StringSaveNoNull (str); } if (GetEntrezAppParam ("SETTINGS", "BROWSER", NULL, str, sizeof (str))) { SetAppProperty ("MedviewBrowserPath", (void *) StringSave (str)); } MemSet ((Pointer) (&stdedprocs), 0, sizeof (StdEditorProcs)); #ifdef WIN_MAC stdedprocs.activateForm = StdEditorFormActivated; #endif stdedprocs.handleMessages = EntrezStdEditorFormMessage; SetAppProperty ("StdEditorForm", &stdedprocs); MemSet ((Pointer) (&txtviewprocs), 0, sizeof (TextViewProcs)); txtviewprocs.useScrollText = FALSE; SetAppProperty ("TextDisplayForm", &txtviewprocs); }
Boolean LIBCALL MMDBInit (void) { char *msg; char path[PATH_MAX]; FILE *f; #define ERROR(err_msg) { msg = err_msg; goto errexit; } #ifdef MMDB_PUBSTRUCT GetAppParam("mmdb", "MMDB", "PubStruct", "", path, sizeof(path)); if (strcmp(path,"yes")==0) file_db = 0; else file_db = 1; if (!file_db) /* if database reading */ { GetAppParam("mmdb", "MMDB", "Database", "", database, sizeof(database)); return TRUE; } #endif /* filebased mmdbsrv */ GetAppParam("mmdb", "MMDB", "Database", "", database, sizeof(database)); GetAppParam("mmdb", "MMDB", "Index" , "", indexname, sizeof(indexname)); if (database[0] == 0) ERROR("MMDBInit failed: config file / path to data missing.\n"); if (indexname[0] == 0) ERROR("MMDBInit failed: config file / index file missing.\n"); assert(sizeof(path) > strlen(database) + strlen(indexname)); sprintf(path,"%s%s",database,indexname); f = fopen(path,"r"); if(f) fclose(f); else ERROR("MMDBInit failed: incorrect mmdb.idx path.\n"); #ifdef MMDB_UNIXCOMPRESSED GetAppParam("mmdb", "MMDBSRV", "Gunzip", "", gunzip, sizeof(gunzip)); if (gunzip[0] == 0) ERROR("MMDBInit failed: gunzip path missing.\n"); f = fopen(gunzip,"r"); if(f) fclose(f); else ERROR("MMDBInit failed: incorrect gunzip path .\n"); #endif return LoadMMDBIdx(database, indexname); #undef ERROR errexit: ErrPostEx(SEV_FATAL,0,0, msg); return FALSE; }