File: setsts.c

package info (click to toggle)
ncbi-tools6 6.1.20170106%2Bdfsg1-0%2Bdeb10u2
  • links: PTS, VCS
  • area: main
  • in suites: buster
  • size: 468,492 kB
  • sloc: ansic: 1,474,204; pascal: 6,740; cpp: 6,248; xml: 3,390; sh: 2,137; perl: 1,084; csh: 508; makefile: 427; ruby: 93; lisp: 81
file content (219 lines) | stat: -rw-r--r-- 6,057 bytes parent folder | download | duplicates (15)
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
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
/* $Id: setsts.c,v 6.0 1997/08/25 18:20:40 madden Exp $ */
/*****************************************************************************

    Name: setsts.c                               

    Description:  Program for formatting memory map for WWW STS Search Tool

    Author: Sergei Shavirin

   ***************************************************************************

                          PUBLIC DOMAIN NOTICE
              National Center for Biotechnology Information

    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 have not placed any restriction on its use or
    reproduction.

    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.

    Please cite the author in any work or product based on this material.

   ***************************************************************************

 File Name:  $RCSfile: setsts.c,v $

  Author:  Sergei Shavirin

  Version Creation Date: 12/19/1996

  $Revision: 6.0 $

  File Description:
          Main program for formatting databases of Electronic PCR

  $Log: setsts.c,v $
  Revision 6.0  1997/08/25 18:20:40  madden
  Revision changed to 6.0

  Revision 5.1  1997/05/23 15:28:21  shavirin
  Initial revision


*****************************************************************************/

#include <ncbi.h>
#include <stsutil.h>

#define RealAddress(x)  (MMAddress + ((Int4)x))
#define MemMapFileName "sts.map" /* STS map file with initialized hash info */

typedef struct STSHash {
  Int4 offset;
  Int4 organism;
  Int4 len;
  CharPtr pr1;
  CharPtr pr2;
  struct STSHash *next;
} STSHash, PNTR STSHashPtr;

/* Functions used to create STS map file */

#ifdef __cplusplus
extern "C" {
#endif

extern STSHashPtr PNTR InitHashTable(STSDbNamesPtr db_name, 
                                     Int4Ptr StsCount_out, 
                                     Int4Ptr StsInvalid_out);
extern Int4 DumpHashTable(STSDbNamesPtr db_name, 
                          STSHashPtr PNTR StsHashTable);

#ifdef __cplusplus
}
#endif

/* Static functions */

static Int4 CheckHashTable(void);

/* Global variables */

static CharPtr MMAddress; /* address of MM hash file */

#define NUMARGS 4

Args dump_args[NUMARGS] = {

  {"Input STS dump file for formatting (this parameter must be set)",
   NULL, NULL,NULL,FALSE,'i',ARG_FILE_IN, 0.0,0,NULL},
  {"Organism Index file",
   "org.db", NULL,NULL,TRUE,'o',ARG_FILE_IN, 0.0,0,NULL},
  {"Output STS Map file name",
   "sts.map", NULL,NULL,TRUE,'m',ARG_FILE_OUT, 0.0,0,NULL},
  {"Logfile name:",
   "setsts.log", NULL,NULL,TRUE,'l',ARG_FILE_OUT, 0.0,0,NULL}
};

#define StsName     (CharPtr)      dump_args[0].strvalue 
#define OrgName     (CharPtr)      dump_args[1].strvalue 
#define MapName     (CharPtr)      dump_args[2].strvalue 
#define LogFileName (CharPtr)      dump_args[3].strvalue  

Int2 Main(void)
{
  Int4 StsCount = 0, StsInvalid = 0;
  STSHashPtr PNTR StsHashTable;
  STSDbNamesPtr db_name;

  if (!GetArgs("setsts",NUMARGS,dump_args)) {
    return 1;
  }
  if (!ErrSetLog (LogFileName)) {
    ErrShow();
  } else {
    ErrSetOpts (ERR_CONTINUE, ERR_LOG_ON);
  }

  db_name = MemNew(sizeof(STSDbNames));
  db_name->sts_db_name = StsName;
  db_name->sts_map_name = MapName;
  db_name->sts_org_name = OrgName;
  
  if((StsHashTable = InitHashTable(db_name, &StsCount, &StsInvalid)) == NULL) {
    ErrLogPrintf("Error in initialization of Hash Table. Exiting...");
    return 1;
  }
 
  ErrLogPrintf("Invalid database entries found: %d\n",   StsInvalid); 
  ErrLogPrintf("Hash table created with %d sequences\n", StsCount);
  
  if((StsCount = DumpHashTable(db_name, StsHashTable)) < 0) {
    ErrLogPrintf("Error in dumping of Hash Table. Exiting...");
    return 1;
  }

  ErrLogPrintf("Map file dumped with %d sequences\n", StsCount);
  return 0;
}

static Int4 CheckHashTable(void)
{
  register Int4 i;
  STSHashPtr sts;
  Nlm_MemMapPtr mmp;
  Uint4Ptr int_ptr, tmp_ptr;
  Int4 TotalCount =0;

  /* Now, lets try to read this map file */
  
  mmp = Nlm_MemMapInit(MemMapFileName);
  MMAddress = mmp->mmp_begin;
  printf("Allocated %d bytes of memory on address %x\n", 
         mmp->file_size, MMAddress);
  int_ptr = (Uint4Ptr) MMAddress;

  if((sts = (STSHashPtr)(RealAddress(int_ptr[7733]))) == 
     (STSHashPtr)MMAddress) {
    printf("No entries found\n");
    exit(1);
  } 

  printf("Off = %d Org = %d Len = %d "
         "Pr1=%d Pr2=%d Next= %d\n",
         sts->offset, 
         sts->organism, 
         sts->len, sts->pr1, 
         sts->pr2, sts->next );

  printf("Primer1 = %s, Primer2 = %s\n", 
         RealAddress(sts->pr1), 
         RealAddress(sts->pr2)
         );

  tmp_ptr = (Uint4Ptr)(RealAddress(int_ptr[7733]));
  
  printf("\nMM Start address %x\n", MMAddress);

  printf("\nRelative address %lu, Real Address %x\n",
         int_ptr[0], tmp_ptr);

  for(i=0; i < 120; i++) {
    printf("%ld ", tmp_ptr[i]);
  }
  
  printf("\nNext STS:\n");

  tmp_ptr = (Uint4Ptr)(RealAddress(sts->next));

  printf("\nRelative address %lu, Real Address %x\n",
         sts->next, tmp_ptr);

  for(i=0; i < 12; i++) {
    printf("%ld ", tmp_ptr[i]);
    fflush(stdout);
  }
  
  printf("\n");


  sts = (STSHashPtr)(MMAddress + (Int4)(sts->next));

  printf("\n Offset = %d Organism = %d Length = %d\n", 
         sts->offset, 
         sts->organism, 
         sts->len);

  return TotalCount;
}