From 08b757a0bf76efe8c76b453063a1bb19315bcaa6 Mon Sep 17 00:00:00 2001
From: Joseph Redmon <pjreddie@gmail.com>
Date: Wed, 14 Jan 2015 20:18:57 +0000
Subject: [PATCH] Stable, needs to be way faster
---
src/dropout_layer.c | 88 +++++++++++++++++++++++++++++++++++++++++---
1 files changed, 82 insertions(+), 6 deletions(-)
diff --git a/src/dropout_layer.c b/src/dropout_layer.c
index fcad7b9..edcb426 100644
--- a/src/dropout_layer.c
+++ b/src/dropout_layer.c
@@ -1,6 +1,7 @@
#include "dropout_layer.h"
-#include "stdlib.h"
-#include "stdio.h"
+#include "utils.h"
+#include <stdlib.h>
+#include <stdio.h>
dropout_layer *make_dropout_layer(int batch, int inputs, float probability)
{
@@ -9,6 +10,13 @@
layer->probability = probability;
layer->inputs = inputs;
layer->batch = batch;
+ layer->output = calloc(inputs*batch, sizeof(float));
+ layer->rand = calloc(inputs*batch, sizeof(float));
+ layer->scale = 1./(1.-probability);
+ #ifdef GPU
+ layer->output_cl = cl_make_array(layer->output, inputs*batch);
+ layer->rand_cl = cl_make_array(layer->rand, inputs*batch);
+ #endif
return layer;
}
@@ -16,11 +24,79 @@
{
int i;
for(i = 0; i < layer.batch * layer.inputs; ++i){
- if((float)rand()/RAND_MAX < layer.probability) input[i] = 0;
- else input[i] /= (1-layer.probability);
+ float r = rand_uniform();
+ layer.rand[i] = r;
+ if(r < layer.probability) layer.output[i] = 0;
+ else layer.output[i] = input[i]*layer.scale;
}
}
-void backward_dropout_layer(dropout_layer layer, float *input, float *delta)
+
+void backward_dropout_layer(dropout_layer layer, float *delta)
{
- // Don't do shit LULZ
+ int i;
+ if(!delta) return;
+ for(i = 0; i < layer.batch * layer.inputs; ++i){
+ float r = layer.rand[i];
+ if(r < layer.probability) delta[i] = 0;
+ else delta[i] *= layer.scale;
+ }
}
+
+#ifdef GPU
+cl_kernel get_dropout_kernel()
+{
+ static int init = 0;
+ static cl_kernel kernel;
+ if(!init){
+ kernel = get_kernel("src/dropout_layer.cl", "yoloswag420blazeit360noscope", 0);
+ init = 1;
+ }
+ return kernel;
+}
+
+void forward_dropout_layer_gpu(dropout_layer layer, cl_mem input)
+{
+ int j;
+ int size = layer.inputs*layer.batch;
+ for(j = 0; j < size; ++j) layer.rand[j] = rand_uniform();
+ cl_write_array(layer.rand_cl, layer.rand, layer.inputs*layer.batch);
+
+ cl_kernel kernel = get_dropout_kernel();
+ cl_command_queue queue = cl.queue;
+
+ cl_uint i = 0;
+ cl.error = clSetKernelArg(kernel, i++, sizeof(input), (void*) &input);
+ cl.error = clSetKernelArg(kernel, i++, sizeof(layer.rand_cl), (void*) &layer.rand_cl);
+ cl.error = clSetKernelArg(kernel, i++, sizeof(layer.probability), (void*) &layer.probability);
+ cl.error = clSetKernelArg(kernel, i++, sizeof(layer.scale), (void*) &layer.scale);
+ cl.error = clSetKernelArg(kernel, i++, sizeof(layer.output_cl), (void*) &layer.output_cl);
+ check_error(cl);
+
+ const size_t global_size[] = {size};
+
+ cl.error = clEnqueueNDRangeKernel(queue, kernel, 1, 0, global_size, 0, 0, 0, 0);
+ check_error(cl);
+}
+
+void backward_dropout_layer_gpu(dropout_layer layer, cl_mem delta)
+{
+ if(!delta) return;
+ int size = layer.inputs*layer.batch;
+
+ cl_kernel kernel = get_dropout_kernel();
+ cl_command_queue queue = cl.queue;
+
+ cl_uint i = 0;
+ cl.error = clSetKernelArg(kernel, i++, sizeof(delta), (void*) &delta);
+ cl.error = clSetKernelArg(kernel, i++, sizeof(layer.rand_cl), (void*) &layer.rand_cl);
+ cl.error = clSetKernelArg(kernel, i++, sizeof(layer.probability), (void*) &layer.probability);
+ cl.error = clSetKernelArg(kernel, i++, sizeof(layer.scale), (void*) &layer.scale);
+ cl.error = clSetKernelArg(kernel, i++, sizeof(delta), (void*) &delta);
+ check_error(cl);
+
+ const size_t global_size[] = {size};
+
+ cl.error = clEnqueueNDRangeKernel(queue, kernel, 1, 0, global_size, 0, 0, 0, 0);
+ check_error(cl);
+}
+#endif
--
Gitblit v1.10.0