Experimental Physics and
Industrial Control System

Abdalla Ahmad via Tech-talk <tech-talk at aps.anl.gov> · Sun, 2 Oct 2022 10:29:16 +0000

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

#include <callback.h>
#include <aiRecord.h>
#include <recSup.h>
#include <devSup.h>
#include <dbAccess.h>
#include <epicsExport.h>

static int increment_value;

static long init_record(struct aiRecord* record)
{
	if(record->inp.type != INST_IO) {
		printf("Invalid record type\n");
		return -1;
	}

	printf("INP: %s\n", record->inp.value.instio.string);
	char* token = strtok(record->inp.value.instio.string, " ");
	if(token == NULL) {
		printf("Invalid INP string");
		return -2;
	}

	token = strtok(NULL, " ");
	increment_value = atoi(token);
	record->dpvt = (void*) &increment_value;
	return 0;
}

static long read_ai(struct aiRecord* record)
{
	int* value = (int*) record->dpvt;
	if(record->pact) {
		record->val = record->val + *value;
		record->udf = false;
		printf("Completed processing. Value %f\n\n", record->val);
		return 2;
	}

	record->pact = true;
	dbScanLock((struct dbCommon*) record);
	(record->rset->process)(record);
	dbScanUnlock((struct dbCommon*) record);
	return 2;
}

struct {
	long number;
	DEVSUPFUN report;
	DEVSUPFUN init;
	DEVSUPFUN init_record;
	DEVSUPFUN get_ioinit_info;
	DEVSUPFUN io;
	DEVSUPFUN misc;
} devai = {
	6,
	NULL,
	NULL,
	init_record,
	NULL,
	read_ai,
	NULL
};

epicsExportAddress(dset, devai);

Experimental Physics and Industrial Control System

Experimental Physics and
Industrial Control System