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 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 #include <stdio.h> 25 #include <errno.h> 26 #include <assert.h> 27 #include "ucl.h" 28 29 int 30 main (int argc, char **argv) 31 { 32 ucl_object_t *obj, *cur, *ar; 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]; 41 break; 42 } 43 44 45 if (fname_out != NULL) { 46 out = fopen (fname_out, "w"); 47 if (out == NULL) { 48 exit (-errno); 49 } 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); 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); 61 cur = ucl_object_fromstring_common (" test string \n", 0, 0); 62 obj = ucl_object_insert_key (obj, cur, "key3", 0, false); 63 /* Array of numbers */ 64 cur = ucl_object_fromint (10); 65 ar = ucl_array_append (NULL, cur); 66 cur = ucl_object_fromdouble (10.1); 67 ar = ucl_array_append (ar, cur); 68 cur = ucl_object_fromdouble (9.999); 69 ar = ucl_array_prepend (ar, cur); 70 71 /* Removing from an array */ 72 cur = ucl_object_fromdouble (1.0); 73 ar = 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); 78 ar = 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); 83 ar = 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 88 obj = ucl_object_insert_key (obj, ar, "key4", 0, false); 89 cur = ucl_object_frombool (true); 90 obj = ucl_object_insert_key (obj, cur, "key4", 0, false); 91 /* Empty strings */ 92 cur = ucl_object_fromstring_common (" ", 0, UCL_STRING_TRIM); 93 obj = ucl_object_insert_key (obj, cur, "key5", 0, false); 94 cur = ucl_object_fromstring_common ("", 0, UCL_STRING_ESCAPE); 95 obj = ucl_object_insert_key (obj, cur, "key6", 0, false); 96 cur = ucl_object_fromstring_common (" \n", 0, UCL_STRING_ESCAPE); 97 obj = 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); 100 obj = ucl_object_insert_key (obj, cur, "key8", 0, false); 101 cur = ucl_object_fromstring_common ("3.14", 0, UCL_STRING_PARSE); 102 obj = ucl_object_insert_key (obj, cur, "key9", 0, false); 103 cur = ucl_object_fromstring_common ("true", 0, UCL_STRING_PARSE); 104 obj = ucl_object_insert_key (obj, cur, "key10", 0, false); 105 cur = ucl_object_fromstring_common (" off ", 0, UCL_STRING_PARSE | UCL_STRING_TRIM); 106 obj = ucl_object_insert_key (obj, cur, "key11", 0, false); 107 cur = ucl_object_fromstring_common ("gslin@gslin.org", 0, UCL_STRING_PARSE_INT); 108 obj = ucl_object_insert_key (obj, cur, "key12", 0, false); 109 cur = ucl_object_fromstring_common ("#test", 0, UCL_STRING_PARSE_INT); 110 obj = ucl_object_insert_key (obj, cur, "key13", 0, false); 111 cur = ucl_object_frombool (true); 112 obj = ucl_object_insert_key (obj, cur, "k=3", 0, false); 113 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 125 return ret; 126 } 127