Andrew Johnson
9ab6f89604
Mostly in record and device support, this commit puts the include in the right place and moves some other includes around to get the order right.
110 lines
2.4 KiB
C
110 lines
2.4 KiB
C
/*************************************************************************\
|
|
* Copyright (c) 2008 UChicago Argonne LLC, as Operator of Argonne
|
|
* National Laboratory.
|
|
* EPICS BASE is distributed subject to a Software License Agreement found
|
|
* in file LICENSE that is included with this distribution.
|
|
\*************************************************************************/
|
|
|
|
/* $Revision-Id$ */
|
|
|
|
#include <stdio.h>
|
|
#include <string.h>
|
|
|
|
#include "dbCommon.h"
|
|
#include "devSup.h"
|
|
#include "errlog.h"
|
|
#include "recGbl.h"
|
|
#include "recSup.h"
|
|
|
|
#include "stringoutRecord.h"
|
|
#include "epicsExport.h"
|
|
|
|
typedef int (*PRINTFFUNC)(const char *fmt, ...);
|
|
|
|
static int stderrPrintf(const char *fmt, ...);
|
|
static int logPrintf(const char *fmt, ...);
|
|
|
|
|
|
static struct outStream {
|
|
const char *name;
|
|
PRINTFFUNC print;
|
|
} outStreams[] = {
|
|
{"stdout", printf},
|
|
{"stderr", stderrPrintf},
|
|
{"errlog", logPrintf},
|
|
{NULL, NULL}
|
|
};
|
|
|
|
static int stderrPrintf(const char *fmt, ...) {
|
|
va_list pvar;
|
|
int retval;
|
|
|
|
va_start(pvar, fmt);
|
|
retval = vfprintf(stderr, fmt, pvar);
|
|
va_end (pvar);
|
|
|
|
return retval;
|
|
}
|
|
|
|
static int logPrintf(const char *fmt, ...) {
|
|
va_list pvar;
|
|
int retval;
|
|
|
|
va_start(pvar, fmt);
|
|
retval = errlogVprintf(fmt, pvar);
|
|
va_end (pvar);
|
|
|
|
return retval;
|
|
}
|
|
|
|
static long add(dbCommon *pcommon) {
|
|
stringoutRecord *prec = (stringoutRecord *) pcommon;
|
|
struct outStream *pstream;
|
|
|
|
if (prec->out.type != INST_IO)
|
|
return S_dev_badOutType;
|
|
|
|
for (pstream = outStreams; pstream->name; ++pstream) {
|
|
if (strcmp(prec->out.value.instio.string, pstream->name) == 0) {
|
|
prec->dpvt = pstream;
|
|
return 0;
|
|
}
|
|
}
|
|
prec->dpvt = NULL;
|
|
return -1;
|
|
}
|
|
|
|
static long del(dbCommon *pcommon) {
|
|
stringoutRecord *prec = (stringoutRecord *) pcommon;
|
|
|
|
prec->dpvt = NULL;
|
|
return 0;
|
|
}
|
|
|
|
static struct dsxt dsxtSoStdio = {
|
|
add, del
|
|
};
|
|
|
|
static long init(int pass)
|
|
{
|
|
if (pass == 0) devExtend(&dsxtSoStdio);
|
|
return 0;
|
|
}
|
|
|
|
static long write_string(stringoutRecord *prec)
|
|
{
|
|
struct outStream *pstream = (struct outStream *)prec->dpvt;
|
|
if (pstream)
|
|
pstream->print("%s\n", prec->val);
|
|
return 0;
|
|
}
|
|
|
|
/* Create the dset for devSoStdio */
|
|
static struct {
|
|
dset common;
|
|
DEVSUPFUN write;
|
|
} devSoStdio = {
|
|
{5, NULL, init, NULL, NULL}, write_string
|
|
};
|
|
epicsExportAddress(dset, devSoStdio);
|