diff options
Diffstat (limited to 'src/ufo-power-spectrum-task.c')
| -rw-r--r-- | src/ufo-power-spectrum-task.c | 174 |
1 files changed, 174 insertions, 0 deletions
diff --git a/src/ufo-power-spectrum-task.c b/src/ufo-power-spectrum-task.c new file mode 100644 index 0000000..6b86f1a --- /dev/null +++ b/src/ufo-power-spectrum-task.c @@ -0,0 +1,174 @@ +/* + * Copyright (C) 2011-2015 Karlsruhe Institute of Technology + * + * This file is part of Ufo. + * + * This library is free software: you can redistribute it and/or + * modify it under the terms of the GNU Lesser General Public + * License as published by the Free Software Foundation, either + * version 3 of the License, or (at your option) any later version. + * + * This library 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 + * Lesser General Public License for more details. + * + * You should have received a copy of the GNU Lesser General Public + * License along with this library. If not, see <http://www.gnu.org/licenses/>. + */ + +#ifdef __APPLE__ +#include <OpenCL/cl.h> +#else +#include <CL/cl.h> +#endif + +#include "ufo-power-spectrum-task.h" + + +struct _UfoPowerSpectrumTaskPrivate { + cl_kernel kernel; +}; + +static void ufo_task_interface_init (UfoTaskIface *iface); + +G_DEFINE_TYPE_WITH_CODE (UfoPowerSpectrumTask, ufo_power_spectrum_task, UFO_TYPE_TASK_NODE, + G_IMPLEMENT_INTERFACE (UFO_TYPE_TASK, + ufo_task_interface_init)) + +#define UFO_POWER_SPECTRUM_TASK_GET_PRIVATE(obj) (G_TYPE_INSTANCE_GET_PRIVATE((obj), UFO_TYPE_POWER_SPECTRUM_TASK, UfoPowerSpectrumTaskPrivate)) + +UfoNode * +ufo_power_spectrum_task_new (void) +{ + return UFO_NODE (g_object_new (UFO_TYPE_POWER_SPECTRUM_TASK, NULL)); +} + +static void +ufo_power_spectrum_task_setup (UfoTask *task, + UfoResources *resources, + GError **error) +{ + UfoPowerSpectrumTaskPrivate *priv; + + priv = UFO_POWER_SPECTRUM_TASK_GET_PRIVATE (task); + priv->kernel = ufo_resources_get_kernel (resources, "complex.cl", "c_abs_squared", NULL, error); + if (priv->kernel != NULL) { + UFO_RESOURCES_CHECK_SET_AND_RETURN (clRetainKernel (priv->kernel), error); + } +} + +static void +ufo_power_spectrum_task_get_requisition (UfoTask *task, + UfoBuffer **inputs, + UfoRequisition *requisition, + GError **error) +{ + UfoBufferLayout layout = ufo_buffer_get_layout (inputs[0]); + + if (layout != UFO_BUFFER_LAYOUT_COMPLEX_INTERLEAVED) { + g_warning ("Input is not complex"); + } + ufo_buffer_get_requisition (inputs[0], requisition); + requisition->dims[0] /= 2; +} + +static guint +ufo_power_spectrum_task_get_num_inputs (UfoTask *task) +{ + return 1; +} + +static guint +ufo_power_spectrum_task_get_num_dimensions (UfoTask *task, + guint input) +{ + return 2; +} + +static UfoTaskMode +ufo_power_spectrum_task_get_mode (UfoTask *task) +{ + return UFO_TASK_MODE_PROCESSOR | UFO_TASK_MODE_GPU; +} + +static gboolean +ufo_power_spectrum_task_equal_real (UfoNode *n1, + UfoNode *n2) +{ + g_return_val_if_fail (UFO_IS_POWER_SPECTRUM_TASK (n1) && UFO_IS_POWER_SPECTRUM_TASK (n2), FALSE); + + return UFO_POWER_SPECTRUM_TASK (n1)->priv->kernel == UFO_POWER_SPECTRUM_TASK (n2)->priv->kernel; +} + +static gboolean +ufo_power_spectrum_task_process (UfoTask *task, + UfoBuffer **inputs, + UfoBuffer *output, + UfoRequisition *requisition) +{ + UfoPowerSpectrumTaskPrivate *priv; + UfoGpuNode *node; + UfoProfiler *profiler; + cl_command_queue cmd_queue; + cl_mem in_mem, out_mem; + + priv = UFO_POWER_SPECTRUM_TASK_GET_PRIVATE (task); + node = UFO_GPU_NODE (ufo_task_node_get_proc_node (UFO_TASK_NODE(task))); + cmd_queue = ufo_gpu_node_get_cmd_queue (node); + in_mem = ufo_buffer_get_device_array (inputs[0], cmd_queue); + out_mem = ufo_buffer_get_device_array (output, cmd_queue); + + UFO_RESOURCES_CHECK_CLERR (clSetKernelArg (priv->kernel, 0, sizeof (cl_mem), &in_mem)); + UFO_RESOURCES_CHECK_CLERR (clSetKernelArg (priv->kernel, 1, sizeof (cl_mem), &out_mem)); + + profiler = ufo_task_node_get_profiler (UFO_TASK_NODE (task)); + ufo_profiler_call (profiler, cmd_queue, priv->kernel, 2, requisition->dims, NULL); + + return TRUE; +} + +static void +ufo_power_spectrum_task_finalize (GObject *object) +{ + UfoPowerSpectrumTaskPrivate *priv; + + priv = UFO_POWER_SPECTRUM_TASK_GET_PRIVATE (object); + + if (priv->kernel) { + UFO_RESOURCES_CHECK_CLERR (clReleaseKernel (priv->kernel)); + priv->kernel = NULL; + } + + G_OBJECT_CLASS (ufo_power_spectrum_task_parent_class)->finalize (object); +} + +static void +ufo_task_interface_init (UfoTaskIface *iface) +{ + iface->setup = ufo_power_spectrum_task_setup; + iface->get_num_inputs = ufo_power_spectrum_task_get_num_inputs; + iface->get_num_dimensions = ufo_power_spectrum_task_get_num_dimensions; + iface->get_mode = ufo_power_spectrum_task_get_mode; + iface->get_requisition = ufo_power_spectrum_task_get_requisition; + iface->process = ufo_power_spectrum_task_process; +} + +static void +ufo_power_spectrum_task_class_init (UfoPowerSpectrumTaskClass *klass) +{ + GObjectClass *oclass = G_OBJECT_CLASS (klass); + UfoNodeClass *node_class = UFO_NODE_CLASS (klass); + + oclass->finalize = ufo_power_spectrum_task_finalize; + node_class->equal = ufo_power_spectrum_task_equal_real; + + g_type_class_add_private (oclass, sizeof(UfoPowerSpectrumTaskPrivate)); +} + +static void +ufo_power_spectrum_task_init(UfoPowerSpectrumTask *self) +{ + self->priv = UFO_POWER_SPECTRUM_TASK_GET_PRIVATE(self); + self->priv->kernel = NULL; +} |