f3b24f37bc2e9f69f1080a72b6f541ba5731354a
[strongswan.git] / src / libimcv / ietf / ietf_attr_assess_result.c
1 /*
2 * Copyright (C) 2012-2014 Andreas Steffen
3 * HSR Hochschule fuer Technik Rapperswil
4 *
5 * This program is free software; you can redistribute it and/or modify it
6 * under the terms of the GNU General Public License as published by the
7 * Free Software Foundation; either version 2 of the License, or (at your
8 * option) any later version. See <http://www.fsf.org/copyleft/gpl.txt>.
9 *
10 * This program is distributed in the hope that it will be useful, but
11 * WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY
12 * or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
13 * for more details.
14 */
15
16 #include "ietf_attr_assess_result.h"
17
18 #include <pa_tnc/pa_tnc_msg.h>
19 #include <bio/bio_writer.h>
20 #include <bio/bio_reader.h>
21 #include <utils/debug.h>
22
23 typedef struct private_ietf_attr_assess_result_t private_ietf_attr_assess_result_t;
24
25 /**
26 * PA-TNC Product Information type (see section 4.2.2 of RFC 5792)
27 *
28 * 1 2 3
29 * 0 1 2 3 4 5 6 7 8 9 0 1 2 3 4 5 6 7 8 9 0 1 2 3 4 5 6 7 8 9 0 1
30 * +-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+
31 * | Assessment Result |
32 * +-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+
33 */
34
35 #define ASSESS_RESULT_SIZE 4
36
37 /**
38 * Private data of an ietf_attr_assess_result_t object.
39 */
40 struct private_ietf_attr_assess_result_t {
41
42 /**
43 * Public members of ietf_attr_assess_result_t
44 */
45 ietf_attr_assess_result_t public;
46
47 /**
48 * Vendor-specific attribute type
49 */
50 pen_type_t type;
51
52 /**
53 * Length of attribute value
54 */
55 size_t length;
56
57 /**
58 * Attribute value or segment
59 */
60 chunk_t value;
61
62 /**
63 * Noskip flag
64 */
65 bool noskip_flag;
66
67 /**
68 * Assessment Result
69 */
70 u_int32_t result;
71
72 /**
73 * Reference count
74 */
75 refcount_t ref;
76 };
77
78 METHOD(pa_tnc_attr_t, get_type, pen_type_t,
79 private_ietf_attr_assess_result_t *this)
80 {
81 return this->type;
82 }
83
84 METHOD(pa_tnc_attr_t, get_value, chunk_t,
85 private_ietf_attr_assess_result_t *this)
86 {
87 return this->value;
88 }
89
90 METHOD(pa_tnc_attr_t, get_noskip_flag, bool,
91 private_ietf_attr_assess_result_t *this)
92 {
93 return this->noskip_flag;
94 }
95
96 METHOD(pa_tnc_attr_t, set_noskip_flag,void,
97 private_ietf_attr_assess_result_t *this, bool noskip)
98 {
99 this->noskip_flag = noskip;
100 }
101
102 METHOD(pa_tnc_attr_t, build, void,
103 private_ietf_attr_assess_result_t *this)
104 {
105 bio_writer_t *writer;
106
107 if (this->value.ptr)
108 {
109 return;
110 }
111
112 writer = bio_writer_create(ASSESS_RESULT_SIZE);
113 writer->write_uint32(writer, this->result);
114 this->value = writer->extract_buf(writer);
115 this->length = this->value.len;
116 writer->destroy(writer);
117 }
118
119 METHOD(pa_tnc_attr_t, process, status_t,
120 private_ietf_attr_assess_result_t *this, u_int32_t *offset)
121 {
122 bio_reader_t *reader;
123
124 *offset = 0;
125
126 if (this->value.len < this->length)
127 {
128 return NEED_MORE;
129 }
130 if (this->value.len < ASSESS_RESULT_SIZE)
131 {
132 DBG1(DBG_TNC, "insufficient data for IETF assessment result");
133 return FAILED;
134 }
135 reader = bio_reader_create(this->value);
136 reader->read_uint32(reader, &this->result);
137 reader->destroy(reader);
138
139 return SUCCESS;
140 }
141
142 METHOD(pa_tnc_attr_t, get_ref, pa_tnc_attr_t*,
143 private_ietf_attr_assess_result_t *this)
144 {
145 ref_get(&this->ref);
146 return &this->public.pa_tnc_attribute;
147 }
148
149 METHOD(pa_tnc_attr_t, destroy, void,
150 private_ietf_attr_assess_result_t *this)
151 {
152 if (ref_put(&this->ref))
153 {
154 free(this->value.ptr);
155 free(this);
156 }
157 }
158
159 METHOD(ietf_attr_assess_result_t, get_result, u_int32_t,
160 private_ietf_attr_assess_result_t *this)
161 {
162 return this->result;
163 }
164
165 /**
166 * Described in header.
167 */
168 pa_tnc_attr_t *ietf_attr_assess_result_create(u_int32_t result)
169 {
170 private_ietf_attr_assess_result_t *this;
171
172 INIT(this,
173 .public = {
174 .pa_tnc_attribute = {
175 .get_type = _get_type,
176 .get_value = _get_value,
177 .get_noskip_flag = _get_noskip_flag,
178 .set_noskip_flag = _set_noskip_flag,
179 .build = _build,
180 .process = _process,
181 .get_ref = _get_ref,
182 .destroy = _destroy,
183 },
184 .get_result = _get_result,
185 },
186 .type = { PEN_IETF, IETF_ATTR_ASSESSMENT_RESULT },
187 .result = result,
188 .ref = 1,
189 );
190
191 return &this->public.pa_tnc_attribute;
192 }
193
194 /**
195 * Described in header.
196 */
197 pa_tnc_attr_t *ietf_attr_assess_result_create_from_data(size_t length,
198 chunk_t data)
199 {
200 private_ietf_attr_assess_result_t *this;
201
202 INIT(this,
203 .public = {
204 .pa_tnc_attribute = {
205 .get_type = _get_type,
206 .get_value = _get_value,
207 .get_noskip_flag = _get_noskip_flag,
208 .set_noskip_flag = _set_noskip_flag,
209 .build = _build,
210 .process = _process,
211 .get_ref = _get_ref,
212 .destroy = _destroy,
213 },
214 .get_result = _get_result,
215 },
216 .type = { PEN_IETF, IETF_ATTR_ASSESSMENT_RESULT },
217 .length = length,
218 .value = chunk_clone(data),
219 .ref = 1,
220 );
221
222 return &this->public.pa_tnc_attribute;
223 }
224