Packages

evision

1.0.0-rc.0
1.0.1-rc.0 1.0.0 1.0.0-rc.0 0.2.17 0.2.17-rc2 0.2.17-rc1 0.2.16 0.2.16-pre.2 0.2.16-pre 0.2.15 0.2.14 0.2.13 0.2.12 0.2.11 0.2.9 0.2.8 0.2.7 0.2.6 0.2.5 0.2.4 0.2.3 0.2.2 0.2.2-rc2 0.2.1 0.2.0 0.1.39 0.1.38 0.1.37 0.1.36 0.1.35 0.1.34 0.1.33 0.1.32 retired 0.1.31 0.1.30 0.1.29 0.1.28 0.1.27 0.1.26 0.1.26-rc3 0.1.26-rc2 0.1.26-rc1 0.1.26-rc0 0.1.25 0.1.24 0.1.23 0.1.22 0.1.21 0.1.20 0.1.19 0.1.18 0.1.17 0.1.16 0.1.15 0.1.14 0.1.13 0.1.12 0.1.11 0.1.10 0.1.9 0.1.8 0.1.7

OpenCV-Erlang/Elixir binding.

HexDocs

Current section

Files

Jump to
Readme
62 Versions
5 Dependencies
Dependants
Files
Activity
evision c_src modules evision_backend to_binary.h
Raw

c_src/modules/evision_backend/to_binary.h 

#ifndef EVISION_BACKEND_TO_BINARY_H

#define EVISION_BACKEND_TO_BINARY_H



#include <erl_nif.h>

#include <algorithm>

#include <limits>

#include "../../ArgInfo.hpp"



// @evision c: mat_to_binary,evision_cv_mat_to_binary,1

// @evision nif: def mat_to_binary(_opts \\ []), do: :erlang.nif_error(:undefined)

static ERL_NIF_TERM evision_cv_mat_to_binary(ErlNifEnv *env, int argc, const ERL_NIF_TERM argv[]) {

    using namespace cv;

    ERL_NIF_TERM error_term = 0;

    std::map<std::string, ERL_NIF_TERM> erl_terms;

    int nif_opts_index = 0;

    evision::nif::parse_arg(env, nif_opts_index, argv, erl_terms);



    {

        evision_res<cv::Mat *> * res;

        if( enif_get_resource(env, evision_get_kw(env, erl_terms, "img"), evision_res<cv::Mat *>::type, (void **)&res) ) {

            if (res->val == nullptr || res->val->data == nullptr) {

                return evision::nif::error(env, "empty matrix");

            }



            ErlNifUInt64 limit = 0;

            ERL_NIF_TERM limit_term = evision_get_kw(env, erl_terms, "limit");

            if (!evision::nif::check_nil(env, limit_term) &&

                !enif_get_uint64(env, limit_term, &limit)) {

                return enif_make_badarg(env);

            }



            const size_t full_size = res->val->total() * res->val->elemSize();

            size_t bin_size = full_size;

            if (limit > 0) {

                const size_t elem_size = res->val->elemSize1();

                if (limit <= std::numeric_limits<size_t>::max() / elem_size) {

                    bin_size = std::min((size_t)limit * elem_size, full_size);

                }

            }



            if (res->val->isContinuous()) {

                return enif_make_resource_binary(env, res, res->val->data, bin_size);

            }



            Mat continuous = res->val->clone();

            ERL_NIF_TERM out_bin_term;

            unsigned char *out = enif_make_new_binary(env, bin_size, &out_bin_term);

            if (out == nullptr) {

                return evision::nif::error(env, "out of memory");

            }

            memcpy(out, continuous.data, bin_size);

            return out_bin_term;

        }

    }



    if (error_term != 0) return error_term;

    else return enif_make_badarg(env);

}



#endif // EVISION_BACKEND_TO_BINARY_H