Package abstrasy.pcfx

Source Code of abstrasy.pcfx.PCFx_merge_static

package abstrasy.pcfx;


import abstrasy.Hash;
import abstrasy.Node;
import abstrasy.PCoder;

import java.util.ArrayList;

/**
* Abstrasy Interpreter
*
* Copyright : Copyright (c) 2006-2012, Luc Bruninx.
*
* Concédée sous licence EUPL, version 1.1 uniquement (la «Licence»).
*
* Vous ne pouvez utiliser la présente oeuvre que conformément à la Licence.
* Vous pouvez obtenir une copie de la Licence à l’adresse suivante:
*
*   http://www.osor.eu/eupl
*
* Sauf obligation légale ou contractuelle écrite, le logiciel distribué sous
* la Licence est distribué "en l’état", SANS GARANTIES OU CONDITIONS QUELLES
* QU’ELLES SOIENT, expresses ou implicites.
*
* Consultez la Licence pour les autorisations et les restrictions
* linguistiques spécifiques relevant de la Licence.
*
*
* @author Luc Bruninx
* @version 1.0
*/

public class PCFx_merge_static extends PCFx {

    /**
     * respecte la protection de la finalité des listes.
     *
     */
    public PCFx_merge_static() {
    }

    /**
     * eval
     *
     * @param startAt Node
     * @return Node
     * @throws Exception
     * @todo Implémenter cette méthode abstrasy.PCFx
     */
    public Node eval(Node startAt) throws Exception {

       
        startAt.isGoodArgsLength(false, 3);
        startAt.requireNodeType(1, Node.VTYPE_INDIRECTION);
        Node arg0 = startAt.getSubNode(1, Node.TYPE_HASH | Node.TYPE_CLIST | Node.TYPE_STRING | Node.VTYPE_DELEGABLE);
       
        /*
         * Cas où (merge! objet ...)... Il s'agit d'une surcharge...
         */
       
        if(arg0.isDelegable())
                return Node.VDelegable.evalMethod(arg0, PCoder.getMethod(PCoder.PC_MERGE_STATIC), startAt, 2);
       
        // autres...
       
        long qt = arg0.getQType();

        if(qt==Node.TYPE_STRING){
            // string
            String acc=arg0.getString();
            for(int i=2;i < startAt.size();)
                acc+=startAt.getSubNode(i++, qt).getString();
            arg0.setString(acc);
            return null;
        }
        else if(qt==Node.TYPE_CLIST){
            // liste
            for(int i=2;i < startAt.size();i++){
                Node ap=startAt.getSubNode(i, qt);
                int ap_size=ap.size();
                for(int j=0;j<ap_size;j++)
                    arg0.addElement(ap.elementAt(j).secure());
            }
            return null;
        }
        else{
            // hash
            Hash my_h=arg0.getHash();
            for(int i=2;i < startAt.size();i++){
                Node ap=startAt.getSubNode(i, qt);
                Hash your_h=ap.getHash();
                ArrayList<Node> kn=your_h.keys_nodes();
                int kn_size=kn.size();
                for(int j=0;j<kn_size;j++)
                    my_h.store(kn.get(j),your_h.ref(kn.get(j)).secure());
            }
            return null;
        }

    }

}
TOP

Related Classes of abstrasy.pcfx.PCFx_merge_static

TOP
Copyright © 2018 www.massapi.com. All rights reserved.
All source code are property of their respective owners. Java is a trademark of Sun Microsystems, Inc and owned by ORACLE Inc. Contact coftware#gmail.com.