1 |
tim |
746 |
/********************************************************************** |
2 |
|
|
Copyright (C) 2005 by Chris Morley |
3 |
|
|
|
4 |
|
|
This program is free software; you can redistribute it and/or modify |
5 |
|
|
it under the terms of the GNU General Public License as published by |
6 |
|
|
the Free Software Foundation version 2 of the License. |
7 |
|
|
|
8 |
|
|
This program is distributed in the hope that it will be useful, |
9 |
|
|
but WITHOUT ANY WARRANTY; without even the implied warranty of |
10 |
|
|
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the |
11 |
|
|
GNU General Public License for more details. |
12 |
|
|
***********************************************************************/ |
13 |
|
|
#include "fingerprintformat.hpp" |
14 |
|
|
|
15 |
|
|
using namespace std; |
16 |
|
|
namespace OpenBabel { |
17 |
|
|
|
18 |
|
|
bool FingerprintFormat::WriteMolecule(OBBase* pOb, OBConversion* pConv) |
19 |
|
|
{ |
20 |
|
|
ostream &ofs = *pConv->GetOutStream(); |
21 |
|
|
|
22 |
|
|
OBFingerprint* pFP; |
23 |
|
|
string id; |
24 |
|
|
if(pConv->IsOption("F")) |
25 |
|
|
{ |
26 |
|
|
while(OBFingerprint::GetNextFPrt(id, pFP)) |
27 |
|
|
ofs << id << " -- " << pFP->Description() << endl; |
28 |
|
|
return true; |
29 |
|
|
} |
30 |
|
|
|
31 |
|
|
|
32 |
|
|
bool hexoutput=false; |
33 |
|
|
if(pConv->IsOption("h") || (pConv->GetOutputIndex()==1 && pConv->IsLast())) |
34 |
|
|
hexoutput=true; |
35 |
|
|
|
36 |
|
|
string fpid; |
37 |
|
|
int nbits=0; |
38 |
|
|
const char* p=pConv->IsOption("f"); |
39 |
|
|
if(p) |
40 |
|
|
{ |
41 |
|
|
fpid=p; |
42 |
|
|
fpid = fpid.substr(0,fpid.find('"')); |
43 |
|
|
} |
44 |
|
|
|
45 |
|
|
pFP = OBFingerprint::FindFingerprint(fpid); |
46 |
|
|
if(!pFP) |
47 |
|
|
{ |
48 |
|
|
#ifdef HAVE_SSTREAM |
49 |
|
|
stringstream errorMsg; |
50 |
|
|
#else |
51 |
|
|
strstream errorMsg; |
52 |
|
|
#endif |
53 |
|
|
errorMsg << "Fingerprint type '" << fpid << "' not available" << endl; |
54 |
tim |
819 |
obErrorLog.ThrowError(__func__, errorMsg.str(), obError); |
55 |
tim |
746 |
return false; |
56 |
|
|
} |
57 |
|
|
|
58 |
|
|
p=pConv->IsOption("N"); |
59 |
|
|
if(p) |
60 |
|
|
nbits = atoi(p); |
61 |
|
|
|
62 |
|
|
vector<unsigned int> fptvec; |
63 |
|
|
if(!pFP->GetFingerprint(pOb, fptvec, nbits)) |
64 |
|
|
return false; |
65 |
|
|
|
66 |
|
|
OBMol* pmol = dynamic_cast<OBMol*>(pOb); |
67 |
|
|
if(pmol) |
68 |
|
|
ofs << ">" << pmol->GetTitle(); |
69 |
|
|
|
70 |
|
|
if(hexoutput) |
71 |
|
|
{ |
72 |
|
|
int i, bitsset=0; |
73 |
|
|
for (i=0;i<fptvec.size();++i) |
74 |
|
|
{ |
75 |
|
|
int wd = fptvec[i]; |
76 |
|
|
for(;wd;wd=wd<<1)//count bits set by shifting into sign bit until word==0 |
77 |
|
|
if(wd<0) ++bitsset; |
78 |
|
|
} |
79 |
|
|
ofs << " " << bitsset << " bits set. "; |
80 |
|
|
} |
81 |
|
|
|
82 |
|
|
if(pConv->GetOutputIndex()==1) |
83 |
|
|
{ |
84 |
|
|
//store the fingerprint and name of first molecule |
85 |
|
|
firstfp=fptvec; |
86 |
|
|
if(pmol) |
87 |
|
|
firstname=pmol->GetTitle(); |
88 |
|
|
if(firstname.empty()) |
89 |
|
|
firstname = "first mol"; |
90 |
|
|
} |
91 |
|
|
else |
92 |
|
|
{ |
93 |
|
|
ofs << " Tanimoto from " << firstname << " = " << OBFingerprint::Tanimoto(firstfp, fptvec); |
94 |
|
|
if(IsPossibleSubstructure(fptvec,firstfp)) |
95 |
|
|
ofs << "\nPossible superstructure of " << firstname; |
96 |
|
|
} |
97 |
|
|
ofs << endl; |
98 |
|
|
|
99 |
|
|
int i; |
100 |
|
|
|
101 |
|
|
if(hexoutput) |
102 |
|
|
{ |
103 |
|
|
for(i=fptvec.size()-1;i>=0;i--) |
104 |
|
|
{ |
105 |
|
|
ofs << hex << setfill('0') << setw(8) << fptvec[i] << " " ; |
106 |
|
|
if((fptvec.size()-i)%6==0) |
107 |
|
|
ofs <<endl; |
108 |
|
|
} |
109 |
|
|
ofs << dec << endl; |
110 |
|
|
} |
111 |
|
|
return true; |
112 |
|
|
} |
113 |
|
|
|
114 |
|
|
bool FingerprintFormat::IsPossibleSubstructure(vector<unsigned int>Mol, vector<unsigned int>Frag) |
115 |
|
|
{ |
116 |
|
|
//Returns false if Frag is definitely NOT a substructure of Mol |
117 |
|
|
int i; |
118 |
|
|
for (i=0;i<Mol.size();++i) |
119 |
|
|
if((Mol[i] & Frag[i]) ^ Frag[i]) return false; |
120 |
|
|
return true; |
121 |
|
|
} |
122 |
|
|
|
123 |
|
|
} //namespace OpenBabel |