root/test/correctness/debug_to_file.cpp

DEFINITIONS

1. main

#include "Halide.h"
#include <stdio.h>

#include "test/common/halide_test_dirs.h"

using namespace Halide;

int main(int argc, char **argv) {

    std::string f_tmp = Internal::get_test_tmp_dir() + "f.tmp";
    std::string g_tmp = Internal::get_test_tmp_dir() + "g.tmp";
    std::string h_tmp = Internal::get_test_tmp_dir() + "h.tmp";

    Internal::ensure_no_file_exists(f_tmp);
    Internal::ensure_no_file_exists(g_tmp);
    Internal::ensure_no_file_exists(h_tmp);

    {
        Func f, g, h, j;
        Var x, y;
        f(x, y) = x + y;
        g(x, y) = cast<float>(f(x, y) + f(x+1, y));
        h(x, y) = f(x, y) + g(x, y);

        Target target = get_jit_target_from_environment();
        if (target.has_gpu_feature()) {
            Var xi, yi;
            f.compute_root().gpu_tile(x, y, xi, yi, 1, 1).debug_to_file(f_tmp);
            g.compute_root().gpu_tile(x, y, xi, yi, 1, 1).debug_to_file(g_tmp);
            h.compute_root().gpu_tile(x, y, xi, yi, 1, 1).debug_to_file(h_tmp);
        } else {
            f.compute_root().debug_to_file(f_tmp);
            g.compute_root().debug_to_file(g_tmp);
            h.compute_root().debug_to_file(h_tmp);
        }

        Buffer<float> im = h.realize(10, 10, target);
    }

    Internal::assert_file_exists(f_tmp);
    Internal::assert_file_exists(g_tmp);
    Internal::assert_file_exists(h_tmp);

    FILE *f = fopen(f_tmp.c_str(), "rb");
    FILE *g = fopen(g_tmp.c_str(), "rb");
    FILE *h = fopen(h_tmp.c_str(), "rb");
    assert(f && g && h);

    int header[5];
    assert(fread((void *)(&header[0]), 4, 5, f) == 5);
    assert(header[0] == 11);
    assert(header[1] == 10);
    assert(header[2] == 1);
    assert(header[3] == 1);
    assert(header[4] == 7);

    int32_t f_data[11*10];
    assert(fread((void *)(&f_data[0]), 4, 11*10, f) == 11*10);
    for (int y = 0; y < 10; y++) {
        for (int x = 0; x < 11; x++) {
            int32_t val = f_data[y*11+x];
            if (val != x+y) {
                printf("f_data[%d, %d] = %d instead of %d\n", x, y, val, x+y);
                return -1;
            }
        }
    }
    fclose(f);

    assert(fread((void *)(&header[0]), 4, 5, g) == 5);
    assert(header[0] == 10);
    assert(header[1] == 10);
    assert(header[2] == 1);
    assert(header[3] == 1);
    assert(header[4] == 0);

    float g_data[10*10];
    assert(fread((void *)(&g_data[0]), 4, 10*10, g) == 10*10);
    for (int y = 0; y < 10; y++) {
        for (int x = 0; x < 10; x++) {
            float val = g_data[y*10+x];
            float correct = (float)(f_data[y*11+x] + f_data[y*11+x+1]);
            if (val != correct) {
                printf("g_data[%d, %d] = %f instead of %f\n", x, y, val, correct);
                return -1;
            }
        }
    }
    fclose(g);

    assert(fread((void *)(&header[0]), 4, 5, h) == 5);
    assert(header[0] == 10);
    assert(header[1] == 10);
    assert(header[2] == 1);
    assert(header[3] == 1);
    assert(header[4] == 0);

    float h_data[10*10];
    assert(fread((void *)(&h_data[0]), 4, 10*10, h) == 10*10);
    for (int y = 0; y < 10; y++) {
        for (int x = 0; x < 10; x++) {
            float val = h_data[y*10+x];
            float correct = f_data[y*11+x] + g_data[y*10+x];
            if (val != correct) {
                printf("h_data[%d, %d] = %f instead of %f\n", x, y, val, correct);
                return -1;
            }
        }
    }
    fclose(h);

    printf("Success!\n");
    return 0;

}