aboutsummaryrefslogtreecommitdiff
path: root/static/ts/jcal.ts
blob: feac297ba4c93c2ff29ca2f0bf4ee9258af45be7 (plain)
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
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
/**
   Operations for working with jCal.

   jCal is defined in RFC 7265, and is a JSON mapping of the iCalendar standard.
*/


export { jcal_to_xcal }

import { xcal, ical_type, JCalProperty, JCal } from './types'
import { asList } from './lib'

/**
 * A document with the xcal namespace, and @code{icalendar} as its root
 * element. Each child is a valid xcal representation of our JCal object.
 */
function jcal_type_to_xcal(doc: Document, type: ical_type, value: any): Element {
    let el = doc.createElementNS(xcal, type);
    switch (type) {
        case 'boolean':
            el.textContent = value ? "true" : "false";
            break;

        case 'float':
        case 'integer':
            el.textContent = '' + value;
            break;

        case 'period':
            let [start, end] = value;
            let startEl = doc.createElementNS(xcal, 'start');
            startEl.textContent = start;
            let endEl: Element;
            if (end.find('P')) {
                endEl = doc.createElementNS(xcal, 'duration');
            } else {
                endEl = doc.createElementNS(xcal, 'end');
            }
            endEl.textContent = end;
            el.appendChild(startEl);
            el.appendChild(endEl);
            break;

        case 'recur':
            for (var key in value) {
                if (!value.hasOwnProperty(key)) continue;
                if (key === 'byday') {
                    for (let v of value[key]) {
                        let e = doc.createElementNS(xcal, key);
                        e.textContent = v;
                        el.appendChild(e);
                    }
                } else {
                    let e = doc.createElementNS(xcal, key);
                    e.textContent = value[key];
                    el.appendChild(e);
                }
            }
            break;

        case 'date':
        // case 'time':
        case 'date-time':

        case 'duration':

        case 'binary':
        case 'text':
        case 'uri':
        case 'cal-address':
        case 'utc-offset':
            el.textContent = value;
            break;

        default:
        /* TODO error */
    }
    return el;
}

function jcal_property_to_xcal_property(
    doc: Document,
    jcal: JCalProperty
): Element {
    let [propertyName, params, type, ...values] = jcal;

    let tag = doc.createElementNS(xcal, propertyName);

    /* setup parameters */
    let paramEl = doc.createElementNS(xcal, 'params');
    for (var key in params) {
        /* Check if the key actually belongs to us.
           At least (my) format also appears when iterating
           over the parameters. Probably a case of builtins
           vs user defined.

           This is also the reason we can't check if params
           is empty beforehand, and instead check the
           number of children of paramEl below.
        */
        if (!params.hasOwnProperty(key)) continue;

        let el = doc.createElementNS(xcal, key);

        for (let v of asList(params.get(key))) {
            let text = doc.createElementNS(xcal, 'text');
            text.textContent = '' + v;
            el.appendChild(text);
        }

        paramEl.appendChild(el);
    }

    if (paramEl.childElementCount > 0) {
        tag.appendChild(paramEl);
    }

    /* setup value (and type) */
    // let typeEl = doc.createElementNS(xcal, type);

    switch (propertyName) {
        case 'geo':
            if (type == 'float') {
                // assert values[0] == [x, y]
                let [x, y] = values[0];
                let lat = doc.createElementNS(xcal, 'latitude')
                let lon = doc.createElementNS(xcal, 'longitude')
                lat.textContent = x;
                lon.textContent = y;
                tag.appendChild(lat);
                tag.appendChild(lon);
            } else {
                /* TODO, error */
            }
            break;
        /* TODO reenable this
    case 'request-status':
        if (type == 'text') {
            // assert values[0] instanceof Array
            let [code, desc, ...data] = values[0];
            let codeEl = doc.createElementNS(xcal, 'code')
            code.textContent = code;
            tag.appendChild(codeEl);


            let descEl = doc.createElementNS(xcal, 'description')
            desc.textContent = desc;
            tag.appendChild(descEl);

            if (data !== []) {
                data = data[0];
                let dataEl = doc.createElementNS(xcal, 'data')
                data.textContent = data;
                tag.appendChild(dataEl);
            }
        } else {
            /* TODO, error * /
        }
        break;
        */
        default:
            for (let value of values) {
                tag.appendChild(jcal_type_to_xcal(doc, type, value))
            }
    }

    return tag;
}


/**
   Convert a jCal document into an xCal document.

   @param jcals A list of jcal components. Most iCal formats supports multiple
   "root" levels components. jCal might do it, which is why this parameter is
   multi-valued.

   @return A document note which is the root of an xCal document.
   The root will be an icalendar tag, with each child getting its data from each
   element of the input.
   */
function jcal_to_xcal(...jcals: JCal[]): Document {
    let doc = document.implementation.createDocument(xcal, 'icalendar');
    for (let jcal of jcals) {
        doc.documentElement.appendChild(jcal_to_xcal_inner(doc, jcal));
    }
    return doc;
}

/**
   Convert a single jCal entry into a single xCal entry.

   @param doc
   A Document element in the xcal namespace.

   @param jcal
   The object to convert

   @return
   A 1-to-1 mapping of the jCal object as xCal.
   */
function jcal_to_xcal_inner(doc: Document, jcal: JCal) {
    let [tagname, properties, components] = jcal;

    let xcal_tag = doc.createElementNS(xcal, tagname);

    /* I'm not sure if the properties and components tag should be left out
       when empty. It should however NOT be an error to leave them in.
    */

    let xcal_properties = doc.createElementNS(xcal, 'properties');
    for (let property of properties) {
        xcal_properties.appendChild(jcal_property_to_xcal_property(doc, property));
    }

    let xcal_children = doc.createElementNS(xcal, 'components');
    for (let child of components) {
        xcal_children.appendChild(jcal_to_xcal_inner(doc, child));
    }

    xcal_tag.appendChild(xcal_properties);
    xcal_tag.appendChild(xcal_children);

    return xcal_tag;

}