lstm_compute.h 2.6 KB
Newer Older
D
dangqingqing 已提交
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16
/* 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. */

#pragma once

D
dangqingqing 已提交
17
#include "paddle/operators/math/detail/activation_functions.h"
18 19
#include "paddle/platform/device_context.h"
#include "paddle/platform/enforce.h"
D
dangqingqing 已提交
20 21 22 23 24 25 26 27 28 29 30 31 32

namespace paddle {
namespace operators {
namespace math {

typedef enum {
  HL_ACTIVATION_SIGMOID = 0,
  HL_ACTIVATION_RELU = 1,
  HL_ACTIVATION_TANH = 2,
  HL_ACTIVATION_LINEAR = 3,
  HL_ACTIVATION_END
} activation_mode_t;

33 34
template <class T>
struct LstmMetaValue {
35 36 37 38 39 40 41 42
  T *gate_value;
  T *prev_state_value;
  T *state_value;
  T *state_active_value;
  T *output_value;
  T *check_ig;
  T *check_fg;
  T *check_og;
D
dangqingqing 已提交
43 44
};

45 46
template <class T>
struct LstmMetaGrad {
47 48 49 50 51 52 53 54
  T *gate_grad;
  T *prev_state_grad;
  T *state_grad;
  T *state_active_grad;
  T *output_grad;
  T *check_ig_grad;
  T *check_fg_grad;
  T *check_og_grad;
D
dangqingqing 已提交
55 56
};

57
inline activation_mode_t ActiveType(const std::string &type) {
D
dangqingqing 已提交
58 59 60 61 62 63
  if (type == "sigmoid") {
    return HL_ACTIVATION_SIGMOID;
  } else if (type == "relu") {
    return HL_ACTIVATION_RELU;
  } else if (type == "tanh") {
    return HL_ACTIVATION_TANH;
D
dangqingqing 已提交
64
  } else if (type == "linear" || type == "identity" || type == "") {
D
dangqingqing 已提交
65 66 67 68 69 70
    return HL_ACTIVATION_LINEAR;
  } else {
    PADDLE_THROW("Do not support activation type.");
  }
}

Q
QI JUN 已提交
71
template <typename DeviceContext, typename T>
D
dangqingqing 已提交
72 73
class LstmUnitFunctor {
 public:
Q
QI JUN 已提交
74 75
  static void compute(const DeviceContext &context, LstmMetaValue<T> value,
                      int frame_size, int batch_size,
76 77 78
                      const detail::ActivationType &gate_act,
                      const detail::ActivationType &cell_act,
                      const detail::ActivationType &cand_act);
D
dangqingqing 已提交
79 80
};

Q
QI JUN 已提交
81
template <typename DeviceContext, typename T>
D
dangqingqing 已提交
82 83
class LstmUnitGradFunctor {
 public:
Q
QI JUN 已提交
84 85
  static void compute(const DeviceContext &context, LstmMetaValue<T> value,
                      LstmMetaGrad<T> grad, int frame_size, int batch_size,
86 87 88
                      const detail::ActivationType &gate_act,
                      const detail::ActivationType &cell_act,
                      const detail::ActivationType &cand_act);
D
dangqingqing 已提交
89 90 91 92 93
};

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