test_RecorderListener.cpp

Go to the documentation of this file.

#include "gmock/gmock.h"
#include "gtest/gtest.h"
 
#include "Kokkos_Core.hpp"
 
#include "kokkos-utils/impl/type_traits.hpp"
 
#include "kokkos-utils/callbacks/EventInProfileSectionRegexMatcher.hpp"
#include "kokkos-utils/callbacks/EventRegexMatcher.hpp"
#include "kokkos-utils/callbacks/Helpers.hpp"
#include "kokkos-utils/callbacks/RecorderListener.hpp"
 
#include "tests/callbacks/Helpers.hpp"
#include "tests/callbacks/TestWorkload.hpp"

 
using execution_space = Kokkos::DefaultExecutionSpace;
 
namespace Kokkos::utils::tests::callbacks
{
 
using namespace Kokkos::utils::callbacks;

using event_in_profile_section_recorder_t = RecorderListener<EventInProfileSectionRegexMatcher, EventTypeList>;
 
class RecorderListenerTest : public ManagerTestFixture
{
public:
    void SetUp() override {
        this->exec = Kokkos::Experimental::partition_space(execution_space{}, 1)[0];
    }
 
protected:
    execution_space exec {};
};

TEST(RecorderListener, traits)
{
    static_assert(std::same_as<
        listener_event_type_list_t<event_in_profile_section_recorder_t>,
        EventTypeList
    >);
 
    static_assert(Listener<event_in_profile_section_recorder_t>);
}
 
template <Event EvenType>
class RecorderListenerSingleEventTypeTest : public ManagerTestFixture {};
 
TYPED_TEST_SUITE(RecorderListenerSingleEventTypeTest, EventTestTypes);

TYPED_TEST(RecorderListenerSingleEventTypeTest, record)
{
    using recorder_listener_t = RecorderListener<TypeParam>;
    static_assert(std::same_as<typename recorder_listener_t::event_type_list_t, Kokkos::Impl::type_list<TypeParam>>);
    static_assert(std::same_as<typename recorder_listener_t::matcher_t, AnyEventMatcher>);
 
    const auto recorder = std::make_shared<recorder_listener_t>();
 
    Manager::  register_listener(recorder);
    Manager::unregister_listener(recorder.get());
 
    ASSERT_EQ(recorder->recorded_events.size(), 0);
}

TEST_F(RecorderListenerTest, recorded_events)
{
    EventInProfileSectionRegexMatcher matcher(std::regex("profile section"));
    const auto recorder = std::make_shared<event_in_profile_section_recorder_t>(std::move(matcher));
 
    const auto any_event_recorder = std::make_shared<RecorderListener<EventTypeList>>();
 
    Manager::register_listener(recorder);
    Manager::register_listener(any_event_recorder);
 
    MyWorkload<execution_space>{}.execute(exec);

    ASSERT_THAT(
        recorder->recorded_events,
        ::testing::Contains(ABeginParallelForEventWithName(::testing::StrEq("computation - level 0 - pfor")))
    );
 
    ASSERT_THAT(
        recorder->recorded_events,
        ContainsInOrder<typename decltype(recorder->recorded_events)::value_type>(
            APushRegionEventWithName(::testing::StrEq("computation - level 0")),
            ABeginParallelForEventWithName(::testing::StrEq("computation - level 0 - pfor")),
            AEndParallelForEvent(),
            ABeginFenceEventWithName(::testing::StrEq("computation - level 0 - fence after pfor")),
            AEndFenceEvent(),
            AProfileEventWithName(::testing::StrEq("buried marker")),
            APushRegionEventWithName(::testing::StrEq("computation - level 1")),
            ABeginParallelReduceEventWithName(::testing::StrEq("computation - level 1 - preduce on default exec")),
            AEndParallelReduceEvent(),
            ABeginFenceEventWithName(::testing::StrEq("Kokkos::parallel_reduce: fence due to result being value, not view")),
            AEndFenceEvent(),
            APopRegionEvent(),
            APopRegionEvent()
        )
    );
 
    ASSERT_GT(any_event_recorder->recorded_events.size(), recorder->recorded_events.size());
 
    const auto fence_event_outside_profile_section = ABeginFenceEventWithName(::testing::StrEq("other fence after stopping the profile section"));
 
    ASSERT_THAT(
        recorder->recorded_events,
        ::testing::Not(::testing::Contains(fence_event_outside_profile_section))
    );
 
    ASSERT_THAT(
        any_event_recorder->recorded_events,
        ::testing::Contains(fence_event_outside_profile_section)
    );
 
    const auto output = [&recorder] () -> std::string {
        std::ostringstream oss;
        recorder->report(oss);
        return oss.str();
    }();
 
    ASSERT_THAT(output, ::testing::HasSubstr("computation - level 0 - pfor"));
    ASSERT_THAT(output, ::testing::HasSubstr("computation - level 0 - fence after pfor"));
 
    Manager::unregister_listener(recorder.get());
    Manager::unregister_listener(any_event_recorder.get());
}

TEST_F(RecorderListenerTest, record)
{
    ASSERT_THAT(
        RecorderListener<EventTypeList>::record([&exec = this->exec]{ MyWorkload<execution_space>{}.execute(exec); }),
        ::testing::Contains(
            ABeginParallelForEvent(
                ::testing::Field(&BeginParallelForEvent::name,   ::testing::StrEq("computation - level 0 - pfor")),
                ::testing::Field(&BeginParallelForEvent::dev_id, ::testing::Eq(Kokkos::Tools::Experimental::device_id(this->exec)))
            )
        )
    );

    ASSERT_THAT(
        RecorderListener<EventTypeList>::record([&exec = this->exec]{ MyWorkload<execution_space>{}.execute(exec); }),
        ::testing::Contains(
            ABeginParallelForEvent(
                ::testing::FieldsAre(::testing::StrEq("computation - level 0 - pfor"), ::testing::Eq(Kokkos::Tools::Experimental::device_id(this->exec)), ::testing::_)
            )
        )
    );
}

using fence_finder_t = RecorderListener<EventRegexMatcher, BeginFenceEvent>;

TEST(FenceFinder, traits)
{
    static_assert(std::same_as<
        listener_event_type_list_t<fence_finder_t>,
        Kokkos::Impl::type_list<BeginFenceEvent>
    >);
 
    static_assert(Listener<fence_finder_t>);
}

TEST_F_WITH_CB_MGR(FenceFinderTest, recorded_events)
{
    const auto exec = Kokkos::Experimental::partition_space(execution_space{}, 1)[0];
 
    const auto fence_finder = std::make_shared<fence_finder_t>(EventRegexMatcher(std::regex("computation - level 0 - fence after pfor")));
 
    Manager::register_listener(fence_finder);
 
    MyWorkload<execution_space>{}.execute(exec);

    ASSERT_THAT(
        fence_finder->recorded_events,
        ::testing::Contains(
            ABeginFenceEvent(
                ::testing::Field(&BeginFenceEvent::name,   ::testing::StrEq("computation - level 0 - fence after pfor")),
                ::testing::Field(&BeginFenceEvent::dev_id, ::testing::Eq(Kokkos::Tools::Experimental::device_id(exec)))
            )
        )
    );
 
    Manager::unregister_listener(fence_finder.get());
}
 
} // namespace Kokkos::utils::tests::callbacks