1 /*
2 ** Splint - annotation-assisted static program checker
3 ** Copyright (C) 1994-2003 University of Virginia,
4 ** Massachusetts Institute of Technology
5 **
6 ** This program is free software; you can redistribute it and/or modify it
7 ** under the terms of the GNU General Public License as published by the
8 ** Free Software Foundation; either version 2 of the License, or (at your
9 ** option) any later version.
10 **
11 ** This program is distributed in the hope that it will be useful, but
12 ** WITHOUT ANY WARRANTY; without even the implied warranty of
13 ** MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
14 ** General Public License for more details.
15 **
16 ** The GNU General Public License is available from http://www.gnu.org/ or
17 ** the Free Software Foundation, Inc., 59 Temple Place - Suite 330, Boston,
18 ** MA 02111-1307, USA.
19 **
20 ** For information on splint: info@splint.org
21 ** To report a bug: splint-bug@splint.org
22 ** For more information: http://www.splint.org
23 */
24 /*
25 ** metaStateSpecifier.c
26 */
27
28 # include "splintMacros.nf"
29 # include "basic.h"
30
31 metaStateSpecifier
metaStateSpecifier_create(sRef sr,metaStateInfo msinfo)32 metaStateSpecifier_create (/*@only@*/ sRef sr, /*@observer@*/ metaStateInfo msinfo)
33 {
34 metaStateSpecifier res = (metaStateSpecifier) dmalloc (sizeof (*res));
35 res->sr = sr;
36 res->msinfo = msinfo;
37 res->elipsis = FALSE;
38 return res;
39 }
40
41 metaStateSpecifier
metaStateSpecifier_createElipsis(metaStateInfo msinfo)42 metaStateSpecifier_createElipsis (/*@observer@*/ metaStateInfo msinfo)
43 {
44 metaStateSpecifier res = (metaStateSpecifier) dmalloc (sizeof (*res));
45 res->sr = sRef_undefined;
46 res->msinfo = msinfo;
47 res->elipsis = TRUE;
48 return res;
49 }
50
51 bool
metaStateSpecifier_isElipsis(metaStateSpecifier m)52 metaStateSpecifier_isElipsis (metaStateSpecifier m)
53 {
54 return m->elipsis;
55 }
56
57 sRef
metaStateSpecifier_getSref(metaStateSpecifier m)58 metaStateSpecifier_getSref (metaStateSpecifier m)
59 {
60 llassert (!metaStateSpecifier_isElipsis (m));
61 return m->sr;
62 }
63
64 metaStateInfo
metaStateSpecifier_getMetaStateInfo(metaStateSpecifier m)65 metaStateSpecifier_getMetaStateInfo (metaStateSpecifier m)
66 {
67 return m->msinfo;
68 }
69
70 metaStateSpecifier
metaStateSpecifier_copy(metaStateSpecifier m)71 metaStateSpecifier_copy (metaStateSpecifier m)
72 {
73 if (metaStateSpecifier_isElipsis (m))
74 {
75 return metaStateSpecifier_createElipsis (m->msinfo);
76 }
77 else
78 {
79 return metaStateSpecifier_create (sRef_saveCopy (m->sr), m->msinfo);
80 }
81 }
82
metaStateSpecifier_unparse(metaStateSpecifier m)83 cstring metaStateSpecifier_unparse (metaStateSpecifier m)
84 {
85 if (m->elipsis)
86 {
87 return message ("...:%s",
88 metaStateInfo_getName (m->msinfo));
89 }
90 else
91 {
92 return message ("%q:%s",
93 sRef_unparse (m->sr),
94 metaStateInfo_getName (m->msinfo));
95 }
96 }
97
metaStateSpecifier_free(metaStateSpecifier m)98 void metaStateSpecifier_free (/*@only@*/ metaStateSpecifier m)
99 {
100 sRef_free (m->sr);
101 sfree (m);
102 }
103
104