/**
* 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;
// looks like some undocumented behavior ...
// https://github.com/mgreter/sass2scss/issues/29
if (sass.substr(pos_left, 1) == "\\") {
converter.selector = true;
sass[pos_left] = ' ';
}
// 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;
}
}
}
}
// check if we have a BEM property (one colon and no selector)
if (sass.substr(pos_left, 1) == ":" && converter.selector == true) {
size_t pos_wspace = sass.find_first_of(SASS2SCSS_FIND_WHITESPACE, pos_left);
sass = indent + sass.substr(pos_left + 1, pos_wspace) + ":";
}
}
// 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.substr(pos_left, 10) == "@namespace"
) { 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 = indent + "@mixin " + sass.substr(pos_left + 1); }
else if (sass.substr(pos_left, 1) == "+")
{
// must be followed by a mixin call (no whitespace afterwards or at ending directly)
if (sass[pos_left+1] != 0 && sass[pos_left+1] != ' ' && sass[pos_left+1] != '\t') {
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;
}
}