1 /* Copyright (c) 2014, Vsevolod Stakhov
2 * All rights reserved.
3 *
4 * Redistribution and use in source and binary forms, with or without
5 * modification, are permitted provided that the following conditions are met:
6 * * Redistributions of source code must retain the above copyright
7 * notice, this list of conditions and the following disclaimer.
8 * * Redistributions in binary form must reproduce the above copyright
9 * notice, this list of conditions and the following disclaimer in the
10 * documentation and/or other materials provided with the distribution.
11 *
12 * THIS SOFTWARE IS PROVIDED ''AS IS'' AND ANY
13 * EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED
14 * WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE
15 * DISCLAIMED. IN NO EVENT SHALL AUTHOR BE LIABLE FOR ANY
16 * DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES
17 * (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;
18 * LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND
19 * ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
20 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
21 * SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
22 */
23
24 #ifdef HAVE_CONFIG_H
25 #include "config.h"
26 #endif
27
28 #include "ucl.h"
29 #include "ucl_internal.h"
30 #include "ucl_chartable.h"
31
32 struct ucl_emitter_streamline_stack {
33 bool is_array;
34 bool empty;
35 const ucl_object_t *obj;
36 struct ucl_emitter_streamline_stack *next;
37 };
38
39 struct ucl_emitter_context_streamline {
40 /* Inherited from the main context */
41 const char *name;
42 int id;
43 const struct ucl_emitter_functions *func;
44 const struct ucl_emitter_operations *ops;
45 unsigned int ident;
46 const ucl_object_t *top;
47
48 /* Streamline specific fields */
49 struct ucl_emitter_streamline_stack *containers;
50 };
51
52 #define TO_STREAMLINE(ctx) (struct ucl_emitter_context_streamline *)(ctx)
53
54 struct ucl_emitter_context*
ucl_object_emit_streamline_new(const ucl_object_t * obj,enum ucl_emitter emit_type,struct ucl_emitter_functions * emitter)55 ucl_object_emit_streamline_new (const ucl_object_t *obj,
56 enum ucl_emitter emit_type,
57 struct ucl_emitter_functions *emitter)
58 {
59 const struct ucl_emitter_context *ctx;
60 struct ucl_emitter_context_streamline *sctx;
61
62 ctx = ucl_emit_get_standard_context (emit_type);
63 if (ctx == NULL) {
64 return NULL;
65 }
66
67 sctx = calloc (1, sizeof (*sctx));
68 if (sctx == NULL) {
69 return NULL;
70 }
71
72 memcpy (sctx, ctx, sizeof (*ctx));
73 sctx->func = emitter;
74 sctx->top = obj;
75
76 ucl_object_emit_streamline_start_container ((struct ucl_emitter_context *)sctx,
77 obj);
78
79 return (struct ucl_emitter_context *)sctx;
80 }
81
82 void
ucl_object_emit_streamline_start_container(struct ucl_emitter_context * ctx,const ucl_object_t * obj)83 ucl_object_emit_streamline_start_container (struct ucl_emitter_context *ctx,
84 const ucl_object_t *obj)
85 {
86 struct ucl_emitter_context_streamline *sctx = TO_STREAMLINE(ctx);
87 struct ucl_emitter_streamline_stack *st, *top;
88 bool print_key = false;
89
90 /* Check top object presence */
91 if (sctx->top == NULL) {
92 sctx->top = obj;
93 }
94
95 top = sctx->containers;
96 st = malloc (sizeof (*st));
97 if (st != NULL) {
98 if (top != NULL && !top->is_array) {
99 print_key = true;
100 }
101 st->empty = true;
102 st->obj = obj;
103 if (obj != NULL && obj->type == UCL_ARRAY) {
104 st->is_array = true;
105 sctx->ops->ucl_emitter_start_array (ctx, obj, print_key);
106 }
107 else {
108 st->is_array = false;
109 sctx->ops->ucl_emitter_start_object (ctx, obj, print_key);
110 }
111 LL_PREPEND (sctx->containers, st);
112 }
113 }
114
115 void
ucl_object_emit_streamline_add_object(struct ucl_emitter_context * ctx,const ucl_object_t * obj)116 ucl_object_emit_streamline_add_object (
117 struct ucl_emitter_context *ctx, const ucl_object_t *obj)
118 {
119 struct ucl_emitter_context_streamline *sctx = TO_STREAMLINE(ctx);
120 bool is_array = false, is_first = false;
121
122 if (sctx->containers != NULL) {
123 if (sctx->containers->is_array) {
124 is_array = true;
125 }
126 if (sctx->containers->empty) {
127 is_first = true;
128 sctx->containers->empty = false;
129 }
130 }
131
132 sctx->ops->ucl_emitter_write_elt (ctx, obj, is_first, !is_array);
133 }
134
135 void
ucl_object_emit_streamline_end_container(struct ucl_emitter_context * ctx)136 ucl_object_emit_streamline_end_container (struct ucl_emitter_context *ctx)
137 {
138 struct ucl_emitter_context_streamline *sctx = TO_STREAMLINE(ctx);
139 struct ucl_emitter_streamline_stack *st;
140
141 if (sctx->containers != NULL) {
142 st = sctx->containers;
143
144 if (st->is_array) {
145 sctx->ops->ucl_emitter_end_array (ctx, st->obj);
146 }
147 else {
148 sctx->ops->ucl_emitter_end_object (ctx, st->obj);
149 }
150 sctx->containers = st->next;
151 free (st);
152 }
153 }
154
155 void
ucl_object_emit_streamline_finish(struct ucl_emitter_context * ctx)156 ucl_object_emit_streamline_finish (struct ucl_emitter_context *ctx)
157 {
158 struct ucl_emitter_context_streamline *sctx = TO_STREAMLINE(ctx);
159
160 while (sctx->containers != NULL) {
161 ucl_object_emit_streamline_end_container (ctx);
162 }
163
164 free (sctx);
165 }
166