1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
|
/*
* Copyright (c) Facebook, Inc. and its affiliates.
* All rights reserved.
* This source code is licensed under the BSD-style license found in the
* LICENSE file in the root directory of this source tree.
*/
#include <cpuinfo.h>
#include <cassert>
#include <iomanip>
#include <iostream>
#include "fbgemm/Fbgemm.h"
namespace fbgemm2 {
template <typename T, typename accT>
PackBMatrix<T, accT>::PackBMatrix(
matrix_op_t trans,
int32_t nRow,
int32_t nCol,
const T* smat,
int32_t ld,
inpType* pmat,
int32_t groups,
accT zero_pt)
: PackMatrix<PackBMatrix<T, accT>, T, accT>(nRow, nCol, pmat, zero_pt),
trans_(trans),
smat_(smat),
ld_(ld),
G_(groups) {
assert(G_ == 1 && "Groups != 1 not supported yet");
if (cpuinfo_has_x86_avx512f()) {
BaseType::brow_ = PackingTraits<T, accT, inst_set_t::avx512>::KCB;
BaseType::bcol_ = PackingTraits<T, accT, inst_set_t::avx512>::NCB;
row_interleave_ =
PackingTraits<T, accT, inst_set_t::avx512>::ROW_INTERLEAVE;
} else if (cpuinfo_has_x86_avx2()) {
BaseType::brow_ = PackingTraits<T, accT, inst_set_t::avx2>::KCB;
BaseType::bcol_ = PackingTraits<T, accT, inst_set_t::avx2>::NCB;
row_interleave_ = PackingTraits<T, accT, inst_set_t::avx2>::ROW_INTERLEAVE;
} else {
// Error
assert(0 && "unknown architecure");
}
block_type_t block{0, BaseType::numRows(), 0, BaseType::numCols()};
BaseType::packedBlock(block);
if (!pmat) {
BaseType::bufAllocatedHere_ = true;
BaseType::buf_ = (T*)aligned_alloc(
64,
BaseType::blockRows() * BaseType::brow_ * BaseType::blockCols() *
BaseType::bcol_ * sizeof(T));
}
pack(block);
}
template <typename T, typename accT>
void PackBMatrix<T, accT>::pack(const block_type_t& block) {
assert((BaseType::blockRowSize() % row_interleave_) == 0);
BaseType::packedBlock(block);
T* out = BaseType::getBuf();
bool tr = (trans_ == matrix_op_t::Transpose);
for (int i = block.row_start; i < block.row_start + block.row_size; ++i) {
for (int j = block.col_start; j < block.col_start + block.col_size; ++j) {
T val = tr ? smat_[i + ld_ * j] : smat_[i * ld_ + j];
out[addr(i, j) - addr(block.row_start, block.col_start)] =
tconv(val, out[addr(i, j)]);
}
}
// fill the remaining with zero.
// Please see the comment in PackAMatrix.cc on zero vs zero_pt fill.
for (int i = block.row_start + block.row_size;
i < (block.row_start + block.row_size + row_interleave_ - 1) /
row_interleave_ * row_interleave_;
++i) {
for (int j = block.col_start; j < block.col_start + block.col_size; j++) {
out[addr(i, j) - addr(block.row_start, block.col_start)] =
tconv(0, out[addr(i, j)]);
}
}
}
template <typename T, typename accT>
int32_t PackBMatrix<T, accT>::addr(int32_t r, int32_t c) const {
int32_t block_row_id = r / BaseType::blockRowSize();
int32_t brow_offset = (block_row_id * BaseType::blockCols()) *
(BaseType::blockRowSize() * BaseType::blockColSize());
int32_t block_col_id = c / BaseType::blockColSize();
int32_t bcol_offset =
block_col_id * BaseType::blockRowSize() * BaseType::blockColSize();
int32_t block_offset = brow_offset + bcol_offset;
int32_t inblock_offset = (r % BaseType::blockRowSize() / row_interleave_) *
BaseType::blockColSize() * row_interleave_ +
(c % BaseType::blockColSize()) * row_interleave_ + r % row_interleave_;
int32_t index = block_offset + inblock_offset;
return index;
}
template <typename T, typename accT>
void PackBMatrix<T, accT>::printPackedMatrix(std::string name) {
std::cout << name << ":"
<< "[" << BaseType::numPackedRows() << ", "
<< BaseType::numPackedCols() << "]" << std::endl;
std::cout << "block size:"
<< "[" << BaseType::blockRowSize() << ", "
<< BaseType::blockColSize() << "]" << std::endl;
T* out = BaseType::getBuf();
for (auto nr = 0; nr < BaseType::blockRows(); ++nr) {
auto rows = (nr == BaseType::blockRows() - 1) ? BaseType::lastBrow()
: BaseType::blockRowSize();
for (auto nc = 0; nc < BaseType::blockCols(); ++nc) {
std::cout << "block:" << nr << ", " << nc << std::endl;
auto cols = (nc == BaseType::blockCols() - 1) ? BaseType::lastBcol()
: BaseType::blockColSize();
for (auto r = 0; r < (rows + row_interleave_ - 1) / row_interleave_;
++r) {
for (auto c = 0; c < cols * row_interleave_; ++c) {
T val =
out[nr * BaseType::blockCols() * BaseType::blockRowSize() *
BaseType::blockColSize() +
nc * BaseType::blockRowSize() * BaseType::blockColSize() +
r * BaseType::blockColSize() * row_interleave_ + c];
if (std::is_integral<T>::value) {
// cast to int64 because cout doesn't print int8_t type directly
std::cout << std::setw(5) << static_cast<int64_t>(val) << " ";
} else {
std::cout << std::setw(5) << val << " ";
}
}
std::cout << std::endl;
}
std::cout << std::endl;
}
}
}
template class PackBMatrix<int8_t, int32_t>;
template class PackBMatrix<int8_t, int16_t>;
} // namespace fbgemm2
|
