林栄精器株式会社製Octal 100MHz visual scaler用EPICS Device Support(Japanese)

• 1.はじめに
• 2.VMEバスレジスタ
• 3.EPICS環境
• 4.コードの概要
• 5.EPICSデータベースサンプル
• 6.スタートアップファイルサンプル
• 7.おわりに

1.はじめに

• VMEファンクション
  
  • アドレスはA24あるいはA16をサポートします。本デバイスサポートは、A16用です。
  • AMコードはA24あるいはA16なら任意です。本デバイスサポートは0x2d(ショート特権)を使っています。
  • 本ボードで連続256ワード(512バイト)を占有します。

2.VMEバスレジスタ

• CHデータ
  どういう設計理念か全く理解出来ませんがデータは呪われたBCDなので、変換が必要です。
• Reset
  各ビットが各チャンネルのリセットに対応しています。1ビット目がCH0、2ビット目がCH1という順です。全ビットを１にすると同時にリセットします。

3.EPICS環境

4.コードの概要

• devRPV100.c

初期化ルーチン

if (sysBusToLocalAdrs(VME_AM_SUP_SHORT_IO,(char *)Base_IO,(char **)&p) == ERROR)
	{
		logMsg("VME RPV100: cannot find A16 address space\n");
		return(ERROR);
	}

BCDから10進への変換

static unsigned long bcdtodec(unsigned short a)
{
  unsigned long result;

  result =
    (a >>15)*8000 +
    ((a >>14)& 0x1) * 4000 +
    ((a >>13)& 0x1) * 2000 +
    ((a >>12)& 0x1) * 1000 +
    ((a >>11)& 0x1) * 800 +
    ((a >>10)& 0x1) * 400 +
    ((a >> 9)& 0x1) * 200 +
    ((a >> 8)& 0x1) * 100 +
    ((a >> 7)& 0x1) * 80 +
    ((a >> 6)& 0x1) * 40 +
    ((a >> 5)& 0x1) * 20 +
    ((a >> 4)& 0x1) * 10 +
    ((a >> 3)& 0x1) *  8 +
    ((a >> 2)& 0x1) *  4 +
    ((a >> 1)& 0x1) *  2 +
    ((a & 0x1));

  return result;
}

  switch(plongin->inp.value.vmeio.signal){
  case 0: /* ch 0*/
    plongin->val = bcdtodec(cards[cardN].card->ch0up)*10000+bcdtodec(cards[cardN].card->ch0dn);
    break;

デバイスタイプ定義

device(longin,VME_IO,devLiRPV100,"RPV100")
device(mbboDirect,VME_IO,devMbboRPV100,"RPV100")

devRPV100Config(1,0x8800)

の様に指定します。

5.EPICSデータベースサンプル

6.スタートアップファイルサンプル

dbLoadRecords("fbppcApp/Db/FB_RPV100.db","USER=FBH:TMP , CHAN=C0")

devRPV100Config(1,0x8800)

iocInit

7.おわりに