afafa09547
ioc: check for mis-matched onStartSubscription()/onDisableSubscription() ioc: fix subscription lifetime ioc: catch exceptions in dbEvent callbacks ioc: avoid unnecessary virtual ioc: minor ioc: fix qsrv -S ioc: qsrvGroupSourceInit() catch+log ioc: runOnServer avoid std::function ioc: cleanup and simplifications. Avoid some redundant std::map lookups. Make Group partially const to prevent implicit ctor. ioc: avoid typedefs only used once ioc: overhaul Group::show(). shows triggers ioc: MappingType ioc: pvxsgl -> pvxgl ioc: separate group config singleton from server singleton ioc: remove unnecessary forward declarations ioc: restructure pvxsInitHook ioc: qsrv runtime disable by default ioc: compat w/ older Base ioc: link pvxsIoc w/ DB libs ioc: Channel proper detection of invalid PV ioc: no need to keep vector<dbCommon*> around ioc: fix initial group update for mappings w/o dbChannel ioc: redo testing split out group tests, only run with Base >= 7.0 ioc: minor ioc: loc_bad_alloc ioc: avoid symbol/DTYP clash with pva2pva ioc: test record alias in group json ioc: test put failure when SPC_NOMOD and DISP=1 ioc: test channel filters ioc: unnecessary capture ioc: avoid sharing Value between multiple subscriptions It is possible to create two subscriptions through the same channel. ioc: group subscription include queueSize ioc: eliminate unused atomicMonitor ioc: consolidate GroupSource::get() avoid some indirection ioc: pvRequest override of atomicPutGet ioc: fix group non-atomic put ioc: test asTrap hooks ioc: test putOrder also sets field order ioc: simplify GroupConfigProcessor::loadConfigFiles() Also ensure that groupMapMutex is held ioc: testqgroup cover JSON def. ioc: dbLoadGroup() use macros ioc: pvxsl() take integer argument ioc: display.form and info(Q:form ioc: "NO_ALARM" -> "" ioc: use dbServer at least for informational callbacks. ioc: consolidate createRequestAndSubscriptionHandlers() ioc: eliminate ChannelAndLock properties dbChannel doesn't need a separate DBManyLock ioc: test that putOrder also controls field order ioc: MappingType -> MappingInfo Handle info(Q:time:tag Add +type:"const" ioc: cleanup includes ioc: test dbNotifyCancel() ioc: inline checkForTrailingCommentsAtEnd()
47 lines
962 B
C
47 lines
962 B
C
|
|
#include <stdlib.h>
|
|
|
|
#include <epicsMath.h>
|
|
#include <dbAccess.h>
|
|
#include <dbScan.h>
|
|
#include <recGbl.h>
|
|
#include <alarm.h>
|
|
#include <registryFunction.h>
|
|
|
|
#include <aSubRecord.h>
|
|
|
|
#include <epicsExport.h>
|
|
|
|
/** Generate a test pattern
|
|
*
|
|
* A - width (ULONG)
|
|
* B - height (ULONG)
|
|
* VALA - pixel array (USHORT)
|
|
*/
|
|
static
|
|
long QSRV2_image_demo(aSubRecord* prec) {
|
|
epicsUInt32 H = *(epicsUInt32*)prec->a,
|
|
W = *(epicsUInt32*)prec->b;
|
|
epicsUInt16* I = (epicsUInt16*)prec->vala;
|
|
epicsUInt32 i, j;
|
|
|
|
if (W * H > prec->nova) {
|
|
(void)recGblSetSevr(prec, READ_ALARM, INVALID_ALARM);
|
|
return 0;
|
|
}
|
|
|
|
for (i = 0; i < W; i++) {
|
|
for (j = 0; j < H; j++) {
|
|
if (i % 50 == 49 || j % 50 == 49)
|
|
I[i * H + j] = 65535;
|
|
else
|
|
I[i * H + j] = ((epicsUInt32)j) * 65535 / H;
|
|
}
|
|
}
|
|
|
|
prec->neva = W * H;
|
|
return 0;
|
|
}
|
|
|
|
epicsRegisterFunction(QSRV2_image_demo);
|