Tpetra parallel linear algebra
Version of the Day
Toggle main menu visibility
Loading...
Searching...
No Matches
core
src
Tpetra_Details_DeepCopyCounter.cpp
1
/*
2
// @HEADER
3
// ***********************************************************************
4
//
5
// Tpetra: Templated Linear Algebra Services Package
6
// Copyright (2008) Sandia Corporation
7
//
8
// Under the terms of Contract DE-AC04-94AL85000 with Sandia Corporation,
9
// the U.S. Government retains certain rights in this software.
10
//
11
// Redistribution and use in source and binary forms, with or without
12
// modification, are permitted provided that the following conditions are
13
// met:
14
//
15
// 1. Redistributions of source code must retain the above copyright
16
// notice, this list of conditions and the following disclaimer.
17
//
18
// 2. Redistributions in binary form must reproduce the above copyright
19
// notice, this list of conditions and the following disclaimer in the
20
// documentation and/or other materials provided with the distribution.
21
//
22
// 3. Neither the name of the Corporation nor the names of the
23
// contributors may be used to endorse or promote products derived from
24
// this software without specific prior written permission.
25
//
26
// THIS SOFTWARE IS PROVIDED BY SANDIA CORPORATION "AS IS" AND ANY
27
// EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
28
// IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
29
// PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL SANDIA CORPORATION OR THE
30
// CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL,
31
// EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO,
32
// PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR
33
// PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF
34
// LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING
35
// NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
36
// SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
37
//
38
// ************************************************************************
39
// @HEADER
40
*/
41
#include "
Tpetra_Details_DeepCopyCounter.hpp
"
42
#include "TpetraCore_config.h"
43
#include "Kokkos_Core.hpp"
44
#include <cstring>
45
46
namespace
Tpetra
{
47
namespace
Details
{
48
49
namespace
DeepCopyCounterDetails {
50
void
kokkosp_begin_deep_copy(Kokkos::Tools::SpaceHandle dst_handle,
const
char
* dst_name,
const
void
* dst_ptr,
51
Kokkos::Tools::SpaceHandle src_handle,
const
char
* src_name,
const
void
* src_ptr,
52
uint64_t size) {
53
54
if
(DeepCopyCounter::count_active) {
55
if
(strcmp(dst_handle.name,src_handle.name)) {
56
DeepCopyCounter::count++;
57
}
58
}
59
}
60
61
62
}
// end DeepCopyCounterDetails
63
64
65
// Initialize
66
bool
DeepCopyCounter::count_active=
false
;
67
size_t
DeepCopyCounter::count=0;
68
69
70
void
DeepCopyCounter::start
() {
71
count_active=
true
;
72
Kokkos::Tools::Experimental::set_begin_deep_copy_callback(DeepCopyCounterDetails::kokkosp_begin_deep_copy);
73
}
74
75
void
DeepCopyCounter::reset
() {
76
count=0;
77
}
78
79
size_t
DeepCopyCounter::stop
() {
80
count_active=
false
;
81
return
count;
82
}
83
84
size_t
DeepCopyCounter::get_count
() {
85
return
count;
86
}
87
88
89
}
// namespace Details
90
}
// namespace Tpetra
91
Tpetra_Details_DeepCopyCounter.hpp
Declaration of Tpetra::Details::DeepCopyCounter, a class that uses Kokkos' profiling library to count...
Tpetra::Details::DeepCopyCounter::stop
static size_t stop()
Stop the deep_copy counter.
Definition
Tpetra_Details_DeepCopyCounter.cpp:79
Tpetra::Details::DeepCopyCounter::start
static void start()
Start the deep_copy counter.
Definition
Tpetra_Details_DeepCopyCounter.cpp:70
Tpetra::Details::DeepCopyCounter::reset
static void reset()
Reset the deep_copy counter.
Definition
Tpetra_Details_DeepCopyCounter.cpp:75
Tpetra::Details::DeepCopyCounter::get_count
static size_t get_count()
Query the deep_copy counter.
Definition
Tpetra_Details_DeepCopyCounter.cpp:84
Tpetra::Details
Nonmember function that computes a residual Computes R = B - A * X.
Definition
Tpetra_KokkosRefactor_Details_MultiVectorLocalDeepCopy.hpp:51
Tpetra
Namespace Tpetra contains the class and methods constituting the Tpetra library.
Generated by
1.17.0