# Copyright (c) 2023 PaddlePaddle Authors. All Rights Reserved.
#
# 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.

import unittest
from collections import OrderedDict

from paddle.distributed.auto_parallel.static.dist_attribute import (
    DistTensorSpec,
    TensorDistAttr,
)
from paddle.distributed.fleet import auto
from paddle.framework import core


class TestFlattenSPMDRule(unittest.TestCase):
    def setUp(self):
        self.rule = core.get_phi_spmd_rule("flatten")

        x_shape = [8, 16, 8, 24]
        process_mesh = auto.ProcessMesh(mesh=[[0, 1, 2, 3], [4, 5, 6, 7]])

        x_tensor_dist_attr = TensorDistAttr()
        x_tensor_dist_attr.dims_mapping = [-1, -1, -1, -1]
        x_tensor_dist_attr.process_mesh = process_mesh
        self.x_dist_tensor_spec = DistTensorSpec(x_shape, x_tensor_dist_attr)
        self.attrs = OrderedDict()

    def test_flatten_infer_forward(self):
        # shape: [8, 16, 8, 24] --> [8, 16 * 8, 24]
        # dims_mapping: [0, -1, -1, 1] --> [0, -1, -1, 1], ([0, -1, 1], [-1, 0, -1, -1, 1] // xshape)
        self.x_dist_tensor_spec.set_dims_mapping([0, -1, -1, 1])
        self.attrs['start_axis'] = 1
        self.attrs['stop_axis'] = 2
        result_dist_attrs = self.rule.infer_forward(
            self.x_dist_tensor_spec,
            self.attrs['start_axis'],
            self.attrs['stop_axis'],
        )
        inferred_input_dist_attrs = result_dist_attrs[0]
        inferred_output_dist_attrs = result_dist_attrs[1]

        self.assertEqual(len(inferred_input_dist_attrs), 1)
        self.assertEqual(len(inferred_output_dist_attrs), 1)
        self.assertEqual(
            inferred_input_dist_attrs[0].dims_mapping, [0, -1, -1, 1]
        )
        self.assertEqual(inferred_output_dist_attrs[0].dims_mapping, [0, -1, 1])

        # shape: [8, 16, 8, 24] --> [8, 16 * 8, 24]
        # dims_mapping: [-1, 0, -1, 1] --> [-1, 0, -1, 1] ([ -1, 0, 1])
        self.x_dist_tensor_spec.set_dims_mapping([-1, 0, -1, 1])
        self.attrs['start_axis'] = 1
        self.attrs['stop_axis'] = 2
        result_dist_attrs = self.rule.infer_forward(
            self.x_dist_tensor_spec,
            self.attrs['start_axis'],
            self.attrs['stop_axis'],
        )
        inferred_input_dist_attrs = result_dist_attrs[0]
        inferred_output_dist_attrs = result_dist_attrs[1]

        self.assertEqual(
            inferred_input_dist_attrs[0].dims_mapping, [-1, 0, -1, 1]
        )
        self.assertEqual(inferred_output_dist_attrs[0].dims_mapping, [-1, 0, 1])

        # shape: [8, 16, 8, 24] --> [8, 16 * 8, 24]
        # dims_mapping: [-1, -1, 1, 0] --> [-1, -1, -1, 0] ([ -1, -1, 0])
        self.x_dist_tensor_spec.set_dims_mapping([-1, -1, 1, 0])
        self.attrs['start_axis'] = 1
        self.attrs['stop_axis'] = 2
        result_dist_attrs = self.rule.infer_forward(
            self.x_dist_tensor_spec,
            self.attrs['start_axis'],
            self.attrs['stop_axis'],
        )
        inferred_input_dist_attrs = result_dist_attrs[0]
        inferred_output_dist_attrs = result_dist_attrs[1]

        self.assertEqual(
            inferred_input_dist_attrs[0].dims_mapping, [-1, -1, -1, 0]
        )
        self.assertEqual(
            inferred_output_dist_attrs[0].dims_mapping, [-1, -1, 0]
        )

        # shape: [8, 16, 8, 24] --> [8 * 16 * 8 * 24]
        # dims_mapping: [-1, 0, 1, -1] --> [-1, -1, -1, -1] ([ -1])
        self.x_dist_tensor_spec.set_dims_mapping([-1, 0, 1, -1])
        self.attrs['start_axis'] = 0
        self.attrs['stop_axis'] = -1
        result_dist_attrs = self.rule.infer_forward(
            self.x_dist_tensor_spec,
            self.attrs['start_axis'],
            self.attrs['stop_axis'],
        )
        inferred_input_dist_attrs = result_dist_attrs[0]
        inferred_output_dist_attrs = result_dist_attrs[1]

        self.assertEqual(
            inferred_input_dist_attrs[0].dims_mapping, [-1, -1, -1, -1]
        )
        self.assertEqual(inferred_output_dist_attrs[0].dims_mapping, [-1])

        # shape: [8, 16, 8, 24] --> [8 * 16 * 8 * 24]
        # dims_mapping: [0, -1, -1, 1] --> [0, -1, -1, -1] ([0])
        self.x_dist_tensor_spec.set_dims_mapping([0, -1, -1, 1])
        self.attrs['start_axis'] = 0
        self.attrs['stop_axis'] = -1
        result_dist_attrs = self.rule.infer_forward(
            self.x_dist_tensor_spec,
            self.attrs['start_axis'],
            self.attrs['stop_axis'],
        )
        inferred_input_dist_attrs = result_dist_attrs[0]
        inferred_output_dist_attrs = result_dist_attrs[1]

        self.assertEqual(
            inferred_input_dist_attrs[0].dims_mapping, [0, -1, -1, -1]
        )
        self.assertEqual(inferred_output_dist_attrs[0].dims_mapping, [0])

        # shape: [8, 16, 8, 24] --> [8 * 16 * 8 * 24]
        # dims_mapping: [1, 0, -1, -1] --> [1, -1, -1, -1] ([1])
        self.x_dist_tensor_spec.set_dims_mapping([1, 0, -1, -1])
        self.attrs['start_axis'] = 0
        self.attrs['stop_axis'] = -1
        result_dist_attrs = self.rule.infer_forward(
            self.x_dist_tensor_spec,
            self.attrs['start_axis'],
            self.attrs['stop_axis'],
        )
        inferred_input_dist_attrs = result_dist_attrs[0]
        inferred_output_dist_attrs = result_dist_attrs[1]

        self.assertEqual(
            inferred_input_dist_attrs[0].multi_dims_mapping,
            [[1, 0], [], [], []],
        )
        self.assertEqual(
            inferred_output_dist_attrs[0].multi_dims_mapping, [[1, 0]]
        )

        # shape: [8, 16, 8, 24] --> [8, 16 * 8 * 24]
        # dims_mapping: [-1, -1, 0, 1] --> [-1, -1, -1, -1] ([-1, -1])
        self.x_dist_tensor_spec.set_dims_mapping([-1, -1, 0, 1])
        self.attrs['start_axis'] = 1
        self.attrs['stop_axis'] = -1
        result_dist_attrs = self.rule.infer_forward(
            self.x_dist_tensor_spec,
            self.attrs['start_axis'],
            self.attrs['stop_axis'],
        )
        inferred_input_dist_attrs = result_dist_attrs[0]
        inferred_output_dist_attrs = result_dist_attrs[1]

        self.assertEqual(
            inferred_input_dist_attrs[0].dims_mapping, [-1, -1, -1, -1]
        )
        self.assertEqual(inferred_output_dist_attrs[0].dims_mapping, [-1, -1])

        # shape: [8, 16, 8, 24] --> [8, 16 * 8 * 24]
        # dims_mapping: [-1, 0, -1, 1] --> [-1, 0, -1, -1] ([-1, 0])
        self.x_dist_tensor_spec.set_dims_mapping([-1, 0, -1, 1])
        self.attrs['start_axis'] = 1
        self.attrs['stop_axis'] = -1
        result_dist_attrs = self.rule.infer_forward(
            self.x_dist_tensor_spec,
            self.attrs['start_axis'],
            self.attrs['stop_axis'],
        )
        inferred_input_dist_attrs = result_dist_attrs[0]
        inferred_output_dist_attrs = result_dist_attrs[1]

        self.assertEqual(
            inferred_input_dist_attrs[0].dims_mapping, [-1, 0, -1, -1]
        )
        self.assertEqual(inferred_output_dist_attrs[0].dims_mapping, [-1, 0])

        # shape: [8, 16, 8, 24] --> [8, 16 * 8 * 24]
        # dims_mapping: [0, 1, -1, -1] --> [0, 1, -1, -1] ([0, 1])
        self.x_dist_tensor_spec.set_dims_mapping([0, 1, -1, -1])
        self.attrs['start_axis'] = 1
        self.attrs['stop_axis'] = -1
        result_dist_attrs = self.rule.infer_forward(
            self.x_dist_tensor_spec,
            self.attrs['start_axis'],
            self.attrs['stop_axis'],
        )
        inferred_input_dist_attrs = result_dist_attrs[0]
        inferred_output_dist_attrs = result_dist_attrs[1]

        self.assertEqual(
            inferred_input_dist_attrs[0].dims_mapping, [0, 1, -1, -1]
        )
        self.assertEqual(inferred_output_dist_attrs[0].dims_mapping, [0, 1])

    def test_flatten_infer_backward(self):
        process_mesh = auto.ProcessMesh(mesh=[[0, 1, 2, 3], [4, 5, 6, 7]])

        output_tensor_dist_attr = TensorDistAttr()
        output_tensor_dist_attr.dims_mapping = [-1, -1, -1]
        output_tensor_dist_attr.process_mesh = process_mesh
        self.output_dist_tensor_spec = DistTensorSpec(
            [8, 16 * 8, 24], output_tensor_dist_attr
        )

        # shape: [8, 16, 8, 24] --> [8, 16 * 8, 24] (input --> output)
        # dims_mapping: [0, -1, 1] --> [0, -1, -1, 1], [0, -1, 1] (output --> input, output)
        self.output_dist_tensor_spec.shape = [8, 16 * 8, 24]
        self.output_dist_tensor_spec.set_dims_mapping([0, -1, 1])
        self.attrs['start_axis'] = 1
        self.attrs['stop_axis'] = 2
        result_dist_attrs = self.rule.infer_backward(
            self.x_dist_tensor_spec,
            self.output_dist_tensor_spec,
            self.attrs['start_axis'],
            self.attrs['stop_axis'],
        )
        inferred_input_dist_attrs = result_dist_attrs[0]
        inferred_output_dist_attrs = result_dist_attrs[1]

        self.assertEqual(len(inferred_input_dist_attrs), 1)
        self.assertEqual(len(inferred_output_dist_attrs), 1)
        self.assertEqual(
            inferred_input_dist_attrs[0].dims_mapping, [0, -1, -1, 1]
        )
        self.assertEqual(inferred_output_dist_attrs[0].dims_mapping, [0, -1, 1])

        # shape: [8, 16, 8, 24] --> [8, 16 * 8, 24] (input --> output)
        # dims_mapping: [0, 1, -1] --> [0, 1, -1, -1], [0, 1, -1] (output --> input, output)
        self.output_dist_tensor_spec.shape = [8, 16 * 8, 24]
        self.output_dist_tensor_spec.set_dims_mapping([0, 1, -1])
        self.attrs['start_axis'] = 1
        self.attrs['stop_axis'] = 2
        result_dist_attrs = self.rule.infer_backward(
            self.x_dist_tensor_spec,
            self.output_dist_tensor_spec,
            self.attrs['start_axis'],
            self.attrs['stop_axis'],
        )
        inferred_input_dist_attrs = result_dist_attrs[0]
        inferred_output_dist_attrs = result_dist_attrs[1]

        self.assertEqual(
            inferred_input_dist_attrs[0].dims_mapping, [0, 1, -1, -1]
        )
        self.assertEqual(inferred_output_dist_attrs[0].dims_mapping, [0, 1, -1])

        # shape: [8, 16, 8, 24] --> [8, 16 * 8, 24] (input --> output)
        # dims_mapping: [-1, 0, 1] --> [-1, 0, -1, 1], [-1, 0, 1] (output --> input, output)
        self.output_dist_tensor_spec.shape = [8, 16 * 8, 24]
        self.output_dist_tensor_spec.set_dims_mapping([-1, 0, 1])
        self.attrs['start_axis'] = 1
        self.attrs['stop_axis'] = 2
        result_dist_attrs = self.rule.infer_backward(
            self.x_dist_tensor_spec,
            self.output_dist_tensor_spec,
            self.attrs['start_axis'],
            self.attrs['stop_axis'],
        )
        inferred_input_dist_attrs = result_dist_attrs[0]
        inferred_output_dist_attrs = result_dist_attrs[1]

        self.assertEqual(
            inferred_input_dist_attrs[0].dims_mapping, [-1, 0, -1, 1]
        )
        self.assertEqual(inferred_output_dist_attrs[0].dims_mapping, [-1, 0, 1])

        # shape: [8, 16, 8, 24] --> [8 * 16 * 8 * 24] (input --> output)
        # dims_mapping: [-1] --> [-1, -1, -1, -1], [-1] (output --> input, output)
        self.output_dist_tensor_spec.shape = [8 * 16 * 8 * 24]
        self.output_dist_tensor_spec.set_dims_mapping([-1])
        self.attrs['start_axis'] = 0
        self.attrs['stop_axis'] = -1
        result_dist_attrs = self.rule.infer_backward(
            self.x_dist_tensor_spec,
            self.output_dist_tensor_spec,
            self.attrs['start_axis'],
            self.attrs['stop_axis'],
        )
        inferred_input_dist_attrs = result_dist_attrs[0]
        inferred_output_dist_attrs = result_dist_attrs[1]

        self.assertEqual(
            inferred_input_dist_attrs[0].dims_mapping, [-1, -1, -1, -1]
        )
        self.assertEqual(inferred_output_dist_attrs[0].dims_mapping, [-1])

        # shape: [8, 16, 8, 24] --> [8 * 16 * 8 * 24] (input --> output)
        # dims_mapping: [0] --> [0, -1, -1, -1], [0] (output --> input, output)
        self.output_dist_tensor_spec.shape = [8 * 16 * 8 * 24]
        self.output_dist_tensor_spec.set_dims_mapping([0])
        self.attrs['start_axis'] = 0
        self.attrs['stop_axis'] = -1
        result_dist_attrs = self.rule.infer_backward(
            self.x_dist_tensor_spec,
            self.output_dist_tensor_spec,
            self.attrs['start_axis'],
            self.attrs['stop_axis'],
        )
        inferred_input_dist_attrs = result_dist_attrs[0]
        inferred_output_dist_attrs = result_dist_attrs[1]

        self.assertEqual(
            inferred_input_dist_attrs[0].dims_mapping, [0, -1, -1, -1]
        )
        self.assertEqual(inferred_output_dist_attrs[0].dims_mapping, [0])

        # shape: [8, 16, 8, 24] --> [8 * 16 * 8 * 24] (input --> output)
        # dims_mapping: [1] --> [1, -1, -1, -1], [1] (output --> input, output)
        self.output_dist_tensor_spec.shape = [8 * 16 * 8 * 24]
        self.output_dist_tensor_spec.set_dims_mapping([1])
        self.attrs['start_axis'] = 0
        self.attrs['stop_axis'] = -1
        result_dist_attrs = self.rule.infer_backward(
            self.x_dist_tensor_spec,
            self.output_dist_tensor_spec,
            self.attrs['start_axis'],
            self.attrs['stop_axis'],
        )
        inferred_input_dist_attrs = result_dist_attrs[0]
        inferred_output_dist_attrs = result_dist_attrs[1]

        self.assertEqual(
            inferred_input_dist_attrs[0].dims_mapping, [1, -1, -1, -1]
        )
        self.assertEqual(inferred_output_dist_attrs[0].dims_mapping, [1])

        # shape: [8, 16, 8, 24] --> [8, 16 * 8 * 24] (input --> output)
        # dims_mapping: [-1, -1] --> [-1, -1, -1, -1], [-1, -1] (output --> input, output)
        self.output_dist_tensor_spec.shape = [8, 16 * 8 * 24]
        self.output_dist_tensor_spec.set_dims_mapping([-1, -1])
        self.attrs['start_axis'] = 1
        self.attrs['stop_axis'] = -1
        result_dist_attrs = self.rule.infer_backward(
            self.x_dist_tensor_spec,
            self.output_dist_tensor_spec,
            self.attrs['start_axis'],
            self.attrs['stop_axis'],
        )
        inferred_input_dist_attrs = result_dist_attrs[0]
        inferred_output_dist_attrs = result_dist_attrs[1]

        self.assertEqual(
            inferred_input_dist_attrs[0].dims_mapping, [-1, -1, -1, -1]
        )
        self.assertEqual(inferred_output_dist_attrs[0].dims_mapping, [-1, -1])

        # shape: [8, 16, 8, 24] --> [8, 16 * 8 * 24] (input --> output)
        # dims_mapping: [0, -1] --> [0, -1, -1, -1], [0, -1] (output --> input, output)
        self.output_dist_tensor_spec.shape = [8, 16 * 8 * 24]
        self.output_dist_tensor_spec.set_dims_mapping([0, -1])
        self.attrs['start_axis'] = 1
        self.attrs['stop_axis'] = -1
        result_dist_attrs = self.rule.infer_backward(
            self.x_dist_tensor_spec,
            self.output_dist_tensor_spec,
            self.attrs['start_axis'],
            self.attrs['stop_axis'],
        )
        inferred_input_dist_attrs = result_dist_attrs[0]
        inferred_output_dist_attrs = result_dist_attrs[1]

        self.assertEqual(
            inferred_input_dist_attrs[0].dims_mapping, [0, -1, -1, -1]
        )
        self.assertEqual(inferred_output_dist_attrs[0].dims_mapping, [0, -1])

        # shape: [8, 16, 8, 24] --> [8, 16 * 8 * 24] (input --> output)
        # dims_mapping: [0, 1] --> [0, 1, -1, -1], [0, 1] (output --> input, output)
        self.output_dist_tensor_spec.shape = [8, 16 * 8 * 24]
        self.output_dist_tensor_spec.set_dims_mapping([0, 1])
        self.attrs['start_axis'] = 1
        self.attrs['stop_axis'] = -1
        result_dist_attrs = self.rule.infer_backward(
            self.x_dist_tensor_spec,
            self.output_dist_tensor_spec,
            self.attrs['start_axis'],
            self.attrs['stop_axis'],
        )
        inferred_input_dist_attrs = result_dist_attrs[0]
        inferred_output_dist_attrs = result_dist_attrs[1]

        self.assertEqual(
            inferred_input_dist_attrs[0].dims_mapping, [0, 1, -1, -1]
        )
        self.assertEqual(inferred_output_dist_attrs[0].dims_mapping, [0, 1])


if __name__ == "__main__":
    unittest.main()