path: root/erts/emulator/test/driver_SUITE_data/outputv_drv.c

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

static ErlDrvPort erlang_port;
static ErlDrvData outputv_start(ErlDrvPort, char*);
static void outputv_stop(ErlDrvData), outputv_read(ErlDrvData, char*, int), outputv(ErlDrvData, ErlIOVec*);

static ErlDrvEntry outputv_driver_entry =
{
    NULL,
    outputv_start,
    outputv_stop,
    outputv_read,
    NULL,
    NULL,
    "outputv_drv",
    NULL,
    NULL,
    NULL,
    NULL,
    outputv,
    NULL
};

DRIVER_INIT(outputv_drv)
{
    erlang_port = (ErlDrvPort)-1;
    return &outputv_driver_entry;
}

static ErlDrvData outputv_start(ErlDrvPort port, char *buf)
{
    if (erlang_port != (ErlDrvPort)-1) {
	return ERL_DRV_ERROR_GENERAL;
    }
    
    erlang_port = port;
    return (ErlDrvData)port;
}

static void outputv_read(ErlDrvData port, char *buf, int count)
{
    erlang_port = (ErlDrvPort)-1;
}

static void outputv_stop(ErlDrvData port)
{
    erlang_port = (ErlDrvPort)-1;
}

/* Erts outputv -> drv, echo it back */
static void outputv(ErlDrvData port, ErlIOVec* ev)
{
    driver_outputv(erlang_port, NULL, 0, ev, 0);
}