/*
  *  Copyright (C) 2022 github.com/REAndroid
  *
  *  Licensed under the Apache License, Version 2.0 (the "License");
  *  you may not use this file except in compliance with the License.
  *  You may obtain a copy of the License at
  *
  *      http://www.apache.org/licenses/LICENSE-2.0
  *
  * Unless required by applicable law or agreed to in writing, software
  * distributed under the License is distributed on an "AS IS" BASIS,
  * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
  * See the License for the specific language governing permissions and
  * limitations under the License.
  */
package com.reandroid.apk.xmlencoder;

import com.reandroid.arsc.chunk.xml.*;
import com.reandroid.arsc.decoder.ValueDecoder;
import com.reandroid.arsc.value.EntryBlock;
import com.reandroid.arsc.value.ResValueBag;
import com.reandroid.arsc.value.ValueType;
import com.reandroid.arsc.value.attribute.AttributeBag;
import com.reandroid.arsc.value.attribute.AttributeValueType;
import com.reandroid.xml.*;

import java.io.File;
import java.io.InputStream;

public class XMLFileEncoder {
    private final EncodeMaterials materials;
    private ResXmlDocument resXmlDocument;
    private String mCurrentPath;
    public XMLFileEncoder(EncodeMaterials materials){
        this.materials=materials;
    }

    // Just for logging purpose
    public void setCurrentPath(String path) {
        this.mCurrentPath = path;
    }
    public ResXmlDocument encode(String xmlString){
        try {
            return encode(XMLDocument.load(xmlString));
        } catch (XMLException ex) {
            materials.logMessage(ex.getMessage());
        }
        return null;
    }
    public ResXmlDocument encode(InputStream inputStream){
        try {
            return encode(XMLDocument.load(inputStream));
        } catch (XMLException ex) {
            materials.logMessage(ex.getMessage());
        }
        return null;
    }
    public ResXmlDocument encode(File xmlFile){
        setCurrentPath(xmlFile.getAbsolutePath());
        try {
            return encode(XMLDocument.load(xmlFile));
        } catch (XMLException ex) {
            materials.logMessage(ex.getMessage());
        }
        return null;
    }
    public ResXmlDocument encode(XMLDocument xmlDocument){
        resXmlDocument =new ResXmlDocument();
        buildIdMap(xmlDocument);
        buildElement(xmlDocument);
        resXmlDocument.refresh();
        return resXmlDocument;
    }
    public ResXmlDocument getResXmlBlock(){
        return resXmlDocument;
    }
    private void buildElement(XMLDocument xmlDocument){
        XMLElement element = xmlDocument.getDocumentElement();
        ResXmlElement resXmlElement = resXmlDocument.createRootElement(element.getTagName());
        buildElement(element, resXmlElement);
    }
    private void buildElement(XMLElement element, ResXmlElement resXmlElement){
        ensureNamespaces(element, resXmlElement);
        resXmlElement.setTag(element.getTagName());
        buildAttributes(element, resXmlElement);
        for(XMLNode node:element.getChildNodes()){
            if(node instanceof XMLText){
                resXmlElement.addResXmlText(((XMLText)node).getText(true));
            }else if(node instanceof XMLComment){
                resXmlElement.setComment(((XMLComment)node).getCommentText());
            }else if(node instanceof XMLElement){
                XMLElement child=(XMLElement) node;
                ResXmlElement childXml=resXmlElement.createChildElement();
                buildElement(child, childXml);
            }
        }
    }
    private void buildAttributes(XMLElement element, ResXmlElement resXmlElement){
        for(XMLAttribute attribute:element.listAttributes()){
            if(attribute instanceof SchemaAttr){
                continue;
            }
            if(SchemaAttr.looksSchema(attribute.getName(), attribute.getValue())){
                continue;
            }
            String name=attribute.getNameWoPrefix();
            int resourceId=decodeUnknownAttributeHex(name);
            EntryBlock entryBlock=null;
            if(resourceId==0){
                entryBlock=getAttributeBlock(attribute);
                if(entryBlock!=null){
                    resourceId=entryBlock.getResourceId();
                }
            }
            ResXmlAttribute xmlAttribute =
                    resXmlElement.createAttribute(name, resourceId);
            String prefix=attribute.getNamePrefix();
            if(prefix!=null){
                ResXmlStartNamespace ns = resXmlElement.getStartNamespaceByPrefix(prefix);
                if(ns==null){
                    ns=forceCreateNamespace(resXmlElement, resourceId, prefix);
                }
                if(ns==null){
                    throw new EncodeException("Namespace not found: "
                            +attribute.toString()
                            +", path="+mCurrentPath);
                }
                xmlAttribute.setNamespaceReference(ns.getUriReference());
            }

            String valueText=attribute.getValue();

            if(ValueDecoder.isReference(valueText)){
                if(valueText.startsWith("?")){
                    xmlAttribute.setValueType(ValueType.ATTRIBUTE);
                }else {
                    xmlAttribute.setValueType(ValueType.REFERENCE);
                }
                xmlAttribute.setData(materials.resolveReference(valueText));
                continue;
            }
            if(entryBlock!=null){
                AttributeBag attributeBag=AttributeBag
                        .create((ResValueBag) entryBlock.getResValue());

                ValueDecoder.EncodeResult encodeResult =
                        attributeBag.encodeEnumOrFlagValue(valueText);
                if(encodeResult!=null){
                    xmlAttribute.setValueType(encodeResult.valueType);
                    xmlAttribute.setData(encodeResult.value);
                    continue;
                }
                if(attributeBag.isEqualType(AttributeValueType.STRING)) {
                    xmlAttribute.setValueAsString(ValueDecoder
                            .unEscapeSpecialCharacter(valueText));
                    continue;
                }
            }

            if(EncodeUtil.isEmpty(valueText)) {
                xmlAttribute.setValueAsString("");
            }else{
                ValueDecoder.EncodeResult encodeResult =
                        ValueDecoder.encodeGuessAny(valueText);
                if(encodeResult!=null){
                    xmlAttribute.setValueType(encodeResult.valueType);
                    xmlAttribute.setData(encodeResult.value);
                }else {
                    xmlAttribute.setValueAsString(ValueDecoder
                            .unEscapeSpecialCharacter(valueText));
                }
            }
        }
        resXmlElement.calculatePositions();
    }
    private void ensureNamespaces(XMLElement element, ResXmlElement resXmlElement){
        for(XMLAttribute attribute:element.listAttributes()){
            String prefix = SchemaAttr.getPrefix(attribute.getName());
            if(prefix==null){
                continue;
            }
            String uri=attribute.getValue();
            resXmlElement.getOrCreateNamespace(uri, prefix);
        }
    }
    private void buildIdMap(XMLDocument xmlDocument){
        ResIdBuilder idBuilder=new ResIdBuilder();
        XMLElement element= xmlDocument.getDocumentElement();
        searchResIds(idBuilder, element);
        idBuilder.buildTo(resXmlDocument.getResXmlIDMap());
    }
    private void searchResIds(ResIdBuilder idBuilder, XMLElement element){
        for(XMLAttribute attribute : element.listAttributes()){
            addResourceId(idBuilder, attribute);
        }
        int count=element.getChildesCount();
        for(int i=0;i<count;i++){
            searchResIds(idBuilder, element.getChildAt(i));
        }
    }
    private void addResourceId(ResIdBuilder idBuilder, XMLAttribute attribute){
        String name=attribute.getNameWoPrefix();
        int id=decodeUnknownAttributeHex(name);
        if(id!=0){
            idBuilder.add(id, name);
            return;
        }
        EntryBlock entryBlock = getAttributeBlock(attribute);
        if(entryBlock!=null){
            idBuilder.add(entryBlock.getResourceId(), entryBlock.getName());
        }
    }
    private int decodeUnknownAttributeHex(String name){
        if(name.length()==0||name.charAt(0)!='@'){
            return 0;
        }
        name=name.substring(1);
        if(!ValueDecoder.isHex(name)){
            return 0;
        }
        return ValueDecoder.parseHex(name);
    }
    private EntryBlock getAttributeBlock(XMLAttribute attribute){
        if(attribute instanceof SchemaAttr){
            return null;
        }
        String name=attribute.getName();
        if(name.indexOf(':')<0){
            return null;
        }
        return materials.getAttributeBlock(name);
    }
    private ResXmlStartNamespace forceCreateNamespace(ResXmlElement resXmlElement,
                                                      int resourceId, String prefix){
        if(!materials.isForceCreateNamespaces()){
            return null;
        }
        int pkgId = (resourceId>>24) & 0xff;
        String uri;
        if(pkgId==materials.getCurrentPackageId()){
            uri=EncodeUtil.URI_APP;
        }else {
            uri=EncodeUtil.URI_ANDROID;
        }
        ResXmlElement root=resXmlElement.getRootResXmlElement();
        ResXmlStartNamespace ns=root.getOrCreateNamespace(uri, prefix);
        materials.logMessage("Force created ns: "+prefix+":"+uri);
        return ns;
    }
}