pcuda/dissolution_execution_kernel.cu at master · RGNC/pcuda · GitHub

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
/*
    Pcuda: Simulating P systems with active membranes on the GPU
    This simulator is published on:
    J.M. Cecilia, J.M. García, G.D. Guerrero, M.A. Martínez-del-Amor, I. Pérez-Hurtado,
    M.J. Pérez-Jiménez. Simulation of P systems with active membranes on CUDA,
    Briefings in Bioinformatics, 11, 3 (2010), 313-322

    Pcuda is a subproject of PMCGPU (Parallel simulators for Membrane
                                       Computing on the GPU)

    Copyright (c) 2009 Miguel Á. Martínez-del-Amor (RGNC, University of Seville)
 		       Ginés D. Guerrero (GACOP, University of Murcia)
		       Chema Cecilia (GACOP, University of Murcia)
		       Ignacio Pérez-Hurtado (RGNC, University of Seville)

    This file is part of Pcuda.

    Pcuda is free software: you can redistribute it and/or modify
    it under the terms of the GNU General Public License as published by
    the Free Software Foundation, either version 3 of the License, or
    (at your option) any later version.

    Pcuda is distributed in the hope that it will be useful,
    but WITHOUT ANY WARRANTY; without even the implied warranty of
    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
    GNU General Public License for more details.

    You should have received a copy of the GNU General Public License
    along with Pcuda.  If not, see <http://www.gnu.org/licenses/>. */


#if !defined(__DISSOLUTION_EXECUTION_KERNEL_CU__)
#define __DISSOLUTION_EXECUTION_KERNEL_CU__

#include "pcuda_types.h"
#include "p_system.h"

__global__ void dissolution_execution_kernel(const Rodruleset rules, Membraneset membranes,
                                             const uint numMemb, const ushort numLabs,
                                             const ushort numObjects, ushort * multisets,
                                             uint * skin, uint * rsiodd) {
    __shared__ short label;
    __shared__ short charge;

    const short objsPerThread = numObjects/blockDim.x;
    const uint lid = threadIdx.x * objsPerThread;
    const uint bid = blockIdx.y * gridDim.x + blockIdx.x;
    const uint tid = bid * numObjects + lid;

    if (bid >= numMemb)
	 return;

    label = membranes[bid].label;
    charge = membranes[bid].charge;

    if (label == EMPTY_MEMBRANE)
        return;

    uint rule = rsiodd[bid] & 0x1FFFFFFF;
    ushort type = rsiodd[bid]>>29;

    if (type == RULE_DISSOLUTION) {
        if (lid == 0) {
            multisets[rules[rule * numLabs * NUMBER_OF_CHARGES + label * NUMBER_OF_CHARGES + charge].rsodd[0] + bid * numObjects]++;
            membranes[bid].label = EMPTY_MEMBRANE;
        }

        __syncthreads();

        #pragma unroll
        for (uint obj=0; obj < objsPerThread; obj++) {
            //skin[lid + obj] +=  multisets[tid + obj];
            atomicAdd((uint *)&skin[lid + obj], multisets[tid+obj]);
	}
    }
}

#endif	/* __DISSOLUTION_EXECUTION_KERNEL_CU__ */