lstm_compute.cc 3.0 KB
Newer Older
D
dangqingqing 已提交
1 2 3 4 5 6 7 8 9 10 11 12 13 14
/* Copyright (c) 2016 PaddlePaddle Authors. All Rights Reserve.

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. */

15
#include "paddle/operators/math/lstm_compute.h"
D
dangqingqing 已提交
16 17 18 19 20 21 22 23 24
#include "paddle/operators/math/detail/lstm_cpu_kernel.h"
#include "paddle/operators/math/detail/lstm_kernel.h"

namespace paddle {
namespace operators {
namespace math {

template <class T>
struct LstmUnitFunctor<platform::CPUPlace, T> {
25 26
  static void compute(const platform::DeviceContext& context,
                      LstmMetaValue<T> value, int frame_size, int batch_size,
D
dangqingqing 已提交
27 28 29
                      std::string gate_act, std::string cell_act,
                      std::string cand_act) {
    for (int b = 0; b < batch_size; b++) {
30
      detail::cpu_lstm_forward(detail::forward::lstm<T>(), value, frame_size,
D
dangqingqing 已提交
31 32
                               ActiveType(cand_act), ActiveType(gate_act),
                               ActiveType(cell_act));
33 34 35 36
      value.gateValue += frame_size * 4;
      value.stateValue += frame_size;
      value.stateActiveValue += frame_size;
      value.outputValue += frame_size;
D
dangqingqing 已提交
37
      if (value.prevStateValue) {
38
        value.prevStateValue += frame_size;
D
dangqingqing 已提交
39 40 41 42 43 44 45
      }
    }
  }
};

template <class T>
struct LstmUnitGradFunctor<platform::CPUPlace, T> {
46 47 48
  static void compute(const platform::DeviceContext& context,
                      LstmMetaValue<T> value, LstmMetaGrad<T> grad,
                      int frame_size, int batch_size, std::string gate_act,
D
dangqingqing 已提交
49
                      std::string cell_act, std::string cand_act) {
50
    for (int b = 0; b < batch_size; b++) {
D
dangqingqing 已提交
51
      detail::cpu_lstm_backward(detail::backward::lstm<T>(), value, grad,
52
                                frame_size, ActiveType(cand_act),
D
dangqingqing 已提交
53 54
                                ActiveType(gate_act), ActiveType(cell_act));

55 56 57 58
      value.gateValue += frame_size * 4;
      value.stateValue += frame_size;
      value.stateActiveValue += frame_size;
      value.outputValue += frame_size;
D
dangqingqing 已提交
59
      if (value.prevStateValue) {
60
        value.prevStateValue += frame_size;
D
dangqingqing 已提交
61 62
      }

63 64 65 66
      grad.gateGrad += frame_size * 4;
      grad.stateGrad += frame_size;
      grad.stateActiveGrad += frame_size;
      grad.outputGrad += frame_size;
D
dangqingqing 已提交
67
      if (grad.prevStateGrad) {
68
        grad.prevStateGrad += frame_size;
D
dangqingqing 已提交
69 70
      }
    }
71 72 73 74
  }
};

template class LstmUnitFunctor<platform::CPUPlace, float>;
75 76
template class LstmUnitFunctor<platform::CPUPlace, double>;
template class LstmUnitGradFunctor<platform::CPUPlace, float>;
77
template class LstmUnitGradFunctor<platform::CPUPlace, double>;
D
dangqingqing 已提交
78 79 80 81

}  // namespace math
}  // namespace operators
}  // namespace paddle