/*

 * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.

 *

 * This code is free software; you can redistribute it and/or modify it

 * under the terms of the GNU General Public License version 2 only, as

 * particular file as subject to the "Classpath" exception as provided

 *

 * This code is distributed in the hope that it will be useful, but WITHOUT

 * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or

 * FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License

 * version 2 for more details (a copy is included in the LICENSE file that

 * accompanied this code).

 *

 * You should have received a copy of the GNU General Public License version

 * 2 along with this work; if not, write to the Free Software Foundation,

 * Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA.

 *

 */

/*

 * Licensed Materials - Property of IBM

 * RMI-IIOP v1.0

 * Copyright IBM Corp. 1998 1999  All Rights Reserved

 *

 */

package com.sun.corba.se.impl.orbutil;

import java.util.StringTokenizer;

import java.util.Hashtable;

import java.io.IOException;

import java.lang.reflect.Method;

// Imports for using codebase URL to load class

import java.net.MalformedURLException;

import org.omg.CORBA.portable.ValueBase;

import org.omg.CORBA.portable.IDLEntity;

import com.sun.corba.se.impl.util.JDKBridge;

import com.sun.corba.se.impl.util.Utility;

import com.sun.corba.se.impl.util.PackagePrefixChecker;

import com.sun.corba.se.impl.util.IdentityHashtable;

import com.sun.corba.se.impl.io.ObjectStreamClass;

import javax.rmi.CORBA.Util;

// keeping the original RepositoryId class that was shipped in

// JDK 1.3.  It has interoperability bugs

public class RepositoryId_1_3 {

    // Legal IDL Identifier characters (1 = legal). Note

    // that '.' (2E) is marked as legal even though it is

    // not legal in IDL. This allows us to treat a fully

    // qualified Java name with '.' package separators

    // uniformly, and is safe because that is the only

    // legal use of '.' in a Java name.

    public static final RepositoryIdCache_1_3 cache = new RepositoryIdCache_1_3();

    public static final byte[] IDL_IDENTIFIER_CHARS = {

        // 0 1 2 3  4 5 6 7  8 9 a b  c d e f

        0,0,0,0, 0,0,0,0, 0,0,0,0, 0,0,0,0, // 00-0f

        0,0,0,0, 0,0,0,0, 0,0,0,0, 0,0,0,0, // 10-1f

        0,0,0,0, 0,0,0,0, 0,0,0,0, 0,0,1,0, // 20-2f

        1,1,1,1, 1,1,1,1, 1,1,0,0, 0,0,0,0, // 30-3f

        0,1,1,1, 1,1,1,1, 1,1,1,1, 1,1,1,1, // 40-4f

        1,1,1,1, 1,1,1,1, 1,1,1,0, 0,0,0,1, // 50-5f

        0,1,1,1, 1,1,1,1, 1,1,1,1, 1,1,1,1, // 60-6f

        1,1,1,1, 1,1,1,1, 1,1,1,0, 0,0,0,0, // 70-7f

        0,0,0,0, 0,0,0,0, 0,0,0,0, 0,0,0,0, // 80-8f

        0,0,0,0, 0,0,0,0, 0,0,0,0, 0,0,0,0, // 90-9f

        0,0,0,0, 0,0,0,0, 0,0,0,0, 0,0,0,0, // a0-af

        0,0,0,0, 0,0,0,0, 0,0,0,0, 0,0,0,0, // b0-bf

        1,1,1,1, 1,1,1,1, 1,1,1,1, 1,1,1,1, // c0-cf

        0,1,1,1, 1,1,1,0, 1,1,1,1, 1,0,0,1, // d0-df

        1,1,1,1, 1,1,1,1, 1,1,1,1, 1,1,1,1, // e0-ef

        0,1,1,1, 1,1,1,0, 1,1,1,1, 1,0,0,1, // f0-ff

    };

    private static String defaultServerURL = null;

    private static boolean useCodebaseOnly = false;

    static {

        if (defaultServerURL == null)

            defaultServerURL = (String)JDKBridge.getLocalCodebase();

        useCodebaseOnly = JDKBridge.useCodebaseOnly();

    }

    private static IdentityHashtable classToRepStr = new IdentityHashtable();

    private static IdentityHashtable classIDLToRepStr = new IdentityHashtable();

    private static IdentityHashtable classSeqToRepStr = new IdentityHashtable();

    private static IdentityHashtable repStrToByteArray = new IdentityHashtable();

    private static Hashtable repStrToClass = new Hashtable();

    private String repId = null;

    private boolean isSupportedFormat = true;

    private String typeString = null;

    private String versionString = null;

    private boolean isSequence = false;

    private boolean isRMIValueType = false;

    private boolean isIDLType = false;

    private String completeClassName = null;

    private String unqualifiedName = null;

    private String definedInId = null;

    private Class clazz = null;

    private String suid = null, actualSuid = null;

    private long suidLong = ObjectStreamClass.kDefaultUID, actualSuidLong = ObjectStreamClass.kDefaultUID;

    // Repository ID fragments

    private static final String kValuePrefix = "RMI:";

    private static final String kIDLPrefix = "IDL:";

    private static final String kIDLNamePrefix = "omg.org/";

    private static final String kIDLClassnamePrefix = "org.omg.";

    private static final String kSequencePrefix = "[";

    private static final String kCORBAPrefix = "CORBA/";

    private static final String kArrayPrefix = kValuePrefix + kSequencePrefix + kCORBAPrefix;

    private static final int kValuePrefixLength = kValuePrefix.length();

    private static final int kIDLPrefixLength = kIDLPrefix.length();

    private static final int kSequencePrefixLength = kSequencePrefix.length();

    private static final String kInterfaceHashCode = ":0000000000000000";

    private static final String kInterfaceOnlyHashStr = "0000000000000000";

    private static final String kExternalizableHashStr = "0000000000000001";

    // Value tag utility methods and constants

    public static final int kInitialValueTag= 0x7fffff00;

    public static final int kNoTypeInfo = 0;

    public static final int kSingleRepTypeInfo = 0x02;

    public static final int  kPartialListTypeInfo = 0x06;

    public static final int  kChunkedMask = 0x08;

    // Public, well known repository IDs

    // _REVISIT_ : A table structure with a good search routine for all of this

    // would be more efficient and easier to maintain...

    // String

    public static final String kWStringValueVersion = "1.0";

    public static final String kWStringValueHash = ":"+kWStringValueVersion;

    public static final String kWStringStubValue = "WStringValue";

    public static final String kWStringTypeStr = "omg.org/CORBA/"+kWStringStubValue;

    public static final String kWStringValueRepID = kIDLPrefix + kWStringTypeStr + kWStringValueHash;

    // Any

    public static final String kAnyRepID = kIDLPrefix + "omg.org/CORBA/Any";

    // Class

    public static final String kClassDescValueHash = ":" + Long.toHexString(

       ObjectStreamClass.getSerialVersionUID(javax.rmi.CORBA.ClassDesc.class));

    public static final String kClassDescStubValue = "ClassDesc";

    public static final String kClassDescTypeStr = "javax.rmi.CORBA."+kClassDescStubValue;

    public static final String kClassDescValueRepID = kValuePrefix + kClassDescTypeStr + kClassDescValueHash;

    // Object

    public static final String kObjectValueHash = ":1.0";

    public static final String kObjectStubValue = "Object";

    // Sequence

    public static final String kSequenceValueHash = ":1.0";

    public static final String kPrimitiveSequenceValueHash = ":0000000000000000";

    // Serializable

    public static final String kSerializableValueHash = ":1.0";

    public static final String kSerializableStubValue = "Serializable";

    // Externalizable

    public static final String kExternalizableValueHash = ":1.0";

    public static final String kExternalizableStubValue = "Externalizable";

    // Remote (The empty string is used for java.rmi.Remote)

    public static final String kRemoteValueHash = "";

    public static final String kRemoteStubValue = "";

    public static final String kRemoteTypeStr = "";

    public static final String kRemoteValueRepID = "";

    public static final Hashtable kSpecialArrayTypeStrings = new Hashtable();

    static {

        kSpecialArrayTypeStrings.put("CORBA.WStringValue", new StringBuffer(java.lang.String.class.getName()));

        kSpecialArrayTypeStrings.put("javax.rmi.CORBA.ClassDesc", new StringBuffer(java.lang.Class.class.getName()));

        kSpecialArrayTypeStrings.put("CORBA.Object", new StringBuffer(java.rmi.Remote.class.getName()));

    }

    public static final Hashtable kSpecialCasesRepIDs = new Hashtable();

    static {

        kSpecialCasesRepIDs.put(java.lang.String.class, kWStringValueRepID);

        kSpecialCasesRepIDs.put(java.lang.Class.class, kClassDescValueRepID);

        kSpecialCasesRepIDs.put(java.rmi.Remote.class, kRemoteValueRepID);

    }

    public static final Hashtable kSpecialCasesStubValues = new Hashtable();

    static {

        kSpecialCasesStubValues.put(java.lang.String.class, kWStringStubValue);

        kSpecialCasesStubValues.put(java.lang.Class.class, kClassDescStubValue);

        kSpecialCasesStubValues.put(java.lang.Object.class, kObjectStubValue);

        kSpecialCasesStubValues.put(java.io.Serializable.class, kSerializableStubValue);

        kSpecialCasesStubValues.put(java.io.Externalizable.class, kExternalizableStubValue);

        kSpecialCasesStubValues.put(java.rmi.Remote.class, kRemoteStubValue);

    }

    public static final Hashtable kSpecialCasesVersions = new Hashtable();

    static {

        kSpecialCasesVersions.put(java.lang.String.class, kWStringValueHash);

        kSpecialCasesVersions.put(java.lang.Class.class, kClassDescValueHash);

        kSpecialCasesVersions.put(java.lang.Object.class, kObjectValueHash);

        kSpecialCasesVersions.put(java.io.Serializable.class, kSerializableValueHash);

        kSpecialCasesVersions.put(java.io.Externalizable.class, kExternalizableValueHash);

        kSpecialCasesVersions.put(java.rmi.Remote.class, kRemoteValueHash);

    }

    public static final Hashtable kSpecialCasesClasses = new Hashtable();

    static {

        kSpecialCasesClasses.put(kWStringTypeStr, java.lang.String.class);

        kSpecialCasesClasses.put(kClassDescTypeStr, java.lang.Class.class);

        kSpecialCasesClasses.put(kRemoteTypeStr, java.rmi.Remote.class);

        kSpecialCasesClasses.put("org.omg.CORBA.WStringValue", java.lang.String.class);

        kSpecialCasesClasses.put("javax.rmi.CORBA.ClassDesc", java.lang.Class.class);

        //kSpecialCasesClasses.put(kRemoteTypeStr, java.rmi.Remote.class);

    }

    public static final Hashtable kSpecialCasesArrayPrefix = new Hashtable();

    static {

        kSpecialCasesArrayPrefix.put(java.lang.String.class, kValuePrefix + kSequencePrefix + kCORBAPrefix);

        kSpecialCasesArrayPrefix.put(java.lang.Class.class, kValuePrefix + kSequencePrefix + "javax/rmi/CORBA/");

        kSpecialCasesArrayPrefix.put(java.lang.Object.class, kValuePrefix + kSequencePrefix + "java/lang/");

        kSpecialCasesArrayPrefix.put(java.io.Serializable.class, kValuePrefix + kSequencePrefix + "java/io/");

        kSpecialCasesArrayPrefix.put(java.io.Externalizable.class, kValuePrefix + kSequencePrefix + "java/io/");

        kSpecialCasesArrayPrefix.put(java.rmi.Remote.class, kValuePrefix + kSequencePrefix + kCORBAPrefix);

    }

    public static final Hashtable kSpecialPrimitives = new Hashtable();

    static {

        kSpecialPrimitives.put("int","long");

        kSpecialPrimitives.put("long","longlong");

        kSpecialPrimitives.put("byte","octet");

    }

    /**

     * Used to convert ascii to hex.

     */

    private static final byte ASCII_HEX[] =     {

        (byte)'0',

        (byte)'1',

        (byte)'2',

        (byte)'3',

        (byte)'4',

        (byte)'5',

        (byte)'6',

        (byte)'7',

        (byte)'8',

        (byte)'9',

        (byte)'A',

        (byte)'B',

        (byte)'C',

        (byte)'D',

        (byte)'E',

        (byte)'F',

    };

    // Interface Rep ID Strings

    public static final String kjava_rmi_Remote = createForAnyType(java.rmi.Remote.class);

    public static final String korg_omg_CORBA_Object = createForAnyType(org.omg.CORBA.Object.class);

    // Dummy arguments for getIdFromHelper method

    public static final Class kNoParamTypes[] ={};

    public static final Object kNoArgs[] = {};

    RepositoryId_1_3(){}

    RepositoryId_1_3(String aRepId){

        init(aRepId);

    }

    RepositoryId_1_3 init(String aRepId){

        this.repId = aRepId;

        // Special case for remote

        if (aRepId.length() == 0) {

            clazz = java.rmi.Remote.class;

            typeString = "";

            isRMIValueType = true;

            suid = kInterfaceOnlyHashStr;

            return this;

        }

        else if (aRepId.equals(kWStringValueRepID)) {

            clazz = java.lang.String.class;

            typeString = kWStringTypeStr;

            isIDLType = true;

            versionString = kWStringValueVersion;

            return this;

        }

        else {

        String repId = convertFromISOLatin1(aRepId);

        versionString = repId.substring(repId.indexOf(':', repId.indexOf(':')+1));

        if (repId.startsWith(kIDLPrefix)) {

            typeString =

                repId.substring(kIDLPrefixLength, repId.indexOf(':', kIDLPrefixLength));

            isIDLType = true;

            if (typeString.startsWith(kIDLNamePrefix))

                completeClassName = kIDLClassnamePrefix +

                    typeString.substring(kIDLNamePrefix.length()).replace('/','.');

            else completeClassName = typeString.replace('/','.');

        }

        else if (repId.startsWith(kValuePrefix)) {

            typeString =

                repId.substring(kValuePrefixLength, repId.indexOf(':', kValuePrefixLength));

            isRMIValueType = true;

            if (versionString.indexOf('.') == -1) {

                    actualSuid = versionString.substring(1);

                    suid = actualSuid;  // default if not explicitly specified

                    if (actualSuid.indexOf(':') != -1){

                    // we have a declared hash also

                        int pos = actualSuid.indexOf(':')+1;

                        // actualSuid = suid.substring(pos);

                        // suid = suid.substring(0, pos-1);

                        suid = actualSuid.substring(pos);

                        actualSuid = actualSuid.substring(0, pos-1);

                }

            }

            else {

                    // _REVISIT_ : Special case version failure ?

            }

        }

        else isSupportedFormat = false;

        if (typeString.startsWith(kSequencePrefix)) {

            isSequence = true;

        }

        return this;

    }

    }

    public final String getUnqualifiedName() {

        if (unqualifiedName == null){

            String className = getClassName();

            int index = (className != null) ? className.lastIndexOf('.') : -1;

            if (index == -1){

                unqualifiedName = className;

                definedInId = "IDL::1.0";

            }

            else {

                unqualifiedName = className.substring(index);

                definedInId = "IDL:" + className.substring(0, index).replace('.','/') + ":1.0";

            }

        }

        return unqualifiedName;

    }

    public final String getDefinedInId() {

        if (definedInId == null){

            getUnqualifiedName();

        }

        return definedInId;

    }

    public final String getTypeString() {

        return typeString;

    }

    public final String getVersionString() {

        return versionString;

    }

    public final String getSerialVersionUID() {

        return suid;

    }

    public final String getActualSerialVersionUID() {

        return actualSuid;

    }

    public final long getSerialVersionUIDAsLong() {

        return suidLong;

    }

    public final long getActualSerialVersionUIDAsLong() {

        return actualSuidLong;

    }

    public final boolean isRMIValueType() {

        return isRMIValueType;

    }

    public final boolean isIDLType() {

        return isIDLType;

    }

    public final String getRepositoryId() {

        return repId;

    }

    public static byte[] getByteArray(String repStr) {

        synchronized (repStrToByteArray){

            return (byte[]) repStrToByteArray.get(repStr);

        }

    }

    public static void setByteArray(String repStr, byte[] repStrBytes) {

        synchronized (repStrToByteArray){

            repStrToByteArray.put(repStr, repStrBytes);

        }

    }

    public final boolean isSequence() {

        return isSequence;

    }

    public final boolean isSupportedFormat() {

        return isSupportedFormat;

    }

    // This method will return the classname from the typestring OR if the classname turns out to be

    // a special class "pseudo" name, then the matching real classname is returned.

    public final String getClassName() {

        if (isRMIValueType)

            return typeString;

        else if (isIDLType)

            return completeClassName;

        else return null;

    }

    // This method calls getClazzFromType() and falls back to the repStrToClass

    // cache if no class was found.  It's used where any class matching the

    // given repid is an acceptable result.

    public final Class getAnyClassFromType() throws ClassNotFoundException {

        try {

            return getClassFromType();

        } catch (ClassNotFoundException cnfe) {

            Class clz = (Class)repStrToClass.get(repId);

            if (clz != null)

                return clz;

            else

                throw cnfe;

        }

    }

    public final Class getClassFromType()

        throws ClassNotFoundException {

        if (clazz != null)

            return clazz;

        Class specialCase = (Class)kSpecialCasesClasses.get(getClassName());

        if (specialCase != null){

            clazz = specialCase;

            return specialCase;

        }

        else

            {

                try{

                    return Util.loadClass(getClassName(), null, null);

                }

                catch(ClassNotFoundException cnfe){

                    if (defaultServerURL != null) {

                        try{

                            return getClassFromType(defaultServerURL);

                        }

                        catch(MalformedURLException mue){

                            throw cnfe;

                        }

                    }

                    else throw cnfe;

                }

            }

    }

    public final Class getClassFromType(Class expectedType, String codebase)

        throws ClassNotFoundException {

        if (clazz != null)

            return clazz;

        Class specialCase = (Class)kSpecialCasesClasses.get(getClassName());

        if (specialCase != null){

            clazz = specialCase;

            return specialCase;

        } else {

            ClassLoader expectedTypeClassLoader = (expectedType == null ? null : expectedType.getClassLoader());

            return loadClassOfType(getClassName(),

                                            codebase,

                                            expectedTypeClassLoader,

                                            expectedType,

                                            expectedTypeClassLoader);

        }

    }

    public final Class getClassFromType(String url)

        throws ClassNotFoundException, MalformedURLException {

        return Util.loadClass(getClassName(), url, null);

    }

    public final String toString() {

        return repId;

    }