File size: 79,865 Bytes
5fae594 |
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 227 228 229 230 231 232 233 234 235 236 237 238 239 240 241 242 243 244 245 246 247 248 249 250 251 252 253 254 255 256 257 258 259 260 261 262 263 264 265 266 267 268 269 270 271 272 273 274 275 276 277 278 279 280 281 282 283 284 285 286 287 288 289 290 291 292 293 294 295 296 297 298 299 300 301 302 303 304 305 306 307 308 309 310 311 312 313 314 315 316 317 318 319 320 321 322 323 324 325 326 327 328 329 330 331 332 333 334 335 336 337 338 339 340 341 342 343 344 345 346 347 348 349 350 351 352 353 354 355 356 357 358 359 360 361 362 363 364 365 366 367 368 369 370 371 372 373 374 375 376 377 378 379 380 381 382 383 384 385 386 387 388 389 390 391 392 393 394 395 396 397 398 399 400 401 402 403 404 405 406 407 408 409 410 411 412 413 414 415 416 417 418 419 420 421 422 423 424 425 426 427 428 429 430 431 432 433 434 435 436 437 438 439 440 441 442 443 444 445 446 447 448 449 450 451 452 453 454 455 456 457 458 459 460 461 462 463 464 465 466 467 468 469 470 471 472 473 474 475 476 477 478 479 480 481 482 483 484 485 486 487 488 489 490 491 492 493 494 495 496 497 498 499 500 501 502 503 504 505 506 507 508 509 510 511 512 513 514 515 516 517 518 519 520 521 522 523 524 525 526 527 528 529 530 531 532 533 534 535 536 537 538 539 540 541 542 543 544 545 546 547 548 549 550 551 552 553 554 555 556 557 558 559 560 561 562 563 564 565 566 567 568 569 570 571 572 573 574 575 576 577 578 579 580 581 582 583 584 585 586 587 588 589 590 591 592 593 594 595 596 597 598 599 600 601 602 603 604 605 606 607 608 609 610 611 612 613 614 615 616 617 618 619 620 621 622 623 624 625 626 627 628 629 630 631 632 633 634 635 636 637 638 639 640 641 642 643 644 645 646 647 648 649 650 651 652 653 654 655 656 657 658 659 660 661 662 663 664 665 666 667 668 669 670 671 672 673 674 675 676 677 678 679 680 681 682 683 684 685 686 687 688 689 690 691 692 693 694 695 696 697 698 699 700 701 702 703 704 705 706 707 708 709 710 711 712 713 714 715 716 717 718 719 720 721 722 723 724 725 726 727 728 729 730 731 732 733 734 735 736 737 738 739 740 741 742 743 744 745 746 747 748 749 750 751 752 753 754 755 756 757 758 759 760 761 762 763 764 765 766 767 768 769 770 771 772 773 774 775 776 777 778 779 780 781 782 783 784 785 786 787 788 789 790 791 792 793 794 795 796 797 798 799 800 801 802 803 804 805 806 807 808 809 810 811 812 813 814 815 816 817 818 819 820 821 822 823 824 825 826 827 828 829 830 831 832 833 834 835 836 837 838 839 840 841 842 843 844 845 846 847 848 849 850 851 852 853 854 855 856 857 858 859 860 861 862 863 864 865 866 867 868 869 870 871 872 873 874 875 876 877 878 879 880 881 882 883 884 885 886 887 888 889 890 891 892 893 894 895 896 897 898 899 900 901 902 903 904 905 906 907 908 909 910 911 912 913 914 915 916 917 918 919 920 921 922 923 924 925 926 927 928 929 930 931 932 933 934 935 936 937 938 939 940 941 942 943 944 945 946 947 948 949 950 951 952 953 954 955 956 957 958 959 960 961 962 963 964 965 966 967 968 969 970 971 972 973 974 975 976 977 978 979 980 981 982 983 984 985 986 987 988 989 990 991 992 993 994 995 996 997 998 999 1000 1001 1002 1003 1004 1005 1006 1007 1008 1009 1010 1011 1012 1013 1014 1015 1016 1017 1018 1019 1020 1021 1022 1023 1024 1025 1026 1027 1028 1029 1030 1031 1032 1033 1034 1035 1036 1037 1038 1039 1040 1041 1042 1043 1044 1045 1046 1047 1048 1049 1050 1051 1052 1053 1054 1055 1056 1057 1058 1059 1060 1061 1062 1063 1064 1065 1066 1067 1068 1069 1070 1071 1072 1073 1074 1075 1076 1077 1078 1079 1080 1081 1082 1083 1084 1085 1086 1087 1088 1089 1090 1091 1092 1093 1094 1095 1096 1097 1098 1099 1100 1101 1102 1103 1104 1105 1106 1107 1108 1109 1110 1111 1112 1113 1114 1115 1116 1117 1118 1119 1120 1121 1122 1123 1124 1125 1126 1127 1128 1129 1130 1131 1132 1133 1134 1135 1136 1137 1138 1139 1140 1141 1142 1143 1144 1145 1146 1147 1148 1149 1150 1151 1152 1153 1154 1155 1156 1157 1158 1159 1160 1161 1162 1163 1164 1165 1166 1167 1168 1169 1170 1171 1172 1173 1174 1175 1176 1177 1178 1179 1180 1181 1182 1183 1184 1185 1186 1187 1188 1189 1190 1191 1192 1193 1194 1195 1196 1197 1198 1199 1200 1201 1202 1203 1204 1205 1206 1207 1208 1209 1210 1211 1212 1213 1214 1215 1216 1217 1218 1219 1220 1221 1222 1223 1224 1225 1226 1227 1228 1229 1230 1231 1232 1233 1234 1235 1236 1237 1238 1239 1240 1241 1242 1243 1244 1245 1246 1247 1248 1249 1250 1251 1252 1253 1254 1255 1256 1257 1258 1259 1260 1261 1262 1263 1264 1265 1266 1267 1268 1269 1270 1271 1272 1273 1274 1275 1276 1277 1278 1279 1280 1281 1282 1283 1284 1285 1286 1287 1288 1289 1290 1291 1292 1293 1294 1295 1296 1297 1298 1299 1300 1301 1302 1303 1304 1305 1306 1307 1308 1309 1310 1311 1312 1313 1314 1315 1316 1317 1318 1319 1320 1321 1322 1323 1324 1325 1326 1327 1328 1329 1330 1331 1332 1333 1334 1335 1336 1337 1338 1339 1340 1341 1342 1343 1344 1345 1346 1347 1348 1349 1350 1351 1352 1353 1354 1355 1356 1357 1358 1359 1360 1361 1362 1363 1364 1365 1366 1367 1368 1369 1370 1371 1372 1373 1374 1375 1376 1377 1378 1379 1380 1381 1382 1383 1384 1385 1386 1387 1388 1389 1390 1391 1392 1393 1394 1395 1396 1397 1398 1399 1400 1401 1402 1403 1404 1405 1406 1407 1408 1409 1410 1411 1412 1413 1414 1415 1416 1417 1418 1419 1420 1421 1422 1423 1424 1425 1426 1427 1428 1429 1430 1431 1432 1433 1434 1435 1436 1437 1438 1439 1440 1441 1442 1443 1444 1445 1446 1447 1448 1449 1450 1451 1452 1453 1454 1455 1456 1457 1458 1459 1460 1461 1462 1463 1464 1465 1466 1467 1468 1469 1470 1471 1472 1473 1474 1475 1476 1477 1478 1479 1480 1481 1482 1483 1484 1485 1486 1487 1488 1489 1490 1491 1492 1493 1494 1495 1496 1497 1498 1499 1500 1501 1502 1503 1504 1505 1506 1507 1508 1509 1510 1511 1512 1513 1514 1515 1516 1517 1518 1519 1520 1521 1522 1523 1524 1525 1526 1527 1528 1529 1530 1531 1532 1533 1534 1535 1536 1537 1538 1539 1540 1541 1542 1543 1544 1545 1546 1547 1548 1549 1550 1551 1552 1553 1554 1555 1556 1557 1558 1559 1560 1561 1562 1563 1564 1565 1566 1567 1568 1569 1570 1571 1572 1573 1574 1575 1576 1577 1578 1579 1580 1581 1582 1583 1584 1585 1586 1587 1588 1589 1590 1591 1592 1593 1594 1595 1596 1597 1598 1599 1600 1601 1602 1603 1604 1605 1606 1607 1608 1609 1610 1611 1612 1613 1614 1615 1616 1617 1618 1619 1620 1621 1622 1623 1624 1625 1626 1627 1628 1629 1630 1631 1632 1633 1634 1635 1636 1637 1638 1639 1640 1641 1642 1643 1644 1645 1646 1647 1648 1649 1650 1651 1652 1653 1654 1655 1656 1657 1658 1659 1660 1661 1662 1663 1664 1665 1666 1667 1668 1669 1670 1671 1672 1673 1674 1675 1676 1677 1678 1679 1680 1681 1682 1683 1684 1685 1686 1687 1688 1689 1690 1691 1692 1693 1694 1695 1696 1697 1698 1699 1700 1701 1702 1703 1704 1705 1706 1707 1708 1709 1710 1711 1712 1713 1714 1715 1716 1717 1718 1719 1720 1721 1722 1723 1724 1725 1726 1727 1728 1729 1730 1731 1732 1733 1734 1735 1736 1737 1738 1739 1740 1741 1742 1743 1744 1745 1746 1747 1748 1749 1750 1751 1752 1753 1754 1755 1756 1757 1758 1759 1760 1761 1762 1763 1764 1765 1766 1767 1768 1769 1770 1771 1772 1773 1774 1775 1776 1777 1778 1779 1780 1781 1782 1783 1784 1785 1786 1787 1788 1789 1790 1791 1792 1793 1794 1795 1796 1797 1798 1799 1800 1801 1802 1803 1804 1805 1806 1807 1808 1809 1810 1811 1812 1813 1814 1815 1816 1817 1818 1819 1820 1821 1822 1823 1824 1825 1826 1827 1828 1829 1830 1831 1832 1833 1834 1835 1836 1837 1838 1839 1840 1841 1842 1843 1844 1845 1846 1847 1848 1849 1850 1851 1852 1853 1854 1855 1856 1857 1858 1859 1860 1861 1862 1863 1864 1865 1866 1867 1868 1869 1870 1871 1872 1873 1874 1875 1876 1877 1878 1879 1880 1881 1882 1883 1884 1885 1886 1887 1888 1889 1890 1891 1892 1893 1894 1895 1896 1897 1898 1899 1900 1901 1902 1903 1904 1905 1906 1907 1908 1909 1910 1911 1912 1913 1914 1915 1916 1917 1918 1919 1920 1921 1922 1923 1924 1925 1926 1927 1928 1929 1930 1931 1932 1933 1934 1935 1936 1937 1938 1939 1940 1941 1942 1943 1944 1945 1946 1947 1948 1949 1950 1951 1952 1953 1954 1955 1956 1957 1958 1959 1960 1961 1962 1963 1964 1965 1966 1967 1968 1969 1970 1971 1972 1973 1974 1975 1976 1977 1978 1979 1980 1981 1982 1983 1984 1985 1986 1987 1988 1989 1990 1991 1992 1993 1994 1995 1996 1997 1998 1999 2000 2001 2002 2003 2004 2005 2006 2007 2008 2009 2010 2011 2012 2013 2014 2015 2016 2017 2018 2019 2020 2021 2022 2023 2024 2025 2026 2027 2028 2029 2030 2031 2032 2033 2034 2035 2036 2037 2038 2039 2040 2041 2042 2043 2044 2045 2046 2047 2048 2049 2050 2051 2052 2053 2054 2055 2056 2057 2058 2059 2060 2061 2062 2063 2064 2065 2066 2067 2068 2069 2070 2071 2072 2073 2074 2075 2076 2077 2078 2079 2080 2081 2082 2083 2084 2085 2086 2087 2088 2089 2090 2091 2092 2093 2094 2095 2096 2097 2098 2099 2100 2101 2102 2103 2104 2105 2106 2107 2108 2109 2110 2111 2112 2113 2114 2115 2116 2117 2118 2119 2120 2121 2122 2123 2124 2125 2126 2127 2128 2129 2130 2131 2132 2133 2134 2135 2136 2137 2138 2139 2140 2141 2142 2143 2144 2145 2146 2147 2148 2149 2150 2151 2152 2153 2154 2155 2156 2157 2158 2159 2160 2161 2162 2163 2164 2165 2166 2167 2168 2169 2170 2171 2172 2173 2174 2175 2176 2177 2178 2179 2180 2181 2182 2183 2184 2185 2186 2187 2188 2189 2190 2191 2192 2193 2194 2195 2196 2197 2198 2199 2200 2201 2202 2203 2204 2205 2206 2207 2208 2209 2210 2211 2212 2213 2214 2215 2216 2217 2218 2219 2220 2221 2222 2223 2224 2225 2226 2227 2228 2229 2230 2231 2232 2233 2234 2235 2236 2237 2238 2239 2240 2241 2242 2243 2244 2245 2246 2247 2248 2249 2250 2251 2252 2253 2254 2255 2256 2257 2258 2259 2260 2261 2262 2263 2264 2265 2266 2267 2268 2269 2270 2271 2272 2273 2274 2275 2276 2277 2278 2279 2280 2281 2282 2283 2284 2285 2286 2287 2288 2289 2290 2291 2292 2293 2294 2295 2296 2297 2298 2299 2300 2301 2302 2303 2304 2305 2306 2307 2308 2309 2310 2311 2312 2313 2314 2315 2316 2317 2318 2319 2320 2321 2322 2323 2324 2325 2326 2327 2328 2329 2330 2331 2332 2333 2334 2335 2336 2337 2338 2339 2340 2341 2342 2343 2344 2345 2346 2347 2348 2349 2350 2351 2352 2353 2354 2355 2356 2357 2358 2359 2360 2361 2362 2363 2364 2365 2366 2367 2368 2369 2370 2371 2372 2373 2374 2375 2376 2377 2378 2379 2380 2381 2382 2383 2384 2385 2386 2387 2388 2389 2390 2391 2392 2393 2394 2395 2396 2397 2398 2399 2400 2401 2402 2403 2404 2405 2406 2407 2408 2409 2410 2411 2412 2413 2414 2415 2416 2417 2418 2419 2420 2421 2422 2423 2424 2425 2426 2427 2428 2429 2430 2431 2432 2433 2434 2435 2436 2437 2438 2439 2440 2441 2442 2443 2444 2445 2446 2447 2448 2449 2450 2451 2452 2453 2454 2455 2456 2457 2458 2459 2460 2461 2462 2463 2464 2465 2466 2467 2468 2469 2470 2471 2472 2473 2474 2475 2476 2477 2478 2479 2480 2481 2482 2483 2484 2485 2486 2487 2488 2489 2490 2491 2492 2493 2494 2495 2496 2497 2498 2499 2500 2501 2502 2503 2504 2505 2506 2507 2508 2509 2510 2511 2512 2513 2514 2515 2516 2517 2518 2519 2520 2521 2522 2523 2524 2525 2526 2527 2528 2529 2530 2531 2532 2533 2534 2535 2536 2537 2538 2539 2540 2541 2542 2543 2544 2545 |
// This file is the concatenation of many js files.
// See https://github.com/jimhigson/oboe.js for the raw source
(function (window, Object, Array, Error, JSON, undefined ) {
// v1.12.3-1-g3e82471
/*
Copyright (c) 2013, Jim Higson
All rights reserved.
Redistribution and use in source and binary forms, with or without
modification, are permitted provided that the following conditions are
met:
1. Redistributions of source code must retain the above copyright
notice, this list of conditions and the following disclaimer.
2. Redistributions in binary form must reproduce the above copyright
notice, this list of conditions and the following disclaimer in the
documentation and/or other materials provided with the distribution.
THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS
IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A
PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT
HOLDER OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED
TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR
PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF
LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING
NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
*/
/**
* Partially complete a function.
*
* var add3 = partialComplete( function add(a,b){return a+b}, 3 );
*
* add3(4) // gives 7
*
* function wrap(left, right, cen){return left + " " + cen + " " + right;}
*
* var pirateGreeting = partialComplete( wrap , "I'm", ", a mighty pirate!" );
*
* pirateGreeting("Guybrush Threepwood");
* // gives "I'm Guybrush Threepwood, a mighty pirate!"
*/
var partialComplete = varArgs(function( fn, args ) {
// this isn't the shortest way to write this but it does
// avoid creating a new array each time to pass to fn.apply,
// otherwise could just call boundArgs.concat(callArgs)
var numBoundArgs = args.length;
return varArgs(function( callArgs ) {
for (var i = 0; i < callArgs.length; i++) {
args[numBoundArgs + i] = callArgs[i];
}
args.length = numBoundArgs + callArgs.length;
return fn.apply(this, args);
});
}),
/**
* Compose zero or more functions:
*
* compose(f1, f2, f3)(x) = f1(f2(f3(x))))
*
* The last (inner-most) function may take more than one parameter:
*
* compose(f1, f2, f3)(x,y) = f1(f2(f3(x,y))))
*/
compose = varArgs(function(fns) {
var fnsList = arrayAsList(fns);
function next(params, curFn) {
return [apply(params, curFn)];
}
return varArgs(function(startParams){
return foldR(next, startParams, fnsList)[0];
});
});
/**
* A more optimised version of compose that takes exactly two functions
* @param f1
* @param f2
*/
function compose2(f1, f2){
return function(){
return f1.call(this,f2.apply(this,arguments));
}
}
/**
* Generic form for a function to get a property from an object
*
* var o = {
* foo:'bar'
* }
*
* var getFoo = attr('foo')
*
* fetFoo(o) // returns 'bar'
*
* @param {String} key the property name
*/
function attr(key) {
return new Function('o', 'return o["' + key + '"]' );
}
/**
* Call a list of functions with the same args until one returns a
* truthy result. Similar to the || operator.
*
* So:
* lazyUnion([f1,f2,f3 ... fn])( p1, p2 ... pn )
*
* Is equivalent to:
* apply([p1, p2 ... pn], f1) ||
* apply([p1, p2 ... pn], f2) ||
* apply([p1, p2 ... pn], f3) ... apply(fn, [p1, p2 ... pn])
*
* @returns the first return value that is given that is truthy.
*/
var lazyUnion = varArgs(function(fns) {
return varArgs(function(params){
var maybeValue;
for (var i = 0; i < len(fns); i++) {
maybeValue = apply(params, fns[i]);
if( maybeValue ) {
return maybeValue;
}
}
});
});
/**
* This file declares various pieces of functional programming.
*
* This isn't a general purpose functional library, to keep things small it
* has just the parts useful for Oboe.js.
*/
/**
* Call a single function with the given arguments array.
* Basically, a functional-style version of the OO-style Function#apply for
* when we don't care about the context ('this') of the call.
*
* The order of arguments allows partial completion of the arguments array
*/
function apply(args, fn) {
return fn.apply(undefined, args);
}
/**
* Define variable argument functions but cut out all that tedious messing about
* with the arguments object. Delivers the variable-length part of the arguments
* list as an array.
*
* Eg:
*
* var myFunction = varArgs(
* function( fixedArgument, otherFixedArgument, variableNumberOfArguments ){
* console.log( variableNumberOfArguments );
* }
* )
*
* myFunction('a', 'b', 1, 2, 3); // logs [1,2,3]
*
* var myOtherFunction = varArgs(function( variableNumberOfArguments ){
* console.log( variableNumberOfArguments );
* })
*
* myFunction(1, 2, 3); // logs [1,2,3]
*
*/
function varArgs(fn){
var numberOfFixedArguments = fn.length -1,
slice = Array.prototype.slice;
if( numberOfFixedArguments == 0 ) {
// an optimised case for when there are no fixed args:
return function(){
return fn.call(this, slice.call(arguments));
}
} else if( numberOfFixedArguments == 1 ) {
// an optimised case for when there are is one fixed args:
return function(){
return fn.call(this, arguments[0], slice.call(arguments, 1));
}
}
// general case
// we know how many arguments fn will always take. Create a
// fixed-size array to hold that many, to be re-used on
// every call to the returned function
var argsHolder = Array(fn.length);
return function(){
for (var i = 0; i < numberOfFixedArguments; i++) {
argsHolder[i] = arguments[i];
}
argsHolder[numberOfFixedArguments] =
slice.call(arguments, numberOfFixedArguments);
return fn.apply( this, argsHolder);
}
}
/**
* Swap the order of parameters to a binary function
*
* A bit like this flip: http://zvon.org/other/haskell/Outputprelude/flip_f.html
*/
function flip(fn){
return function(a, b){
return fn(b,a);
}
}
/**
* Create a function which is the intersection of two other functions.
*
* Like the && operator, if the first is truthy, the second is never called,
* otherwise the return value from the second is returned.
*/
function lazyIntersection(fn1, fn2) {
return function (param) {
return fn1(param) && fn2(param);
};
}
/**
* A function which does nothing
*/
function noop(){}
/**
* A function which is always happy
*/
function always(){return true}
/**
* Create a function which always returns the same
* value
*
* var return3 = functor(3);
*
* return3() // gives 3
* return3() // still gives 3
* return3() // will always give 3
*/
function functor(val){
return function(){
return val;
}
}
/**
* This file defines some loosely associated syntactic sugar for
* Javascript programming
*/
/**
* Returns true if the given candidate is of type T
*/
function isOfType(T, maybeSomething){
return maybeSomething && maybeSomething.constructor === T;
}
var len = attr('length'),
isString = partialComplete(isOfType, String);
/**
* I don't like saying this:
*
* foo !=== undefined
*
* because of the double-negative. I find this:
*
* defined(foo)
*
* easier to read.
*/
function defined( value ) {
return value !== undefined;
}
/**
* Returns true if object o has a key named like every property in
* the properties array. Will give false if any are missing, or if o
* is not an object.
*/
function hasAllProperties(fieldList, o) {
return (o instanceof Object)
&&
all(function (field) {
return (field in o);
}, fieldList);
}
/**
* Like cons in Lisp
*/
function cons(x, xs) {
/* Internally lists are linked 2-element Javascript arrays.
Ideally the return here would be Object.freeze([x,xs])
so that bugs related to mutation are found fast.
However, cons is right on the critical path for
performance and this slows oboe-mark down by
~25%. Under theoretical future JS engines that freeze more
efficiently (possibly even use immutability to
run faster) this should be considered for
restoration.
*/
return [x,xs];
}
/**
* The empty list
*/
var emptyList = null,
/**
* Get the head of a list.
*
* Ie, head(cons(a,b)) = a
*/
head = attr(0),
/**
* Get the tail of a list.
*
* Ie, head(cons(a,b)) = a
*/
tail = attr(1);
/**
* Converts an array to a list
*
* asList([a,b,c])
*
* is equivalent to:
*
* cons(a, cons(b, cons(c, emptyList)))
**/
function arrayAsList(inputArray){
return reverseList(
inputArray.reduce(
flip(cons),
emptyList
)
);
}
/**
* A varargs version of arrayAsList. Works a bit like list
* in LISP.
*
* list(a,b,c)
*
* is equivalent to:
*
* cons(a, cons(b, cons(c, emptyList)))
*/
var list = varArgs(arrayAsList);
/**
* Convert a list back to a js native array
*/
function listAsArray(list){
return foldR( function(arraySoFar, listItem){
arraySoFar.unshift(listItem);
return arraySoFar;
}, [], list );
}
/**
* Map a function over a list
*/
function map(fn, list) {
return list
? cons(fn(head(list)), map(fn,tail(list)))
: emptyList
;
}
/**
* foldR implementation. Reduce a list down to a single value.
*
* @pram {Function} fn (rightEval, curVal) -> result
*/
function foldR(fn, startValue, list) {
return list
? fn(foldR(fn, startValue, tail(list)), head(list))
: startValue
;
}
/**
* foldR implementation. Reduce a list down to a single value.
*
* @pram {Function} fn (rightEval, curVal) -> result
*/
function foldR1(fn, list) {
return tail(list)
? fn(foldR1(fn, tail(list)), head(list))
: head(list)
;
}
/**
* Return a list like the one given but with the first instance equal
* to item removed
*/
function without(list, test, removedFn) {
return withoutInner(list, removedFn || noop);
function withoutInner(subList, removedFn) {
return subList
? ( test(head(subList))
? (removedFn(head(subList)), tail(subList))
: cons(head(subList), withoutInner(tail(subList), removedFn))
)
: emptyList
;
}
}
/**
* Returns true if the given function holds for every item in
* the list, false otherwise
*/
function all(fn, list) {
return !list ||
( fn(head(list)) && all(fn, tail(list)) );
}
/**
* Call every function in a list of functions with the same arguments
*
* This doesn't make any sense if we're doing pure functional because
* it doesn't return anything. Hence, this is only really useful if the
* functions being called have side-effects.
*/
function applyEach(fnList, arguments) {
if( fnList ) {
head(fnList).apply(null, arguments);
applyEach(tail(fnList), arguments);
}
}
/**
* Reverse the order of a list
*/
function reverseList(list){
// js re-implementation of 3rd solution from:
// http://www.haskell.org/haskellwiki/99_questions/Solutions/5
function reverseInner( list, reversedAlready ) {
if( !list ) {
return reversedAlready;
}
return reverseInner(tail(list), cons(head(list), reversedAlready))
}
return reverseInner(list, emptyList);
}
function first(test, list) {
return list &&
(test(head(list))
? head(list)
: first(test,tail(list)));
}
/*
This is a slightly hacked-up browser only version of clarinet
with some features removed to help keep Oboe under
the 5k micro-library limit
For the original go here:
https://github.com/dscape/clarinet
*/
var clarinet = (function () {
var clarinet = {
parser : function () { return new CParser();},
CParser : CParser,
MAX_BUFFER_LENGTH : 64 * 1024,
EVENTS : [
"value"
, "string"
, "key"
, "openobject"
, "closeobject"
, "openarray"
, "closearray"
, "error"
, "end"
, "ready"
]
};
var buffers = [ "textNode", "numberNode" ]
, _n = 0
;
var BEGIN = _n++;
var VALUE = _n++; // general stuff
var OPEN_OBJECT = _n++; // {
var CLOSE_OBJECT = _n++; // }
var OPEN_ARRAY = _n++; // [
var CLOSE_ARRAY = _n++; // ]
var STRING = _n++; // ""
var OPEN_KEY = _n++; // , "a"
var CLOSE_KEY = _n++; // :
var TRUE = _n++; // r
var TRUE2 = _n++; // u
var TRUE3 = _n++; // e
var FALSE = _n++; // a
var FALSE2 = _n++; // l
var FALSE3 = _n++; // s
var FALSE4 = _n++; // e
var NULL = _n++; // u
var NULL2 = _n++; // l
var NULL3 = _n++; // l
var NUMBER_DECIMAL_POINT = _n++; // .
var NUMBER_DIGIT = _n; // [0-9]
if (!Object.create) {
Object.create = function (o) {
function f () { this["__proto__"] = o; }
f.prototype = o;
return new f;
};
}
if (!Object.getPrototypeOf) {
Object.getPrototypeOf = function (o) {
return o["__proto__"];
};
}
if (!Object.keys) {
Object.keys = function (o) {
var a = [];
for (var i in o) if (o.hasOwnProperty(i)) a.push(i);
return a;
};
}
function checkBufferLength (parser) {
var maxAllowed = Math.max(clarinet.MAX_BUFFER_LENGTH, 10)
, maxActual = 0
;
for (var i = 0, l = buffers.length; i < l; i ++) {
var len = parser[buffers[i]].length;
if (len > maxAllowed) {
switch (buffers[i]) {
case "text":
closeText(parser);
break;
default:
error(parser, "Max buffer length exceeded: "+ buffers[i]);
}
}
maxActual = Math.max(maxActual, len);
}
parser.bufferCheckPosition = (clarinet.MAX_BUFFER_LENGTH - maxActual)
+ parser.position;
}
function clearBuffers (parser) {
for (var i = 0, l = buffers.length; i < l; i ++) {
parser[buffers[i]] = "";
}
}
var stringTokenPattern = /[\\"\n]/g;
function CParser () {
var parser = this;
clearBuffers(parser);
parser.bufferCheckPosition = clarinet.MAX_BUFFER_LENGTH;
parser.q = parser.c = parser.p = "";
parser.closed = parser.closedRoot = parser.sawRoot = false;
parser.tag = parser.error = null;
parser.state = BEGIN;
parser.stack = [];
// mostly just for error reporting
parser.position = parser.column = 0;
parser.line = 1;
parser.slashed = false;
parser.unicodeI = 0;
parser.unicodeS = null;
parser.depth = 0;
emit(parser, "onready");
}
CParser.prototype =
{ end : function () { end(this); }
, write : write
, close : function () { return this.write(null); }
};
function emit(parser, event, data) {
if (parser[event]) parser[event](data);
}
function emitNode(parser, event, data) {
closeValue(parser);
emit(parser, event, data);
}
function closeValue(parser, event) {
if (parser.textNode) {
emit(parser, (event ? event : "onvalue"), parser.textNode);
}
parser.textNode = "";
}
function closeNumber(parser) {
if (parser.numberNode)
emit(parser, "onvalue", parseFloat(parser.numberNode));
parser.numberNode = "";
}
function error (parser, er) {
closeValue(parser);
er += "\nLine: "+parser.line+
"\nColumn: "+parser.column+
"\nChar: "+parser.c;
er = new Error(er);
parser.error = er;
emit(parser, "onerror", er);
return parser;
}
function end(parser) {
if (parser.state !== VALUE || parser.depth !== 0)
error(parser, "Unexpected end");
closeValue(parser);
parser.c = "";
parser.closed = true;
emit(parser, "onend");
CParser.call(parser);
return parser;
}
function write (chunk) {
var parser = this;
// this used to throw the error but inside Oboe we will have already
// gotten the error when it was emitted. The important thing is to
// not continue with the parse.
if (this.error)
return;
if (parser.closed) return error(parser,
"Cannot write after close. Assign an onready handler.");
if (chunk === null) return end(parser);
var i = 0, c = chunk[0], p = parser.p;
while (c) {
p = c;
parser.c = c = chunk.charAt(i++);
// if chunk doesnt have next, like streaming char by char
// this way we need to check if previous is really previous
// if not we need to reset to what the parser says is the previous
// from buffer
if(p !== c ) parser.p = p;
else p = parser.p;
if(!c) break;
parser.position ++;
if (c === "\n") {
parser.line ++;
parser.column = 0;
} else parser.column ++;
switch (parser.state) {
case BEGIN:
if (c === "{") parser.state = OPEN_OBJECT;
else if (c === "[") parser.state = OPEN_ARRAY;
else if (c !== '\r' && c !== '\n' && c !== ' ' && c !== '\t')
error(parser, "Non-whitespace before {[.");
continue;
case OPEN_KEY:
case OPEN_OBJECT:
if (c === '\r' || c === '\n' || c === ' ' || c === '\t') continue;
if(parser.state === OPEN_KEY) parser.stack.push(CLOSE_KEY);
else {
if(c === '}') {
emit(parser, 'onopenobject');
this.depth++;
emit(parser, 'oncloseobject');
this.depth--;
parser.state = parser.stack.pop() || VALUE;
continue;
} else parser.stack.push(CLOSE_OBJECT);
}
if(c === '"') parser.state = STRING;
else error(parser, "Malformed object key should start with \"");
continue;
case CLOSE_KEY:
case CLOSE_OBJECT:
if (c === '\r' || c === '\n' || c === ' ' || c === '\t') continue;
if(c===':') {
if(parser.state === CLOSE_OBJECT) {
parser.stack.push(CLOSE_OBJECT);
closeValue(parser, 'onopenobject');
this.depth++;
} else closeValue(parser, 'onkey');
parser.state = VALUE;
} else if (c==='}') {
emitNode(parser, 'oncloseobject');
this.depth--;
parser.state = parser.stack.pop() || VALUE;
} else if(c===',') {
if(parser.state === CLOSE_OBJECT)
parser.stack.push(CLOSE_OBJECT);
closeValue(parser);
parser.state = OPEN_KEY;
} else error(parser, 'Bad object');
continue;
case OPEN_ARRAY: // after an array there always a value
case VALUE:
if (c === '\r' || c === '\n' || c === ' ' || c === '\t') continue;
if(parser.state===OPEN_ARRAY) {
emit(parser, 'onopenarray');
this.depth++;
parser.state = VALUE;
if(c === ']') {
emit(parser, 'onclosearray');
this.depth--;
parser.state = parser.stack.pop() || VALUE;
continue;
} else {
parser.stack.push(CLOSE_ARRAY);
}
}
if(c === '"') parser.state = STRING;
else if(c === '{') parser.state = OPEN_OBJECT;
else if(c === '[') parser.state = OPEN_ARRAY;
else if(c === 't') parser.state = TRUE;
else if(c === 'f') parser.state = FALSE;
else if(c === 'n') parser.state = NULL;
else if(c === '-') { // keep and continue
parser.numberNode += c;
} else if(c==='0') {
parser.numberNode += c;
parser.state = NUMBER_DIGIT;
} else if('123456789'.indexOf(c) !== -1) {
parser.numberNode += c;
parser.state = NUMBER_DIGIT;
} else error(parser, "Bad value");
continue;
case CLOSE_ARRAY:
if(c===',') {
parser.stack.push(CLOSE_ARRAY);
closeValue(parser, 'onvalue');
parser.state = VALUE;
} else if (c===']') {
emitNode(parser, 'onclosearray');
this.depth--;
parser.state = parser.stack.pop() || VALUE;
} else if (c === '\r' || c === '\n' || c === ' ' || c === '\t')
continue;
else error(parser, 'Bad array');
continue;
case STRING:
// thanks thejh, this is an about 50% performance improvement.
var starti = i-1
, slashed = parser.slashed
, unicodeI = parser.unicodeI
;
STRING_BIGLOOP: while (true) {
// zero means "no unicode active". 1-4 mean "parse some more". end after 4.
while (unicodeI > 0) {
parser.unicodeS += c;
c = chunk.charAt(i++);
if (unicodeI === 4) {
// TODO this might be slow? well, probably not used too often anyway
parser.textNode += String.fromCharCode(parseInt(parser.unicodeS, 16));
unicodeI = 0;
starti = i-1;
} else {
unicodeI++;
}
// we can just break here: no stuff we skipped that still has to be sliced out or so
if (!c) break STRING_BIGLOOP;
}
if (c === '"' && !slashed) {
parser.state = parser.stack.pop() || VALUE;
parser.textNode += chunk.substring(starti, i-1);
if(!parser.textNode) {
emit(parser, "onvalue", "");
}
break;
}
if (c === '\\' && !slashed) {
slashed = true;
parser.textNode += chunk.substring(starti, i-1);
c = chunk.charAt(i++);
if (!c) break;
}
if (slashed) {
slashed = false;
if (c === 'n') { parser.textNode += '\n'; }
else if (c === 'r') { parser.textNode += '\r'; }
else if (c === 't') { parser.textNode += '\t'; }
else if (c === 'f') { parser.textNode += '\f'; }
else if (c === 'b') { parser.textNode += '\b'; }
else if (c === 'u') {
// \uxxxx. meh!
unicodeI = 1;
parser.unicodeS = '';
} else {
parser.textNode += c;
}
c = chunk.charAt(i++);
starti = i-1;
if (!c) break;
else continue;
}
stringTokenPattern.lastIndex = i;
var reResult = stringTokenPattern.exec(chunk);
if (reResult === null) {
i = chunk.length+1;
parser.textNode += chunk.substring(starti, i-1);
break;
}
i = reResult.index+1;
c = chunk.charAt(reResult.index);
if (!c) {
parser.textNode += chunk.substring(starti, i-1);
break;
}
}
parser.slashed = slashed;
parser.unicodeI = unicodeI;
continue;
case TRUE:
if (c==='') continue; // strange buffers
if (c==='r') parser.state = TRUE2;
else error(parser, 'Invalid true started with t'+ c);
continue;
case TRUE2:
if (c==='') continue;
if (c==='u') parser.state = TRUE3;
else error(parser, 'Invalid true started with tr'+ c);
continue;
case TRUE3:
if (c==='') continue;
if(c==='e') {
emit(parser, "onvalue", true);
parser.state = parser.stack.pop() || VALUE;
} else error(parser, 'Invalid true started with tru'+ c);
continue;
case FALSE:
if (c==='') continue;
if (c==='a') parser.state = FALSE2;
else error(parser, 'Invalid false started with f'+ c);
continue;
case FALSE2:
if (c==='') continue;
if (c==='l') parser.state = FALSE3;
else error(parser, 'Invalid false started with fa'+ c);
continue;
case FALSE3:
if (c==='') continue;
if (c==='s') parser.state = FALSE4;
else error(parser, 'Invalid false started with fal'+ c);
continue;
case FALSE4:
if (c==='') continue;
if (c==='e') {
emit(parser, "onvalue", false);
parser.state = parser.stack.pop() || VALUE;
} else error(parser, 'Invalid false started with fals'+ c);
continue;
case NULL:
if (c==='') continue;
if (c==='u') parser.state = NULL2;
else error(parser, 'Invalid null started with n'+ c);
continue;
case NULL2:
if (c==='') continue;
if (c==='l') parser.state = NULL3;
else error(parser, 'Invalid null started with nu'+ c);
continue;
case NULL3:
if (c==='') continue;
if(c==='l') {
emit(parser, "onvalue", null);
parser.state = parser.stack.pop() || VALUE;
} else error(parser, 'Invalid null started with nul'+ c);
continue;
case NUMBER_DECIMAL_POINT:
if(c==='.') {
parser.numberNode += c;
parser.state = NUMBER_DIGIT;
} else error(parser, 'Leading zero not followed by .');
continue;
case NUMBER_DIGIT:
if('0123456789'.indexOf(c) !== -1) parser.numberNode += c;
else if (c==='.') {
if(parser.numberNode.indexOf('.')!==-1)
error(parser, 'Invalid number has two dots');
parser.numberNode += c;
} else if (c==='e' || c==='E') {
if(parser.numberNode.indexOf('e')!==-1 ||
parser.numberNode.indexOf('E')!==-1 )
error(parser, 'Invalid number has two exponential');
parser.numberNode += c;
} else if (c==="+" || c==="-") {
if(!(p==='e' || p==='E'))
error(parser, 'Invalid symbol in number');
parser.numberNode += c;
} else {
closeNumber(parser);
i--; // go back one
parser.state = parser.stack.pop() || VALUE;
}
continue;
default:
error(parser, "Unknown state: " + parser.state);
}
}
if (parser.position >= parser.bufferCheckPosition)
checkBufferLength(parser);
return parser;
}
return clarinet;
})();
/**
* A bridge used to assign stateless functions to listen to clarinet.
*
* As well as the parameter from clarinet, each callback will also be passed
* the result of the last callback.
*
* This may also be used to clear all listeners by assigning zero handlers:
*
* clarinetListenerAdaptor( clarinet, {} )
*/
function clarinetListenerAdaptor(clarinetParser, handlers){
var state;
clarinet.EVENTS.forEach(function(eventName){
var handlerFunction = handlers[eventName];
clarinetParser['on'+eventName] = handlerFunction &&
function(param) {
state = handlerFunction( state, param);
};
});
}
// based on gist https://gist.github.com/monsur/706839
/**
* XmlHttpRequest's getAllResponseHeaders() method returns a string of response
* headers according to the format described here:
* http://www.w3.org/TR/XMLHttpRequest/#the-getallresponseheaders-method
* This method parses that string into a user-friendly key/value pair object.
*/
function parseResponseHeaders(headerStr) {
var headers = {};
headerStr && headerStr.split('\u000d\u000a')
.forEach(function(headerPair){
// Can't use split() here because it does the wrong thing
// if the header value has the string ": " in it.
var index = headerPair.indexOf('\u003a\u0020');
headers[headerPair.substring(0, index)]
= headerPair.substring(index + 2);
});
return headers;
}
function httpTransport(){
return new XMLHttpRequest();
}
/**
* A wrapper around the browser XmlHttpRequest object that raises an
* event whenever a new part of the response is available.
*
* In older browsers progressive reading is impossible so all the
* content is given in a single call. For newer ones several events
* should be raised, allowing progressive interpretation of the response.
*
* @param {Function} oboeBus an event bus local to this Oboe instance
* @param {XMLHttpRequest} xhr the xhr to use as the transport. Under normal
* operation, will have been created using httpTransport() above
* but for tests a stub can be provided instead.
* @param {String} method one of 'GET' 'POST' 'PUT' 'PATCH' 'DELETE'
* @param {String} url the url to make a request to
* @param {String|Null} data some content to be sent with the request.
* Only valid if method is POST or PUT.
* @param {Object} [headers] the http request headers to send
*/
function streamingHttp(oboeBus, xhr, method, url, data, headers) {
var emitStreamData = oboeBus(STREAM_DATA).emit,
emitFail = oboeBus(FAIL_EVENT).emit,
numberOfCharsAlreadyGivenToCallback = 0;
// When an ABORTING message is put on the event bus abort
// the ajax request
oboeBus( ABORTING ).on( function(){
// if we keep the onreadystatechange while aborting the XHR gives
// a callback like a successful call so first remove this listener
// by assigning null:
xhr.onreadystatechange = null;
xhr.abort();
});
/**
* Handle input from the underlying xhr: either a state change,
* the progress event or the request being complete.
*/
function handleProgress() {
var textSoFar = xhr.responseText,
newText = textSoFar.substr(numberOfCharsAlreadyGivenToCallback);
/* Raise the event for new text.
On older browsers, the new text is the whole response.
On newer/better ones, the fragment part that we got since
last progress. */
if( newText ) {
emitStreamData( newText );
}
numberOfCharsAlreadyGivenToCallback = len(textSoFar);
}
if('onprogress' in xhr){ // detect browser support for progressive delivery
xhr.onprogress = handleProgress;
}
xhr.onreadystatechange = function() {
switch( xhr.readyState ) {
case 2:
oboeBus( HTTP_START ).emit(
xhr.status,
parseResponseHeaders(xhr.getAllResponseHeaders()) );
return;
case 4:
// is this a 2xx http code?
var successful = String(xhr.status)[0] == 2;
if( successful ) {
// In Chrome 29 (not 28) no onprogress is emitted when a response
// is complete before the onload. We need to always do handleInput
// in case we get the load but have not had a final progress event.
// This looks like a bug and may change in future but let's take
// the safest approach and assume we might not have received a
// progress event for each part of the response
handleProgress();
oboeBus(STREAM_END).emit();
} else {
emitFail( errorReport(
xhr.status,
xhr.responseText
));
}
}
};
try{
xhr.open(method, url, true);
for( var headerName in headers ){
xhr.setRequestHeader(headerName, headers[headerName]);
}
xhr.setRequestHeader('X-Requested-With', 'XMLHttpRequest');
xhr.send(data);
} catch( e ) {
// To keep a consistent interface with Node, we can't emit an event here.
// Node's streaming http adaptor receives the error as an asynchronous
// event rather than as an exception. If we emitted now, the Oboe user
// has had no chance to add a .fail listener so there is no way
// the event could be useful. For both these reasons defer the
// firing to the next JS frame.
window.setTimeout(
partialComplete(emitFail, errorReport(undefined, undefined, e))
, 0
);
}
}
var jsonPathSyntax = (function() {
var
/**
* Export a regular expression as a simple function by exposing just
* the Regex#exec. This allows regex tests to be used under the same
* interface as differently implemented tests, or for a user of the
* tests to not concern themselves with their implementation as regular
* expressions.
*
* This could also be expressed point-free as:
* Function.prototype.bind.bind(RegExp.prototype.exec),
*
* But that's far too confusing! (and not even smaller once minified
* and gzipped)
*/
regexDescriptor = function regexDescriptor(regex) {
return regex.exec.bind(regex);
}
/**
* Join several regular expressions and express as a function.
* This allows the token patterns to reuse component regular expressions
* instead of being expressed in full using huge and confusing regular
* expressions.
*/
, jsonPathClause = varArgs(function( componentRegexes ) {
// The regular expressions all start with ^ because we
// only want to find matches at the start of the
// JSONPath fragment we are inspecting
componentRegexes.unshift(/^/);
return regexDescriptor(
RegExp(
componentRegexes.map(attr('source')).join('')
)
);
})
, possiblyCapturing = /(\$?)/
, namedNode = /([\w-_]+|\*)/
, namePlaceholder = /()/
, nodeInArrayNotation = /\["([^"]+)"\]/
, numberedNodeInArrayNotation = /\[(\d+|\*)\]/
, fieldList = /{([\w ]*?)}/
, optionalFieldList = /(?:{([\w ]*?)})?/
// foo or *
, jsonPathNamedNodeInObjectNotation = jsonPathClause(
possiblyCapturing,
namedNode,
optionalFieldList
)
// ["foo"]
, jsonPathNamedNodeInArrayNotation = jsonPathClause(
possiblyCapturing,
nodeInArrayNotation,
optionalFieldList
)
// [2] or [*]
, jsonPathNumberedNodeInArrayNotation = jsonPathClause(
possiblyCapturing,
numberedNodeInArrayNotation,
optionalFieldList
)
// {a b c}
, jsonPathPureDuckTyping = jsonPathClause(
possiblyCapturing,
namePlaceholder,
fieldList
)
// ..
, jsonPathDoubleDot = jsonPathClause(/\.\./)
// .
, jsonPathDot = jsonPathClause(/\./)
// !
, jsonPathBang = jsonPathClause(
possiblyCapturing,
/!/
)
// nada!
, emptyString = jsonPathClause(/$/)
;
/* We export only a single function. When called, this function injects
into another function the descriptors from above.
*/
return function (fn){
return fn(
lazyUnion(
jsonPathNamedNodeInObjectNotation
, jsonPathNamedNodeInArrayNotation
, jsonPathNumberedNodeInArrayNotation
, jsonPathPureDuckTyping
)
, jsonPathDoubleDot
, jsonPathDot
, jsonPathBang
, emptyString
);
};
}());
/**
* Get a new key->node mapping
*
* @param {String|Number} key
* @param {Object|Array|String|Number|null} node a value found in the json
*/
function namedNode(key, node) {
return {key:key, node:node};
}
/** get the key of a namedNode */
var keyOf = attr('key');
/** get the node from a namedNode */
var nodeOf = attr('node');
/**
* This file provides various listeners which can be used to build up
* a changing ascent based on the callbacks provided by Clarinet. It listens
* to the low-level events from Clarinet and emits higher-level ones.
*
* The building up is stateless so to track a JSON file
* clarinetListenerAdaptor.js is required to store the ascent state
* between calls.
*/
/**
* A special value to use in the path list to represent the path 'to' a root
* object (which doesn't really have any path). This prevents the need for
* special-casing detection of the root object and allows it to be treated
* like any other object. We might think of this as being similar to the
* 'unnamed root' domain ".", eg if I go to
* http://en.wikipedia.org./wiki/En/Main_page the dot after 'org' deliminates
* the unnamed root of the DNS.
*
* This is kept as an object to take advantage that in Javascript's OO objects
* are guaranteed to be distinct, therefore no other object can possibly clash
* with this one. Strings, numbers etc provide no such guarantee.
**/
var ROOT_PATH = {};
/**
* Create a new set of handlers for clarinet's events, bound to the emit
* function given.
*/
function incrementalContentBuilder( oboeBus ) {
var emitNodeFound = oboeBus(NODE_FOUND).emit,
emitRootFound = oboeBus(ROOT_FOUND).emit,
emitPathFound = oboeBus(PATH_FOUND).emit;
function arrayIndicesAreKeys( possiblyInconsistentAscent, newDeepestNode) {
/* for values in arrays we aren't pre-warned of the coming paths
(Clarinet gives no call to onkey like it does for values in objects)
so if we are in an array we need to create this path ourselves. The
key will be len(parentNode) because array keys are always sequential
numbers. */
var parentNode = nodeOf( head( possiblyInconsistentAscent));
return isOfType( Array, parentNode)
?
pathFound( possiblyInconsistentAscent,
len(parentNode),
newDeepestNode
)
:
// nothing needed, return unchanged
possiblyInconsistentAscent
;
}
function nodeFound( ascent, newDeepestNode ) {
if( !ascent ) {
// we discovered the root node,
emitRootFound( newDeepestNode);
return pathFound( ascent, ROOT_PATH, newDeepestNode);
}
// we discovered a non-root node
var arrayConsistentAscent = arrayIndicesAreKeys( ascent, newDeepestNode),
ancestorBranches = tail( arrayConsistentAscent),
previouslyUnmappedName = keyOf( head( arrayConsistentAscent));
appendBuiltContent(
ancestorBranches,
previouslyUnmappedName,
newDeepestNode
);
return cons(
namedNode( previouslyUnmappedName, newDeepestNode ),
ancestorBranches
);
}
/**
* Add a new value to the object we are building up to represent the
* parsed JSON
*/
function appendBuiltContent( ancestorBranches, key, node ){
nodeOf( head( ancestorBranches))[key] = node;
}
/**
* For when we find a new key in the json.
*
* @param {String|Number|Object} newDeepestName the key. If we are in an
* array will be a number, otherwise a string. May take the special
* value ROOT_PATH if the root node has just been found
*
* @param {String|Number|Object|Array|Null|undefined} [maybeNewDeepestNode]
* usually this won't be known so can be undefined. Can't use null
* to represent unknown because null is a valid value in JSON
**/
function pathFound(ascent, newDeepestName, maybeNewDeepestNode) {
if( ascent ) { // if not root
// If we have the key but (unless adding to an array) no known value
// yet. Put that key in the output but against no defined value:
appendBuiltContent( ascent, newDeepestName, maybeNewDeepestNode );
}
var ascentWithNewPath = cons(
namedNode( newDeepestName,
maybeNewDeepestNode),
ascent
);
emitPathFound( ascentWithNewPath);
return ascentWithNewPath;
}
/**
* For when the current node ends
*/
function nodeFinished( ascent ) {
emitNodeFound( ascent);
// pop the complete node and its path off the list:
return tail( ascent);
}
return {
openobject : function (ascent, firstKey) {
var ascentAfterNodeFound = nodeFound(ascent, {});
/* It is a perculiarity of Clarinet that for non-empty objects it
gives the first key with the openobject event instead of
in a subsequent key event.
firstKey could be the empty string in a JSON object like
{'':'foo'} which is technically valid.
So can't check with !firstKey, have to see if has any
defined value. */
return defined(firstKey)
?
/* We know the first key of the newly parsed object. Notify that
path has been found but don't put firstKey permanently onto
pathList yet because we haven't identified what is at that key
yet. Give null as the value because we haven't seen that far
into the json yet */
pathFound(ascentAfterNodeFound, firstKey)
:
ascentAfterNodeFound
;
},
openarray: function (ascent) {
return nodeFound(ascent, []);
},
// called by Clarinet when keys are found in objects
key: pathFound,
/* Emitted by Clarinet when primitive values are found, ie Strings,
Numbers, and null.
Because these are always leaves in the JSON, we find and finish the
node in one step, expressed as functional composition: */
value: compose2( nodeFinished, nodeFound ),
// we make no distinction in how we handle object and arrays closing.
// For both, interpret as the end of the current node.
closeobject: nodeFinished,
closearray: nodeFinished
};
}
/**
* The jsonPath evaluator compiler used for Oboe.js.
*
* One function is exposed. This function takes a String JSONPath spec and
* returns a function to test candidate ascents for matches.
*
* String jsonPath -> (List ascent) -> Boolean|Object
*
* This file is coded in a pure functional style. That is, no function has
* side effects, every function evaluates to the same value for the same
* arguments and no variables are reassigned.
*/
// the call to jsonPathSyntax injects the token syntaxes that are needed
// inside the compiler
var jsonPathCompiler = jsonPathSyntax(function (pathNodeSyntax,
doubleDotSyntax,
dotSyntax,
bangSyntax,
emptySyntax ) {
var CAPTURING_INDEX = 1;
var NAME_INDEX = 2;
var FIELD_LIST_INDEX = 3;
var headKey = compose2(keyOf, head),
headNode = compose2(nodeOf, head);
/**
* Create an evaluator function for a named path node, expressed in the
* JSONPath like:
* foo
* ["bar"]
* [2]
*/
function nameClause(previousExpr, detection ) {
var name = detection[NAME_INDEX],
matchesName = ( !name || name == '*' )
? always
: function(ascent){return headKey(ascent) == name};
return lazyIntersection(matchesName, previousExpr);
}
/**
* Create an evaluator function for a a duck-typed node, expressed like:
*
* {spin, taste, colour}
* .particle{spin, taste, colour}
* *{spin, taste, colour}
*/
function duckTypeClause(previousExpr, detection) {
var fieldListStr = detection[FIELD_LIST_INDEX];
if (!fieldListStr)
return previousExpr; // don't wrap at all, return given expr as-is
var hasAllrequiredFields = partialComplete(
hasAllProperties,
arrayAsList(fieldListStr.split(/\W+/))
),
isMatch = compose2(
hasAllrequiredFields,
headNode
);
return lazyIntersection(isMatch, previousExpr);
}
/**
* Expression for $, returns the evaluator function
*/
function capture( previousExpr, detection ) {
// extract meaning from the detection
var capturing = !!detection[CAPTURING_INDEX];
if (!capturing)
return previousExpr; // don't wrap at all, return given expr as-is
return lazyIntersection(previousExpr, head);
}
/**
* Create an evaluator function that moves onto the next item on the
* lists. This function is the place where the logic to move up a
* level in the ascent exists.
*
* Eg, for JSONPath ".foo" we need skip1(nameClause(always, [,'foo']))
*/
function skip1(previousExpr) {
if( previousExpr == always ) {
/* If there is no previous expression this consume command
is at the start of the jsonPath.
Since JSONPath specifies what we'd like to find but not
necessarily everything leading down to it, when running
out of JSONPath to check against we default to true */
return always;
}
/** return true if the ascent we have contains only the JSON root,
* false otherwise
*/
function notAtRoot(ascent){
return headKey(ascent) != ROOT_PATH;
}
return lazyIntersection(
/* If we're already at the root but there are more
expressions to satisfy, can't consume any more. No match.
This check is why none of the other exprs have to be able
to handle empty lists; skip1 is the only evaluator that
moves onto the next token and it refuses to do so once it
reaches the last item in the list. */
notAtRoot,
/* We are not at the root of the ascent yet.
Move to the next level of the ascent by handing only
the tail to the previous expression */
compose2(previousExpr, tail)
);
}
/**
* Create an evaluator function for the .. (double dot) token. Consumes
* zero or more levels of the ascent, the fewest that are required to find
* a match when given to previousExpr.
*/
function skipMany(previousExpr) {
if( previousExpr == always ) {
/* If there is no previous expression this consume command
is at the start of the jsonPath.
Since JSONPath specifies what we'd like to find but not
necessarily everything leading down to it, when running
out of JSONPath to check against we default to true */
return always;
}
var
// In JSONPath .. is equivalent to !.. so if .. reaches the root
// the match has succeeded. Ie, we might write ..foo or !..foo
// and both should match identically.
terminalCaseWhenArrivingAtRoot = rootExpr(),
terminalCaseWhenPreviousExpressionIsSatisfied = previousExpr,
recursiveCase = skip1(skipManyInner),
cases = lazyUnion(
terminalCaseWhenArrivingAtRoot
, terminalCaseWhenPreviousExpressionIsSatisfied
, recursiveCase
);
function skipManyInner(ascent) {
if( !ascent ) {
// have gone past the start, not a match:
return false;
}
return cases(ascent);
}
return skipManyInner;
}
/**
* Generate an evaluator for ! - matches only the root element of the json
* and ignores any previous expressions since nothing may precede !.
*/
function rootExpr() {
return function(ascent){
return headKey(ascent) == ROOT_PATH;
};
}
/**
* Generate a statement wrapper to sit around the outermost
* clause evaluator.
*
* Handles the case where the capturing is implicit because the JSONPath
* did not contain a '$' by returning the last node.
*/
function statementExpr(lastClause) {
return function(ascent) {
// kick off the evaluation by passing through to the last clause
var exprMatch = lastClause(ascent);
return exprMatch === true ? head(ascent) : exprMatch;
};
}
/**
* For when a token has been found in the JSONPath input.
* Compiles the parser for that token and returns in combination with the
* parser already generated.
*
* @param {Function} exprs a list of the clause evaluator generators for
* the token that was found
* @param {Function} parserGeneratedSoFar the parser already found
* @param {Array} detection the match given by the regex engine when
* the feature was found
*/
function expressionsReader( exprs, parserGeneratedSoFar, detection ) {
// if exprs is zero-length foldR will pass back the
// parserGeneratedSoFar as-is so we don't need to treat
// this as a special case
return foldR(
function( parserGeneratedSoFar, expr ){
return expr(parserGeneratedSoFar, detection);
},
parserGeneratedSoFar,
exprs
);
}
/**
* If jsonPath matches the given detector function, creates a function which
* evaluates against every clause in the clauseEvaluatorGenerators. The
* created function is propagated to the onSuccess function, along with
* the remaining unparsed JSONPath substring.
*
* The intended use is to create a clauseMatcher by filling in
* the first two arguments, thus providing a function that knows
* some syntax to match and what kind of generator to create if it
* finds it. The parameter list once completed is:
*
* (jsonPath, parserGeneratedSoFar, onSuccess)
*
* onSuccess may be compileJsonPathToFunction, to recursively continue
* parsing after finding a match or returnFoundParser to stop here.
*/
function generateClauseReaderIfTokenFound (
tokenDetector, clauseEvaluatorGenerators,
jsonPath, parserGeneratedSoFar, onSuccess) {
var detected = tokenDetector(jsonPath);
if(detected) {
var compiledParser = expressionsReader(
clauseEvaluatorGenerators,
parserGeneratedSoFar,
detected
),
remainingUnparsedJsonPath = jsonPath.substr(len(detected[0]));
return onSuccess(remainingUnparsedJsonPath, compiledParser);
}
}
/**
* Partially completes generateClauseReaderIfTokenFound above.
*/
function clauseMatcher(tokenDetector, exprs) {
return partialComplete(
generateClauseReaderIfTokenFound,
tokenDetector,
exprs
);
}
/**
* clauseForJsonPath is a function which attempts to match against
* several clause matchers in order until one matches. If non match the
* jsonPath expression is invalid and an error is thrown.
*
* The parameter list is the same as a single clauseMatcher:
*
* (jsonPath, parserGeneratedSoFar, onSuccess)
*/
var clauseForJsonPath = lazyUnion(
clauseMatcher(pathNodeSyntax , list( capture,
duckTypeClause,
nameClause,
skip1 ))
, clauseMatcher(doubleDotSyntax , list( skipMany))
// dot is a separator only (like whitespace in other languages) but
// rather than make it a special case, use an empty list of
// expressions when this token is found
, clauseMatcher(dotSyntax , list() )
, clauseMatcher(bangSyntax , list( capture,
rootExpr))
, clauseMatcher(emptySyntax , list( statementExpr))
, function (jsonPath) {
throw Error('"' + jsonPath + '" could not be tokenised')
}
);
/**
* One of two possible values for the onSuccess argument of
* generateClauseReaderIfTokenFound.
*
* When this function is used, generateClauseReaderIfTokenFound simply
* returns the compiledParser that it made, regardless of if there is
* any remaining jsonPath to be compiled.
*/
function returnFoundParser(_remainingJsonPath, compiledParser){
return compiledParser
}
/**
* Recursively compile a JSONPath expression.
*
* This function serves as one of two possible values for the onSuccess
* argument of generateClauseReaderIfTokenFound, meaning continue to
* recursively compile. Otherwise, returnFoundParser is given and
* compilation terminates.
*/
function compileJsonPathToFunction( uncompiledJsonPath,
parserGeneratedSoFar ) {
/**
* On finding a match, if there is remaining text to be compiled
* we want to either continue parsing using a recursive call to
* compileJsonPathToFunction. Otherwise, we want to stop and return
* the parser that we have found so far.
*/
var onFind = uncompiledJsonPath
? compileJsonPathToFunction
: returnFoundParser;
return clauseForJsonPath(
uncompiledJsonPath,
parserGeneratedSoFar,
onFind
);
}
/**
* This is the function that we expose to the rest of the library.
*/
return function(jsonPath){
try {
// Kick off the recursive parsing of the jsonPath
return compileJsonPathToFunction(jsonPath, always);
} catch( e ) {
throw Error( 'Could not compile "' + jsonPath +
'" because ' + e.message
);
}
}
});
/**
* A pub/sub which is responsible for a single event type. A
* multi-event type event bus is created by pubSub by collecting
* several of these.
*
* @param {String} eventType
* the name of the events managed by this singleEventPubSub
* @param {singleEventPubSub} [newListener]
* place to notify of new listeners
* @param {singleEventPubSub} [removeListener]
* place to notify of when listeners are removed
*/
function singleEventPubSub(eventType, newListener, removeListener){
/** we are optimised for emitting events over firing them.
* As well as the tuple list which stores event ids and
* listeners there is a list with just the listeners which
* can be iterated more quickly when we are emitting
*/
var listenerTupleList,
listenerList;
function hasId(id){
return function(tuple) {
return tuple.id == id;
};
}
return {
/**
* @param {Function} listener
* @param {*} listenerId
* an id that this listener can later by removed by.
* Can be of any type, to be compared to other ids using ==
*/
on:function( listener, listenerId ) {
var tuple = {
listener: listener
, id: listenerId || listener // when no id is given use the
// listener function as the id
};
if( newListener ) {
newListener.emit(eventType, listener, tuple.id);
}
listenerTupleList = cons( tuple, listenerTupleList );
listenerList = cons( listener, listenerList );
return this; // chaining
},
emit:function () {
applyEach( listenerList, arguments );
},
un: function( listenerId ) {
var removed;
listenerTupleList = without(
listenerTupleList,
hasId(listenerId),
function(tuple){
removed = tuple;
}
);
if( removed ) {
listenerList = without( listenerList, function(listener){
return listener == removed.listener;
});
if( removeListener ) {
removeListener.emit(eventType, removed.listener, removed.id);
}
}
},
listeners: function(){
// differs from Node EventEmitter: returns list, not array
return listenerList;
},
hasListener: function(listenerId){
var test = listenerId? hasId(listenerId) : always;
return defined(first( test, listenerTupleList));
}
};
}
/**
* pubSub is a curried interface for listening to and emitting
* events.
*
* If we get a bus:
*
* var bus = pubSub();
*
* We can listen to event 'foo' like:
*
* bus('foo').on(myCallback)
*
* And emit event foo like:
*
* bus('foo').emit()
*
* or, with a parameter:
*
* bus('foo').emit('bar')
*
* All functions can be cached and don't need to be
* bound. Ie:
*
* var fooEmitter = bus('foo').emit
* fooEmitter('bar'); // emit an event
* fooEmitter('baz'); // emit another
*
* There's also an uncurried[1] shortcut for .emit and .on:
*
* bus.on('foo', callback)
* bus.emit('foo', 'bar')
*
* [1]: http://zvon.org/other/haskell/Outputprelude/uncurry_f.html
*/
function pubSub(){
var singles = {},
newListener = newSingle('newListener'),
removeListener = newSingle('removeListener');
function newSingle(eventName) {
return singles[eventName] = singleEventPubSub(
eventName,
newListener,
removeListener
);
}
/** pubSub instances are functions */
function pubSubInstance( eventName ){
return singles[eventName] || newSingle( eventName );
}
// add convenience EventEmitter-style uncurried form of 'emit' and 'on'
['emit', 'on', 'un'].forEach(function(methodName){
pubSubInstance[methodName] = varArgs(function(eventName, parameters){
apply( parameters, pubSubInstance( eventName )[methodName]);
});
});
return pubSubInstance;
}
/**
* This file declares some constants to use as names for event types.
*/
var // the events which are never exported are kept as
// the smallest possible representation, in numbers:
_S = 1,
// fired whenever a node is found in the JSON:
NODE_FOUND = _S++,
// fired whenever a path is found in the JSON:
PATH_FOUND = _S++,
FAIL_EVENT = 'fail',
ROOT_FOUND = _S++,
HTTP_START = 'start',
STREAM_DATA = 'content',
STREAM_END = _S++,
ABORTING = _S++;
function errorReport(statusCode, body, error) {
try{
var jsonBody = JSON.parse(body);
}catch(e){}
return {
statusCode:statusCode,
body:body,
jsonBody:jsonBody,
thrown:error
};
}
/**
* The pattern adaptor listens for newListener and removeListener
* events. When patterns are added or removed it compiles the JSONPath
* and wires them up.
*
* When nodes and paths are found it emits the fully-qualified match
* events with parameters ready to ship to the outside world
*/
function patternAdapter(oboeBus, jsonPathCompiler) {
var predicateEventMap = {
node:oboeBus(NODE_FOUND)
, path:oboeBus(PATH_FOUND)
};
function emitMatchingNode(emitMatch, node, ascent) {
/*
We're now calling to the outside world where Lisp-style
lists will not be familiar. Convert to standard arrays.
Also, reverse the order because it is more common to
list paths "root to leaf" than "leaf to root" */
var descent = reverseList(ascent);
emitMatch(
node,
// To make a path, strip off the last item which is the special
// ROOT_PATH token for the 'path' to the root node
listAsArray(tail(map(keyOf,descent))), // path
listAsArray(map(nodeOf, descent)) // ancestors
);
}
/*
* Set up the catching of events such as NODE_FOUND and PATH_FOUND and, if
* matching the specified pattern, propagate to pattern-match events such as
* oboeBus('node:!')
*
*
*
* @param {Function} predicateEvent
* either oboeBus(NODE_FOUND) or oboeBus(PATH_FOUND).
* @param {Function} compiledJsonPath
*/
function addUnderlyingListener( fullEventName, predicateEvent, compiledJsonPath ){
var emitMatch = oboeBus(fullEventName).emit;
predicateEvent.on( function (ascent) {
var maybeMatchingMapping = compiledJsonPath(ascent);
/* Possible values for maybeMatchingMapping are now:
false:
we did not match
an object/array/string/number/null:
we matched and have the node that matched.
Because nulls are valid json values this can be null.
undefined:
we matched but don't have the matching node yet.
ie, we know there is an upcoming node that matches but we
can't say anything else about it.
*/
if (maybeMatchingMapping !== false) {
emitMatchingNode(
emitMatch,
nodeOf(maybeMatchingMapping),
ascent
);
}
}, fullEventName);
oboeBus('removeListener').on( function(removedEventName){
// if the fully qualified match event listener is later removed, clean up
// by removing the underlying listener if it was the last using that pattern:
if( removedEventName == fullEventName ) {
if( !oboeBus(removedEventName).listeners( )) {
predicateEvent.un( fullEventName );
}
}
});
}
oboeBus('newListener').on( function(fullEventName){
var match = /(node|path):(.*)/.exec(fullEventName);
if( match ) {
var predicateEvent = predicateEventMap[match[1]];
if( !predicateEvent.hasListener( fullEventName) ) {
addUnderlyingListener(
fullEventName,
predicateEvent,
jsonPathCompiler( match[2] )
);
}
}
})
}
/**
* The instance API is the thing that is returned when oboe() is called.
* it allows:
*
* - listeners for various events to be added and removed
* - the http response header/headers to be read
*/
function instanceApi(oboeBus){
var oboeApi,
fullyQualifiedNamePattern = /^(node|path):./,
rootNodeFinishedEvent = oboeBus('node:!'),
/**
* Add any kind of listener that the instance api exposes
*/
addListener = varArgs(function( eventId, parameters ){
if( oboeApi[eventId] ) {
// for events added as .on(event, callback), if there is a
// .event() equivalent with special behaviour , pass through
// to that:
apply(parameters, oboeApi[eventId]);
} else {
// we have a standard Node.js EventEmitter 2-argument call.
// The first parameter is the listener.
var event = oboeBus(eventId),
listener = parameters[0];
if( fullyQualifiedNamePattern.test(eventId) ) {
// allow fully-qualified node/path listeners
// to be added
addForgettableCallback(event, listener);
} else {
// the event has no special handling, pass through
// directly onto the event bus:
event.on( listener);
}
}
return oboeApi; // chaining
}),
/**
* Remove any kind of listener that the instance api exposes
*/
removeListener = function( eventId, p2, p3 ){
if( eventId == 'done' ) {
rootNodeFinishedEvent.un(p2);
} else if( eventId == 'node' || eventId == 'path' ) {
// allow removal of node and path
oboeBus.un(eventId + ':' + p2, p3);
} else {
// we have a standard Node.js EventEmitter 2-argument call.
// The second parameter is the listener. This may be a call
// to remove a fully-qualified node/path listener but requires
// no special handling
var listener = p2;
oboeBus(eventId).un(listener);
}
return oboeApi; // chaining
};
/**
* Add a callback, wrapped in a try/catch so as to not break the
* execution of Oboe if an exception is thrown (fail events are
* fired instead)
*
* The callback is used as the listener id so that it can later be
* removed using .un(callback)
*/
function addProtectedCallback(eventName, callback) {
oboeBus(eventName).on(protectedCallback(callback), callback);
return oboeApi; // chaining
}
/**
* Add a callback where, if .forget() is called during the callback's
* execution, the callback will be de-registered
*/
function addForgettableCallback(event, callback) {
var safeCallback = protectedCallback(callback);
event.on( function() {
var discard = false;
oboeApi.forget = function(){
discard = true;
};
apply( arguments, safeCallback );
delete oboeApi.forget;
if( discard ) {
event.un(callback);
}
}, callback)
return oboeApi; // chaining
}
function protectedCallback( callback ) {
return function() {
try{
callback.apply(oboeApi, arguments);
}catch(e) {
// An error occured during the callback, publish it on the event bus
oboeBus(FAIL_EVENT).emit( errorReport(undefined, undefined, e));
}
}
}
/**
* Return the fully qualified event for when a pattern matches
* either a node or a path
*
* @param type {String} either 'node' or 'path'
*/
function fullyQualifiedPatternMatchEvent(type, pattern) {
return oboeBus(type + ':' + pattern);
}
/**
* Add several listeners at a time, from a map
*/
function addListenersMap(eventId, listenerMap) {
for( var pattern in listenerMap ) {
addForgettableCallback(
fullyQualifiedPatternMatchEvent(eventId, pattern),
listenerMap[pattern]
);
}
}
/**
* implementation behind .onPath() and .onNode()
*/
function addNodeOrPathListenerApi( eventId, jsonPathOrListenerMap, callback ){
if( isString(jsonPathOrListenerMap) ) {
addForgettableCallback(
fullyQualifiedPatternMatchEvent(eventId, jsonPathOrListenerMap),
callback
);
} else {
addListenersMap(eventId, jsonPathOrListenerMap);
}
return oboeApi; // chaining
}
// some interface methods are only filled in after we recieve
// values and are noops before that:
oboeBus(ROOT_FOUND).on( function(root) {
oboeApi.root = functor(root);
});
/**
* When content starts make the headers readable through the
* instance API
*/
oboeBus(HTTP_START).on( function(_statusCode, headers) {
oboeApi.header = function(name) {
return name ? headers[name]
: headers
;
}
});
/**
* Construct and return the public API of the Oboe instance to be
* returned to the calling application
*/
return oboeApi = {
on : addListener,
addListener : addListener,
removeListener : removeListener,
emit : oboeBus.emit,
node : partialComplete(addNodeOrPathListenerApi, 'node'),
path : partialComplete(addNodeOrPathListenerApi, 'path'),
done : partialComplete(addForgettableCallback, rootNodeFinishedEvent),
start : partialComplete(addProtectedCallback, HTTP_START ),
// fail doesn't use protectedCallback because
// could lead to non-terminating loops
fail : oboeBus(FAIL_EVENT).on,
// public api calling abort fires the ABORTING event
abort : oboeBus(ABORTING).emit,
// initially return nothing for header and root
header : noop,
root : noop
};
}
/**
* This file implements a light-touch central controller for an instance
* of Oboe which provides the methods used for interacting with the instance
* from the calling app.
*/
function instanceController( oboeBus,
clarinetParser, contentBuilderHandlers) {
oboeBus(STREAM_DATA).on( clarinetParser.write.bind(clarinetParser));
/* At the end of the http content close the clarinet parser.
This will provide an error if the total content provided was not
valid json, ie if not all arrays, objects and Strings closed properly */
oboeBus(STREAM_END).on( clarinetParser.close.bind(clarinetParser));
/* If we abort this Oboe's request stop listening to the clarinet parser.
This prevents more tokens being found after we abort in the case where
we aborted during processing of an already filled buffer. */
oboeBus(ABORTING).on( function() {
clarinetListenerAdaptor(clarinetParser, {});
});
clarinetListenerAdaptor(clarinetParser, contentBuilderHandlers);
// react to errors by putting them on the event bus
clarinetParser.onerror = function(e) {
oboeBus(FAIL_EVENT).emit(
errorReport(undefined, undefined, e)
);
// note: don't close clarinet here because if it was not expecting
// end of the json it will throw an error
};
}
/**
* This file sits just behind the API which is used to attain a new
* Oboe instance. It creates the new components that are required
* and introduces them to each other.
*/
function wire (httpMethodName, contentSource, body, headers){
var oboeBus = pubSub();
headers = headers ?
// Shallow-clone the headers array. This allows it to be
// modified without side effects to the caller. We don't
// want to change objects that the user passes in.
JSON.parse(JSON.stringify(headers))
: {};
if( body ) {
if( !isString(body) ) {
// If the body is not a string, stringify it. This allows objects to
// be given which will be sent as JSON.
body = JSON.stringify(body);
// Default Content-Type to JSON unless given otherwise.
headers['Content-Type'] = headers['Content-Type'] || 'application/json';
}
} else {
body = null;
}
// Wire the input stream in if we are given a content source.
// This will usually be the case. If not, the instance created
// will have to be passed content from an external source.
if( contentSource ) {
streamingHttp( oboeBus,
httpTransport(),
httpMethodName,
contentSource,
body,
headers
);
}
instanceController(
oboeBus,
clarinet.parser(),
incrementalContentBuilder(oboeBus)
);
patternAdapter(oboeBus, jsonPathCompiler);
return new instanceApi(oboeBus);
}
// export public API
function oboe(arg1, arg2) {
if( arg1 ) {
if (arg1.url) {
// method signature is:
// oboe({method:m, url:u, body:b, headers:{...}})
return wire(
(arg1.method || 'GET'),
url(arg1.url, arg1.cached),
arg1.body,
arg1.headers
);
} else {
// simple version for GETs. Signature is:
// oboe( url )
//
return wire(
'GET',
arg1, // url
arg2 // body. Deprecated, use {url:u, body:b} instead
);
}
} else {
// wire up a no-AJAX Oboe. Will have to have content
// fed in externally and using .emit.
return wire();
}
// support cache busting like jQuery.ajax({cache:false})
function url(baseUrl, cached) {
if( cached === false ) {
if( baseUrl.indexOf('?') == -1 ) {
baseUrl += '?';
} else {
baseUrl += '&';
}
baseUrl += '_=' + new Date().getTime();
}
return baseUrl;
}
}
;if ( typeof define === "function" && define.amd ) {define( "oboe", [], function () { return oboe; } );} else {window.oboe = oboe;}})(window, Object, Array, Error, JSON); |