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

Last change on this file since 5902 was 5902, checked in by cameron, 13 months ago

Initial deployment of bytegrep kernel in icgrep

File size: 5.2 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 <kernels/kernel_builder.h>
10#include <llvm/Support/raw_ostream.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    if (codeUnitSize > 4) errs() << "codeUnitsize of " << codeUnitSize << " too large!\n";
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
91
92ParabixCharacterClassKernelBuilder::ParabixCharacterClassKernelBuilder (
93        const std::unique_ptr<kernel::KernelBuilder> & b, std::string ccSetName, const std::vector<CC *> & charClasses, unsigned codeUnitSize)
94: PabloKernel(b, ccSetName +"_kernel",
95// stream inputs
96{Binding{b->getStreamSetTy(codeUnitSize), "basis"}}
97// stream outputs
98, {Binding(b->getStreamSetTy((unsigned int)charClasses.size()), "outputStream")}
99)
100, mCharClasses(charClasses) {
101
102}
103
104void ParabixCharacterClassKernelBuilder::generatePabloMethod() {
105    PabloBuilder pb(getEntryScope());
106    cc::Parabix_CC_Compiler ccc(getEntryScope(), getInputStreamSet("basis"));
107    Var * outputVar = getOutputStreamVar("outputStream");
108    for (unsigned i = 0; i < mCharClasses.size(); ++i) {
109        pb.createAssign(pb.createExtract(outputVar, i), ccc.compileCC(mCharClasses[i]));
110    }
111}
Note: See TracBrowser for help on using the repository browser.