contrib/libucl/tests/test_streamline.c

   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         const char *fname_out = NULL;
  35         struct ucl_emitter_context *ctx;
  36         struct ucl_emitter_functions *f;
  37         int ret = 0;
  38
  39         switch (argc) {
  40         case 2:
  41                 fname_out = argv[1];
  42                 break;
  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
  57         /* Create some strings */
  58         cur = ucl_object_fromstring_common ("  test string    ", 0, UCL_STRING_TRIM);
  59         ucl_object_insert_key (obj, cur, "key1", 0, false);
  60         cur = ucl_object_fromstring_common ("  test \nstring\n    ", 0, UCL_STRING_TRIM | UCL_STRING_ESCAPE);
  61         ucl_object_insert_key (obj, cur, "key2", 0, false);
  62         cur = ucl_object_fromstring_common ("  test string    \n", 0, 0);
  63         ucl_object_insert_key (obj, cur, "key3", 0, false);
  64
  65         f = ucl_object_emit_file_funcs (out);
  66         ctx = ucl_object_emit_streamline_new (obj, UCL_EMIT_CONFIG, f);
  67
  68         assert (ctx != NULL);
  69
  70         /* Array of numbers */
  71         ar = ucl_object_typed_new (UCL_ARRAY);
  72         ar->key = "key4";
  73         ar->keylen = sizeof ("key4") - 1;
  74
  75         ucl_object_emit_streamline_start_container (ctx, ar);
  76         cur = ucl_object_fromint (10);
  77         ucl_object_emit_streamline_add_object (ctx, cur);
  78         cur = ucl_object_fromdouble (10.1);
  79         ucl_object_emit_streamline_add_object (ctx, cur);
  80         cur = ucl_object_fromdouble (9.999);
  81         ucl_object_emit_streamline_add_object (ctx, cur);
  82
  83
  84         ucl_object_emit_streamline_end_container (ctx);
  85         ucl_object_emit_streamline_finish (ctx);
  86         ucl_object_emit_funcs_free (f);
  87         ucl_object_unref (obj);
  88
  89         fclose (out);
  90
  91         return ret;
  92 }