Search code examples
ccuda2dcufft

2D cufft transform


My first question on stackoverflow.

I'm new to cuda.
I simply want to perform a 2D complex-to-complex FFT.
My input data is treated and no padding is needed.
I just cann't get the expected result. Here's my code:

#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <math.h>

#include <cuda_runtime.h>
#include <cufft.h>

typedef float2 Complex;

#define M2 512          // number of rows
#define N2 2048         // number of columns

int main()
{
    int     i, j;
    FILE    *fp;
    char    *fmt = "%16e";

    // Allocate memory for h_input and h_output on host
    // And make sure they are continuous

    Complex     **h_input, **h_output;

    h_input = (Complex **)malloc(M2*sizeof(Complex *));
    h_output= (Complex **)malloc(M2*sizeof(Complex *));

    h_input[0] = (Complex *)malloc(M2*N2*sizeof(Complex));
    h_output[0]= (Complex *)malloc(M2*N2*sizeof(Complex));

    for (i = 1; i < M2; i++){
        h_input[i] = h_input[i - 1] + N2;
        h_output[i]= h_output[i - 1] + N2;
    }

    // Load h_input from a file 
    if ((fp = fopen("INFLU_ORIGIN.DAT", "rt")) == NULL){
        printf("\nCannot open file strike any key exit!");
    }

    for (i = 0; i <= M2 - 1; i++){
        for (j = 0; j <= N2 - 1; j++){
            fscanf(fp, fmt, &h_input[i][j].x);
            h_input[i][j].y = 0.0;
        }
        fscanf(fp, "%\n");
    }

    fclose(fp);


    // allocate memory on device and copy h_input into d_array
    Complex     *d_array;
    size_t      host_orig_pitch = N2 * sizeof(Complex);
    size_t      pitch;

    cudaMallocPitch(&d_array, &pitch, N2 * sizeof(Complex), M2);

    cudaMemcpy2D(d_array, pitch, h_input[0], host_orig_pitch, 
        N2* sizeof(Complex), M2, cudaMemcpyHostToDevice);


    // Copy d_array back to host, and write it to a file
    // to check if they are as correctly copied into device

    cudaMemcpy2D(h_output[0], host_orig_pitch, d_array, pitch, 
        N2* sizeof(Complex), M2, cudaMemcpyDeviceToHost);

    if ((fp = fopen("INFLU_FFT_GET.DAT", "wt")) == NULL){
        printf("\nCannot create file strike any key exit!");
    }

    for (i = 0; i <= M2 - 1; i++){
        for (j = 0; j <= N2 - 1; j++){
            fprintf(fp, fmt, h_output[i][j].x);
        }
        fprintf(fp, "%\n");
    }

    fclose(fp);


    // create CUFFT plan
    cufftHandle plan;
    cufftResult filter_result;

    filter_result = cufftPlan2d(&plan, M2, N2, CUFFT_C2C);

    if (filter_result != CUFFT_SUCCESS){
        printf("\n failed to create plan \n");
    }
    else{
        printf("\n succeeded in creating plan \n");
    }

    // perform forward FFT on d_array
    printf("\nTransforming influence coefficient cufftExecC2C\n");
    filter_result = cufftExecC2C(plan, (cufftComplex *)d_array, 
        (cufftComplex *)d_array, CUFFT_FORWARD);

    if (filter_result != CUFFT_SUCCESS){
        printf("\ntransform failed\n");
    }
    else{
        printf("\ntranform succeed\n");
    }

    // Copy the fft result to host, write it to a file
    // to observe the result of FFT
    cudaMemcpy2D(h_output[0], host_orig_pitch, d_array, pitch, 
        N2* sizeof(Complex), M2, cudaMemcpyHostToDevice);

    if ((fp = fopen("INFLU_FFT_C.DAT", "wt")) == NULL){
        printf("\nCannot create file strike any key exit!");
    }

    for (i = 0; i <= M2-1; i++){
        for (j = 0; j <= N2-1; j++){
            fprintf(fp, fmt, h_output[i][j].x);
        }
        fprintf(fp, "%\n");
    }

    fclose(fp);

    cufftDestroy(plan);

    free(h_input[0]);
    free(h_input);
    free(h_output[0]);
    free(h_output);
    cudaFree(d_array);

    cudaDeviceReset();

}

The workflow of this code is as follows:

(1) Allocate h_input and h_output on host
(2) Load data into h_input from a file -- "INFLU.DAT"
(3) Allocate d_array on device, and copy h_input into it
(4) Copy d_array back to h_output, write to file -- "INFLU_GET.DAT"
---- to see if d_array has received the correct data
(5) Perform a forward complex-to-complex FFT on d_array
(6) Copy d_array back to h_output, write to file -- "INFLU_FFT.DAT"
---- to observe the result of FFT

By doing step (4) , I'm sure the copy of h_input into d_array is correct.

My problem is:
In step (6), I found that after the FFT, d_array and h_output are still the same as the input.

The input file is:
https://drive.google.com/file/d/0B88U83cfBwMmdGFtbGJ2MVlURDg/view?usp=sharing
the filename is INFLU.DAT, size is 16MB.

I have a result file for comparison (did in Fortran):
https://drive.google.com/file/d/0B88U83cfBwMmcDR1YzYyRzF4Mjg/view?usp=sharing
the filename is INFLU_FFT_F.DAT, size is also 16MB.

Any suggestion is welcome! Thanks!


Solution

  • The problem may come from the last cudaMemcpy() :

    cudaMemcpy2D(h_output[0], host_orig_pitch, d_array, pitch, 
        N2* sizeof(Complex), M2, cudaMemcpyHostToDevice);
    

    It will copy data from host to device, and my guess is that you are trying to copy from device to host, just like you did a few lines above :

    cudaMemcpy2D(h_output[0], host_orig_pitch, d_array, pitch, 
        N2* sizeof(Complex), M2, cudaMemcpyDeviceToHost);