/*

 * Copyright 2000-2008 Sun Microsystems, Inc.  All Rights Reserved.

 * 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

 * published by the Free Software Foundation.  Sun designates this

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

 * by Sun in the LICENSE file that accompanied this code.

 *

 * 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.

 *

 * Please contact Sun Microsystems, Inc., 4150 Network Circle, Santa Clara,

 * CA 95054 USA or visit www.sun.com if you need additional information or

 * have any questions.

 */

package java.beans;

import java.awt.AWTKeyStroke;

import java.awt.BorderLayout;

import java.awt.Dimension;

import java.awt.Color;

import java.awt.Font;

import java.awt.GridBagConstraints;

import java.awt.Insets;

import java.awt.Point;

import java.awt.Rectangle;

import java.awt.event.KeyEvent;

import java.awt.font.TextAttribute;

import java.lang.reflect.Array;

import java.lang.reflect.Constructor;

import java.lang.reflect.Field;

import java.lang.reflect.Method;

import java.security.AccessController;

import java.security.PrivilegedAction;

import java.sql.Timestamp;

import java.util.*;

import javax.swing.Box;

import javax.swing.JLayeredPane;

import javax.swing.border.MatteBorder;

import javax.swing.plaf.ColorUIResource;

import sun.swing.PrintColorUIResource;

/*

 * Like the <code>Intropector</code>, the <code>MetaData</code> class

 * contains <em>meta</em> objects that describe the way

 * classes should express their state in terms of their

 * own public APIs.

 *

 * @see java.beans.Intropector

 *

 * @author Philip Milne

 * @author Steve Langley

 */

class NullPersistenceDelegate extends PersistenceDelegate {

    // Note this will be called by all classes when they reach the

    // top of their superclass chain.

    protected void initialize(Class<?> type, Object oldInstance, Object newInstance, Encoder out) {

    }

    protected Expression instantiate(Object oldInstance, Encoder out) { return null; }

    public void writeObject(Object oldInstance, Encoder out) {

    // System.out.println("NullPersistenceDelegate:writeObject " + oldInstance);

    }

}

/**

 * The persistence delegate for <CODE>enum</CODE> classes.

 *

 * @author Sergey A. Malenkov

 */

class EnumPersistenceDelegate extends PersistenceDelegate {

    protected boolean mutatesTo(Object oldInstance, Object newInstance) {

        return oldInstance == newInstance;

    }

    protected Expression instantiate(Object oldInstance, Encoder out) {

        Enum e = (Enum) oldInstance;

        return new Expression(e, Enum.class, "valueOf", new Object[]{e.getClass(), e.name()});

    }

}

class PrimitivePersistenceDelegate extends PersistenceDelegate {

    protected boolean mutatesTo(Object oldInstance, Object newInstance) {

        return oldInstance.equals(newInstance);

    }

    protected Expression instantiate(Object oldInstance, Encoder out) {

        return new Expression(oldInstance, oldInstance.getClass(),

                  "new", new Object[]{oldInstance.toString()});

    }

}

class ArrayPersistenceDelegate extends PersistenceDelegate {

    protected boolean mutatesTo(Object oldInstance, Object newInstance) {

        return (newInstance != null &&

                oldInstance.getClass() == newInstance.getClass() && // Also ensures the subtype is correct.

                Array.getLength(oldInstance) == Array.getLength(newInstance));

        }

    protected Expression instantiate(Object oldInstance, Encoder out) {

        // System.out.println("instantiate: " + type + " " + oldInstance);

        Class oldClass = oldInstance.getClass();

        return new Expression(oldInstance, Array.class, "newInstance",

                   new Object[]{oldClass.getComponentType(),

                                new Integer(Array.getLength(oldInstance))});

        }

    protected void initialize(Class<?> type, Object oldInstance, Object newInstance, Encoder out) {

        int n = Array.getLength(oldInstance);

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

            Object index = new Integer(i);

            // Expression oldGetExp = new Expression(Array.class, "get", new Object[]{oldInstance, index});

            // Expression newGetExp = new Expression(Array.class, "get", new Object[]{newInstance, index});

            Expression oldGetExp = new Expression(oldInstance, "get", new Object[]{index});

            Expression newGetExp = new Expression(newInstance, "get", new Object[]{index});

            try {

                Object oldValue = oldGetExp.getValue();

                Object newValue = newGetExp.getValue();

                out.writeExpression(oldGetExp);

                if (!MetaData.equals(newValue, out.get(oldValue))) {

                    // System.out.println("Not equal: " + newGetExp + " != " + actualGetExp);

                    // invokeStatement(Array.class, "set", new Object[]{oldInstance, index, oldValue}, out);

                    DefaultPersistenceDelegate.invokeStatement(oldInstance, "set", new Object[]{index, oldValue}, out);

                }

            }

            catch (Exception e) {

                // System.err.println("Warning:: failed to write: " + oldGetExp);

                out.getExceptionListener().exceptionThrown(e);

            }

        }

    }

}

class ProxyPersistenceDelegate extends PersistenceDelegate {

    protected Expression instantiate(Object oldInstance, Encoder out) {

        Class type = oldInstance.getClass();

        java.lang.reflect.Proxy p = (java.lang.reflect.Proxy)oldInstance;

        // This unappealing hack is not required but makes the

        // representation of EventHandlers much more concise.

        java.lang.reflect.InvocationHandler ih = java.lang.reflect.Proxy.getInvocationHandler(p);

        if (ih instanceof EventHandler) {

            EventHandler eh = (EventHandler)ih;

            Vector args = new Vector();

            args.add(type.getInterfaces()[0]);

            args.add(eh.getTarget());

            args.add(eh.getAction());

            if (eh.getEventPropertyName() != null) {

                args.add(eh.getEventPropertyName());

            }

            if (eh.getListenerMethodName() != null) {

                args.setSize(4);

                args.add(eh.getListenerMethodName());

            }

            return new Expression(oldInstance,

                                  EventHandler.class,

                                  "create",

                                  args.toArray());

        }

        return new Expression(oldInstance,

                              java.lang.reflect.Proxy.class,

                              "newProxyInstance",

                              new Object[]{type.getClassLoader(),

                                           type.getInterfaces(),

                                           ih});

    }

}

// Strings

class java_lang_String_PersistenceDelegate extends PersistenceDelegate {

    protected Expression instantiate(Object oldInstance, Encoder out) { return null; }

    public void writeObject(Object oldInstance, Encoder out) {

        // System.out.println("NullPersistenceDelegate:writeObject " + oldInstance);

    }

}

// Classes

class java_lang_Class_PersistenceDelegate extends PersistenceDelegate {

    protected boolean mutatesTo(Object oldInstance, Object newInstance) {

        return oldInstance.equals(newInstance);

    }

    protected Expression instantiate(Object oldInstance, Encoder out) {

        Class c = (Class)oldInstance;

        // As of 1.3 it is not possible to call Class.forName("int"),

        // so we have to generate different code for primitive types.

        // This is needed for arrays whose subtype may be primitive.

        if (c.isPrimitive()) {

            Field field = null;

            try {

            } catch (NoSuchFieldException ex) {

                System.err.println("Unknown primitive type: " + c);

            }

            return new Expression(oldInstance, field, "get", new Object[]{null});

        }

        else if (oldInstance == String.class) {

            return new Expression(oldInstance, "", "getClass", new Object[]{});

        }

        else if (oldInstance == Class.class) {

            return new Expression(oldInstance, String.class, "getClass", new Object[]{});

        }

        else {

            return new Expression(oldInstance, Class.class, "forName", new Object[]{c.getName()});

        }

    }

}

// Fields

class java_lang_reflect_Field_PersistenceDelegate extends PersistenceDelegate {

    protected boolean mutatesTo(Object oldInstance, Object newInstance) {

        return oldInstance.equals(newInstance);

    }

    protected Expression instantiate(Object oldInstance, Encoder out) {

        Field f = (Field)oldInstance;

        return new Expression(oldInstance,

                f.getDeclaringClass(),

                "getField",

                new Object[]{f.getName()});

    }

}

// Methods

class java_lang_reflect_Method_PersistenceDelegate extends PersistenceDelegate {

    protected boolean mutatesTo(Object oldInstance, Object newInstance) {

        return oldInstance.equals(newInstance);

    }

    protected Expression instantiate(Object oldInstance, Encoder out) {

        Method m = (Method)oldInstance;

        return new Expression(oldInstance,

                m.getDeclaringClass(),

                "getMethod",

                new Object[]{m.getName(), m.getParameterTypes()});

    }

}

// Dates

/**

 * The persistence delegate for <CODE>java.util.Date</CODE> classes.

 * Do not extend DefaultPersistenceDelegate to improve performance and

 * to avoid problems with <CODE>java.sql.Date</CODE>,

 * <CODE>java.sql.Time</CODE> and <CODE>java.sql.Timestamp</CODE>.

 *

 * @author Sergey A. Malenkov

 */

class java_util_Date_PersistenceDelegate extends PersistenceDelegate {

    protected boolean mutatesTo(Object oldInstance, Object newInstance) {

        if (!super.mutatesTo(oldInstance, newInstance)) {

            return false;

        }

        Date oldDate = (Date)oldInstance;

        Date newDate = (Date)newInstance;

        return oldDate.getTime() == newDate.getTime();

    }

    protected Expression instantiate(Object oldInstance, Encoder out) {

        Date date = (Date)oldInstance;

        return new Expression(date, date.getClass(), "new", new Object[] {date.getTime()});

    }

}

/**

 * The persistence delegate for <CODE>java.sql.Timestamp</CODE> classes.

 * It supports nanoseconds.

 *

 * @author Sergey A. Malenkov

 */

final class java_sql_Timestamp_PersistenceDelegate extends java_util_Date_PersistenceDelegate {

    protected void initialize(Class<?> type, Object oldInstance, Object newInstance, Encoder out) {

        Timestamp oldTime = (Timestamp)oldInstance;

        Timestamp newTime = (Timestamp)newInstance;

        int nanos = oldTime.getNanos();

        if (nanos != newTime.getNanos()) {

            out.writeStatement(new Statement(oldTime, "setNanos", new Object[] {nanos}));

        }

    }

}

// Collections

/*

The Hashtable and AbstractMap classes have no common ancestor yet may

be handled with a single persistence delegate: one which uses the methods

of the Map insterface exclusively. Attatching the persistence delegates

to the interfaces themselves is fraught however since, in the case of

the Map, both the AbstractMap and HashMap classes are declared to

implement the Map interface, leaving the obvious implementation prone

to repeating their initialization. These issues and questions around

the ordering of delegates attached to interfaces have lead us to

ignore any delegates attached to interfaces and force all persistence

delegates to be registered with concrete classes.

*/

/**

 * The base class for persistence delegates for inner classes

 * that can be created using {@link Collections}.

 *

 * @author Sergey A. Malenkov

 */

abstract class java_util_Collections extends PersistenceDelegate {

    protected boolean mutatesTo(Object oldInstance, Object newInstance) {

        if (!super.mutatesTo(oldInstance, newInstance)) {

            return false;

        }

        if ((oldInstance instanceof List) || (oldInstance instanceof Set) || (oldInstance instanceof Map)) {

            return oldInstance.equals(newInstance);

        }

        Collection oldC = (Collection) oldInstance;

        Collection newC = (Collection) newInstance;

        return (oldC.size() == newC.size()) && oldC.containsAll(newC);

    }

    static Object getPrivateField(final Object instance, final String name) {

        return AccessController.doPrivileged(

                new PrivilegedAction() {

                    public Object run() {

                        Class type = instance.getClass();

                        while ( true ) {

                            try {

                                Field field = type.getDeclaredField(name);

                                field.setAccessible(true);

                                return field.get( instance );

                            }

                            catch (NoSuchFieldException exception) {

                                type = type.getSuperclass();

                                if (type == null) {

                                    throw new IllegalStateException("Could not find field " + name, exception);

                                }

                            }

                            catch (Exception exception) {

                                throw new IllegalStateException("Could not get value " + type.getName() + '.' + name, exception);

                            }

                        }

                    }

                } );

    }

    static final class EmptyList_PersistenceDelegate extends java_util_Collections {

        protected Expression instantiate(Object oldInstance, Encoder out) {

            return new Expression(oldInstance, Collections.class, "emptyList", null);

        }

    }

    static final class EmptySet_PersistenceDelegate extends java_util_Collections {

        protected Expression instantiate(Object oldInstance, Encoder out) {

            return new Expression(oldInstance, Collections.class, "emptySet", null);

        }

    }

    static final class EmptyMap_PersistenceDelegate extends java_util_Collections {

        protected Expression instantiate(Object oldInstance, Encoder out) {

            return new Expression(oldInstance, Collections.class, "emptyMap", null);

        }

    }

    static final class SingletonList_PersistenceDelegate extends java_util_Collections {

        protected Expression instantiate(Object oldInstance, Encoder out) {

            List list = (List) oldInstance;

            return new Expression(oldInstance, Collections.class, "singletonList", new Object[]{list.get(0)});

        }

    }

    static final class SingletonSet_PersistenceDelegate extends java_util_Collections {

        protected Expression instantiate(Object oldInstance, Encoder out) {

            Set set = (Set) oldInstance;

            return new Expression(oldInstance, Collections.class, "singleton", new Object[]{set.iterator().next()});

        }

    }

    static final class SingletonMap_PersistenceDelegate extends java_util_Collections {

        protected Expression instantiate(Object oldInstance, Encoder out) {

            Map map = (Map) oldInstance;

            Object key = map.keySet().iterator().next();

            return new Expression(oldInstance, Collections.class, "singletonMap", new Object[]{key, map.get(key)});

        }

    }

    static final class UnmodifiableCollection_PersistenceDelegate extends java_util_Collections {

        protected Expression instantiate(Object oldInstance, Encoder out) {

            List list = new ArrayList((Collection) oldInstance);

            return new Expression(oldInstance, Collections.class, "unmodifiableCollection", new Object[]{list});

        }

    }

    static final class UnmodifiableList_PersistenceDelegate extends java_util_Collections {

        protected Expression instantiate(Object oldInstance, Encoder out) {

            List list = new LinkedList((Collection) oldInstance);

            return new Expression(oldInstance, Collections.class, "unmodifiableList", new Object[]{list});

        }

    }

    static final class UnmodifiableRandomAccessList_PersistenceDelegate extends java_util_Collections {

        protected Expression instantiate(Object oldInstance, Encoder out) {

            List list = new ArrayList((Collection) oldInstance);

            return new Expression(oldInstance, Collections.class, "unmodifiableList", new Object[]{list});

        }

    }

    static final class UnmodifiableSet_PersistenceDelegate extends java_util_Collections {

        protected Expression instantiate(Object oldInstance, Encoder out) {

            Set set = new HashSet((Set) oldInstance);

            return new Expression(oldInstance, Collections.class, "unmodifiableSet", new Object[]{set});

        }

    }

    static final class UnmodifiableSortedSet_PersistenceDelegate extends java_util_Collections {

        protected Expression instantiate(Object oldInstance, Encoder out) {

            SortedSet set = new TreeSet((SortedSet) oldInstance);

            return new Expression(oldInstance, Collections.class, "unmodifiableSortedSet", new Object[]{set});

        }

    }

    static final class UnmodifiableMap_PersistenceDelegate extends java_util_Collections {

        protected Expression instantiate(Object oldInstance, Encoder out) {

            Map map = new HashMap((Map) oldInstance);

            return new Expression(oldInstance, Collections.class, "unmodifiableMap", new Object[]{map});

        }

    }

    static final class UnmodifiableSortedMap_PersistenceDelegate extends java_util_Collections {

        protected Expression instantiate(Object oldInstance, Encoder out) {

            SortedMap map = new TreeMap((SortedMap) oldInstance);

            return new Expression(oldInstance, Collections.class, "unmodifiableSortedMap", new Object[]{map});

        }

    }

    static final class SynchronizedCollection_PersistenceDelegate extends java_util_Collections {

        protected Expression instantiate(Object oldInstance, Encoder out) {

            List list = new ArrayList((Collection) oldInstance);

            return new Expression(oldInstance, Collections.class, "synchronizedCollection", new Object[]{list});

        }

    }

    static final class SynchronizedList_PersistenceDelegate extends java_util_Collections {

        protected Expression instantiate(Object oldInstance, Encoder out) {

            List list = new LinkedList((Collection) oldInstance);

            return new Expression(oldInstance, Collections.class, "synchronizedList", new Object[]{list});

        }

    }

    static final class SynchronizedRandomAccessList_PersistenceDelegate extends java_util_Collections {

        protected Expression instantiate(Object oldInstance, Encoder out) {

            List list = new ArrayList((Collection) oldInstance);

            return new Expression(oldInstance, Collections.class, "synchronizedList", new Object[]{list});

        }

    }

    static final class SynchronizedSet_PersistenceDelegate extends java_util_Collections {

        protected Expression instantiate(Object oldInstance, Encoder out) {

            Set set = new HashSet((Set) oldInstance);

            return new Expression(oldInstance, Collections.class, "synchronizedSet", new Object[]{set});

        }

    }

    static final class SynchronizedSortedSet_PersistenceDelegate extends java_util_Collections {

        protected Expression instantiate(Object oldInstance, Encoder out) {

            SortedSet set = new TreeSet((SortedSet) oldInstance);

            return new Expression(oldInstance, Collections.class, "synchronizedSortedSet", new Object[]{set});

        }

    }

    static final class SynchronizedMap_PersistenceDelegate extends java_util_Collections {

        protected Expression instantiate(Object oldInstance, Encoder out) {

            Map map = new HashMap((Map) oldInstance);

            return new Expression(oldInstance, Collections.class, "synchronizedMap", new Object[]{map});

        }

    }

    static final class SynchronizedSortedMap_PersistenceDelegate extends java_util_Collections {

        protected Expression instantiate(Object oldInstance, Encoder out) {

            SortedMap map = new TreeMap((SortedMap) oldInstance);

            return new Expression(oldInstance, Collections.class, "synchronizedSortedMap", new Object[]{map});

        }

    }

    static final class CheckedCollection_PersistenceDelegate extends java_util_Collections {

        protected Expression instantiate(Object oldInstance, Encoder out) {

            Object type = getPrivateField(oldInstance, "type");

            List list = new ArrayList((Collection) oldInstance);

            return new Expression(oldInstance, Collections.class, "checkedCollection", new Object[]{list, type});

        }

    }

    static final class CheckedList_PersistenceDelegate extends java_util_Collections {

        protected Expression instantiate(Object oldInstance, Encoder out) {

            Object type = getPrivateField(oldInstance, "type");

            List list = new LinkedList((Collection) oldInstance);

            return new Expression(oldInstance, Collections.class, "checkedList", new Object[]{list, type});

        }

    }

    static final class CheckedRandomAccessList_PersistenceDelegate extends java_util_Collections {

        protected Expression instantiate(Object oldInstance, Encoder out) {

            Object type = getPrivateField(oldInstance, "type");

            List list = new ArrayList((Collection) oldInstance);

            return new Expression(oldInstance, Collections.class, "checkedList", new Object[]{list, type});

        }

    }

    static final class CheckedSet_PersistenceDelegate extends java_util_Collections {

        protected Expression instantiate(Object oldInstance, Encoder out) {

            Object type = getPrivateField(oldInstance, "type");

            Set set = new HashSet((Set) oldInstance);

            return new Expression(oldInstance, Collections.class, "checkedSet", new Object[]{set, type});

        }