about summary refs log tree commit diff
path: root/src/libexpr/value-to-json.cc
blob: 671a3c1197413f1b485aa561f8de3b7b743d5397 (plain) (blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
#include "value-to-xml.hh"
#include "xml-writer.hh"
#include "eval-inline.hh"
#include "util.hh"

#include <cstdlib>


namespace nix {


static void escapeJSON(std::ostream & str, const string & s)
{
    str << "\"";
    foreach (string::const_iterator, i, s)
        if (*i == '\"' || *i == '\\') str << "\\" << *i;
        else if (*i == '\n') str << "\\n";
        else if (*i == '\r') str << "\\r";
        else if (*i == '\t') str << "\\t";
        else str << *i;
    str << "\"";
}


void printValueAsJSON(EvalState & state, bool strict,
    Value & v, std::ostream & str, PathSet & context)
{
    checkInterrupt();

    if (strict) state.forceValue(v);

    switch (v.type) {

        case tInt:
            str << v.integer;
            break;

        case tBool:
            str << (v.boolean ? "true" : "false");
            break;

        case tString:
            copyContext(v, context);
            escapeJSON(str, v.string.s);
            break;

        case tPath:
            escapeJSON(str, state.copyPathToStore(context, v.path));
            break;

        case tNull:
            str << "null";
            break;

        case tAttrs: {
            Bindings::iterator i = v.attrs->find(state.sOutPath);
            if (i == v.attrs->end()) {
                str << "{";
                StringSet names;
                foreach (Bindings::iterator, i, *v.attrs)
                    names.insert(i->name);
                bool first = true;
                foreach (StringSet::iterator, i, names) {
                    if (!first) str << ","; else first = false;
                    Attr & a(*v.attrs->find(state.symbols.create(*i)));
                    escapeJSON(str, *i);
                    str << ":";
                    printValueAsJSON(state, strict, *a.value, str, context);
                }
                str << "}";
            } else
                printValueAsJSON(state, strict, *i->value, str, context);
            break;
        }

        case tList: {
            str << "[";
            bool first = true;
            for (unsigned int n = 0; n < v.list.length; ++n) {
                if (!first) str << ","; else first = false;
                printValueAsJSON(state, strict, *v.list.elems[n], str, context);
            }
            str << "]";
            break;
        }

        default:
            throw TypeError(format("cannot convert %1% to JSON") % showType(v));
    }
}


}