1: /*************************************************************************
2: * (C) 2008 AITNET ltd - Sofia/Bulgaria - <misho@aitbg.com>
3: * by Michael Pounov <misho@openbsd-bg.org>
4: *
5: * $Author: misho $
6: * $Id: queue.c,v 1.6.4.2 2012/04/02 15:12:15 misho Exp $
7: *
8: **************************************************************************
9: The ELWIX and AITNET software is distributed under the following
10: terms:
11:
12: All of the documentation and software included in the ELWIX and AITNET
13: Releases is copyrighted by ELWIX - Sofia/Bulgaria <info@elwix.org>
14:
15: Copyright 2004, 2005, 2006, 2007, 2008, 2009, 2010, 2011, 2012
16: by Michael Pounov <misho@elwix.org>. All rights reserved.
17:
18: Redistribution and use in source and binary forms, with or without
19: modification, are permitted provided that the following conditions
20: are met:
21: 1. Redistributions of source code must retain the above copyright
22: notice, this list of conditions and the following disclaimer.
23: 2. Redistributions in binary form must reproduce the above copyright
24: notice, this list of conditions and the following disclaimer in the
25: documentation and/or other materials provided with the distribution.
26: 3. All advertising materials mentioning features or use of this software
27: must display the following acknowledgement:
28: This product includes software developed by Michael Pounov <misho@elwix.org>
29: ELWIX - Embedded LightWeight unIX and its contributors.
30: 4. Neither the name of AITNET nor the names of its contributors
31: may be used to endorse or promote products derived from this software
32: without specific prior written permission.
33:
34: THIS SOFTWARE IS PROVIDED BY AITNET AND CONTRIBUTORS ``AS IS'' AND
35: ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
36: IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
37: ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
38: FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
39: DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
40: OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
41: HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
42: LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
43: OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
44: SUCH DAMAGE.
45: */
46: #include "global.h"
47:
48:
49: static inline struct tagCfg *
50: _selectAttribute(cfg_root_t * __restrict cfg, const char *csSec, const char *csAttr)
51: {
52: struct tagCfg fav;
53:
54: if (!cfg)
55: return NULL;
56: else
57: memset(&fav, 0, sizeof fav);
58:
59: if (csSec && *csSec)
60: AIT_KEY(&fav.cfg_sec) = crcFletcher16((u_short*) csSec,
61: io_align(strlen(csSec), 1) / 2);
62: if (csAttr)
63: AIT_KEY(&fav.cfg_attr) = crcFletcher16((u_short*) csAttr,
64: io_align(strlen(csAttr), 1) / 2);
65:
66: /*
67: struct tagCfg *av;
68:
69: RB_FOREACH(av, tagRC, cfg) {
70: printf("sec=%s(%d) attr=%s(%d) val=%s\n", AIT_GET_LIKE(&av->cfg_sec, char*), AIT_KEY(&av->cfg_sec),
71: AIT_GET_LIKE(&av->cfg_attr, char*), AIT_KEY(&av->cfg_attr), AIT_GET_STR(&av->cfg_val));
72: }
73:
74: printf("ssss=%d aaaa=%d\n", AIT_KEY(&fav.cfg_sec), AIT_KEY(&fav.cfg_attr));
75: */
76: if (!csAttr)
77: return RB_NFIND(tagRC, cfg, &fav);
78: else
79: return RB_FIND(tagRC, cfg, &fav);
80: }
81:
82: static inline void
83: _destroyAttribute(struct tagCfg *av)
84: {
85: if (!av)
86: return;
87:
88: AIT_FREE_VAL(&av->cfg_val);
89: AIT_FREE_VAL(&av->cfg_attr);
90: AIT_FREE_VAL(&av->cfg_sec);
91: free(av);
92: }
93:
94: // ----------------------------------------------
95:
96: /*
97: * cfg_findAttribute() - Find attribute position in config file
98: *
99: * @cfg = Config root
100: * @csSec = Config section //[{csSec}]
101: * @csAttr = Config attribute //{csAttr} = ...
102: * return: 0 not found item, -1 error or >0 position in list
103: */
104: inline int
105: cfg_findAttribute(cfg_root_t * __restrict cfg, const char *csSec, const char *csAttr)
106: {
107: struct tagCfg *av, fav;
108: register int cx = 0;
109:
110: if (!cfg || !csAttr) {
111: cfg_SetErr(EINVAL, "Invalid argument(s)");
112: return -1;
113: } else
114: memset(&fav, 0, sizeof fav);
115:
116: if (csSec && *csSec)
117: AIT_KEY(&fav.cfg_sec) = crcFletcher16((u_short*) csSec,
118: io_align(strlen(csSec), 1) / 2);
119: if (csAttr)
120: AIT_KEY(&fav.cfg_attr) = crcFletcher16((u_short*) csAttr,
121: io_align(strlen(csAttr), 1) / 2);
122:
123: SLIST_FOREACH(av, cfg, cfg_next) {
124: ++cx;
125: if (!cfg_tree_cmp(&fav, av))
126: return cx;
127: }
128:
129: return 0;
130: }
131: #if 0
132: /*
133: * cfg_UnsetAttribute() Unset item from config list and free resources
134: * @cfg = Head list element
135: * @csSec = Config section //[{csSec}], if NULL unset in *default* section
136: * @csAttr = Config attribute //{csAttr} = ..., if NULL unset as *any* attribute
137: * return: 0 item not found, -1 error: null parameters; >0 position in list
138: */
139: int cfg_UnsetAttribute(sl_config * __restrict cfg, const u_char *csSec, const u_char *csAttr)
140: {
141: struct tagPair *av, *curr;
142: register int cx = 0;
143:
144: if (!cfg || !csAttr)
145: return -1;
146:
147: av = SelectAttribute(cfg, csSec, csAttr);
148: if (!av)
149: return 0;
150:
151: // remove element
152: // remove element when is first!
153: if (cfg->slh_first == av) {
154: cfg->slh_first = cfg->slh_first->sle_next;
155:
156: DestroyAttribute(av);
157: return 1;
158: }
159: // remove element in other cases...
160: curr = cfg->slh_first;
161: while (curr->sle_next != av) {
162: ++cx;
163: curr = curr->sle_next;
164: }
165: curr->sle_next = curr->sle_next->sle_next;
166:
167: DestroyAttribute(av);
168: return cx;
169: }
170: #endif
171:
172: /*
173: * cfg_setAttribute() - Set item in config or adding new item if not exists
174: *
175: * @cfg = Config root
176: * @csSec = Config section //[{csSec}], if NULL set in *default* section
177: * @csAttr = Config attribute //{csAttr} = ...
178: * @csVal = Config value //... = {csVal} to setup
179: * return: 0 nothing changed, -1 error, 1 found and updated item or 2 added new item
180: */
181: int
182: cfg_setAttribute(cfg_root_t * __restrict cfg, const char *csSec, const char *csAttr, const char *csVal)
183: {
184: struct tagCfg *av, *section;
185:
186: if (!cfg || !csAttr || !csVal)
187: return -1;
188:
189: av = _selectAttribute(cfg, csSec, csAttr);
190: if (!av) {
191: /* adding new element */
192: section = _selectAttribute(cfg, csSec, NULL);
193:
194: av = malloc(sizeof(struct tagCfg));
195: if (!av) {
196: LOGERR;
197: return -1;
198: } else {
199: memset(av, 0, sizeof(struct tagCfg));
200:
201: CFG_RC_LOCK(cfg);
202: if (!section)
203: SLIST_INSERT_HEAD(cfg, av, cfg_next);
204: else
205: SLIST_INSERT_AFTER(section, av, cfg_next);
206: CFG_RC_UNLOCK(cfg);
207: }
208:
209: if (csSec && *csSec) {
210: AIT_SET_STR(&av->cfg_sec, csSec);
211: AIT_KEY(&av->cfg_sec) = crcFletcher16(AIT_GET_LIKE(&av->cfg_sec, u_short*),
212: io_align(AIT_LEN(&av->cfg_sec) - 1, 1) / 2);
213: }
214: AIT_SET_STR(&av->cfg_val, csVal);
215: AIT_SET_STR(&av->cfg_attr, csAttr);
216: AIT_KEY(&av->cfg_attr) = crcFletcher16(AIT_GET_LIKE(&av->cfg_attr, u_short*),
217: io_align(AIT_LEN(&av->cfg_attr) - 1, 1) / 2);
218:
219: CFG_RC_LOCK(cfg);
220: RB_INSERT(tagRC, cfg, av);
221: CFG_RC_UNLOCK(cfg);
222: return 2;
223: }
224:
225: if (strcmp((char*) csVal, (char*) AIT_GET_STR(&av->cfg_val))) {
226: /* Update element */
227: AIT_FREE_VAL(&av->cfg_val);
228: AIT_SET_STR(&av->cfg_val, csVal);
229: return 1;
230: }
231:
232: /* Nothing happens ... found & values is equal! */
233: return 0;
234: }
235:
236: /*
237: * cfg_getAttribute() - Get item from config and return value from it
238: *
239: * @cfg = Config root
240: * @csSec = Config section //[{csSec}], if NULL unset in *default* section
241: * @csAttr = Config attribute //{csAttr} = ..., if NULL unset as *any* attribute
242: * return: NULL item not found or null parameters, !=NULL value const string
243: */
244: inline const char *
245: cfg_getAttribute(cfg_root_t * __restrict cfg, const char *csSec, const char *csAttr)
246: {
247: struct tagCfg *av;
248:
249: if (!cfg || !csAttr)
250: return NULL;
251:
252: av = _selectAttribute(cfg, csSec, csAttr);
253: if (!av)
254: return NULL;
255:
256: return AIT_GET_STR(&av->cfg_val);
257: }
258: #if 0
259: // --------------------------------------------------------------
260:
261: /*
262: * cfg_LoadAttribute() Extended get attribute, if not found item return *default value*
263: * @cfg = Head list element
264: * @csSec = Config section //[{csSec}], if NULL unset in *default* section
265: * @csAttr = Config attribute //{csAttr} = ..., if NULL unset as *any* attribute
266: * @psVal = Return buffer for item Value //... = {psVal}
267: * @ValLen = Length of buffer //{psVal} for return
268: * @csDefValue = *Default Value* for return in //{psVal}, if not found item in config list
269: * return: 0 item not found, -1 error: null parameters; >0 number of copied bytes in //{psVal}
270: */
271: int cfg_LoadAttribute(sl_config * __restrict cfg, const u_char *csSec, const u_char *csAttr,
272: u_char * __restrict psVal, int ValLen, const char *csDefValue)
273: {
274: struct tagPair *av;
275: int ret = 0;
276:
277: if (!cfg || !csAttr || !ValLen || !psVal)
278: return -1;
279:
280: av = SelectAttribute(cfg, csSec, csAttr);
281: if (!av) {
282: if (csDefValue) {
283: strlcpy((char*) psVal, csDefValue, ValLen);
284: ret = strlen((char*) psVal);
285: }
286:
287: return ret;
288: }
289:
290: if (!av->psValue || !*av->psValue) {
291: if (csDefValue) {
292: strlcpy((char*) psVal, csDefValue, ValLen);
293: ret = strlen((char*) psVal);
294: }
295: } else {
296: strlcpy((char*) psVal, (char*) av->psValue, ValLen);
297: ret = strlen((char*) psVal);
298: }
299:
300: return ret;
301: }
302: #endif
FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>