GOSTCoin CUDA miner project, compatible with most nvidia cards, containing only gostd algo
You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.

148 lines
3.8 KiB

/*
* Copyright 2008-2012 NVIDIA Corporation
*
* 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.
*/
/*! \file scan_by_key.h
* \brief Sequential implementation of scan_by_key functions.
*/
#pragma once
#include <thrust/detail/config.h>
#include <thrust/system/cpp/detail/execution_policy.h>
#include <thrust/iterator/iterator_traits.h>
#include <thrust/detail/function.h>
namespace thrust
{
namespace system
{
namespace detail
{
namespace internal
{
namespace scalar
{
template<typename InputIterator1,
typename InputIterator2,
typename OutputIterator,
typename BinaryPredicate,
typename BinaryFunction>
OutputIterator inclusive_scan_by_key(InputIterator1 first1,
InputIterator1 last1,
InputIterator2 first2,
OutputIterator result,
BinaryPredicate binary_pred,
BinaryFunction binary_op)
{
using namespace thrust::detail;
typedef typename thrust::iterator_traits<InputIterator1>::value_type KeyType;
typedef typename thrust::iterator_traits<OutputIterator>::value_type ValueType;
// wrap binary_op
thrust::detail::host_function<
BinaryFunction,
ValueType
> wrapped_binary_op(binary_op);
if(first1 != last1)
{
KeyType prev_key = *first1;
ValueType prev_value = *first2;
*result = prev_value;
for(++first1, ++first2, ++result;
first1 != last1;
++first1, ++first2, ++result)
{
KeyType key = *first1;
if (binary_pred(prev_key, key))
*result = prev_value = wrapped_binary_op(prev_value,*first2);
else
*result = prev_value = *first2;
prev_key = key;
}
}
return result;
}
template<typename InputIterator1,
typename InputIterator2,
typename OutputIterator,
typename T,
typename BinaryPredicate,
typename BinaryFunction>
OutputIterator exclusive_scan_by_key(InputIterator1 first1,
InputIterator1 last1,
InputIterator2 first2,
OutputIterator result,
T init,
BinaryPredicate binary_pred,
BinaryFunction binary_op)
{
using namespace thrust::detail;
typedef typename thrust::iterator_traits<InputIterator1>::value_type KeyType;
typedef typename thrust::iterator_traits<OutputIterator>::value_type ValueType;
if(first1 != last1)
{
KeyType temp_key = *first1;
ValueType temp_value = *first2;
ValueType next = init;
// first one is init
*result = next;
next = binary_op(next, temp_value);
for(++first1, ++first2, ++result;
first1 != last1;
++first1, ++first2, ++result)
{
KeyType key = *first1;
// use temp to permit in-place scans
temp_value = *first2;
if (!binary_pred(temp_key, key))
next = init; // reset sum
*result = next;
next = binary_op(next, temp_value);
temp_key = key;
}
}
return result;
}
} // end namespace scalar
} // end namespace internal
} // end namespace detail
} // end namespace system
} // end namespace thrust