// Copyright 2020 The Tint Authors.
//
// 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.

#include "src/transform/emit_vertex_point_size_transform.h"

#include <memory>
#include <utility>

#include "gtest/gtest.h"
#include "src/ast/builder.h"
#include "src/ast/stage_decoration.h"
#include "src/ast/variable_decl_statement.h"
#include "src/diagnostic/diagnostic.h"
#include "src/diagnostic/formatter.h"
#include "src/transform/manager.h"

namespace tint {
namespace transform {
namespace {

class EmitVertexPointSizeTransformTest : public testing::Test {
 public:
  struct Output {
    ast::Module module;
    diag::List diagnostics;
  };
  Output Transform(ast::Module mod) {
    Manager manager;
    manager.append(std::make_unique<EmitVertexPointSizeTransform>(&mod));
    manager.Run(&mod);
    Output out;
    out.module = std::move(mod);
    auto err = manager.error();
    if (!err.empty()) {
      diag::Diagnostic diag;
      diag.message = err;
      diag.severity = diag::Severity::Error;
      out.diagnostics.add(std::move(diag));
    }
    return out;
  }
};

struct ModuleBuilder : public ast::BuilderWithModule {
  ModuleBuilder() {}

  ast::Module Module() {
    Build();
    return std::move(*mod);
  }

 protected:
  virtual void Build() = 0;
};

TEST_F(EmitVertexPointSizeTransformTest, VertexStageBasic) {
  struct Builder : ModuleBuilder {
    void Build() override {
      auto* block = create<ast::BlockStatement>(Source{});

      block->append(create<ast::VariableDeclStatement>(
          Var("builtin_assignments_should_happen_before_this",
              tint::ast::StorageClass::kFunction, ty.f32)));

      mod->AddFunction(
          create<ast::Function>("non_entry_a", ast::VariableList{}, ty.void_,
                                create<ast::BlockStatement>(Source{})));

      auto* entry =
          create<ast::Function>("entry", ast::VariableList{}, ty.void_, block);
      entry->set_decorations({create<ast::StageDecoration>(
          ast::PipelineStage::kVertex, Source{})});
      mod->AddFunction(entry);

      mod->AddFunction(
          create<ast::Function>("non_entry_b", ast::VariableList{}, ty.void_,
                                create<ast::BlockStatement>(Source{})));
    }
  };

  auto result = Transform(Builder{}.Module());
  ASSERT_FALSE(result.diagnostics.contains_errors())
      << diag::Formatter().format(result.diagnostics);

  auto* expected = R"(Module{
  DecoratedVariable{
    Decorations{
      BuiltinDecoration{pointsize}
    }
    tint_pointsize
    out
    __f32
  }
  Function non_entry_a -> __void
  ()
  {
  }
  Function entry -> __void
  StageDecoration{vertex}
  ()
  {
    Assignment{
      Identifier[__ptr_out__f32]{tint_pointsize}
      ScalarConstructor[__f32]{1.000000}
    }
    VariableDeclStatement{
      Variable{
        builtin_assignments_should_happen_before_this
        function
        __f32
      }
    }
  }
  Function non_entry_b -> __void
  ()
  {
  }
}
)";
  EXPECT_EQ(expected, result.module.to_str());
}

TEST_F(EmitVertexPointSizeTransformTest, VertexStageEmpty) {
  struct Builder : ModuleBuilder {
    void Build() override {
      mod->AddFunction(
          create<ast::Function>("non_entry_a", ast::VariableList{}, ty.void_,
                                create<ast::BlockStatement>(Source{})));

      auto* entry =
          create<ast::Function>("entry", ast::VariableList{}, ty.void_,
                                create<ast::BlockStatement>(Source{}));
      entry->set_decorations({create<ast::StageDecoration>(
          ast::PipelineStage::kVertex, Source{})});
      mod->AddFunction(entry);

      mod->AddFunction(
          create<ast::Function>("non_entry_b", ast::VariableList{}, ty.void_,
                                create<ast::BlockStatement>(Source{})));
    }
  };

  auto result = Transform(Builder{}.Module());
  ASSERT_FALSE(result.diagnostics.contains_errors())
      << diag::Formatter().format(result.diagnostics);

  auto* expected = R"(Module{
  DecoratedVariable{
    Decorations{
      BuiltinDecoration{pointsize}
    }
    tint_pointsize
    out
    __f32
  }
  Function non_entry_a -> __void
  ()
  {
  }
  Function entry -> __void
  StageDecoration{vertex}
  ()
  {
    Assignment{
      Identifier[__ptr_out__f32]{tint_pointsize}
      ScalarConstructor[__f32]{1.000000}
    }
  }
  Function non_entry_b -> __void
  ()
  {
  }
}
)";
  EXPECT_EQ(expected, result.module.to_str());
}

TEST_F(EmitVertexPointSizeTransformTest, NonVertexStage) {
  struct Builder : ModuleBuilder {
    void Build() override {
      auto* fragment_entry =
          create<ast::Function>("fragment_entry", ast::VariableList{}, ty.void_,
                                create<ast::BlockStatement>(Source{}));
      fragment_entry->set_decorations({create<ast::StageDecoration>(
          ast::PipelineStage::kFragment, Source{})});
      mod->AddFunction(fragment_entry);

      auto* compute_entry =
          create<ast::Function>("compute_entry", ast::VariableList{}, ty.void_,
                                create<ast::BlockStatement>(Source{}));
      compute_entry->set_decorations({create<ast::StageDecoration>(
          ast::PipelineStage::kCompute, Source{})});
      mod->AddFunction(compute_entry);
    }
  };

  auto result = Transform(Builder{}.Module());
  ASSERT_FALSE(result.diagnostics.contains_errors())
      << diag::Formatter().format(result.diagnostics);

  auto* expected = R"(Module{
  Function fragment_entry -> __void
  StageDecoration{fragment}
  ()
  {
  }
  Function compute_entry -> __void
  StageDecoration{compute}
  ()
  {
  }
}
)";
  EXPECT_EQ(expected, result.module.to_str());
}

}  // namespace
}  // namespace transform
}  // namespace tint