Page Menu
Home
c4science
Search
Configure Global Search
Log In
Files
F98388782
TestGlobal2LocalIds.hpp
No One
Temporary
Actions
Download File
Edit File
Delete File
View Transforms
Subscribe
Mute Notifications
Award Token
Subscribers
None
File Metadata
Details
File Info
Storage
Attached
Created
Sun, Jan 12, 18:40
Size
6 KB
Mime Type
text/x-c++
Expires
Tue, Jan 14, 18:40 (2 d)
Engine
blob
Format
Raw Data
Handle
23548965
Attached To
rLAMMPS lammps
TestGlobal2LocalIds.hpp
View Options
//@HEADER
// ************************************************************************
//
// Kokkos v. 2.0
// Copyright (2014) Sandia Corporation
//
// Under the terms of Contract DE-AC04-94AL85000 with Sandia Corporation,
// the U.S. Government retains certain rights in this software.
//
// Redistribution and use in source and binary forms, with or without
// modification, are permitted provided that the following conditions are
// met:
//
// 1. Redistributions of source code must retain the above copyright
// notice, this list of conditions and the following disclaimer.
//
// 2. Redistributions in binary form must reproduce the above copyright
// notice, this list of conditions and the following disclaimer in the
// documentation and/or other materials provided with the distribution.
//
// 3. Neither the name of the Corporation nor the names of the
// contributors may be used to endorse or promote products derived from
// this software without specific prior written permission.
//
// THIS SOFTWARE IS PROVIDED BY SANDIA CORPORATION "AS IS" AND ANY
// EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
// IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
// PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL SANDIA CORPORATION OR THE
// CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL,
// EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO,
// PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR
// PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF
// LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING
// NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
// SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
//
// Questions? Contact H. Carter Edwards (hcedwar@sandia.gov)
//
// ************************************************************************
//@HEADER
#ifndef KOKKOS_TEST_GLOBAL_TO_LOCAL_IDS_HPP
#define KOKKOS_TEST_GLOBAL_TO_LOCAL_IDS_HPP
#include <Kokkos_Core.hpp>
#include <Kokkos_UnorderedMap.hpp>
#include <vector>
#include <algorithm>
#include <impl/Kokkos_Timer.hpp>
// This test will simulate global ids
namespace
Performance
{
static
const
unsigned
begin_id_size
=
256u
;
static
const
unsigned
end_id_size
=
1u
<<
22
;
static
const
unsigned
id_step
=
2u
;
union
helper
{
uint32_t
word
;
uint8_t
byte
[
4
];
};
template
<
typename
Device
>
struct
generate_ids
{
typedef
Device
execution_space
;
typedef
typename
execution_space
::
size_type
size_type
;
typedef
Kokkos
::
View
<
uint32_t
*
,
execution_space
>
local_id_view
;
local_id_view
local_2_global
;
generate_ids
(
local_id_view
&
ids
)
:
local_2_global
(
ids
)
{
Kokkos
::
parallel_for
(
local_2_global
.
dimension_0
(),
*
this
);
}
KOKKOS_INLINE_FUNCTION
void
operator
()(
size_type
i
)
const
{
helper
x
=
{
static_cast
<
uint32_t
>
(
i
)};
// shuffle the bytes of i to create a unique, semi-random global_id
x
.
word
=
~
x
.
word
;
uint8_t
tmp
=
x
.
byte
[
3
];
x
.
byte
[
3
]
=
x
.
byte
[
1
];
x
.
byte
[
1
]
=
tmp
;
tmp
=
x
.
byte
[
2
];
x
.
byte
[
2
]
=
x
.
byte
[
0
];
x
.
byte
[
0
]
=
tmp
;
local_2_global
[
i
]
=
x
.
word
;
}
};
template
<
typename
Device
>
struct
fill_map
{
typedef
Device
execution_space
;
typedef
typename
execution_space
::
size_type
size_type
;
typedef
Kokkos
::
View
<
const
uint32_t
*
,
execution_space
,
Kokkos
::
MemoryRandomAccess
>
local_id_view
;
typedef
Kokkos
::
UnorderedMap
<
uint32_t
,
size_type
,
execution_space
>
global_id_view
;
global_id_view
global_2_local
;
local_id_view
local_2_global
;
fill_map
(
global_id_view
gIds
,
local_id_view
lIds
)
:
global_2_local
(
gIds
)
,
local_2_global
(
lIds
)
{
Kokkos
::
parallel_for
(
local_2_global
.
dimension_0
(),
*
this
);
}
KOKKOS_INLINE_FUNCTION
void
operator
()(
size_type
i
)
const
{
global_2_local
.
insert
(
local_2_global
[
i
],
i
);
}
};
template
<
typename
Device
>
struct
find_test
{
typedef
Device
execution_space
;
typedef
typename
execution_space
::
size_type
size_type
;
typedef
Kokkos
::
View
<
const
uint32_t
*
,
execution_space
,
Kokkos
::
MemoryRandomAccess
>
local_id_view
;
typedef
Kokkos
::
UnorderedMap
<
const
uint32_t
,
const
size_type
,
execution_space
>
global_id_view
;
global_id_view
global_2_local
;
local_id_view
local_2_global
;
typedef
size_t
value_type
;
find_test
(
global_id_view
gIds
,
local_id_view
lIds
,
value_type
&
num_errors
)
:
global_2_local
(
gIds
)
,
local_2_global
(
lIds
)
{
Kokkos
::
parallel_reduce
(
local_2_global
.
dimension_0
(),
*
this
,
num_errors
);
}
KOKKOS_INLINE_FUNCTION
void
init
(
value_type
&
v
)
const
{
v
=
0
;
}
KOKKOS_INLINE_FUNCTION
void
join
(
volatile
value_type
&
dst
,
volatile
value_type
const
&
src
)
const
{
dst
+=
src
;
}
KOKKOS_INLINE_FUNCTION
void
operator
()(
size_type
i
,
value_type
&
num_errors
)
const
{
uint32_t
index
=
global_2_local
.
find
(
local_2_global
[
i
]
);
if
(
global_2_local
.
value_at
(
index
)
!=
i
)
++
num_errors
;
}
};
template
<
typename
Device
>
void
test_global_to_local_ids
(
unsigned
num_ids
)
{
typedef
Device
execution_space
;
typedef
typename
execution_space
::
size_type
size_type
;
typedef
Kokkos
::
View
<
uint32_t
*
,
execution_space
>
local_id_view
;
typedef
Kokkos
::
UnorderedMap
<
uint32_t
,
size_type
,
execution_space
>
global_id_view
;
//size
std
::
cout
<<
num_ids
<<
", "
;
double
elasped_time
=
0
;
Kokkos
::
Impl
::
Timer
timer
;
local_id_view
local_2_global
(
"local_ids"
,
num_ids
);
global_id_view
global_2_local
((
3u
*
num_ids
)
/
2u
);
//create
elasped_time
=
timer
.
seconds
();
std
::
cout
<<
elasped_time
<<
", "
;
timer
.
reset
();
// generate unique ids
{
generate_ids
<
Device
>
gen
(
local_2_global
);
}
Device
::
fence
();
// generate
elasped_time
=
timer
.
seconds
();
std
::
cout
<<
elasped_time
<<
", "
;
timer
.
reset
();
{
fill_map
<
Device
>
fill
(
global_2_local
,
local_2_global
);
}
Device
::
fence
();
// fill
elasped_time
=
timer
.
seconds
();
std
::
cout
<<
elasped_time
<<
", "
;
timer
.
reset
();
size_t
num_errors
=
0
;
for
(
int
i
=
0
;
i
<
100
;
++
i
)
{
find_test
<
Device
>
find
(
global_2_local
,
local_2_global
,
num_errors
);
}
Device
::
fence
();
// find
elasped_time
=
timer
.
seconds
();
std
::
cout
<<
elasped_time
<<
std
::
endl
;
ASSERT_EQ
(
num_errors
,
0u
);
}
}
// namespace Performance
#endif
//KOKKOS_TEST_GLOBAL_TO_LOCAL_IDS_HPP
Event Timeline
Log In to Comment