/*

 * Copyright (c) 2004, 2016, Oracle and/or its affiliates. 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.  Oracle designates this

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

 * by Oracle 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 Oracle, 500 Oracle Parkway, Redwood Shores, CA 94065 USA

 * or visit www.oracle.com if you need additional information or have any

 * questions.

 */

package sun.java2d.opengl;

import java.awt.AWTException;

import java.awt.BufferCapabilities;

import java.awt.Color;

import java.awt.Component;

import java.awt.Graphics;

import java.awt.Graphics2D;

import java.awt.ImageCapabilities;

import java.awt.Transparency;

import java.awt.color.ColorSpace;

import java.awt.image.ColorModel;

import java.awt.image.DataBuffer;

import java.awt.image.DirectColorModel;

import java.awt.image.VolatileImage;

import sun.awt.Win32GraphicsConfig;

import sun.awt.Win32GraphicsDevice;

import sun.awt.image.SunVolatileImage;

import sun.awt.image.SurfaceManager;

import sun.awt.windows.WComponentPeer;

import sun.java2d.Disposer;

import sun.java2d.DisposerRecord;

import sun.java2d.SunGraphics2D;

import sun.java2d.Surface;

import sun.java2d.SurfaceData;

import sun.java2d.pipe.hw.AccelSurface;

import sun.java2d.pipe.hw.AccelTypedVolatileImage;

import sun.java2d.pipe.hw.ContextCapabilities;

import static sun.java2d.opengl.OGLContext.OGLContextCaps.*;

import static sun.java2d.opengl.WGLSurfaceData.*;

import sun.java2d.opengl.OGLContext.OGLContextCaps;

import sun.java2d.windows.GDIWindowSurfaceData;

public class WGLGraphicsConfig

    extends Win32GraphicsConfig

    implements OGLGraphicsConfig

{

    protected static boolean wglAvailable;

    private static ImageCapabilities imageCaps = new WGLImageCaps();

    private BufferCapabilities bufferCaps;

    private long pConfigInfo;

    private ContextCapabilities oglCaps;

    private OGLContext context;

    private Object disposerReferent = new Object();

    public static native int getDefaultPixFmt(int screennum);

    private static native boolean initWGL();

    private static native long getWGLConfigInfo(int screennum, int visualnum);

    private static native int getOGLCapabilities(long configInfo);

    static {

        wglAvailable = initWGL();

    }

    @SuppressWarnings("deprecation")

    protected WGLGraphicsConfig(Win32GraphicsDevice device, int visualnum,

                                long configInfo, ContextCapabilities oglCaps)

    {

        super(device, visualnum);

        this.pConfigInfo = configInfo;

        this.oglCaps = oglCaps;

        context = new OGLContext(OGLRenderQueue.getInstance(), this);

        // add a record to the Disposer so that we destroy the native

        // WGLGraphicsConfigInfo data when this object goes away

        Disposer.addRecord(disposerReferent,

                           new WGLGCDisposerRecord(pConfigInfo));

    }

    public Object getProxyKey() {

        return this;

    }

    public SurfaceData createManagedSurface(int w, int h, int transparency) {

        return WGLSurfaceData.createData(this, w, h,

                                         getColorModel(transparency),

                                         null,

                                         OGLSurfaceData.TEXTURE);

    }

    public static WGLGraphicsConfig getConfig(Win32GraphicsDevice device,

                                              int pixfmt)

    {

        if (!wglAvailable) {

            return null;

        }

        long cfginfo = 0;

        final String ids[] = new String[1];

        OGLRenderQueue rq = OGLRenderQueue.getInstance();

        rq.lock();

        try {

            // getWGLConfigInfo() creates and destroys temporary

            // surfaces/contexts, so we should first invalidate the current

            // Java-level context and flush the queue...

            OGLContext.invalidateCurrentContext();

            WGLGetConfigInfo action =

                new WGLGetConfigInfo(device.getScreen(), pixfmt);

            rq.flushAndInvokeNow(action);

            cfginfo = action.getConfigInfo();

            if (cfginfo != 0L) {

                OGLContext.setScratchSurface(cfginfo);

                rq.flushAndInvokeNow(new Runnable() {

                    public void run() {

                        ids[0] = OGLContext.getOGLIdString();

                    }

                });

            }

        } finally {

            rq.unlock();

        }

        if (cfginfo == 0) {

            return null;

        }

        int oglCaps = getOGLCapabilities(cfginfo);

        ContextCapabilities caps = new OGLContextCaps(oglCaps, ids[0]);

        return new WGLGraphicsConfig(device, pixfmt, cfginfo, caps);

    }

    /**

     * This is a small helper class that allows us to execute

     * getWGLConfigInfo() on the queue flushing thread.

     */

    private static class WGLGetConfigInfo implements Runnable {

        private int screen;

        private int pixfmt;

        private long cfginfo;

        private WGLGetConfigInfo(int screen, int pixfmt) {

            this.screen = screen;

            this.pixfmt = pixfmt;

        }

        public void run() {

            cfginfo = getWGLConfigInfo(screen, pixfmt);

        }

        public long getConfigInfo() {

            return cfginfo;

        }

    }

    public static boolean isWGLAvailable() {

        return wglAvailable;

    }

    /**

     * Returns true if the provided capability bit is present for this config.

     * See OGLContext.java for a list of supported capabilities.

     */

    @Override

    public final boolean isCapPresent(int cap) {

        return ((oglCaps.getCaps() & cap) != 0);

    }

    @Override

    public final long getNativeConfigInfo() {

        return pConfigInfo;

    }

    /**

     * {@inheritDoc}

     *

     * @see sun.java2d.pipe.hw.BufferedContextProvider#getContext

     */

    @Override

    public final OGLContext getContext() {

        return context;

    }

    private static class WGLGCDisposerRecord implements DisposerRecord {

        private long pCfgInfo;

        public WGLGCDisposerRecord(long pCfgInfo) {

            this.pCfgInfo = pCfgInfo;

        }

        public void dispose() {

            if (pCfgInfo != 0) {

                OGLRenderQueue.disposeGraphicsConfig(pCfgInfo);

                pCfgInfo = 0;

            }

        }

    }

    @Override

    public synchronized void displayChanged() {

        super.displayChanged();

        // the context could hold a reference to a WGLSurfaceData, which in

        // turn has a reference back to this WGLGraphicsConfig, so in order

        // for this instance to be disposed we need to break the connection

        OGLRenderQueue rq = OGLRenderQueue.getInstance();

        rq.lock();

        try {

            OGLContext.invalidateCurrentContext();

        } finally {

            rq.unlock();

        }

    }

    @Override

    public ColorModel getColorModel(int transparency) {

        switch (transparency) {

        case Transparency.OPAQUE:

            // REMIND: once the ColorModel spec is changed, this should be

            //         an opaque premultiplied DCM...

            return new DirectColorModel(24, 0xff0000, 0xff00, 0xff);

        case Transparency.BITMASK:

            return new DirectColorModel(25, 0xff0000, 0xff00, 0xff, 0x1000000);

        case Transparency.TRANSLUCENT:

            ColorSpace cs = ColorSpace.getInstance(ColorSpace.CS_sRGB);

            return new DirectColorModel(cs, 32,

                                        0xff0000, 0xff00, 0xff, 0xff000000,

                                        true, DataBuffer.TYPE_INT);

        default:

            return null;

        }

    }

    @Override

    public String toString() {

        return ("WGLGraphicsConfig[dev="+screen+",pixfmt="+visual+"]");

    }

    /**

     * The following methods are invoked from WComponentPeer.java rather

     * than having the Win32-dependent implementations hardcoded in that

     * class.  This way the appropriate actions are taken based on the peer's

     * GraphicsConfig, whether it is a Win32GraphicsConfig or a

     * WGLGraphicsConfig.

     */

    /**

     * Creates a new SurfaceData that will be associated with the given

     * WComponentPeer.

     */

    @Override

    public SurfaceData createSurfaceData(WComponentPeer peer,

                                         int numBackBuffers)

    {

        SurfaceData sd = WGLSurfaceData.createData(peer);

        if (sd == null) {

            sd = GDIWindowSurfaceData.createData(peer);

        }

        return sd;

    }

    /**

     * The following methods correspond to the multibuffering methods in

     * WComponentPeer.java...

     */

    /**

     * Checks that the requested configuration is natively supported; if not,

     * an AWTException is thrown.

     */

    @Override

    public void assertOperationSupported(Component target,

                                         int numBuffers,

                                         BufferCapabilities caps)

        throws AWTException

    {

        if (numBuffers > 2) {

            throw new AWTException(

                "Only double or single buffering is supported");

        }

        BufferCapabilities configCaps = getBufferCapabilities();

        if (!configCaps.isPageFlipping()) {

            throw new AWTException("Page flipping is not supported");

        }

        if (caps.getFlipContents() == BufferCapabilities.FlipContents.PRIOR) {

            throw new AWTException("FlipContents.PRIOR is not supported");

        }

    }

    /**

     * Creates a WGL-based backbuffer for the given peer and returns the

     * image wrapper.

     */

    @Override

    public VolatileImage createBackBuffer(WComponentPeer peer) {

        Component target = (Component)peer.getTarget();

        // it is possible for the component to have size 0x0, adjust it to

        // be at least 1x1 to avoid IAE

        int w = Math.max(1, target.getWidth());

        int h = Math.max(1, target.getHeight());

        return new SunVolatileImage(target,

                                    w, h,

                                    Boolean.TRUE);

    }

    /**

     * Performs the native WGL flip operation for the given target Component.

     */

    @Override

    public void flip(WComponentPeer peer,

                     Component target, VolatileImage backBuffer,

                     int x1, int y1, int x2, int y2,

                     BufferCapabilities.FlipContents flipAction)

    {

        if (flipAction == BufferCapabilities.FlipContents.COPIED) {

            SurfaceManager vsm = SurfaceManager.getManager(backBuffer);

            SurfaceData sd = vsm.getPrimarySurfaceData();

            if (sd instanceof WGLVSyncOffScreenSurfaceData) {

                WGLVSyncOffScreenSurfaceData vsd =

                    (WGLVSyncOffScreenSurfaceData)sd;

                SurfaceData bbsd = vsd.getFlipSurface();

                Graphics2D bbg =

                    new SunGraphics2D(bbsd, Color.black, Color.white, null);

                try {

                    bbg.drawImage(backBuffer, 0, 0, null);

                } finally {

                    bbg.dispose();

                }

            } else {

                Graphics g = peer.getGraphics();

                try {

                    g.drawImage(backBuffer,

                                x1, y1, x2, y2,

                                x1, y1, x2, y2,

                                null);

                } finally {

                    g.dispose();

                }

                return;

            }

        } else if (flipAction == BufferCapabilities.FlipContents.PRIOR) {

            // not supported by WGL...

            return;

        }

        OGLSurfaceData.swapBuffers(peer.getData());

        if (flipAction == BufferCapabilities.FlipContents.BACKGROUND) {

            Graphics g = backBuffer.getGraphics();

            try {

                g.setColor(target.getBackground());

                g.fillRect(0, 0,

                           backBuffer.getWidth(),

                           backBuffer.getHeight());

            } finally {

                g.dispose();

            }

        }

    }

    private static class WGLBufferCaps extends BufferCapabilities {

        public WGLBufferCaps(boolean dblBuf) {

            super(imageCaps, imageCaps,

                  dblBuf ? FlipContents.UNDEFINED : null);

        }

    }

    @Override

    public BufferCapabilities getBufferCapabilities() {

        if (bufferCaps == null) {

            boolean dblBuf = isCapPresent(CAPS_DOUBLEBUFFERED);

            bufferCaps = new WGLBufferCaps(dblBuf);

        }

        return bufferCaps;

    }

    private static class WGLImageCaps extends ImageCapabilities {

        private WGLImageCaps() {

            super(true);

        }

        public boolean isTrueVolatile() {

            return true;

        }

    }

    @Override

    public ImageCapabilities getImageCapabilities() {

        return imageCaps;

    }

    /**

     * {@inheritDoc}

     *

     * @see sun.java2d.pipe.hw.AccelGraphicsConfig#createCompatibleVolatileImage

     */

    @Override

    public VolatileImage

        createCompatibleVolatileImage(int width, int height,

                                      int transparency, int type)

    {

        if ((type != FBOBJECT && type != TEXTURE)

                || transparency == Transparency.BITMASK

                || type == FBOBJECT && !isCapPresent(CAPS_EXT_FBOBJECT)) {

            return null;

        }

        SunVolatileImage vi = new AccelTypedVolatileImage(this, width, height,

                                                          transparency, type);

        Surface sd = vi.getDestSurface();

        if (!(sd instanceof AccelSurface) ||

            ((AccelSurface)sd).getType() != type)

        {

            vi.flush();

            vi = null;

        }

        return vi;

    }

    /**

     * {@inheritDoc}

     *

     * @see sun.java2d.pipe.hw.AccelGraphicsConfig#getContextCapabilities

     */

    @Override

    public ContextCapabilities getContextCapabilities() {

        return oglCaps;

    }

}