~azzar1/unity/add-show-desktop-key

« back to all changes in this revision

Viewing changes to www/media/common/util.js

  • Committer: drtomc
  • Date: 2007-12-05 22:06:57 UTC
  • Revision ID: svn-v3-trunk0:2b9c9e99-6f39-0410-b283-7f802c844ae2:trunk:6
Make a bunch of small changes suggested by Ivo.

Show diffs side-by-side

added added

removed removed

Lines of Context:
1
 
/* IVLE - Informatics Virtual Learning Environment
2
 
 * Copyright (C) 2007-2008 The University of Melbourne
3
 
 *
4
 
 * This program is free software; you can redistribute it and/or modify
5
 
 * it under the terms of the GNU General Public License as published by
6
 
 * the Free Software Foundation; either version 2 of the License, or
7
 
 * (at your option) any later version.
8
 
 *
9
 
 * This program is distributed in the hope that it will be useful,
10
 
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
11
 
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
12
 
 * GNU General Public License for more details.
13
 
 *
14
 
 * You should have received a copy of the GNU General Public License
15
 
 * along with this program; if not, write to the Free Software
16
 
 * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA  02110-1301  USA
17
 
 *
18
 
 * Module: JavaScript Utilities
19
 
 * Author: Matt Giuca
20
 
 * Date: 11/1/2008
21
 
 *
22
 
 * Defines some generic JavaScript utility functions.
23
 
 */
24
 
 
25
 
/* Expects the following variables to have been declared by JavaScript in
26
 
 * the HTML generated by the server:
27
 
 * - root_dir
28
 
 * - username
29
 
 */
30
 
 
31
 
/** Removes all children of a given DOM element
32
 
 * \param elem A DOM Element. Will be modified.
33
 
 */
34
 
function dom_removechildren(elem)
35
 
{
36
 
    while (elem.lastChild != null)
37
 
        elem.removeChild(elem.lastChild);
38
 
}
39
 
 
40
 
/** Creates a DOM element with simple text inside it.
41
 
 * \param tagname String. Name of the element's tag (eg. "p").
42
 
 * \param text String. Text to be placed inside the element.
43
 
 * \param title String, optional. Tooltip for the text.
44
 
 *  (Note, title creates a span element around the text).
45
 
 * \return DOM Element object.
46
 
 */
47
 
function dom_make_text_elem(tagname, text, title)
48
 
{
49
 
    if (text == null) text = "";
50
 
    var elem = document.createElement(tagname);
51
 
    var textnode;
52
 
    if (title == null)
53
 
        textnode = document.createTextNode(text);
54
 
    else
55
 
    {
56
 
        textnode = document.createElement("span");
57
 
        textnode.setAttribute("title", title);
58
 
        textnode.appendChild(document.createTextNode(text));
59
 
    }
60
 
    elem.appendChild(textnode);
61
 
    return elem;
62
 
}
63
 
 
64
 
/** Creates a DOM element with hyperlinked text inside it.
65
 
 * \param tagname String. Name of the element's tag (eg. "p").
66
 
 * \param text String. Text to be placed inside the element.
67
 
 * \param title String, optional. Sets a tooltip for the link.
68
 
 * \param href String. URL the text will link to. This is a raw string,
69
 
 *  it will automatically be URL-encoded.
70
 
 * \param onclick Optional string. Will be set as the "onclick" attribute
71
 
 *  of the "a" element.
72
 
 * \param dontencode Optional boolean. If true, will not encode the href.
73
 
 *  if including query strings, you must set this to true and use build_url
74
 
 *  to escape the URI correctly.
75
 
 * \return DOM Element object.
76
 
 */
77
 
function dom_make_link_elem(tagname, text, title, href, onclick, dontencode)
78
 
{
79
 
    if (text == null) text = "";
80
 
    if (href == null) href = "";
81
 
    var elem = document.createElement(tagname);
82
 
    var link = document.createElement("a");
83
 
    if (dontencode != true)
84
 
        href = urlencode_path(href);
85
 
    link.setAttribute("href", href);
86
 
    if (title != null)
87
 
        link.setAttribute("title", title);
88
 
    if (onclick != null)
89
 
        link.setAttribute("onclick", onclick);
90
 
    link.appendChild(document.createTextNode(text));
91
 
    elem.appendChild(link);
92
 
    return elem;
93
 
}
94
 
 
95
 
/** Creates a DOM img element. All parameters are optional except src.
96
 
 * If alt (compulsory in HTML) is omitted, will be set to "".
97
 
 */
98
 
function dom_make_img(src, width, height, title, alt)
99
 
{
100
 
    var img = document.createElement("img");
101
 
    img.setAttribute("src", urlencode_path(src));
102
 
    if (width != null)
103
 
        img.setAttribute("width", width);
104
 
    if (height != null)
105
 
        img.setAttribute("height", height);
106
 
    if (title != null)
107
 
        img.setAttribute("title", title);
108
 
    if (alt == null) alt = "";
109
 
    img.setAttribute("alt", alt);
110
 
    return img;
111
 
}
112
 
 
113
 
/** Given a number of bytes, returns a string representing the file size in a
114
 
 * human-readable format.
115
 
 * eg. nice_filesize(6) -> "6 bytes"
116
 
 *     nice_filesize(81275) -> "79.4 kB"
117
 
 *     nice_filesize(13498346) -> "12.9 MB"
118
 
 * \param bytes Number of bytes. Must be an integer.
119
 
 * \return String.
120
 
 */
121
 
function nice_filesize(bytes)
122
 
{
123
 
    if (bytes == null) return "";
124
 
    var size;
125
 
    if (bytes < 1024)
126
 
        return bytes.toString() + " B";
127
 
    size = bytes / 1024;
128
 
    if (size < 1024)
129
 
        return size.toFixed(1) + " kB";
130
 
    size = size / 1024;
131
 
    if (size < 1024)
132
 
        return size.toFixed(1) + " MB";
133
 
    size = size / 1024;
134
 
    return size.toFixed(1) + " GB";
135
 
}
136
 
 
137
 
/** Given a URL, returns an object containing a number of attributes
138
 
 * describing the components of the URL, similar to CGI request variables.
139
 
 * The object has the following attributes:
140
 
 * - scheme
141
 
 * - server_name
142
 
 * - server_port
143
 
 * - path
144
 
 * - query_string
145
 
 * - args
146
 
 * The first five of these are strings, which comprise the URL as follows:
147
 
 * <scheme> "://" <server_name> ":" <server_port> <path> "?" <query_string>
148
 
 * Any of these strings may be set to null if not found.
149
 
 *
150
 
 * "args" is an object whose attributes are the query_string arguments broken
151
 
 * up.
152
 
 * Args values are strings for single values, arrays of strings for values
153
 
 * whose names appear multiple times.
154
 
 * args is never null, though it may be empty.
155
 
 *
156
 
 * All strings are decoded/unescaped. Reserved characters
157
 
 * (; , / ? : @ & = + * $) are not decoded except in args and path.
158
 
 *
159
 
 * \param url String. A URL. To read from the current browser window, use
160
 
 *  window.location.href.
161
 
 * \return The above described object.
162
 
 */
163
 
function parse_url(url)
164
 
{
165
 
    var obj = {};
166
 
    var index;
167
 
    var serverpart;
168
 
    var args;
169
 
 
170
 
    /* Split scheme from rest */
171
 
    index = url.indexOf("://");
172
 
    if (index < 0)
173
 
        obj.scheme = null;
174
 
    else
175
 
    {
176
 
        obj.scheme = url.substr(0, index);
177
 
        url = url.substr(index+3);
178
 
    }
179
 
 
180
 
    /* Split server name/port from rest */
181
 
    index = url.indexOf("/");
182
 
    if (index < 0)
183
 
    {
184
 
        serverpart = url;
185
 
        url = null;
186
 
    }
187
 
    else
188
 
    {
189
 
        serverpart = url.substr(0, index);
190
 
        url = url.substr(index);
191
 
    }
192
 
 
193
 
    /* Split server name from port */
194
 
    index = serverpart.indexOf(":");
195
 
    if (index < 0)
196
 
    {
197
 
        obj.server_name = serverpart;
198
 
        obj.server_port = null;
199
 
    }
200
 
    else
201
 
    {
202
 
        obj.server_name = serverpart.substr(0, index);
203
 
        obj.server_port = serverpart.substr(index+1);
204
 
    }
205
 
 
206
 
    /* Split path from query string */
207
 
    if (url == null)
208
 
    {
209
 
        obj.path = null;
210
 
        obj.query_string = null;
211
 
    }
212
 
    else
213
 
    {
214
 
        index = url.indexOf("?");
215
 
        if (index < 0)
216
 
        {
217
 
            obj.path = url;
218
 
            obj.query_string = null;
219
 
        }
220
 
        else
221
 
        {
222
 
            obj.path = url.substr(0, index);
223
 
            obj.query_string = url.substr(index+1);
224
 
        }
225
 
    }
226
 
    obj.path = decodeURIComponent(obj.path);
227
 
 
228
 
    /* Split query string into arguments */
229
 
    args = {};
230
 
    if (obj.query_string != null)
231
 
    {
232
 
        var args_strs = obj.query_string.split("&");
233
 
        var arg_str;
234
 
        var arg_key, arg_val;
235
 
        for (var i=0; i<args_strs.length; i++)
236
 
        {
237
 
            arg_str = args_strs[i];
238
 
            index = arg_str.indexOf("=");
239
 
            /* Ignore malformed args */
240
 
            if (index >= 0)
241
 
            {
242
 
                arg_key = decodeURIComponent(arg_str.substr(0, index));
243
 
                arg_val = decodeURIComponent(arg_str.substr(index+1));
244
 
                if (arg_key in args)
245
 
                {
246
 
                    /* Collision - make an array */
247
 
                    if (args[arg_key] instanceof Array)
248
 
                        args[arg_key][args[arg_key].length] = arg_val;
249
 
                    else
250
 
                        args[arg_key] = [args[arg_key], arg_val];
251
 
                }
252
 
                else
253
 
                    args[arg_key] = arg_val;
254
 
            }
255
 
        }
256
 
    }
257
 
    obj.args = args;
258
 
 
259
 
    return obj;
260
 
}
261
 
 
262
 
/** Builds a query_string from an args object. Encodes the arguments.
263
 
 * \param args Args object as described in parse_url.
264
 
 * \return Query string portion of a URL.
265
 
 */
266
 
function make_query_string(args)
267
 
{
268
 
    var query_string = "";
269
 
    var arg_val;
270
 
    for (var arg_key in args)
271
 
    {
272
 
        arg_val = args[arg_key];
273
 
        if (arg_val instanceof Array)
274
 
            for (var i=0; i<arg_val.length; i++)
275
 
                query_string += "&" + encodeURIComponent(arg_key) + "=" +
276
 
                    encodeURIComponent(arg_val[i]);
277
 
        else
278
 
            query_string += "&" + encodeURIComponent(arg_key) + "=" +
279
 
                encodeURIComponent(arg_val);
280
 
    }
281
 
    if (query_string != "")
282
 
        /* Drop the first "&" */
283
 
        query_string = query_string.substr(1);
284
 
 
285
 
    return query_string;
286
 
}
287
 
 
288
 
/** Given an object exactly of the form described for the output of parseurl,
289
 
 * returns a URL string built from those parameters. The URL is properly
290
 
 * encoded.
291
 
 * parseurl and buildurl are strict inverses of each other.
292
 
 * Note that either query_string or args may be supplied. If both are
293
 
 * supplied, query_string is preferred (because it keeps the argument order).
294
 
 * If you take a url from parseurl, modify args, and pass to buildurl,
295
 
 * you need to set query_string to null to use the new args.
296
 
 * \param obj Object as returned by parseurl.
297
 
 * \return String, a URL.
298
 
 */
299
 
function build_url(obj)
300
 
{
301
 
    var url = "";
302
 
    var query_string = null;
303
 
 
304
 
    if (("scheme" in obj) && obj.scheme != null)
305
 
        url = obj.scheme.toString() + "://";
306
 
    if (("server_name" in obj) && obj.server_name != null)
307
 
        url += obj.server_name.toString();
308
 
    if (("server_port" in obj) && obj.server_port != null)
309
 
        url += ":" + obj.server_port.toString();
310
 
    if (("path" in obj) && obj.path != null)
311
 
    {
312
 
        var path = urlencode_path(obj.path.toString());
313
 
        if (url.length > 0 && path.length > 0 && path[0] != "/")
314
 
            path = "/" + path;
315
 
        url += path;
316
 
    }
317
 
    if (("query_string" in obj) && obj.query_string != null)
318
 
        query_string = encodeURI(obj.query_string.toString());
319
 
    else if (("args" in obj) && obj.args != null)
320
 
        query_string = make_query_string(obj.args);
321
 
 
322
 
    if (query_string != "" && query_string != null)
323
 
        url += "?" + query_string;
324
 
 
325
 
    return url;
326
 
}
327
 
 
328
 
/** URL-encodes a path. This is a special case of URL encoding as all
329
 
 * characters *except* the slash must be encoded.
330
 
 */
331
 
function urlencode_path(path)
332
 
{
333
 
    /* Split up the path, URLEncode each segment with encodeURIComponent,
334
 
     * and rejoin.
335
 
     */
336
 
    var split = path.split('/');
337
 
    for (var i=0; i<split.length; i++)
338
 
        split[i] = encodeURIComponent(split[i]);
339
 
    path = path_join.apply(null, split);
340
 
    if (split[0] == "" && split.length > 1) path = "/" + path;
341
 
    return path;
342
 
}
343
 
 
344
 
/** Writes a JSONable object to the cookie under a particular key
345
 
 * (JSON encoded and URL encoded).
346
 
 */
347
 
function write_cookie(key, value)
348
 
{
349
 
    var sendstr = encodeURIComponent(key) + "="
350
 
        + encodeURIComponent(JSON.stringify(value))
351
 
        + "; path=" + urlencode_path(root_dir);
352
 
    /* This actually just assigns to the key, not replacing the whole cookie
353
 
     * as it appears to. */
354
 
    document.cookie = sendstr;
355
 
}
356
 
/** Reads a cookie which has a JSONable object encoded as its value.
357
 
 * Returns the object, parsed from JSON.
358
 
 */
359
 
function read_cookie(key)
360
 
{
361
 
    var cookies = document.cookie.split(";");
362
 
    var checkstart = encodeURIComponent(key) + "=";
363
 
    var checklen = checkstart.length;
364
 
    for (var i=0; i<cookies.length; i++)
365
 
    {
366
 
        var cookie = cookies[i];
367
 
        while (cookie[0] == ' ')
368
 
            cookie = cookie.substr(1);
369
 
        if (cookie.substr(0, checklen) == checkstart)
370
 
        {
371
 
            var valstr = cookie.substr(checklen);
372
 
            valstr = decodeURIComponent(valstr);
373
 
            return JSON.parse(valstr);
374
 
        }
375
 
    }
376
 
}
377
 
 
378
 
/** Given an argument map, as output in the args parameter of the return of
379
 
 * parseurl, gets the first occurence of an argument in the URL string.
380
 
 * If the argument was not found, returns null.
381
 
 * If there was a single argument, returns the argument.
382
 
 * If there were multiple arguments, returns the first.
383
 
 * \param args Object mapping arguments to strings or arrays of strings.
384
 
 * \param arg String. Argument name.
385
 
 * \return String.
386
 
 */
387
 
function arg_getfirst(args, arg)
388
 
{
389
 
    if (!(arg in args))
390
 
        return null;
391
 
    var r = args[arg];
392
 
    if (r instanceof Array)
393
 
        return r[0];
394
 
    else
395
 
        return r;
396
 
}
397
 
 
398
 
/** Given an argument map, as output in the args parameter of the return of
399
 
 * parseurl, gets all occurences of an argument in the URL string, as an
400
 
 * array.
401
 
 * If the argument was not found, returns [].
402
 
 * Otherwise, returns all occurences as an array, even if there was only one.
403
 
 * \param args Object mapping arguments to strings or arrays of strings.
404
 
 * \param arg String. Argument name.
405
 
 * \return Array of strings.
406
 
 */
407
 
function arg_getlist(args, arg)
408
 
{
409
 
    if (!(arg in args))
410
 
        return [];
411
 
    var r = args[arg];
412
 
    if (r instanceof Array)
413
 
        return r;
414
 
    else
415
 
        return [r];
416
 
}
417
 
 
418
 
/** Joins one or more paths together. Accepts 1 or more arguments.
419
 
 */
420
 
function path_join(path1 /*, path2, ... */)
421
 
{
422
 
    var arg;
423
 
    var path = "";
424
 
    for (var i=0; i<arguments.length; i++)
425
 
    {
426
 
        arg = arguments[i];
427
 
        if (arg.length == 0) continue;
428
 
        if (arg[0] == '/')
429
 
            path = arg;
430
 
        else
431
 
        {
432
 
            if (path.length > 0 && path[path.length-1] != '/')
433
 
                path += '/';
434
 
            path += arg;
435
 
        }
436
 
    }
437
 
    return path;
438
 
}
439
 
 
440
 
 
441
 
/** Builds a multipart_formdata string from an args object. Similar to
442
 
 * make_query_string, but it returns data of type "multipart/form-data"
443
 
 * instead of "application/x-www-form-urlencoded". This is good for
444
 
 * encoding large strings such as text objects from the editor.
445
 
 * Should be written with a Content-Type of
446
 
 * "multipart/form-data, boundary=<boundary>".
447
 
 * All fields are sent with a Content-Type of text/plain.
448
 
 * \param args Args object as described in parse_url.
449
 
 * \param boundary Random "magic" string which DOES NOT appear in any of
450
 
 *  the argument values. This should match the "boundary=" value written to
451
 
 *  the Content-Type header.
452
 
 * \return String in multipart/form-data format.
453
 
 */
454
 
function make_multipart_formdata(args, boundary)
455
 
{
456
 
    var data = "";
457
 
    var arg_val;
458
 
    /* Mutates data */
459
 
    var extend_data = function(arg_key, arg_val)
460
 
    {
461
 
        /* FIXME: Encoding not supported here (should not matter if we
462
 
         * only use ASCII names */
463
 
        data += "--" + boundary + "\r\n"
464
 
            + "Content-Disposition: form-data; name=\"" + arg_key
465
 
            + "\"\r\n\r\n"
466
 
            + arg_val + "\r\n";
467
 
    }
468
 
 
469
 
    for (var arg_key in args)
470
 
    {
471
 
        arg_val = args[arg_key];
472
 
        if (arg_val instanceof Array)
473
 
            for (var i=0; i<arg_val.length; i++)
474
 
            {
475
 
                extend_data(arg_key, arg_val[i]);
476
 
            }
477
 
        else
478
 
            extend_data(arg_key, arg_val);
479
 
    }
480
 
    /* End boundary */
481
 
    data += "--" + boundary + "--\r\n";
482
 
 
483
 
    return data;
484
 
}
485
 
 
486
 
/** Converts a list of directories into a path name, with a slash at the end.
487
 
 * \param pathlist List of strings.
488
 
 * \return String.
489
 
 */
490
 
function pathlist_to_path(pathlist)
491
 
{
492
 
    ret = path_join.apply(null, pathlist);
493
 
    if (ret[ret.length-1] != '/')
494
 
        ret += '/';
495
 
    return ret;
496
 
}
497
 
 
498
 
/** Given a path relative to the IVLE root, gives a path relative to
499
 
 * the site root.
500
 
 */
501
 
function make_path(path)
502
 
{
503
 
    return path_join(root_dir, path);
504
 
}
505
 
 
506
 
/** Shorthand for make_path(path_join(app, ...))
507
 
 * Creates an absolute path for a given path within a given app.
508
 
 */
509
 
function app_path(app /*,...*/)
510
 
{
511
 
    return make_path(path_join.apply(null, arguments));
512
 
}
513
 
 
514
 
/** Given a path, gets the "basename" (the last path segment).
515
 
 */
516
 
function path_basename(path)
517
 
{
518
 
    segments = path.split("/");
519
 
    if (segments[segments.length-1].length == 0)
520
 
        return segments[segments.length-2];
521
 
    else
522
 
        return segments[segments.length-1];
523
 
}
524
 
 
525
 
/** Given a string str, determines whether it ends with substr */
526
 
function endswith(str, substring)
527
 
{
528
 
    if (str.length < substring.length) return false;
529
 
    return str.substr(str.length - substring.length) == substring;
530
 
}
531
 
 
532
 
/** Equivalent to Python's repr.
533
 
 * Gets the JavaScript string representation.
534
 
 * Actually just calls JSON.stringify.
535
 
 */
536
 
function repr(str)
537
 
{
538
 
    return JSON.stringify(str);
539
 
}
540
 
 
541
 
/** Removes all occurences of a value from an array.
542
 
 */
543
 
Array.prototype.removeall = function(val)
544
 
{
545
 
    var i, j;
546
 
    var arr = this;
547
 
    j = 0;
548
 
    for (i=0; i<arr.length; i++)
549
 
    {
550
 
        arr[j] = arr[i];
551
 
        if (arr[i] != val) j++;
552
 
    }
553
 
    arr.splice(j, i-j);
554
 
}
555
 
 
556
 
/** Shallow-clones an object */
557
 
function shallow_clone_object(obj)
558
 
{
559
 
    o = {};
560
 
    for (k in obj)
561
 
        o[k] = obj[k];
562
 
    return o;
563
 
}
564
 
 
565
 
/** Returns a new XMLHttpRequest object, in a somewhat browser-agnostic
566
 
 * fashion.
567
 
 */
568
 
function new_xmlhttprequest()
569
 
{
570
 
    try
571
 
    {
572
 
        /* Real Browsers */
573
 
        return new XMLHttpRequest();
574
 
    }
575
 
    catch (e)
576
 
    {
577
 
        /* Internet Explorer */
578
 
        try
579
 
        {
580
 
            return new ActiveXObject("Msxml2.XMLHTTP");
581
 
        }
582
 
        catch (e)
583
 
        {
584
 
            try
585
 
            {
586
 
                return new ActiveXObject("Microsoft.XMLHTTP");
587
 
            }
588
 
            catch (e)
589
 
            {
590
 
                throw("Your browser does not support AJAX. "
591
 
                    + "IVLE requires a modern browser.");
592
 
            }
593
 
        }
594
 
    }
595
 
}
596
 
 
597
 
/** Makes an asynchronous XMLHttpRequest call to the server.
598
 
 * Sends the XMLHttpRequest object containing the completed response to a
599
 
 * specified callback function.
600
 
 *
601
 
 * \param callback A callback function. Will be called when the response is
602
 
 *      complete. Passed 1 parameter, an XMLHttpRequest object containing the
603
 
 *      completed response.
604
 
 * \param app IVLE app to call (such as "fileservice").
605
 
 * \param path URL path to make the request to, within the application.
606
 
 * \param args Argument object, as described in parse_url and friends.
607
 
 * \param method String; "GET" or "POST"
608
 
 * \param content_type String, optional. Only applies if method is "POST".
609
 
 *      May be "application/x-www-form-urlencoded" or "multipart/form-data".
610
 
 *      Defaults to "application/x-www-form-urlencoded".
611
 
 */
612
 
function ajax_call(callback, app, path, args, method, content_type)
613
 
{
614
 
    if (content_type != "multipart/form-data")
615
 
        content_type = "application/x-www-form-urlencoded";
616
 
    path = app_path(app, path);
617
 
    var url;
618
 
    /* A random string, for multipart/form-data
619
 
     * (This is not checked against anywhere else, it is solely defined and
620
 
     * used within this function) */
621
 
    var boundary = "48234n334nu7n4n2ynonjn234t683jyh80j";
622
 
    var xhr = new_xmlhttprequest();
623
 
    xhr.onreadystatechange = function()
624
 
        {
625
 
            if (xhr.readyState == 4)
626
 
            {
627
 
                callback(xhr);
628
 
            }
629
 
        }
630
 
    if (method == "GET")
631
 
    {
632
 
        /* GET sends the args in the URL */
633
 
        url = build_url({"path": path, "args": args});
634
 
        /* open's 3rd argument = true -> asynchronous */
635
 
        xhr.open(method, url, true);
636
 
        xhr.send(null);
637
 
    }
638
 
    else
639
 
    {
640
 
        /* POST sends the args in application/x-www-form-urlencoded */
641
 
        url = encodeURI(path);
642
 
        xhr.open(method, url, true);
643
 
        var message;
644
 
        if (content_type == "multipart/form-data")
645
 
        {
646
 
            xhr.setRequestHeader("Content-Type",
647
 
                "multipart/form-data, boundary=" + boundary);
648
 
            message = make_multipart_formdata(args, boundary);
649
 
        }
650
 
        else
651
 
        {
652
 
            xhr.setRequestHeader("Content-Type", content_type);
653
 
            message = make_query_string(args);
654
 
        }
655
 
        xhr.setRequestHeader("Content-Length", message.length);
656
 
        xhr.send(message);
657
 
    }
658
 
}
659