SassyJSON 1.0.6

data/CHANGELOG.md

@@ -0,0 +1,11 @@
+# Changelog
+
+* `1.0.6`: released a Ruby gem
+* `1.0.5`: improved the encoding mixin
+* `1.0.4`: fixed an error in map parsing
+* `1.0.3`: slightly edited the mixin to dump JSON to CSS
+* `1.0.2`: fixed an issue with string parsing
+* `1.0.1`: fixed an issue with alpha color parsing
+* `1.0.0`: Stable API. `json-encode` and `json-decode`
+* `0.0.2`: added `json-decode` and test
+* `0.0.1`: initial commit

data/README.md

@@ -0,0 +1,96 @@
+# SassyJSON [![NPM version](https://badge.fury.io/js/sassyjson.png)](http://badge.fury.io/js/sassyjson) [![Build Status](https://travis-ci.org/HugoGiraudel/SassyJSON.png?branch=master)](https://travis-ci.org/HugoGiraudel/SassyJSON)
+
+SassyJSON is a Sass-powered API for JSON. It provides you the classic `json-encode` and `json-decode` directly from your Sass files. We'll leave you the only judges of the point of this.
+
+## Install
+
+SassyJSON is currently available in [npm](https://npmjs.org/).
+
+### Git
+
+``` git
+git clone https://github.com/HugoGiraudel/SassyJSON.git && cd SassyJSON
+```
+
+### npm
+
+``` bash
+npm install sassyjson --save-dev
+```
+
+### Compass extension
+
+1. `gem install SassyJSON`
+2. Add `require 'SassyJSON'` to your `config.rb`
+3. Import it in your stylesheets with `@import 'SassyJSON'`
+
+### Sass
+
+If you only want to play around the code without cloning the repo or using npm, you can find a [single file](https://github.com/HugoGiraudel/SassyJSON/blob/master/dist/_SassyJSON.scss) containing the whole API in the [dist](https://github.com/HugoGiraudel/SassyJSON/tree/master/dist) folder. You can copy its content directly into [Sassmeister](http://sassmeister.com/) to play with the code.
+
+## Example
+
+### Encoding Sass to JSON
+
+#### Sass
+
+``` scss
+$map: ((a: (1 2 ( b : 1 )), b: ( #444444, false, ( a: 1, b: test ) ), c: (2 3 4 string)));
+
+@include json-encode($map);
+```
+
+#### CSS
+
+``` css
+/*! json-encode: '{"a": [1, 2, {"b": 1}], "b": ["#444444", false, {"a": 1, "b": "test"}], "c": [2, 3, 4, "string"]}' */
+
+body::before {
+  content: '{"a": [1, 2, {"b": 1}], "b": ["#444444", false, {"a": 1, "b": "test"}], "c": [2, 3, 4, "string"]}';
+}
+
+head {
+  font-family: '{"a": [1, 2, {"b": 1}], "b": ["#444444", false, {"a": 1, "b": "test"}], "c": [2, 3, 4, "string"]}';
+}
+
+@media -json-encode {
+  json {
+    json: '{"a": [1, 2, {"b": 1}], "b": ["#444444", false, {"a": 1, "b": "test"}], "c": [2, 3, 4, "string"]}';
+  }
+}
+```
+
+If you want to restrict the output to only one of the three drivers (comment, media query or regular output) you can pass a flag as the second parameter with one of the four following keywords: `all`, `comment`, `media` or `regular`. Default is `all`.
+
+### Decoding JSON to Sass
+
+``` scss
+$json-decode: json-decode('{"a": [1, 2, {"b": 1}], "b": ["#444444", false, {"a": 1, "b": "test"}], "c": [2, 3, 4, "string"]}');
+// ("a": 1 2 ("b": 1), "b": #444444 false ("a": 1, "b": "test"), "c": 2 3 4 "string")
+```
+
+## Requirements
+
+All you need is a clean version of Sass 3.3. Otherwise it's just pure Sass madness.
+
+## Development
+
+### You need
+
+  * [NodeJS](http://nodejs.org)
+  * [Ruby](https://www.ruby-lang.org/)
+  * Sass 3.3 via `gem instals sass --pre`
+  * `grunt-cli` via `npm install -g grunt-cli`
+
+### How to
+
+  1. Fork this repository
+  2. Run `npm install`
+  3. `grunt dev`
+  4. Make your changes + write tests
+  5. Commit + Pull request
+
+## Credits
+
+* [Fabrice Weinberg](http://twitter.com/fweinb)
+* [Hugo Giraudel](http://twitter.com/hugogiraudel)

data/lib/SassyJSON.rb

@@ -0,0 +1,14 @@
+require 'compass'
+extension_path = File.expand_path(File.join(File.dirname(__FILE__), ".."))
+Compass::Frameworks.register('SassyJSON', :path => extension_path)
+
+#  Version is a number. If a version contains alphas, it will be created as a prerelease version
+#  Date is in the form of YYYY-MM-DD
+module SassyJSON
+  VERSION = "1.0.6"
+  DATE = "2014-01-19"
+end
+
+module Sass::Script::Functions
+
+end

data/src/SassyJSON.scss

@@ -0,0 +1,2 @@
+@import "decode/decode";
+@import "encode/encode";

data/src/decode/api/_json.scss

@@ -0,0 +1,26 @@
+// Parse a JSON string
+// --------------------------------------------------------------------------------
+// @param $json: JSON string to parse
+// --------------------------------------------------------------------------------
+// @throw "Input string may not be null"
+// --------------------------------------------------------------------------------
+// @return [literal|false]
+
+@function json-decode($json) {
+  $length: str-length($json);
+  $pointer: 1;
+  $value: null;
+
+  @if $json == null {
+    @return _throw("Input string may not be null.", $pointer);
+  }
+
+  @while $value != false // Stop if error
+  and $pointer <= $length {
+    $read: _json-decode--value($json, $pointer);
+    $pointer: nth($read, 1);
+    $value: nth($read, 2);
+  }
+
+  @return $value;
+}

data/src/decode/decode.scss

@@ -0,0 +1,28 @@
+// Helpers
+@import "helpers/all/throw";
+@import "helpers/all/value";
+@import "helpers/map/consume";
+@import "helpers/number/pow";
+@import "helpers/number/find-digits";
+@import "helpers/number/find-integer";
+@import "helpers/number/find-exponent";
+@import "helpers/color/color";
+@import "helpers/color/get-color-value";
+@import "helpers/color/rgb";
+@import "helpers/color/hsl";
+@import "helpers/color/hex";
+@import "helpers/color/hex-to-dec";
+@import "helpers/string/length";
+@import "helpers/string/strip-token";
+@import "helpers/string/find-ending-quote";
+
+// Type specific decoding functions
+@import "types/bool";
+@import "types/null";
+@import "types/list";
+@import "types/map";
+@import "types/number";
+@import "types/string";
+
+// Public API
+@import "api/json";

data/src/decode/helpers/all/_throw.scss

@@ -0,0 +1,11 @@
+// Logs an error at `$pointer` with `$string` message
+// --------------------------------------------------------------------------------
+// @param [string] $string: error message
+// @param [number] $pointer: pointer position
+// --------------------------------------------------------------------------------
+// @return [list] (pointer, false)
+
+@function _throw($string, $pointer) {
+  @warn "ERROR::#{$pointer}::#{$string}";
+  @return $pointer, false;
+}

data/src/decode/helpers/all/_value.scss

@@ -0,0 +1,49 @@
+// Delay parsing to type-specific function
+// according to found character
+// --------------------------------------------------------------------------------
+// @param [string] $source: JSON complete source
+// @param [number] $pointer: current pointer
+// --------------------------------------------------------------------------------
+// @throw "Unexpected token $token."
+// @throw "Empty JSON string."
+// --------------------------------------------------------------------------------
+// @return [list|false] (new pointer, parsed value)
+
+@function _json-decode--value($source, $pointer) {
+  $length: str-length($source);
+
+  @while $pointer <= $length {
+    $token: str-slice($source, $pointer, $pointer);
+    $pointer: $pointer + 1;
+
+    @if $token == '{' {
+      @return _json-decode--map($source, $pointer);
+    }
+    @else if $token == '[' {
+      @return _json-decode--list($source, $pointer);
+    }
+    @else if $token == 't' {
+      @return _json-decode--true($source, $pointer);
+    }
+    @else if $token == 'f' {
+      @return _json-decode--false($source, $pointer);
+    }
+    @else if $token == '"' {
+      @return _json-decode--string($source, $pointer);
+    }
+    @else if $token == 'n' {
+      @return _json-decode--null($source, $pointer);
+    }
+    @else if index('1' '2' '3' '4' '5' '6' '7' '8' '9' '0' '-' '.', $token) {
+      @return _json-decode--number($source, $pointer);
+    }
+    @else if $token == ' ' {
+      // @continue;
+    }
+    @else {
+      @return _throw("Unexpected token `" + $token + "`.", $pointer);
+    }
+  }
+
+  @return _throw("Empty JSON string.", $pointer);
+}

data/src/decode/helpers/color/_color.scss

@@ -0,0 +1,45 @@
+// Parses a JSON encoded string to see if it's a CSS color
+// --------------------------------------------------------------------------------
+// @param [string] $string: JSON string
+// --------------------------------------------------------------------------------
+// @return [color|string] string or number, depending on the match
+
+@function _color($string) {
+  @if type-of($string) == color {
+    @return $string;
+  }
+  
+  $string: to-lower-case($string);
+  $keywords: "transparent" "black" "silver" "gray" "white" "maroon" "red" "purple" "fuchsia" "green" "lime" "olive" "yellow" "navy" "blue" "teal"	"aqua" "aliceblue" "antiquewhite" "aqua" "aquamarine" "azure" "beige" "bisque" "black" "blanchedalmond" "blue" "blueviolet" "brown" "burlywood" "cadetblue" "chartreuse" "chocolate" "coral" "cornflowerblue" "cornsilk" "crimson" "cyan" "darkblue" "darkcyan" "darkgoldenrod" "darkgray" "darkgreen" "darkgrey" "darkkhaki" "darkmagenta" "darkolivegreen" "darkorange" "darkorchid" "darkred" "darksalmon" "darkseagreen" "darkslateblue" "darkslategray" "darkslategrey" "darkturquoise" "darkviolet" "deeppink" "deepskyblue" "dimgray" "dimgrey" "dodgerblue" "firebrick" "floralwhite" "forestgreen" "fuchsia" "gainsboro" "ghostwhite" "gold" "goldenrod" "gray" "green" "greenyellow" "grey" "honeydew" "hotpink" "indianred" "indigo" "ivory" "khaki" "lavender" "lavenderblush" "lawngreen" "lemonchiffon" "lightblue" "lightcoral" "lightcyan" "lightgoldenrodyellow" "lightgray" "lightgreen" "lightgrey" "lightpink" "lightsalmon" "lightseagreen" "lightskyblue" "lightslategray" "lightslategrey" "lightsteelblue" "lightyellow" "lime" "limegreen" "linen" "magenta" "maroon" "mediumaquamarine" "mediumblue" "mediumorchid" "mediumpurple" "mediumseagreen" "mediumslateblue" "mediumspringgreen" "mediumturquoise" "mediumvioletred" "midnightblue" "mintcream" "mistyrose" "moccasin" "navajowhite" "navy" "oldlace" "olive" "olivedrab" "orange" "orangered" "orchid" "palegoldenrod" "palegreen" "paleturquoise" "palevioletred" "papayawhip" "peachpuff" "peru" "pink" "plum" "powderblue" "purple" "red" "rosybrown" "royalblue" "saddlebrown" "salmon" "sandybrown" "seagreen" "seashell" "sienna" "silver" "skyblue" "slateblue" "slategray" "slategrey" "snow" "springgreen" "steelblue" "tan" "teal" "thistle" "tomato" "turquoise" "violet" "wheat" "white" "whitesmoke" "yellow" "yellowgreen";
+  $colors: transparent black silver gray white maroon red purple fuchsia green lime olive yellow navy blue teal	aqua aliceblue antiquewhite aqua aquamarine azure beige bisque black blanchedalmond blue blueviolet brown burlywood cadetblue chartreuse chocolate coral cornflowerblue cornsilk crimson cyan darkblue darkcyan darkgoldenrod darkgray darkgreen darkgrey darkkhaki darkmagenta darkolivegreen darkorange darkorchid darkred darksalmon darkseagreen darkslateblue darkslategray darkslategrey darkturquoise darkviolet deeppink deepskyblue dimgray dimgrey dodgerblue firebrick floralwhite forestgreen fuchsia gainsboro ghostwhite gold goldenrod gray green greenyellow grey honeydew hotpink indianred indigo ivory khaki lavender lavenderblush lawngreen lemonchiffon lightblue lightcoral lightcyan lightgoldenrodyellow lightgray lightgreen lightgrey lightpink lightsalmon lightseagreen lightskyblue lightslategray lightslategrey lightsteelblue lightyellow lime limegreen linen magenta maroon mediumaquamarine mediumblue mediumorchid mediumpurple mediumseagreen mediumslateblue mediumspringgreen mediumturquoise mediumvioletred midnightblue mintcream mistyrose moccasin navajowhite navy oldlace olive olivedrab orange orangered orchid palegoldenrod palegreen paleturquoise palevioletred papayawhip peachpuff peru pink plum powderblue purple red rosybrown royalblue saddlebrown salmon sandybrown seagreen seashell sienna silver skyblue slateblue slategray slategrey snow springgreen steelblue tan teal thistle tomato turquoise violet wheat white whitesmoke yellow yellowgreen;
+  
+  // Deal with inherit keyword
+  @if $string == "inherit" {
+    @return unquote($string);
+  }
+ 
+  // Deal with color keywords
+  @if index($keywords, $string) {
+    @return nth($colors, index($keywords, $string));
+  }
+  
+  // Deal with hexadecimal triplets
+  @else if str-slice($string, 1, 1) == '#' {
+    @return _from-hex($string);
+  }
+  
+  // Deal with rgb(a) colors
+  @else if str-slice($string, 1, 3) == 'rgb' {
+    @return _from-rgb($string);
+  }
+  
+  // Deal with hsl(a) colors
+  @else if str-slice($string, 1, 3) == 'hsl' {
+    @return _from-hsl($string);
+  }
+  
+  // Return string
+  @else {
+    @return $string;
+  }
+}

data/src/decode/helpers/color/_get-color-value.scss

@@ -0,0 +1,18 @@
+// Cast a stringified number / stringified percentage into number type
+// --------------------------------------------------------------------------------
+// @param [string] $string: JSON string
+// --------------------------------------------------------------------------------
+// @return [number] unitless number or percentage
+
+@function _get-color-value($string) {
+  $first: str-slice($string, 1, 1);
+  @if $first == '.' {
+    $string: '0' + $string;
+  }
+  $last: str-slice($string, -1, -1);
+  @return if(
+    $last == '%', 
+    nth(_json-decode--number(str-slice($string, 1, -2), 2), 2) * 1%, 
+    nth(_json-decode--number($string, 2), 2)
+  );
+}

data/src/decode/helpers/color/_hex-to-dec.scss

@@ -0,0 +1,20 @@
+// Convert an hexadecimal number to a decimal number
+// --------------------------------------------------------------------------------
+// @param [string] $string: hexadecimal value
+// --------------------------------------------------------------------------------
+// @return [number] decimal number
+
+@function _hex-to-dec($string){
+  $hex: "0" "1" "2" "3" "4" "5" "6" "7" "8" "9" "a" "b" "c" "d" "e" "f";
+  $string: to-lower-case($string);
+  $length: str-length($string);
+  
+  $dec: 0;
+  @for $i from 1 through $length {
+    $factor: 1 + ( 15 * ( $length - $i ));
+    $index: index($hex, str-slice($string, $i, $i));
+    $dec: $dec + $factor * ($index - 1);
+  }
+  
+  @return $dec;
+} 

data/src/decode/helpers/color/_hex.scss

@@ -0,0 +1,39 @@
+// Cast a JSON encoded string into a hexadecimal color
+// --------------------------------------------------------------------------------
+// @param [string] $string: JSON string
+// --------------------------------------------------------------------------------
+// @return [color|string] string or hex color depending on the match
+
+@function _from-hex($string) {
+  $r: "";  $g: ""; $b: "";
+  $hex: "0" "1" "2" "3" "4" "5" "6" "7" "8" "9" "a" "b" "c" "d" "e" "f";
+  $length: str-length($string);
+  $max: if($length == 4, 1, 2);
+
+  // Check for length accuracy
+  @if $length != 4 and $length != 7 {
+    @return $string;
+  }
+
+  // Loop from the second character (omitting #)
+  @for $i from 2 through $length {
+    $c: to-lower-case(str-slice($string, $i, $i));
+
+    // If wrong character, return
+    @if not index($hex, $c) {
+      @return $string;
+    }
+
+    @if      str-length($r) < $max { $r: $r + $c }
+    @else if str-length($g) < $max { $g: $g + $c }
+    @else if str-length($b) < $max { $b: $b + $c }
+  }
+  
+  @if $length == 4 {
+    $r: $r + $r;
+    $g: $g + $g;
+    $b: $b + $b;
+  }
+  
+  @return rgb(_hex-to-dec($r), _hex-to-dec($g), _hex-to-dec($b));
+}

data/src/decode/helpers/color/_hsl.scss

@@ -0,0 +1,46 @@
+// Cast a JSON encoded string into a hsl(a) color
+// --------------------------------------------------------------------------------
+// @param [string] $string: JSON string
+// --------------------------------------------------------------------------------
+// @return [color|string] string or hsl(a) color, depending on the match
+
+@function _from-hsl($string) {
+  $frags: ();
+  $is-alpha: str-slice($string, 4, 4) == 'a';
+  $start: str-index($string, "(");
+  $length: str-length($string);
+
+  @for $i from $start through $length {
+    $token: str-slice($string, $i, $i);
+    @if $token == ' ' {
+      // @continue;
+    }
+    @else if $token == '(' or $token == ',' {
+      $frags: append($frags, "");
+    }
+    @else if $token == ')' {
+      @if length($frags) != if($is-alpha, 4, 3) { @return $string; } // Parsing error
+      $hue: _get-color-value(nth($frags, 1));
+      $saturation: _get-color-value(nth($frags, 2));
+      $lightness: _get-color-value(nth($frags, 3));
+
+      @if not $hue or not $saturation or not $lightness {
+        @return $string;
+      }
+
+      @if $is-alpha {
+        @if length($frags) != 4 { @return $string; } // No alpha channel found
+        $alpha: _get-color-value(nth($frags, 4));
+        @if not $alpha { @return $string; } // Error parsing alpha channel
+        @return hsla($hue, $saturation, $lightness, $alpha);
+      }
+
+      @return hsl($hue, $saturation, $lightness);
+    }
+    @else {
+      $frags: set-nth($frags, length($frags), nth($frags, length($frags)) + $token);
+    }
+  } 
+
+  @return $string;
+}

data/src/decode/helpers/color/_rgb.scss

@@ -0,0 +1,46 @@
+// Cast a JSON encoded string into a rgb(a) color
+// --------------------------------------------------------------------------------
+// @param [string] $string: JSON string
+// --------------------------------------------------------------------------------
+// @return [color|string] string or rgb(a) color depending on the match
+
+@function _from-rgb($string) {
+  $frags: ();
+  $is-alpha: str-slice($string, 4, 4) == 'a';
+  $start: str-index($string, "(");
+  $length: str-length($string);
+
+  @for $i from $start through $length {
+    $token: str-slice($string, $i, $i);
+    @if $token == ' ' {
+      // @continue;
+    }
+    @else if $token == '(' or $token == ',' {
+      $frags: append($frags, "");
+    }
+    @else if $token == ')' {
+      @if length($frags) != if($is-alpha, 4, 3) { @return $string; } // Parsing error
+      $red: _get-color-value(nth($frags, 1));
+      $green: _get-color-value(nth($frags, 2));
+      $blue: _get-color-value(nth($frags, 3));
+
+      @if not $red or not $green or not $blue {
+        @return $string;
+      }
+
+      @if $is-alpha {
+        @if length($frags) != 4 { @return $string; } // No alpha channel found
+        $alpha: _get-color-value(nth($frags, 4));
+        @if not $alpha { @return $string; } // Error parsing alpha channel
+        @return rgba($red, $green, $blue, $alpha);
+      }
+
+      @return rgb($red, $green, $blue);
+    }
+    @else {
+      $frags: set-nth($frags, length($frags), nth($frags, length($frags)) + $token);
+    }
+  } 
+
+  @return $string;
+}

data/src/decode/helpers/map/_consume.scss

@@ -0,0 +1,33 @@
+// Move pointer to position of token
+// --------------------------------------------------------------------------------
+// @param [string] $source: JSON complete source
+// @param [number] $pointer: current pointer
+// @param [string] $token: token to reach
+// --------------------------------------------------------------------------------
+// @throw "Expected $token; found {x}."
+// @throw "Expected $token but reached end of stream."
+// --------------------------------------------------------------------------------
+// @return [number|false] new pointer
+
+@function _consume($source, $pointer, $token) {
+  $length: str-length($source);
+
+  @while $pointer <= $length {
+    $char: str-slice($source, $pointer, $pointer);
+    $pointer: $pointer + 1;
+
+    @if $char == $token {
+      @return $pointer;
+    }
+
+    @else if $char == " " {
+      // @continue;
+    }
+
+    @else {
+      @return _throw("Expected `" + $token + "; ` found `" + $char + "`.", $pointer);
+    }
+  }
+
+  @return _throw("Expected `" + $token + "` but reached end of stream.", $pointer);
+}

data/src/decode/helpers/number/_find-digits.scss

@@ -0,0 +1,40 @@
+// Parses a JSON encoded number to find the digits
+// --------------------------------------------------------------------------------
+// @param [string] $source: JSON complete source
+// @param [number] $pointer: current pointer
+// --------------------------------------------------------------------------------
+// @throw "Unexpected token $token."
+// --------------------------------------------------------------------------------
+// @return [list|false] (new pointer, parsed number)
+
+@function _find-digits($source, $pointer) {
+  $length: str-length($source);
+  $strings: '0' '1' '2' '3' '4' '5' '6' '7' '8' '9';
+  $numbers:  0   1   2   3   4   5   6   7   8   9;
+  $result: null;
+  $runs: 1;
+
+  @while $pointer <= $length {
+    $token: to-lower-case(str-slice($source, $pointer, $pointer));
+    $index: index($strings, $token);
+
+    @if $token == '.' {
+      // @continue;
+    }
+    @else if $index and $index > 0 {
+      $number: nth($numbers, $index);
+      $runs: $runs * 10;
+      $result: if($result == null, $number, $result * 10 + $number);
+    }
+    @else {
+      @if index('e' '.' ',' ']' '}' ' ', $token) {
+        @return $pointer, if($result != null, $result / $runs, $result);
+      }
+      @return _throw("Unexpected token `" + $token + "`.", $pointer);
+    }
+
+    $pointer: $pointer + 1;
+  }
+
+  @return $pointer, if($result != null, $result / $runs, $result);
+}

data/src/decode/helpers/number/_find-exponent.scss

@@ -0,0 +1,46 @@
+// Parses a JSON encoded number to find the exponent part
+// --------------------------------------------------------------------------------
+// @param [string] $source: JSON complete source
+// @param [number] $pointer: current pointer
+// --------------------------------------------------------------------------------
+// @throw "Unexpected token $token."
+// --------------------------------------------------------------------------------
+// @return [list|false] (new pointer, parsed number)
+
+@function _find-exponent($source, $pointer) {
+  $length: str-length($source);
+  $strings: '0' '1' '2' '3' '4' '5' '6' '7' '8' '9';
+  $numbers:  0   1   2   3   4   5   6   7   8   9;
+  $result: null;
+  $minus: false;
+
+  @while $pointer <= $length {
+    $token: to-lower-case(str-slice($source, $pointer, $pointer));
+    $index: index($strings, $token);
+
+    @if $token == 'e' {
+      // @continue;
+    }
+    @else if $token == '-' {
+      $minus: true;
+    }
+    @else if $token == '+' {
+      $minus: false;
+    }
+    @else if $index and $index > 0 {
+      $number: nth($numbers, $index);
+      $result: if($result == null, $number, $result * 10 + $number);
+    }
+    @else {
+      @if not index(" ", ", ", "]", "}", $token) {
+        @return _throw("Unexpected token `" + $token + "`.", $pointer);
+      }
+
+      @return $pointer, if($minus and $result != null, $result * -1, $result);
+    }
+
+    $pointer: $pointer + 1;
+  }
+
+  @return $pointer, if($minus and $result != null, $result * -1, $result);
+}

data/src/decode/helpers/number/_find-integer.scss

@@ -0,0 +1,38 @@
+// Parses a JSON encoded number to find the integer part
+// --------------------------------------------------------------------------------
+// @param [string] $source: JSON complete source
+// @param [number] $pointer: current pointer
+// --------------------------------------------------------------------------------
+// @throw "Unexpected token $token."
+// --------------------------------------------------------------------------------
+// @return [list|false] (new pointer, parsed number)
+
+@function _find-integer($source, $pointer) {
+  $length: str-length($source);
+  $strings: '0' '1' '2' '3' '4' '5' '6' '7' '8' '9';
+  $numbers:  0   1   2   3   4   5   6   7   8   9;
+  $result: 0;
+
+  @while $pointer <= $length {
+    $token: to-lower-case(str-slice($source, $pointer, $pointer));
+    $index: index($strings, $token);
+
+    @if $token == '-' {
+      // do nothing
+    }
+    @else if $index {
+      $number: nth($numbers, $index);
+      $result: $result * 10 + $number;
+    }
+    @else {
+      @if index('e' '.' ',' ']' '}' ' ', $token) {
+        @return $pointer, $result;
+      }
+      @return _throw("Unexpected token `" + $token + "`.", $pointer);
+    }
+
+    $pointer: $pointer + 1;
+  }
+
+  @return $pointer, $result;
+}

data/src/decode/helpers/number/_pow.scss

@@ -0,0 +1,22 @@
+// Power function
+// --------------------------------------------------------------------------------
+// @param [number] $x: number
+// @param [number] $n: power
+// --------------------------------------------------------------------------------
+// @return [number] $x ^ $n
+
+@function _pow($x, $n) {
+  $ret: 1;
+
+  @if $n >= 0 {
+    @for $i from 1 through $n {
+      $ret: $ret * $x;
+    }
+  } @else {
+    @for $i from $n to 0 {
+      $ret: $ret / $x;
+    }
+  }
+
+  @return $ret;
+}