1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
|
/* mmdbentr.c
* ===========================================================================
*
* 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: mmdbentr.c
*
* Author: Christopher Hogue
*
* Version Creation Date: 14 Jan 1997
*
* $Revision: 6.3 $
*
* File Description: Used to provide Biostrucs data using
* Conventional Entrez subsystems (Network or CDRom)
*
* Modifications:
* --------------------------------------------------------------------------
*
* $Log: mmdbentr.c,v $
* Revision 6.3 2002/06/11 19:13:46 kans
* StrucSynchronousQuery returns BiostrucSeqPtr instead of BiostrucPtr
*
* Revision 6.2 2001/01/26 15:06:39 lewisg
* use entrez2 to retrieve structures
*
* Revision 6.1 1999/04/22 01:59:18 kimelman
* MMDB_configuration added
*
* Revision 6.0 1997/08/25 18:11:23 madden
* Revision changed to 6.0
*
* Revision 1.3 1997/01/15 17:52:30 hogue
* Initial Version
*
*
* ==========================================================================
*/
/* This file abstracts the calls to Network Entrez that were previously */
/* embedded in mmdbapi1.c */
/* Use this to make a network MMDB client using network/CDRom Entrez */
/* compile this into ncbimmdb.a and link with Network or CDEntrez libraries */
#include <ncbi.h>
#include <mmdbapi.h>
#include <mmdbdata.h>
#include <ent2api.h>
#include <strucapi.h>
Boolean LIBCALL MMDBInit (void)
{
/*
Boolean bIsNetwork = FALSE;
return EntrezInit("MMDBAPI client", FALSE, &bIsNetwork);
*/
return TRUE;
}
void LIBCALL MMDBFini (void)
{
/*
EntrezFini();
return;
*/
}
BiostrucPtr LIBCALL MMDBBiostrucGet (DocUid uid, Int4 mdlLvl, Int4 maxModels)
{
BiostrucSeqPtr bsqp;
/* MMDB - Caching would check here for matching file first */
/*
return EntrezBiostrucGet(uid, mdlLvl, maxModels);
*/
bsqp = StrucSynchronousQuery (uid);
if (bsqp == NULL) return NULL;
return bsqp->structure;
/* Caching would also save file here */
}
DocUid LIBCALL MMDBEvalPDB(CharPtr str)
{
Entrez2BooleanReplyPtr e2br;
Entrez2IdListPtr e2id;
Entrez2RequestPtr e2rq;
Entrez2ReplyPtr e2ry;
Char tmp [61];
Uint4 uid = 0;
if (str == NULL) return 0;
StringNCpy_0 (tmp, str, sizeof (tmp) - 10);
if (StringStr (tmp, "[ACCN]") == NULL) {
StringCat (tmp, " [ACCN]");
}
e2rq = EntrezCreateBooleanRequest (TRUE, FALSE, "Structure", tmp,
0, 0, NULL, 1, 0);
if (e2rq == NULL) return 0;
e2ry = EntrezSynchronousQuery (e2rq);
e2rq = Entrez2RequestFree (e2rq);
if (e2ry == NULL) return 0;
e2br = EntrezExtractBooleanReply (e2ry);
if (e2br == NULL) return 0;
if (e2br->count > 0) {
e2id = e2br->uids;
if (e2id != NULL && e2id->num > 0 && e2id->uids != NULL) {
BSSeek (e2id->uids, 0, SEEK_SET);
uid = Nlm_BSGetUint4 (e2id->uids);
}
}
Entrez2BooleanReplyFree (e2br);
return uid;
/*
LinkSetPtr plsLink = NULL;
DocUid duUID = 0;
if ((!str)) return (DocUid) 0;
plsLink = EntrezTLEvalString(str, (DocType) TYP_ST,
(DocField) FLD_ACCN, NULL, NULL);
if (plsLink != NULL && plsLink->num > 0 && plsLink->uids != NULL)
{
duUID = plsLink->uids[0];
}
LinkSetFree(plsLink);
return duUID;
*/
}
CharPtr LIBCALL MMDB_configuration(void)
{
return
"Version:\t$Id: mmdbentr.c,v 6.3 2002/06/11 19:13:46 kans Exp $\nConfiguration:"
" Entrez"
"\n";
}
|
