source: icGREP/icgrep-devel/icgrep/kernels/cc_kernel.cpp @ 5823

Last change on this file since 5823 was 5823, checked in by cameron, 9 months ago

Direct CC compiler

File size: 5.0 KB
Line 
1/*
2 *  Copyright (c) 2016 International Characters.
3 *  This software is licensed to the public under the Open Software License 3.0.
4 */
5
6#include "cc_kernel.h"
7#include <re/re_cc.h>
8#include <cc/cc_compiler.h>
9#include <pablo/builder.hpp>
10#include <kernels/kernel_builder.h>
11
12using namespace cc;
13using namespace kernel;
14using namespace pablo;
15using namespace re;
16using namespace llvm;
17
18DirectCharacterClassKernelBuilder::DirectCharacterClassKernelBuilder(
19        const std::unique_ptr<kernel::KernelBuilder> & b, std::string ccSetName, std::vector<re::CC *> charClasses, unsigned codeUnitSize)
20: BlockOrientedKernel(std::move(ccSetName),
21              {Binding{b->getStreamSetTy(1, 8 * codeUnitSize), "codeUnitStream", FixedRate(), Principal()}},
22              {Binding{b->getStreamSetTy(charClasses.size(), 1), "ccStream"}},
23              {}, {}, {})
24, mCharClasses(charClasses)
25, mCodeUnitSize(codeUnitSize) {
26
27}
28
29void DirectCharacterClassKernelBuilder::generateDoBlockMethod(const std::unique_ptr<KernelBuilder> & iBuilder) {
30    unsigned packCount = 8 * mCodeUnitSize; 
31    unsigned codeUnitWidth = 8 * mCodeUnitSize;
32    unsigned topBit = 1 << codeUnitWidth;
33    unsigned maxCodeVal = (topBit - 1) | topBit;
34    Value * codeUnitPack[packCount];
35    for (unsigned i = 0; i < packCount; i++) {
36        codeUnitPack[i] = iBuilder->loadInputStreamPack("codeUnitStream", iBuilder->getInt32(0), iBuilder->getInt32(i));
37    }
38    for (unsigned j = 0; j < mCharClasses.size();  j++) {
39        Value * theCCstream = iBuilder->allZeroes();
40        for (const auto & interval : *mCharClasses[j]) {
41            Value * strmPack[packCount];
42            unsigned lo = re::lo_codepoint(interval);
43            unsigned hi = re::hi_codepoint(interval);
44            if (lo == hi) {
45                Value * cp = ConstantInt::get(iBuilder->getIntNTy(codeUnitWidth), lo);
46                Value * cp_splat = iBuilder->simd_fill(codeUnitWidth, cp);
47                for (unsigned k = 0; k < packCount; k++) {
48                    strmPack[k] = iBuilder->simd_eq(codeUnitWidth, codeUnitPack[k], cp_splat);
49                }
50            } else if (lo == 0) {
51                if (hi == maxCodeVal) {
52                    for (unsigned k = 0; k < packCount; k++) {
53                        strmPack[k] = iBuilder->allOnes();
54                    }
55                } else {
56                    Value * cp = ConstantInt::get(iBuilder->getIntNTy(codeUnitWidth), hi + 1);
57                    Value * cp_splat = iBuilder->simd_fill(codeUnitWidth, cp);
58                    for (unsigned k = 0; k < packCount; k++) {
59                        strmPack[k] = iBuilder->simd_ult(codeUnitWidth, codeUnitPack[k], cp_splat);
60                    }
61                }
62            } else if (hi == maxCodeVal) {
63                Value * cp = ConstantInt::get(iBuilder->getIntNTy(codeUnitWidth), lo - 1);
64                Value * cp_splat = iBuilder->simd_fill(codeUnitWidth, cp);
65                for (unsigned k = 0; k < packCount; k++) {
66                    strmPack[k] = iBuilder->simd_ugt(codeUnitWidth, codeUnitPack[k], cp_splat);
67                }
68            } else {
69                Value * v1 = ConstantInt::get(iBuilder->getIntNTy(codeUnitWidth), lo-1);
70                Value * lo_splat = iBuilder->simd_fill(codeUnitWidth, v1);
71                Value * v2 = ConstantInt::get(iBuilder->getIntNTy(codeUnitWidth), hi+1);
72                Value * hi_splat = iBuilder->simd_fill(codeUnitWidth, v2);
73                for (unsigned k = 0; k < packCount; k++) {
74                    Value * lo_test = iBuilder->simd_ugt(codeUnitWidth, codeUnitPack[k], lo_splat);
75                    Value * hi_test = iBuilder->simd_ult(codeUnitWidth, codeUnitPack[k], hi_splat);
76                    strmPack[k] = iBuilder->simd_and(lo_test, hi_test);
77                }
78            }
79            unsigned packFields = iBuilder->getBitBlockWidth()/packCount;
80            Value * pack = iBuilder->allZeroes();
81            for (unsigned k = 0; k < packCount; k++) {
82                pack = iBuilder->mvmd_insert(packFields, pack, iBuilder->CreateTrunc(iBuilder->hsimd_signmask(codeUnitWidth, strmPack[k]), iBuilder->getIntNTy(packFields)), k);
83            }
84
85            theCCstream = iBuilder->simd_or(theCCstream, pack);
86        }
87        iBuilder->storeOutputStreamBlock("ccStream", iBuilder->getInt32(j), theCCstream);
88    }
89}
90
91ParabixCharacterClassKernelBuilder::ParabixCharacterClassKernelBuilder (
92        const std::unique_ptr<kernel::KernelBuilder> & b, std::string ccSetName, const std::vector<CC *> & charClasses, unsigned codeUnitSize)
93: PabloKernel(b, ccSetName +"_kernel", {Binding{b->getStreamSetTy(codeUnitSize), "basis"}})
94, mCharClasses(charClasses) {
95    for (CC * cc : mCharClasses) {
96        addOutput(cc->canonicalName(re::CC_type::ByteClass), b->getStreamTy());
97    }
98}
99
100void ParabixCharacterClassKernelBuilder::generatePabloMethod() {
101    CC_Compiler ccc(this, getInput(0));
102    auto & builder = ccc.getBuilder();
103    for (unsigned i = 0; i < mCharClasses.size(); ++i) {
104        builder.createAssign(getOutput(i), ccc.compileCC("cc", mCharClasses[i], builder));
105    }
106}
Note: See TracBrowser for help on using the repository browser.