/*
 * Copyright (C) 2023 The Android Open Source Project
 *
 * 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 android.view.cts.util;

import static android.server.wm.BuildUtils.HW_TIMEOUT_MULTIPLIER;
import static android.view.cts.util.ASurfaceControlInputReceiverTestUtils.nCreateInputReceiver;
import static android.view.cts.util.ASurfaceControlInputReceiverTestUtils.nDeleteInputReceiver;
import static android.view.cts.util.ASurfaceControlInputReceiverTestUtils.nGetInputTransferToken;
import static android.view.cts.util.ASurfaceControlTestUtils.nSurfaceControl_create;
import static android.view.cts.util.ASurfaceControlTestUtils.nSurfaceControl_fromJava;
import static android.view.cts.util.ASurfaceControlTestUtils.nSurfaceControl_release;
import static android.view.cts.util.ASurfaceControlTestUtils.nSurfaceTransaction_apply;
import static android.view.cts.util.ASurfaceControlTestUtils.nSurfaceTransaction_create;
import static android.view.cts.util.ASurfaceControlTestUtils.nSurfaceTransaction_releaseBuffer;
import static android.view.cts.util.ASurfaceControlTestUtils.nSurfaceTransaction_reparent;
import static android.view.cts.util.ASurfaceControlTestUtils.nSurfaceTransaction_setOnCommitCallback;
import static android.view.cts.util.ASurfaceControlTestUtils.nSurfaceTransaction_setSolidBuffer;
import static android.view.cts.util.ASurfaceControlTestUtils.nSurfaceTransaction_setVisibility;

import android.app.Service;
import android.content.Context;
import android.content.Intent;
import android.graphics.Canvas;
import android.graphics.Color;
import android.graphics.Rect;
import android.hardware.display.DisplayManager;
import android.os.Handler;
import android.os.IBinder;
import android.os.Looper;
import android.os.RemoteException;
import android.util.Log;
import android.view.Choreographer;
import android.view.Display;
import android.view.KeyEvent;
import android.view.MotionEvent;
import android.view.Surface;
import android.view.SurfaceControl;
import android.view.SurfaceControl.Transaction;
import android.view.SurfaceControlViewHost;
import android.view.View;
import android.view.WindowManager;
import android.view.cts.util.ASurfaceControlInputReceiverTestUtils.InputReceiver;
import android.view.cts.util.aidl.IAttachEmbeddedWindow;
import android.view.cts.util.aidl.IMotionEventReceiver;
import android.widget.FrameLayout;
import android.widget.TextView;
import android.window.InputTransferToken;

import androidx.annotation.NonNull;
import androidx.annotation.Nullable;

import java.util.concurrent.CountDownLatch;
import java.util.concurrent.TimeUnit;

public class EmbeddedSCVHService extends Service {
    private static final long WAIT_TIME_S = 5L * HW_TIMEOUT_MULTIPLIER;

    private static final String TAG = "SCVHEmbeddedService";
    private SurfaceControlViewHost mVr;

    private Handler mHandler;

    private SlowView mSlowView;

    private SurfaceControl mSurfaceControl;
    private long mNativeSurfaceControl;
    private long mBuffer;
    private long mNativeBatchedInputReceiver;

    private WindowManager mWm;

    private InputTransferToken mEmbeddedInputTransferToken;

    @Override
    public void onCreate() {
        super.onCreate();
        mHandler = new Handler(Looper.getMainLooper());
        mWm = getSystemService(WindowManager.class);
    }

    @Nullable
    @Override
    public IBinder onBind(Intent intent) {
        // Return the interface
        return new AttachEmbeddedWindow();
    }

    public static class SlowView extends TextView {
        private long mDelayMs;

        public SlowView(Context context) {
            super(context);
        }

        @Override
        protected void onMeasure(int widthMeasureSpec, int heightMeasureSpec) {
            super.onMeasure(widthMeasureSpec, heightMeasureSpec);
            try {
                Thread.sleep(mDelayMs);
            } catch (InterruptedException e) {
            }
        }

        public void setDelay(long delayMs) {
            mDelayMs = delayMs;
        }
    }

    private class AttachEmbeddedWindow extends IAttachEmbeddedWindow.Stub {
        @Override
        public SurfaceControlViewHost.SurfacePackage attachEmbedded(IBinder hostToken, int width,
                int height, int displayId, long delayMs) {
            CountDownLatch countDownLatch = new CountDownLatch(1);
            mHandler.post(() -> {
                Context context = EmbeddedSCVHService.this;
                Display display = getApplicationContext().getSystemService(
                        DisplayManager.class).getDisplay(displayId);
                mVr = new SurfaceControlViewHost(context, display, hostToken);
                FrameLayout content = new FrameLayout(context);

                mSlowView = new SlowView(context);
                mSlowView.setDelay(delayMs);
                mSlowView.setBackgroundColor(Color.BLUE);
                mSlowView.setTextColor(Color.WHITE);
                content.addView(mSlowView);
                mVr.setView(content, width, height);

                content.addOnAttachStateChangeListener(new View.OnAttachStateChangeListener() {
                    @Override
                    public void onViewAttachedToWindow(@NonNull View v) {
                        // First frame isn't included in the sync so don't notify the host about the
                        // surface package until the first draw has completed.
                        Transaction transaction = new Transaction().addTransactionCommittedListener(
                                getMainExecutor(), countDownLatch::countDown);
                        v.getRootSurfaceControl().applyTransactionOnDraw(transaction);
                    }

                    @Override
                    public void onViewDetachedFromWindow(@NonNull View v) {
                    }
                });
            });
            try {
                countDownLatch.await(5, TimeUnit.SECONDS);
            } catch (InterruptedException e) {
                Log.e(TAG, "Failed to wait for timeout");
            }
            return mVr.getSurfacePackage();
        }

        @Override
        public void relayout(WindowManager.LayoutParams lp) {
            Runnable runnable = () -> {
                mSlowView.setText(lp.width + "x" + lp.height);
                mVr.relayout(lp.width, lp.height);
            };

            if (Thread.currentThread() == mHandler.getLooper().getThread()) {
                runnable.run();
            } else {
                mHandler.post(runnable);
            }

        }

        @Override
        public void sendCrash() {
            mVr.getView().getViewTreeObserver().addOnPreDrawListener(() -> {
                throw new RuntimeException();
            });
        }

        @Override
        public String attachEmbeddedSurfaceControl(SurfaceControl parentSc,
                InputTransferToken hostToken, int width, int height, boolean transferTouchToHost,
                @Nullable IMotionEventReceiver receiver) {
            CountDownLatch registeredLatch = new CountDownLatch(1);
            String name = "Child SurfaceControl";
            mHandler.post(() -> {
                mSurfaceControl = new SurfaceControl.Builder().setName(name)
                        .setParent(parentSc).setBufferSize(width, height).build();
                new SurfaceControl.Transaction().setVisibility(mSurfaceControl, true).setCrop(
                        mSurfaceControl, new Rect(0, 0, width, height)).apply();

                Surface surface = new Surface(mSurfaceControl);
                Canvas c = surface.lockCanvas(null);
                c.drawColor(Color.BLUE);
                surface.unlockCanvasAndPost(c);

                mEmbeddedInputTransferToken = mWm.registerBatchedSurfaceControlInputReceiver(
                        hostToken, mSurfaceControl, Choreographer.getInstance(),
                        event -> {
                            if (event instanceof MotionEvent) {
                                if (transferTouchToHost) {
                                    mWm.transferTouchGesture(mEmbeddedInputTransferToken,
                                            hostToken);
                                }

                                try {
                                    receiver.onMotionEventReceived(
                                            MotionEvent.obtain((MotionEvent) event));
                                } catch (RemoteException e) {
                                    Log.e(TAG, "Failed to send motion event to host", e);
                                }
                            }
                            return false;
                        });
                registeredLatch.countDown();
            });

            try {
                if (!registeredLatch.await(WAIT_TIME_S, TimeUnit.SECONDS)) {
                    Log.e(TAG, "Failed to wait for input to be registered");
                    return null;
                }
            } catch (InterruptedException e) {
                return null;
            }
            // Use name instead of token because retrieving the token is a through a TestApi that
            // this process is unable to call
            return name;
        }

        @Override
        public InputTransferToken getEmbeddedInputTransferToken() {
            return mEmbeddedInputTransferToken;
        }

        @Override
        public void tearDownEmbeddedSurfaceControl() {
            mHandler.post(() -> {
                if (mSurfaceControl != null) {
                    mWm.unregisterSurfaceControlInputReceiver(mSurfaceControl);
                    new Transaction().reparent(mSurfaceControl, null);
                    mSurfaceControl.release();
                }
            });
        }

        @Override
        public boolean attachEmbeddedASurfaceControl(SurfaceControl parentSc,
                InputTransferToken hostToken, int width, int height, boolean transferTouchToHost,
                @Nullable IMotionEventReceiver receiver) {
            CountDownLatch registeredLatch = new CountDownLatch(2);
            mHandler.post(() -> {
                mNativeSurfaceControl = nSurfaceControl_create(
                        nSurfaceControl_fromJava(parentSc));
                long surfaceTransaction = nSurfaceTransaction_create();
                nSurfaceTransaction_setVisibility(mNativeSurfaceControl, surfaceTransaction, true);
                mBuffer = nSurfaceTransaction_setSolidBuffer(mNativeSurfaceControl,
                        surfaceTransaction,
                        width, height, Color.RED);
                nSurfaceTransaction_setOnCommitCallback(surfaceTransaction,
                        (latchTime, presentTime) -> registeredLatch.countDown());
                nSurfaceTransaction_apply(surfaceTransaction);

                mNativeBatchedInputReceiver = nCreateInputReceiver(true /* batched */,
                        hostToken, mNativeSurfaceControl, new InputReceiver() {
                            @Override
                            public boolean onMotionEvent(MotionEvent motionEvent) {
                                if (transferTouchToHost && mEmbeddedInputTransferToken != null
                                        && motionEvent.getAction() == MotionEvent.ACTION_DOWN) {
                                    mWm.transferTouchGesture(mEmbeddedInputTransferToken,
                                            hostToken);
                                }

                                try {
                                    receiver.onMotionEventReceived(MotionEvent.obtain(motionEvent));
                                } catch (RemoteException e) {
                                    Log.e(TAG, "Failed to send motion event to host", e);
                                }
                                return false;
                            }

                            @Override
                            public boolean onKeyEvent(KeyEvent keyEvent) {
                                return false;
                            }
                        });
                mEmbeddedInputTransferToken = nGetInputTransferToken(mNativeBatchedInputReceiver);
                registeredLatch.countDown();
            });

            try {
                if (!registeredLatch.await(WAIT_TIME_S, TimeUnit.SECONDS)) {
                    Log.e(TAG, "Failed to wait for input to be registered");
                    return false;
                }
            } catch (InterruptedException e) {
                return false;
            }
            return true;
        }

        @Override
        public void tearDownEmbeddedASurfaceControl() {
            mHandler.post(() -> {
                if (mNativeSurfaceControl != 0) {
                    long surfaceTransaction = nSurfaceTransaction_create();
                    nSurfaceTransaction_reparent(mNativeSurfaceControl, 0, surfaceTransaction);
                    nSurfaceTransaction_apply(surfaceTransaction);
                    nSurfaceControl_release(mNativeSurfaceControl);

                    nSurfaceTransaction_releaseBuffer(mBuffer);
                    nDeleteInputReceiver(mNativeBatchedInputReceiver);
                }
            });
        }

    }
}