Application: gvSIG desktop

import org.gvsig.expressionevaluator.spi.PrettyFormaterImpl;

    public static class EmptyFormatter  extends PrettyFormaterImpl implements Formatter<Code> {

        public EmptyFormatter() {

        }

        public EmptyFormatter(boolean useNl, int indentSize) {

            super.setIndentSize(indentSize);

            super.setUseNl(useNl);

        }

        @Override

        public void setIndentSize(int indentSize) {

            throw new UnsupportedOperationException();

        }

        @Override

        public void setUseNl(boolean useNl) {

            throw new UnsupportedOperationException();

        }

    }

    public static final Formatter<Code> EMPTY_FORMATTER = new EmptyFormatter();

/*

 * To change this license header, choose License Headers in Project Properties.

 * To change this template file, choose Tools | Templates

 * and open the template in the editor.

 */

package org.gvsig.expressionevaluator.spi;

import java.util.ArrayList;

import java.util.List;

import java.util.Stack;

import org.apache.commons.lang3.StringUtils;

import org.gvsig.expressionevaluator.PrettyFormatter;

/**

 *

 * @author jjdelcerro

 */

public class PrettyFormaterImpl implements PrettyFormatter {

    private class PrettyFormaterConfig {

        int indentSize;

        int indentation;

        boolean useNl;

        StringBuilder builder;

        public PrettyFormaterConfig() {

            this.indentSize = 4;

            this.indentation = 0;

            this.useNl = false;

            this.builder = null;

        }

        public PrettyFormaterConfig(int indentation, boolean useNl) {

            this.indentation = indentation;

            this.useNl = useNl;

            this.builder = null;

        }

        public StringBuilder builder() {

            if( this.builder == null ) {

                this.builder = new StringBuilder();

            }

            return this.builder;

        }

    }

    private Stack<PrettyFormaterConfig> config;

    public PrettyFormaterImpl() {

        this.config = new Stack<>();

        this.config.push(new PrettyFormaterConfig());

    }

    @Override

    public void setIndentSize(int indentSize) {

        PrettyFormaterConfig c = this.config.peek();

        c.indentSize = indentSize;

    }

    @Override

    public void setUseNl(boolean useNl) {

        PrettyFormaterConfig c = this.config.peek();

        c.useNl = useNl;

    }

    @Override

    public void indent() {

        PrettyFormaterConfig c = this.config.peek();

        c.indentation += 4;

    }

    @Override

    public void unindent() {

        PrettyFormaterConfig c = this.config.peek();

        c.indentation -= 4;

        if( c.indentation<0 ) {

            c.indentation = 0;

        }

    }

    @Override

    public void nl() {

        PrettyFormaterConfig c = this.config.peek();

        if( c.useNl ) {

            c.builder().append("\n");

            c.builder().append(StringUtils.repeat(' ', c.indentation));

        }

    }

    @Override

    public void push() {

        PrettyFormaterConfig c = this.config.peek();

        this.config.push(new PrettyFormaterConfig(c.indentation,c.useNl));

    }

    @Override

    public void pop() {

        PrettyFormaterConfig c = this.config.pop();

        if( this.config.isEmpty() ) {

            this.config.push(new PrettyFormaterConfig());

        }                

    }

    @Override

    public void append(Object o) {

        PrettyFormaterConfig c = this.config.peek();

        c.builder().append(o);

    }

    @Override

    public String build() {

        PrettyFormaterConfig c = this.config.peek();

        if( c.builder==null ) {

            return "";

        }

        return c.builder.toString();

    }

}

package org.gvsig.expressionevaluator;

import org.gvsig.expressionevaluator.spi.PrettyFormaterImpl;

/**

 *

 * @author jjdelcerro

 */

public interface PrettyFormatter {

    public static PrettyFormatter get(Object x) {

        if( x instanceof PrettyFormatter ) {

            return (PrettyFormatter) x;

        }

        return new PrettyFormaterImpl();

    }

    public void setUseNl(boolean useNl);

    public void setIndentSize(int indentSize);

    public void indent();

    public void unindent();

    public void nl();

    public void push();

    public void pop();

    public void append(Object o);

    public String build();

}

import org.gvsig.expressionevaluator.Formatter;

    public void testBlockExcept1a() {

        String source = "BEGIN LET V1 = 11; LET V2 = 22; EXCEPT print('Hola'); TRUE; END";

        Compiler compiler = createCompiler();

        Code code = compiler.compileExpression(source);

        code.link();

        checkEquals("BEGIN \"V1\" := 11; \"V2\" := 22; EXCEPT print('Hola'); TRUE; END ", code.toString());

    }

    public void testBlockExcept1b() {

        String source = "BEGIN LET V1 = 11; LET V2 = 22; EXCEPT print('Hola'); TRUE; END";

        Formatter formatter = new Code.EmptyFormatter(true, 4);

        Compiler compiler = createCompiler();

        Code code = compiler.compileExpression(source);

        code.link();

        checkEquals("BEGIN \n    \"V1\" := 11; \n    \"V2\" := 22; \nEXCEPT \n    print('Hola'); \n    TRUE; \nEND \n", code.toString(formatter));

    }

    public void testBlockExcept2b() {

        String source = "DECLARE V1 := 0; V2 := 0; BEGIN V1 := 11; V2 := 22; EXCEPT print('Hola'); TRUE; END";

        Formatter formatter = new Code.EmptyFormatter(true, 4);

        Compiler compiler = createCompiler();

        Code code = compiler.compileExpression(source);

        code.link();

        checkEquals("DECLARE \n    \"V1\" := 0; \n    \"V2\" := 0; \nBEGIN \n    \"V1\" := 11; \n    \"V2\" := 22; \nEXCEPT \n    print('Hola'); \n    TRUE; \nEND \n", code.toString(formatter));

    }

        checkEquals("BEGIN \"V1\" := 11; \"V2\" := 22; EXCEPT -1 END ", code.toString());

        checkEquals("IF (\"V1\" = 11) THEN \"V2\" := 11; ELSE \"V2\" := 22; END IF", code.toString());

        checkEquals("IF (\"V1\" = 11) THEN PASS; ELSE PASS; END IF", code.toString());

        checkEquals("IF (\"V1\" = 11) THEN \"V2\" := 22; \"V1\" := 10; END IF", code.toString());

        checkEquals("WHILE (\"n\" < 10) LOOP \"n\" := (\"n\" + 1) END LOOP ", code.toString());

        checkEquals("WHILE (\"n\" < 10) LOOP \"n\" := (\"n\" + 1); print(\"n\"); END LOOP ", code.toString());

        checkEquals("WHILE (\"n\" < 10) LOOP \"n\" := (\"n\" + 1); print(\"n\"); BREAK; END LOOP ", code.toString());

        checkEquals("FOR \"n\" IN RANGE(10) LOOP print(\"n\"); BREAK; END LOOP", code.toString());

        checkEquals("FOR \"n\" IN RANGE(10) LOOP print(\"n\"); BREAK; END LOOP", code2.toString());

        checkEquals("CASE WHEN (\"software\" LIKE '%gvSIG%') THEN 'gvSIG'; ELSE 'Other'; END", code.toString());

        String source = "CASE WHEN software LIKE '%gvSIG%' THEN 10; 'gvSIG'; ELSE 20;'Other'; END CASE"; // ;)

        checkEquals("CASE WHEN (\"software\" LIKE '%gvSIG%') THEN 10; 'gvSIG'; ELSE 20; 'Other'; END", code.toString());

        checkEquals("CASE WHEN ((\"Field_1\" >= 75) AND (\"Field_1\" <= 79)) THEN 100; WHEN ((\"Field_1\" >= 80) AND (\"Field_1\" <= 84)) THEN 110; END", code.toString());

        checkEquals("CASE WHEN ((\"Field_1\" >= 75) AND (\"Field_1\" <= 79)) THEN 100; WHEN ((\"Field_1\" >= 80) AND (\"Field_1\" <= 84)) THEN 110; ELSE 120; END", code.toString());

        checkEquals("CASE WHEN ((\"Field_1\" >= 75) AND (\"Field_1\" <= 79)) THEN 100; WHEN ((\"Field_1\" >= 80) AND (\"Field_1\" <= 84)) THEN 110; ELSE 120; END", code.toString());

        checkEquals("CASE WHEN ((\"Field_1\" >= 75) AND (\"Field_1\" <= 79)) THEN 100; WHEN ((\"Field_1\" >= 80) AND (\"Field_1\" <= 84)) THEN 110; ELSE 120; END", code.toString());

                        this.phrase = code.toString(new Code.EmptyFormatter(true, 4));

import org.gvsig.expressionevaluator.PrettyFormatter;

        PrettyFormatter builder = PrettyFormatter.get(formatter);

        try {

            builder.push();

            builder.append("BEGIN ");

            builder.indent();

            for (Code statement : args) {

                builder.nl();

                builder.append(statement.toString(formatter));

                builder.append("; ");

            }

            builder.unindent();

            builder.nl();

            builder.append("END ");

            return builder.build();

        } finally {

            builder.pop();

import org.gvsig.expressionevaluator.PrettyFormatter;

        PrettyFormatter builder = PrettyFormatter.get(formatter);

        try {

            builder.push();

            if( declareCode != null ) {

                builder.append("DECLARE ");

                builder.indent();

                if( Code.isFunction(exceptionCode,"BLOCK") ) {

                    Code.Callable block = (Code.Callable)declareCode;

                    for (Code parameter : block.parameters()) {

                        builder.nl();                

                        builder.append(parameter.toString(formatter));

                        builder.append("; ");

                    }

                } else {

                    builder.nl();

                    builder.append(declareCode.toString(formatter));

                }

                builder.unindent();

                builder.nl();

            }

            builder.append("BEGIN ");

            builder.indent();

            for (int argn = 0; argn < args.size()-2; argn++) {

                Code statement = args.get(argn);

                builder.nl();

                builder.append(statement.toString(formatter));

                builder.append("; ");

            }

            if( exceptionCode != null ) {

                builder.unindent();

                builder.nl();

                builder.append("EXCEPT ");

                builder.indent();

                if( Code.isFunction(exceptionCode,"BLOCK") ) {

                    Code.Callable block = (Code.Callable)exceptionCode;

                    for (Code parameter : block.parameters()) {

                        builder.nl();

                        builder.append(parameter.toString(formatter));

                        builder.append("; ");

                    }

                } else {

                    builder.nl();

                    builder.append(exceptionCode.toString(formatter));

                    builder.append(" ");

                }

            }

            builder.unindent();

            builder.nl();

            builder.append("END ");

            builder.nl();

            return builder.build();

        } finally {

            builder.pop();

        return ":("+args.get(0).toString()+")";

import org.gvsig.expressionevaluator.PrettyFormatter;

        Code codeCondition = args.get(0);

        Code codeLoopBody = args.get(1);

        PrettyFormatter builder = PrettyFormatter.get(formatter);

        try {

            builder.push();

            builder.append("WHILE ");

            builder.append(codeCondition.toString(formatter));

            builder.append(" LOOP ");

            builder.indent();

            builder.nl();

            if( Code.isFunction(codeLoopBody,"BLOCK") ) {

                Code.Callable block = (Code.Callable)codeLoopBody;

                for (Code parameter : block.parameters()) {

                    builder.nl();

                    builder.append(parameter.toString(formatter));

                    builder.append("; ");

                }

            } else {

                builder.nl();

                builder.append(codeLoopBody.toString(formatter));

                builder.append(" ");

            }            

            builder.unindent();

            builder.nl();

            builder.append("END LOOP ");

            return builder.build();

        } finally {

            builder.pop();

        }

}

import org.gvsig.expressionevaluator.PrettyFormatter;

        PrettyFormatter builder = PrettyFormatter.get(formatter);

        try {

            builder.push();

            int count;

            int firstValue;

            int elseValue;

            Code codeElse = null;

            if( (args.size() % 2) == 0) {

                count = args.size() / 2;

                firstValue = count;

                elseValue = -1;

            } else {

                count = (args.size()-1) / 2;

                firstValue = count;

                elseValue = args.size()-1;

                codeElse = (elseValue>0)? args.get(elseValue):null;

            }

            builder.append("CASE ");

            builder.indent();            

            for( int n=0; n<count; n++ ) {

                builder.nl();

                builder.append("WHEN ");

                builder.append(args.get(n).toString(formatter));

                builder.append(" THEN ");

                builder.indent();

                builder.nl();

                Code codeBody = args.get(n+firstValue);

                if( Code.isFunction(codeBody,"BLOCK") ) {

                    Code.Callable block = (Code.Callable)codeBody;

                    for (Code parameter : block.parameters()) {

                        builder.nl();

                        builder.append(parameter.toString(formatter));

                        builder.append("; ");

                    }

                } else {

                    builder.nl();

                    builder.append(codeBody.toString(formatter));

                    builder.append("; ");

                }                   

                builder.unindent();

            }

            if( codeElse!=null) {

                builder.nl();

                builder.append("ELSE ");

                builder.indent();

                builder.nl();

                if( Code.isFunction(codeElse,"BLOCK") ) {

                    Code.Callable block = (Code.Callable)codeElse;

                    for (Code parameter : block.parameters()) {

                        builder.nl();

                        builder.append(parameter.toString(formatter));

                        builder.append("; ");

                    }

                } else {

                    builder.nl();

                    builder.append(codeElse.toString(formatter));

                    builder.append("; ");

                }                   

                builder.unindent();

            }

            builder.unindent();

            builder.nl();

            builder.append("END");

            return builder.build();

        } finally {

            builder.pop();

import org.gvsig.expressionevaluator.PrettyFormatter;

        Code codeCondition = args.get(0);

        Code codeIfTrue = args.get(1);

        Code codeIfFalse = (args.size() > 2)? args.get(2):null;

        PrettyFormatter builder = PrettyFormatter.get(formatter);

        try {

            builder.push();

            builder.append("IF ");

            builder.append(codeCondition.toString(formatter));

            builder.append(" THEN ");

            builder.indent();

            if( Code.isFunction(codeIfTrue,"BLOCK") ) {

                Code.Callable block = (Code.Callable)codeIfTrue;

                for (Code parameter : block.parameters()) {

                    builder.nl();

                    builder.append(parameter.toString(formatter));

                    builder.append("; ");

                }

            } else {

                builder.nl();

                builder.append(codeIfTrue.toString(formatter));

                builder.append("; ");

            }            

            builder.unindent();

            if( codeIfFalse!=null ) {

                builder.nl();

                builder.append("ELSE ");

                builder.indent();

                if( Code.isFunction(codeIfTrue,"BLOCK") ) {

                    Code.Callable block = (Code.Callable)codeIfFalse;

                    for (Code parameter : block.parameters()) {

                        builder.nl();

                        builder.append(parameter.toString(formatter));

                        builder.append("; ");

                    }

                } else {

                    builder.nl();

                    builder.append(codeIfFalse.toString(formatter));

                    builder.append("; ");

                }            

            }

            builder.nl();

            builder.append("END IF");

            return builder.build();

        } finally {

            builder.pop();

import org.gvsig.expressionevaluator.PrettyFormatter;

        Code codeVarname = args.get(0);

        Code codeList = args.get(1);

        Code codeLoopBody = args.get(2);

        PrettyFormatter builder = PrettyFormatter.get(formatter);

        try {

            builder.push();

            builder.append("FOR \"");

            builder.append(Objects.toString(((Code.Constant)codeVarname).value()));        

            builder.append("\" IN ");

            builder.append(codeList.toString(formatter));

            builder.append(" LOOP ");

            builder.indent();

            builder.nl();

            if( Code.isFunction(codeLoopBody,"BLOCK") ) {

                Code.Callable block = (Code.Callable)codeLoopBody;

                for (Code parameter : block.parameters()) {

                    builder.nl();

                    builder.append(parameter.toString(formatter));

                    builder.append("; ");

                }

            } else {

                builder.nl();

                builder.append(codeLoopBody.toString(formatter));

                builder.append(" ");

            }            

            builder.unindent();

            builder.nl();

            builder.append("END LOOP");

            return builder.build();

        } finally {

            builder.pop();

        }