test_generate.c (1709ccf9d38a5753192420ce5fccd93b04ce4d07) test_generate.c (b04a7a0baf6523245034b8ccd06cd0176b8a18cf)
1/* Copyright (c) 2013, 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

--- 15 unchanged lines hidden (view full) ---

24#include <stdio.h>
25#include <errno.h>
26#include <assert.h>
27#include "ucl.h"
28
29int
30main (int argc, char **argv)
31{
1/* Copyright (c) 2013, 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

--- 15 unchanged lines hidden (view full) ---

24#include <stdio.h>
25#include <errno.h>
26#include <assert.h>
27#include "ucl.h"
28
29int
30main (int argc, char **argv)
31{
32 ucl_object_t *obj, *cur, *ar;
32 ucl_object_t *obj, *cur, *ar, *ref;
33 FILE *out;
34 unsigned char *emitted;
35 const char *fname_out = NULL;
36 int ret = 0;
37
38 switch (argc) {
39 case 2:
40 fname_out = argv[1];

--- 9 unchanged lines hidden (view full) ---

50 }
51 else {
52 out = stdout;
53 }
54
55 obj = ucl_object_typed_new (UCL_OBJECT);
56 /* Create some strings */
57 cur = ucl_object_fromstring_common (" test string ", 0, UCL_STRING_TRIM);
33 FILE *out;
34 unsigned char *emitted;
35 const char *fname_out = NULL;
36 int ret = 0;
37
38 switch (argc) {
39 case 2:
40 fname_out = argv[1];

--- 9 unchanged lines hidden (view full) ---

50 }
51 else {
52 out = stdout;
53 }
54
55 obj = ucl_object_typed_new (UCL_OBJECT);
56 /* Create some strings */
57 cur = ucl_object_fromstring_common (" test string ", 0, UCL_STRING_TRIM);
58 obj = ucl_object_insert_key (obj, cur, "key1", 0, false);
58 ucl_object_insert_key (obj, cur, "key1", 0, false);
59 cur = ucl_object_fromstring_common (" test \nstring\n ", 0, UCL_STRING_TRIM | UCL_STRING_ESCAPE);
59 cur = ucl_object_fromstring_common (" test \nstring\n ", 0, UCL_STRING_TRIM | UCL_STRING_ESCAPE);
60 obj = ucl_object_insert_key (obj, cur, "key2", 0, false);
60 ucl_object_insert_key (obj, cur, "key2", 0, false);
61 cur = ucl_object_fromstring_common (" test string \n", 0, 0);
61 cur = ucl_object_fromstring_common (" test string \n", 0, 0);
62 obj = ucl_object_insert_key (obj, cur, "key3", 0, false);
62 ucl_object_insert_key (obj, cur, "key3", 0, false);
63 /* Array of numbers */
63 /* Array of numbers */
64 ar = ucl_object_typed_new (UCL_ARRAY);
64 cur = ucl_object_fromint (10);
65 cur = ucl_object_fromint (10);
65 ar = ucl_array_append (NULL, cur);
66 ucl_array_append (ar, cur);
66 cur = ucl_object_fromdouble (10.1);
67 cur = ucl_object_fromdouble (10.1);
67 ar = ucl_array_append (ar, cur);
68 ucl_array_append (ar, cur);
68 cur = ucl_object_fromdouble (9.999);
69 cur = ucl_object_fromdouble (9.999);
69 ar = ucl_array_prepend (ar, cur);
70 ucl_array_prepend (ar, cur);
70
71 /* Removing from an array */
72 cur = ucl_object_fromdouble (1.0);
71
72 /* Removing from an array */
73 cur = ucl_object_fromdouble (1.0);
73 ar = ucl_array_append (ar, cur);
74 ucl_array_append (ar, cur);
74 cur = ucl_array_delete (ar, cur);
75 assert (ucl_object_todouble (cur) == 1.0);
76 ucl_object_unref (cur);
77 cur = ucl_object_fromdouble (2.0);
75 cur = ucl_array_delete (ar, cur);
76 assert (ucl_object_todouble (cur) == 1.0);
77 ucl_object_unref (cur);
78 cur = ucl_object_fromdouble (2.0);
78 ar = ucl_array_append (ar, cur);
79 ucl_array_append (ar, cur);
79 cur = ucl_array_pop_last (ar);
80 assert (ucl_object_todouble (cur) == 2.0);
81 ucl_object_unref (cur);
82 cur = ucl_object_fromdouble (3.0);
80 cur = ucl_array_pop_last (ar);
81 assert (ucl_object_todouble (cur) == 2.0);
82 ucl_object_unref (cur);
83 cur = ucl_object_fromdouble (3.0);
83 ar = ucl_array_prepend (ar, cur);
84 ucl_array_prepend (ar, cur);
84 cur = ucl_array_pop_first (ar);
85 assert (ucl_object_todouble (cur) == 3.0);
86 ucl_object_unref (cur);
87
85 cur = ucl_array_pop_first (ar);
86 assert (ucl_object_todouble (cur) == 3.0);
87 ucl_object_unref (cur);
88
88 obj = ucl_object_insert_key (obj, ar, "key4", 0, false);
89 ucl_object_insert_key (obj, ar, "key4", 0, false);
89 cur = ucl_object_frombool (true);
90 cur = ucl_object_frombool (true);
90 obj = ucl_object_insert_key (obj, cur, "key4", 0, false);
91 /* Ref object to test refcounts */
92 ref = ucl_object_ref (cur);
93 ucl_object_insert_key (obj, cur, "key4", 0, false);
91 /* Empty strings */
92 cur = ucl_object_fromstring_common (" ", 0, UCL_STRING_TRIM);
94 /* Empty strings */
95 cur = ucl_object_fromstring_common (" ", 0, UCL_STRING_TRIM);
93 obj = ucl_object_insert_key (obj, cur, "key5", 0, false);
96 ucl_object_insert_key (obj, cur, "key5", 0, false);
94 cur = ucl_object_fromstring_common ("", 0, UCL_STRING_ESCAPE);
97 cur = ucl_object_fromstring_common ("", 0, UCL_STRING_ESCAPE);
95 obj = ucl_object_insert_key (obj, cur, "key6", 0, false);
98 ucl_object_insert_key (obj, cur, "key6", 0, false);
96 cur = ucl_object_fromstring_common (" \n", 0, UCL_STRING_ESCAPE);
99 cur = ucl_object_fromstring_common (" \n", 0, UCL_STRING_ESCAPE);
97 obj = ucl_object_insert_key (obj, cur, "key7", 0, false);
100 ucl_object_insert_key (obj, cur, "key7", 0, false);
98 /* Numbers and booleans */
99 cur = ucl_object_fromstring_common ("1mb", 0, UCL_STRING_ESCAPE | UCL_STRING_PARSE);
101 /* Numbers and booleans */
102 cur = ucl_object_fromstring_common ("1mb", 0, UCL_STRING_ESCAPE | UCL_STRING_PARSE);
100 obj = ucl_object_insert_key (obj, cur, "key8", 0, false);
103 ucl_object_insert_key (obj, cur, "key8", 0, false);
101 cur = ucl_object_fromstring_common ("3.14", 0, UCL_STRING_PARSE);
104 cur = ucl_object_fromstring_common ("3.14", 0, UCL_STRING_PARSE);
102 obj = ucl_object_insert_key (obj, cur, "key9", 0, false);
105 ucl_object_insert_key (obj, cur, "key9", 0, false);
103 cur = ucl_object_fromstring_common ("true", 0, UCL_STRING_PARSE);
106 cur = ucl_object_fromstring_common ("true", 0, UCL_STRING_PARSE);
104 obj = ucl_object_insert_key (obj, cur, "key10", 0, false);
107 ucl_object_insert_key (obj, cur, "key10", 0, false);
105 cur = ucl_object_fromstring_common (" off ", 0, UCL_STRING_PARSE | UCL_STRING_TRIM);
108 cur = ucl_object_fromstring_common (" off ", 0, UCL_STRING_PARSE | UCL_STRING_TRIM);
106 obj = ucl_object_insert_key (obj, cur, "key11", 0, false);
109 ucl_object_insert_key (obj, cur, "key11", 0, false);
107 cur = ucl_object_fromstring_common ("gslin@gslin.org", 0, UCL_STRING_PARSE_INT);
110 cur = ucl_object_fromstring_common ("gslin@gslin.org", 0, UCL_STRING_PARSE_INT);
108 obj = ucl_object_insert_key (obj, cur, "key12", 0, false);
111 ucl_object_insert_key (obj, cur, "key12", 0, false);
109 cur = ucl_object_fromstring_common ("#test", 0, UCL_STRING_PARSE_INT);
112 cur = ucl_object_fromstring_common ("#test", 0, UCL_STRING_PARSE_INT);
110 obj = ucl_object_insert_key (obj, cur, "key13", 0, false);
113 ucl_object_insert_key (obj, cur, "key13", 0, false);
111 cur = ucl_object_frombool (true);
114 cur = ucl_object_frombool (true);
112 obj = ucl_object_insert_key (obj, cur, "k=3", 0, false);
115 ucl_object_insert_key (obj, cur, "k=3", 0, false);
113
116
114
115 emitted = ucl_object_emit (obj, UCL_EMIT_CONFIG);
116
117 fprintf (out, "%s\n", emitted);
118 ucl_object_unref (obj);
119
120 if (emitted != NULL) {
121 free (emitted);
122 }
123 fclose (out);
124
117 emitted = ucl_object_emit (obj, UCL_EMIT_CONFIG);
118
119 fprintf (out, "%s\n", emitted);
120 ucl_object_unref (obj);
121
122 if (emitted != NULL) {
123 free (emitted);
124 }
125 fclose (out);
126
127 /* Ref should still be accessible */
128 ref->value.iv = 100500;
129 ucl_object_unref (ref);
130
125 return ret;
126}
131 return ret;
132}