From a4ec081e5772c3d3602c43bed8c694d37ab604b6 Mon Sep 17 00:00:00 2001 From: Marty Kraimer Date: Wed, 8 Apr 1992 14:45:44 +0000 Subject: [PATCH] Initial revision --- src/dev/devSmCompumotor1830.c | 83 ++++++++++++++++++++++++++++++++++ src/dev/devSmOms6Axis.c | 84 +++++++++++++++++++++++++++++++++++ 2 files changed, 167 insertions(+) create mode 100644 src/dev/devSmCompumotor1830.c create mode 100644 src/dev/devSmOms6Axis.c diff --git a/src/dev/devSmCompumotor1830.c b/src/dev/devSmCompumotor1830.c new file mode 100644 index 000000000..e16279358 --- /dev/null +++ b/src/dev/devSmCompumotor1830.c @@ -0,0 +1,83 @@ +/* devSmCompumotor1830.c */ +/* share/src/dev $Id$ */ + +/* devSmCompumotor1830.c - Device Support Routines */ +/* + * Original Author: Bob Dalesio + * Current Author: Marty Kraimer + * Date: 3/6/91 + * + * Experimental Physics and Industrial Control System (EPICS) + * + * Copyright 1991, the Regents of the University of California, + * and the University of Chicago Board of Governors. + * + * This software was produced under U.S. Government contracts: + * (W-7405-ENG-36) at the Los Alamos National Laboratory, + * and (W-31-109-ENG-38) at Argonne National Laboratory. + * + * Initial development by: + * The Controls and Automation Group (AT-8) + * Ground Test Accelerator + * Accelerator Technology Division + * Los Alamos National Laboratory + * + * Co-developed with + * The Controls and Computing Group + * Accelerator Systems Division + * Advanced Photon Source + * Argonne National Laboratory + * + * Modification Log: + * ----------------- + * .01 04-08092 mrk Moved from record support + */ + +#include +#include +#include +#include + +#include +#include +#include +#include +#include +#include +#include +#include +#include +#include + +/* Create the dset for */ +long sm_command(); + +struct { + long number; + DEVSUPFUN report; + DEVSUPFUN init; + DEVSUPFUN init_record; + DEVSUPFUN get_ioint_info; + DEVSUPFUN sm_command; +}devSmCompumotor1830={ + 6, + NULL, + NULL, + NULL, + NULL, + sm_command}; + +static long sm_command(psm,command,arg1,arg2) + struct steppermotorRecord *psm; + short command; + int arg1; + int arg2; +{ + int status; + short card,channel; + + card = psm->out.value.vmeio.card; + channel = psm->out.value.vmeio.signal; + compu_driver(card,channel,command,arg1,arg2); + return(0); +} diff --git a/src/dev/devSmOms6Axis.c b/src/dev/devSmOms6Axis.c new file mode 100644 index 000000000..ae415842b --- /dev/null +++ b/src/dev/devSmOms6Axis.c @@ -0,0 +1,84 @@ +/* devSmOms6Axis.c */ +/* share/src/dev $Id$ */ + +/* devSmOms6Axis.c - Device Support Routines */ +/* + * Original Author: Bob Dalesio + * Current Author: Marty Kraimer + * Date: 3/6/91 + * + * Experimental Physics and Industrial Control System (EPICS) + * + * Copyright 1991, the Regents of the University of California, + * and the University of Chicago Board of Governors. + * + * This software was produced under U.S. Government contracts: + * (W-7405-ENG-36) at the Los Alamos National Laboratory, + * and (W-31-109-ENG-38) at Argonne National Laboratory. + * + * Initial development by: + * The Controls and Automation Group (AT-8) + * Ground Test Accelerator + * Accelerator Technology Division + * Los Alamos National Laboratory + * + * Co-developed with + * The Controls and Computing Group + * Accelerator Systems Division + * Advanced Photon Source + * Argonne National Laboratory + * + * Modification Log: + * ----------------- + * .01 04-08092 mrk Moved from record support + */ + + +#include +#include +#include +#include + +#include +#include +#include +#include +#include +#include +#include +#include +#include +#include + +/* Create the dset for */ +long sm_command(); + +struct { + long number; + DEVSUPFUN report; + DEVSUPFUN init; + DEVSUPFUN init_record; + DEVSUPFUN get_ioint_info; + DEVSUPFUN sm_command; +}devSmOms6Axis={ + 6, + NULL, + NULL, + NULL, + NULL, + sm_command}; + +static long sm_command(psm,command,arg1,arg2) + struct steppermotorRecord *psm; + short command; + int arg1; + int arg2; +{ + int status; + short card,channel; + + card = psm->out.value.vmeio.card; + channel = psm->out.value.vmeio.signal; + oms_driver(card,channel,command,arg1,arg2); + return(0); +}