/front/node_modules/node-sass/src/libsass/src/sass2scss.cpp
C++ | 845 lines | 503 code | 117 blank | 225 comment | 341 complexity | fcfada8a8c8b9e58044e0a00c4f6dea3 MD5 | raw file
- /**
- * sass2scss
- * Licensed under the MIT License
- * Copyright (c) Marcel Greter
- */
- #ifdef _MSC_VER
- #define _CRT_SECURE_NO_WARNINGS
- #define _CRT_NONSTDC_NO_DEPRECATE
- #endif
- // include library
- #include <stack>
- #include <string>
- #include <cstring>
- #include <cstdlib>
- #include <sstream>
- #include <iostream>
- #include <stdio.h>
- ///*
- //
- // src comments: comments in sass syntax (staring with //)
- // css comments: multiline comments in css syntax (starting with /*)
- //
- // KEEP_COMMENT: keep src comments in the resulting css code
- // STRIP_COMMENT: strip out all comments (either src or css)
- // CONVERT_COMMENT: convert all src comments to css comments
- //
- //*/
- // our own header
- #include "sass2scss.h"
- // add namespace for c++
- namespace Sass
- {
- // return the actual prettify value from options
- #define PRETTIFY(converter) (converter.options - (converter.options & 248))
- // query the options integer to check if the option is enables
- #define KEEP_COMMENT(converter) ((converter.options & SASS2SCSS_KEEP_COMMENT) == SASS2SCSS_KEEP_COMMENT)
- #define STRIP_COMMENT(converter) ((converter.options & SASS2SCSS_STRIP_COMMENT) == SASS2SCSS_STRIP_COMMENT)
- #define CONVERT_COMMENT(converter) ((converter.options & SASS2SCSS_CONVERT_COMMENT) == SASS2SCSS_CONVERT_COMMENT)
- // some makros to access the indentation stack
- #define INDENT(converter) (converter.indents.top())
- // some makros to query comment parser status
- #define IS_PARSING(converter) (converter.comment == "")
- #define IS_COMMENT(converter) (converter.comment != "")
- #define IS_SRC_COMMENT(converter) (converter.comment == "//" && ! CONVERT_COMMENT(converter))
- #define IS_CSS_COMMENT(converter) (converter.comment == "/*" || (converter.comment == "//" && CONVERT_COMMENT(converter)))
- // pretty printer helper function
- static std::string closer (const converter& converter)
- {
- return PRETTIFY(converter) == 0 ? " }" :
- PRETTIFY(converter) <= 1 ? " }" :
- "\n" + INDENT(converter) + "}";
- }
- // pretty printer helper function
- static std::string opener (const converter& converter)
- {
- return PRETTIFY(converter) == 0 ? " { " :
- PRETTIFY(converter) <= 2 ? " {" :
- "\n" + INDENT(converter) + "{";
- }
- // check if the given string is a pseudo selector
- // needed to differentiate from sass property syntax
- static bool isPseudoSelector (std::string& sel)
- {
- size_t len = sel.length();
- if (len < 1) return false;
- size_t pos = sel.find_first_not_of("abcdefghijklmnopqrstuvwxyz-ABCDEFGHIJKLMNOPQRSTUVWXYZ", 1);
- if (pos != std::string::npos) sel.erase(pos, std::string::npos);
- size_t i = sel.length();
- while (i -- > 0) { sel.at(i) = tolower(sel.at(i)); }
- // CSS Level 1 - Recommendation
- if (sel == ":link") return true;
- if (sel == ":visited") return true;
- if (sel == ":active") return true;
- // CSS Level 2 (Revision 1) - Recommendation
- if (sel == ":lang") return true;
- if (sel == ":first-child") return true;
- if (sel == ":hover") return true;
- if (sel == ":focus") return true;
- // disabled - also valid properties
- // if (sel == ":left") return true;
- // if (sel == ":right") return true;
- if (sel == ":first") return true;
- // Selectors Level 3 - Recommendation
- if (sel == ":target") return true;
- if (sel == ":root") return true;
- if (sel == ":nth-child") return true;
- if (sel == ":nth-last-of-child") return true;
- if (sel == ":nth-of-type") return true;
- if (sel == ":nth-last-of-type") return true;
- if (sel == ":last-child") return true;
- if (sel == ":first-of-type") return true;
- if (sel == ":last-of-type") return true;
- if (sel == ":only-child") return true;
- if (sel == ":only-of-type") return true;
- if (sel == ":empty") return true;
- if (sel == ":not") return true;
- // CSS Basic User Interface Module Level 3 - Working Draft
- if (sel == ":default") return true;
- if (sel == ":valid") return true;
- if (sel == ":invalid") return true;
- if (sel == ":in-range") return true;
- if (sel == ":out-of-range") return true;
- if (sel == ":required") return true;
- if (sel == ":optional") return true;
- if (sel == ":read-only") return true;
- if (sel == ":read-write") return true;
- if (sel == ":dir") return true;
- if (sel == ":enabled") return true;
- if (sel == ":disabled") return true;
- if (sel == ":checked") return true;
- if (sel == ":indeterminate") return true;
- if (sel == ":nth-last-child") return true;
- // Selectors Level 4 - Working Draft
- if (sel == ":any-link") return true;
- if (sel == ":local-link") return true;
- if (sel == ":scope") return true;
- if (sel == ":active-drop-target") return true;
- if (sel == ":valid-drop-target") return true;
- if (sel == ":invalid-drop-target") return true;
- if (sel == ":current") return true;
- if (sel == ":past") return true;
- if (sel == ":future") return true;
- if (sel == ":placeholder-shown") return true;
- if (sel == ":user-error") return true;
- if (sel == ":blank") return true;
- if (sel == ":nth-match") return true;
- if (sel == ":nth-last-match") return true;
- if (sel == ":nth-column") return true;
- if (sel == ":nth-last-column") return true;
- if (sel == ":matches") return true;
- // Fullscreen API - Living Standard
- if (sel == ":fullscreen") return true;
- // not a pseudo selector
- return false;
- }
- // check if there is some char data
- // will ignore everything in comments
- static bool hasCharData (std::string& sass)
- {
- size_t col_pos = 0;
- while (true)
- {
- // try to find some meaningfull char
- col_pos = sass.find_first_not_of(" \t\n\v\f\r", col_pos);
- // there was no meaningfull char found
- if (col_pos == std::string::npos) return false;
- // found a multiline comment opener
- if (sass.substr(col_pos, 2) == "/*")
- {
- // find the multiline comment closer
- col_pos = sass.find("*/", col_pos);
- // maybe we did not find the closer here
- if (col_pos == std::string::npos) return false;
- // skip closer
- col_pos += 2;
- }
- else
- {
- return true;
- }
- }
- }
- // EO hasCharData
- // find src comment opener
- // correctly skips quoted strings
- static size_t findCommentOpener (std::string& sass)
- {
- size_t col_pos = 0;
- bool apoed = false;
- bool quoted = false;
- bool comment = false;
- size_t brackets = 0;
- while (col_pos != std::string::npos)
- {
- // process all interesting chars
- col_pos = sass.find_first_of("\"\'/\\*()", col_pos);
- // assertion for valid result
- if (col_pos != std::string::npos)
- {
- char character = sass.at(col_pos);
- if (character == '(')
- {
- if (!quoted && !apoed) brackets ++;
- }
- else if (character == ')')
- {
- if (!quoted && !apoed) brackets --;
- }
- else if (character == '\"')
- {
- // invert quote bool
- if (!apoed && !comment) quoted = !quoted;
- }
- else if (character == '\'')
- {
- // invert quote bool
- if (!quoted && !comment) apoed = !apoed;
- }
- else if (col_pos > 0 && character == '/')
- {
- if (sass.at(col_pos - 1) == '*')
- {
- comment = false;
- }
- // next needs to be a slash too
- else if (sass.at(col_pos - 1) == '/')
- {
- // only found if not in single or double quote, bracket or comment
- if (!quoted && !apoed && !comment && brackets == 0) return col_pos - 1;
- }
- }
- else if (character == '\\')
- {
- // skip next char if in quote
- if (quoted || apoed) col_pos ++;
- }
- // this might be a comment opener
- else if (col_pos > 0 && character == '*')
- {
- // opening a multiline comment
- if (sass.at(col_pos - 1) == '/')
- {
- // we are now in a comment
- if (!quoted && !apoed) comment = true;
- }
- }
- // skip char
- col_pos ++;
- }
- }
- // EO while
- return col_pos;
- }
- // EO findCommentOpener
- // remove multiline comments from sass string
- // correctly skips quoted strings
- static std::string removeMultilineComment (std::string &sass)
- {
- std::string clean = "";
- size_t col_pos = 0;
- size_t open_pos = 0;
- size_t close_pos = 0;
- bool apoed = false;
- bool quoted = false;
- bool comment = false;
- // process sass til string end
- while (col_pos != std::string::npos)
- {
- // process all interesting chars
- col_pos = sass.find_first_of("\"\'/\\*", col_pos);
- // assertion for valid result
- if (col_pos != std::string::npos)
- {
- char character = sass.at(col_pos);
- // found quoted string delimiter
- if (character == '\"')
- {
- if (!apoed && !comment) quoted = !quoted;
- }
- else if (character == '\'')
- {
- if (!quoted && !comment) apoed = !apoed;
- }
- // found possible comment closer
- else if (character == '/')
- {
- // look back to see if it is actually a closer
- if (comment && col_pos > 0 && sass.at(col_pos - 1) == '*')
- {
- close_pos = col_pos + 1; comment = false;
- }
- }
- else if (character == '\\')
- {
- // skip escaped char
- if (quoted || apoed) col_pos ++;
- }
- // this might be a comment opener
- else if (character == '*')
- {
- // look back to see if it is actually an opener
- if (!quoted && !apoed && col_pos > 0 && sass.at(col_pos - 1) == '/')
- {
- comment = true; open_pos = col_pos - 1;
- clean += sass.substr(close_pos, open_pos - close_pos);
- }
- }
- // skip char
- col_pos ++;
- }
- }
- // EO while
- // add final parts (add half open comment text)
- if (comment) clean += sass.substr(open_pos);
- else clean += sass.substr(close_pos);
- // return string
- return clean;
- }
- // EO removeMultilineComment
- // right trim a given string
- std::string rtrim(const std::string &sass)
- {
- std::string trimmed = sass;
- size_t pos_ws = trimmed.find_last_not_of(" \t\n\v\f\r");
- if (pos_ws != std::string::npos)
- { trimmed.erase(pos_ws + 1); }
- else { trimmed.clear(); }
- return trimmed;
- }
- // EO rtrim
- // flush whitespace and print additional text, but
- // only print additional chars and buffer whitespace
- std::string flush (std::string& sass, converter& converter)
- {
- // return flushed
- std::string scss = "";
- // print whitespace buffer
- scss += PRETTIFY(converter) > 0 ?
- converter.whitespace : "";
- // reset whitespace buffer
- converter.whitespace = "";
- // remove possible newlines from string
- size_t pos_right = sass.find_last_not_of("\n\r");
- if (pos_right == std::string::npos) return scss;
- // get the linefeeds from the string
- std::string lfs = sass.substr(pos_right + 1);
- sass = sass.substr(0, pos_right + 1);
- // find some source comment opener
- size_t comment_pos = findCommentOpener(sass);
- // check if there was a source comment
- if (comment_pos != std::string::npos)
- {
- // convert comment (but only outside other coments)
- if (CONVERT_COMMENT(converter) && !IS_COMMENT(converter))
- {
- // convert to multiline comment
- sass.at(comment_pos + 1) = '*';
- // add comment node to the whitespace
- sass += " */";
- }
- // not at line start
- if (comment_pos > 0)
- {
- // also include whitespace before the actual comment opener
- size_t ws_pos = sass.find_last_not_of(SASS2SCSS_FIND_WHITESPACE, comment_pos - 1);
- comment_pos = ws_pos == std::string::npos ? 0 : ws_pos + 1;
- }
- if (!STRIP_COMMENT(converter))
- {
- // add comment node to the whitespace
- converter.whitespace += sass.substr(comment_pos);
- }
- else
- {
- // sass = removeMultilineComments(sass);
- }
- // update the actual sass code
- sass = sass.substr(0, comment_pos);
- }
- // add newline as getline discharged it
- converter.whitespace += lfs + "\n";
- // maybe remove any leading whitespace
- if (PRETTIFY(converter) == 0)
- {
- // remove leading whitespace and update string
- size_t pos_left = sass.find_first_not_of(SASS2SCSS_FIND_WHITESPACE);
- if (pos_left != std::string::npos) sass = sass.substr(pos_left);
- }
- // add flushed data
- scss += sass;
- // return string
- return scss;
- }
- // EO flush
- // process a line of the sass text
- std::string process (std::string& sass, converter& converter)
- {
- // resulting string
- std::string scss = "";
- // strip multi line comments
- if (STRIP_COMMENT(converter))
- {
- sass = removeMultilineComment(sass);
- }
- // right trim input
- sass = rtrim(sass);
- // get postion of first meaningfull character in string
- size_t pos_left = sass.find_first_not_of(SASS2SCSS_FIND_WHITESPACE);
- // special case for final run
- if (converter.end_of_file) pos_left = 0;
- // maybe has only whitespace
- if (pos_left == std::string::npos)
- {
- // just add complete whitespace
- converter.whitespace += sass + "\n";
- }
- // have meaningfull first char
- else
- {
- // extract and store indentation string
- std::string indent = sass.substr(0, pos_left);
- // check if current line starts a comment
- std::string open = sass.substr(pos_left, 2);
- // line has less or same indentation
- // finalize previous open parser context
- if (indent.length() <= INDENT(converter).length())
- {
- // close multilinie comment
- if (IS_CSS_COMMENT(converter))
- {
- // check if comments will be stripped anyway
- if (!STRIP_COMMENT(converter)) scss += " */";
- }
- // close src comment comment
- else if (IS_SRC_COMMENT(converter))
- {
- // add a newline to avoid closer on same line
- // this would put the bracket in the comment node
- // no longer needed since we parse them correctly
- // if (KEEP_COMMENT(converter)) scss += "\n";
- }
- // close css properties
- else if (converter.property)
- {
- // add closer unless in concat mode
- if (!converter.comma)
- {
- // if there was no colon we have a selector
- // looks like there were no inner properties
- if (converter.selector) scss += " {}";
- // add final semicolon
- else if (!converter.semicolon) scss += ";";
- }
- }
- // reset comment state
- converter.comment = "";
- }
- // make sure we close every "higher" block
- while (indent.length() < INDENT(converter).length())
- {
- // pop stacked context
- converter.indents.pop();
- // print close bracket
- if (IS_PARSING(converter))
- { scss += closer(converter); }
- else { scss += " */"; }
- // reset comment state
- converter.comment = "";
- }
- // reset converter state
- converter.selector = false;
- // check if we have sass property syntax
- if (sass.substr(pos_left, 1) == ":" && sass.substr(pos_left, 2) != "::")
- {
- // default to a selector
- // change back if property found
- converter.selector = true;
- // get postion of first whitespace char
- size_t pos_wspace = sass.find_first_of(SASS2SCSS_FIND_WHITESPACE, pos_left);
- // assertion check for valid result
- if (pos_wspace != std::string::npos)
- {
- // get the possible pseudo selector
- std::string pseudo = sass.substr(pos_left, pos_wspace - pos_left);
- // get position of the first real property value char
- // pseudo selectors get this far, but have no actual value
- size_t pos_value = sass.find_first_not_of(SASS2SCSS_FIND_WHITESPACE, pos_wspace);
- // assertion check for valid result
- if (pos_value != std::string::npos)
- {
- // only process if not (fallowed by a semicolon or is a pseudo selector)
- if (!(sass.at(pos_value) == ':' || isPseudoSelector(pseudo)))
- {
- // create new string by interchanging the colon sign for property and value
- sass = indent + sass.substr(pos_left + 1, pos_wspace - pos_left - 1) + ":" + sass.substr(pos_wspace);
- // try to find a colon in the current line, but only ...
- size_t pos_colon = sass.find_first_not_of(":", pos_left);
- // assertion for valid result
- if (pos_colon != std::string::npos)
- {
- // ... after the first word (skip begining colons)
- pos_colon = sass.find_first_of(":", pos_colon);
- // it is a selector if there was no colon found
- converter.selector = pos_colon == std::string::npos;
- }
- }
- }
- }
- }
- // terminate some statements immediately
- else if (
- sass.substr(pos_left, 5) == "@warn" ||
- sass.substr(pos_left, 6) == "@debug" ||
- sass.substr(pos_left, 6) == "@error" ||
- sass.substr(pos_left, 8) == "@charset"
- ) { sass = indent + sass.substr(pos_left); }
- // replace some specific sass shorthand directives (if not fallowed by a white space character)
- else if (sass.substr(pos_left, 1) == "=" && sass.find_first_of(SASS2SCSS_FIND_WHITESPACE, pos_left) != pos_left + 1)
- { sass = indent + "@mixin " + sass.substr(pos_left + 1); }
- else if (sass.substr(pos_left, 1) == "+" && sass.find_first_of(SASS2SCSS_FIND_WHITESPACE, pos_left) != pos_left + 1)
- { sass = indent + "@include " + sass.substr(pos_left + 1); }
- // add quotes for import if needed
- else if (sass.substr(pos_left, 7) == "@import")
- {
- // get positions for the actual import url
- size_t pos_import = sass.find_first_of(SASS2SCSS_FIND_WHITESPACE, pos_left + 7);
- size_t pos_quote = sass.find_first_not_of(SASS2SCSS_FIND_WHITESPACE, pos_import);
- // leave proper urls untouched
- if (sass.substr(pos_quote, 4) != "url(")
- {
- // check if the url appears to be already quoted
- if (sass.substr(pos_quote, 1) != "\"" && sass.substr(pos_quote, 1) != "\'")
- {
- // get position of the last char on the line
- size_t pos_end = sass.find_last_not_of(SASS2SCSS_FIND_WHITESPACE);
- // assertion check for valid result
- if (pos_end != std::string::npos)
- {
- // add quotes around the full line after the import statement
- sass = sass.substr(0, pos_quote) + "\"" + sass.substr(pos_quote, pos_end - pos_quote + 1) + "\"";
- }
- }
- }
- }
- else if (
- sass.substr(pos_left, 7) != "@return" &&
- sass.substr(pos_left, 7) != "@extend" &&
- sass.substr(pos_left, 8) != "@include" &&
- sass.substr(pos_left, 8) != "@content"
- ) {
- // probably a selector anyway
- converter.selector = true;
- // try to find first colon in the current line
- size_t pos_colon = sass.find_first_of(":", pos_left);
- // assertion that we have a colon
- if (pos_colon != std::string::npos)
- {
- // it is not a selector if we have a space after a colon
- if (sass[pos_colon+1] == ' ') converter.selector = false;
- if (sass[pos_colon+1] == ' ') converter.selector = false;
- }
- }
- // current line has more indentation
- if (indent.length() >= INDENT(converter).length())
- {
- // not in comment mode
- if (IS_PARSING(converter))
- {
- // has meaningfull chars
- if (hasCharData(sass))
- {
- // is probably a property
- // also true for selectors
- converter.property = true;
- }
- }
- }
- // current line has more indentation
- if (indent.length() > INDENT(converter).length())
- {
- // not in comment mode
- if (IS_PARSING(converter))
- {
- // had meaningfull chars
- if (converter.property)
- {
- // print block opener
- scss += opener(converter);
- // push new stack context
- converter.indents.push("");
- // store block indentation
- INDENT(converter) = indent;
- }
- }
- // is and will be a src comment
- else if (!IS_CSS_COMMENT(converter))
- {
- // scss does not allow multiline src comments
- // therefore add forward slashes to all lines
- sass.at(INDENT(converter).length()+0) = '/';
- // there is an edge case here if indentation
- // is minimal (will overwrite the fist char)
- sass.at(INDENT(converter).length()+1) = '/';
- // could code around that, but I dont' think
- // this will ever be the cause for any trouble
- }
- }
- // line is opening a new comment
- if (open == "/*" || open == "//")
- {
- // reset the property state
- converter.property = false;
- // close previous comment
- if (IS_CSS_COMMENT(converter) && open != "")
- {
- if (!STRIP_COMMENT(converter) && !CONVERT_COMMENT(converter)) scss += " */";
- }
- // force single line comments
- // into a correct css comment
- if (CONVERT_COMMENT(converter))
- {
- if (IS_PARSING(converter))
- { sass.at(pos_left + 1) = '*'; }
- }
- // set comment flag
- converter.comment = open;
- }
- // flush data only under certain conditions
- if (!(
- // strip css and src comments if option is set
- (IS_COMMENT(converter) && STRIP_COMMENT(converter)) ||
- // strip src comment even if strip option is not set
- // but only if the keep src comment option is not set
- (IS_SRC_COMMENT(converter) && ! KEEP_COMMENT(converter))
- ))
- {
- // flush data and buffer whitespace
- scss += flush(sass, converter);
- }
- // get postion of last meaningfull char
- size_t pos_right = sass.find_last_not_of(SASS2SCSS_FIND_WHITESPACE);
- // check for invalid result
- if (pos_right != std::string::npos)
- {
- // get the last meaningfull char
- std::string close = sass.substr(pos_right, 1);
- // check if next line should be concatenated (list mode)
- converter.comma = IS_PARSING(converter) && close == ",";
- converter.semicolon = IS_PARSING(converter) && close == ";";
- // check if we have more than
- // one meaningfull char
- if (pos_right > 0)
- {
- // get the last two chars from string
- std::string close = sass.substr(pos_right - 1, 2);
- // update parser status for expicitly closed comment
- if (close == "*/") converter.comment = "";
- }
- }
- // EO have meaningfull chars from end
- }
- // EO have meaningfull chars from start
- // return scss
- return scss;
- }
- // EO process
- // read line with either CR, LF or CR LF format
- // http://stackoverflow.com/a/6089413/1550314
- static std::istream& safeGetline(std::istream& is, std::string& t)
- {
- t.clear();
- // The characters in the stream are read one-by-one using a std::streambuf.
- // That is faster than reading them one-by-one using the std::istream.
- // Code that uses streambuf this way must be guarded by a sentry object.
- // The sentry object performs various tasks,
- // such as thread synchronization and updating the stream state.
- std::istream::sentry se(is, true);
- std::streambuf* sb = is.rdbuf();
- for(;;) {
- int c = sb->sbumpc();
- switch (c) {
- case '\n':
- return is;
- case '\r':
- if(sb->sgetc() == '\n')
- sb->sbumpc();
- return is;
- case EOF:
- // Also handle the case when the last line has no line ending
- if(t.empty())
- is.setstate(std::ios::eofbit);
- return is;
- default:
- t += (char)c;
- }
- }
- }
- // the main converter function for c++
- char* sass2scss (const std::string& sass, const int options)
- {
- // local variables
- std::string line;
- std::string scss = "";
- std::stringstream stream(sass);
- // create converter variable
- converter converter;
- // initialise all options
- converter.comma = false;
- converter.property = false;
- converter.selector = false;
- converter.semicolon = false;
- converter.end_of_file = false;
- converter.comment = "";
- converter.whitespace = "";
- converter.indents.push("");
- converter.options = options;
- // read line by line and process them
- while(safeGetline(stream, line) && !stream.eof())
- { scss += process(line, converter); }
- // create mutable string
- std::string closer = "";
- // set the end of file flag
- converter.end_of_file = true;
- // process to close all open blocks
- scss += process(closer, converter);
- // allocate new memory on the heap
- // caller has to free it after use
- char * cstr = (char*) malloc (scss.length() + 1);
- // create a copy of the string
- strcpy (cstr, scss.c_str());
- // return pointer
- return &cstr[0];
- }
- // EO sass2scss
- }
- // EO namespace
- // implement for c
- extern "C"
- {
- char* ADDCALL sass2scss (const char* sass, const int options)
- {
- return Sass::sass2scss(sass, options);
- }
- // Get compiled sass2scss version
- const char* ADDCALL sass2scss_version(void) {
- return SASS2SCSS_VERSION;
- }
- }