update to set up make variables for compiling modules with libhrtime
[dyninst.git] / common / src / Ident.C
1 /*
2  * Copyright (c) 1996-98 Barton P. Miller
3  * 
4  * We provide the Paradyn Parallel Performance Tools (below
5  * described as "Paradyn") on an AS IS basis, and do not warrant its
6  * validity or performance.  We reserve the right to update, modify,
7  * or discontinue this software at any time.  We shall have no
8  * obligation to supply such updates or modifications or any other
9  * form of support to you.
10  * 
11  * This license is for research uses.  For such uses, there is no
12  * charge. We define "research use" to mean you may freely use it
13  * inside your organization for whatever purposes you see fit. But you
14  * may not re-distribute Paradyn or parts of Paradyn, in any form
15  * source or binary (including derivatives), electronic or otherwise,
16  * to any other organization or entity without our permission.
17  * 
18  * (for other uses, please contact us at paradyn@cs.wisc.edu)
19  * 
20  * All warranties, including without limitation, any warranty of
21  * merchantability or fitness for a particular purpose, are hereby
22  * excluded.
23  * 
24  * By your use of Paradyn, you understand and agree that we (or any
25  * other person or entity with proprietary rights in Paradyn) are
26  * under no obligation to provide either maintenance services,
27  * update services, notices of latent defects, or correction of
28  * defects for Paradyn.
29  * 
30  * Even if advised of the possibility of such damages, under no
31  * circumstances shall we (or any other person or entity with
32  * proprietary rights in the software licensed hereunder) be liable
33  * to you or any third party for direct, indirect, or consequential
34  * damages of any character regardless of type of action, including,
35  * without limitation, loss of profits, loss of use, loss of good
36  * will, or computer failure or malfunction.  You agree to indemnify
37  * us (and any other person or entity with proprietary rights in the
38  * software licensed hereunder) for any and all liability it may
39  * incur to third parties resulting from your use of Paradyn.
40  */
41
42 /************************************************************************
43  * Ident.C: build identification functions (for POSIX systems)
44  * $Id: Ident.C,v 1.2 2000/07/28 17:20:39 pcroth Exp $
45 ************************************************************************/
46
47 #include "common/h/Ident.h"
48 #include <stdio.h>
49 #include <string.h>
50
51 Ident::Ident (const char *Vstr, const char *expected_suite)
52 {
53     const int es_len = strlen(expected_suite);  // expected suite name length
54     char fullrelease[32];            // temporary holder for release_+buildnum_
55
56 #ifdef BROKEN_SSCANF
57     char *p=strchr(Vstr,' ');
58     if (!p || ((p-Vstr) > 16)) return;
59 #endif
60     int n = sscanf (Vstr, IdentFormat, 
61         suite_, fullrelease, component_, revision_, date_, time_, builder_);
62
63     ok_ = (n==IdentFields);
64
65     if (n <= 0) {
66         // parsing failed completely!
67         cerr << "Warning! Failed to parse identification string:\n<"
68              << Vstr << ">" << endl;
69     } else if (n < IdentFields) {
70         // report how far parsing succeeded
71         cerr << "Warning! Parsed only " << n << " of " << IdentFields
72              << " fields from $" << suite_ << " identification string: <"
73              << Vstr << ">:" << endl;
74         cerr << "Release=("     << fullrelease << ") "
75              << "Component=("   << component_ << ") "
76              << "Revision=("    << revision_ << ") "  
77              << "Date=("        << date_ << ") "
78              << "Time=("        << time_ << ") "
79              << "Builder=("     << builder_ << ") "
80              << endl;
81     } else { 
82         // check Suite is that expected
83         if (strncmp(expected_suite, suite_, es_len) == 0) {
84             //cerr << "Successfully parsed $Suite identification string" << endl;
85             suite_[es_len]='\0';         // remove unnecessary trailing ":"
86         } else {
87             if (char *p=strrchr(suite_, ':')) { *p='\0'; }
88             cerr << "Warning! Identifier contained unexpected suite name: "
89                  << suite_ << " <=> " << expected_suite << endl;
90         }
91         // separate buildnum from release identifier
92         if (char *p=strrchr(fullrelease, '-')) {
93             strncpy (buildnum_, p, sizeof(buildnum_));
94             *p='\0';
95             strncpy (release_, fullrelease, sizeof(release_));
96         } else {
97             //cerr << "No buildnum located in release id " << fullrelease << endl;
98             strncpy (release_, fullrelease, sizeof(release_));
99         }
100     }
101 }
102
103 Ident::~Ident() { }
104
105 ostream& operator<< (ostream &os, const Ident &Id)
106 {
107 #if defined(notdef)
108     // verbose tagged version intended for debugging
109     string buf = "{"
110        + " suite="     + Id.suite()
111        + " release="   + Id.release()
112        + " buildnum="  + Id.buildnum()
113        + " component=" + Id.component()
114        + " revision="  + Id.revision()
115        + " date="      + Id.date()
116        + " time="      + Id.time()
117        + " builder="   + Id.builder()
118        + " }";
119 #else
120     // concise inline version intended for normal use
121     char buf[128];
122     sprintf(buf, IdentOutFmt, Id.suite_,
123         Id.release_, Id.buildnum_, Id.component_, Id.revision_,
124         Id.date_, Id.time_, Id.builder_);
125 #endif
126
127     return os << buf;
128 }
129