p9656_lib.c

Jungo公司确实为VxWorks开发了类似于WinDriver的驱动开发辅助套件DriverBuilder (for VxWorks)！

    {
        if (fIsRead) 
        {
            if (mode==P9656_MODE_BYTE) trans.cmdTrans = RP_SBYTE;
            else if (mode==P9656_MODE_WORD) trans.cmdTrans = RP_SWORD;
            else trans.cmdTrans = RP_SDWORD;
        }
        else 
        {
            if (mode==P9656_MODE_BYTE) trans.cmdTrans = WP_SBYTE;
            else if (mode==P9656_MODE_WORD) trans.cmdTrans = WP_SWORD;
            else trans.cmdTrans = WP_SDWORD;
        }
    }
    trans.dwPort = dwAddr;
    trans.fAutoinc = TRUE;
    trans.dwBytes = dwBytes;
    trans.dwOptions = 0;
    trans.Data.pBuffer = buf;
    WD_Transfer (hPlx->hWD, &trans);
}

void P9656_ReadBlock (P9656_HANDLE hPlx, DWORD dwOffset, PVOID buf, 
                    DWORD dwBytes, P9656_ADDR addrSpace, P9656_MODE mode)
{
    P9656_ReadWriteBlock (hPlx, dwOffset, buf, dwBytes, TRUE, addrSpace, mode);
}

void P9656_WriteBlock (P9656_HANDLE hPlx, DWORD dwOffset, PVOID buf, 
                     DWORD dwBytes, P9656_ADDR addrSpace, P9656_MODE mode)
{
    P9656_ReadWriteBlock (hPlx, dwOffset, buf, dwBytes, FALSE, addrSpace, mode);
}

void P9656_SetMode (P9656_HANDLE hPlx, DWORD dwLocalAddr)
{
    hPlx->addrDesc[hPlx->addrSpace].dwLocalBase = dwLocalAddr & ~hPlx->addrDesc[hPlx->addrSpace].dwMask;
    hPlx->addrDesc[hPlx->addrSpace].dwLocalBase |= BIT0;
    P9656_WriteReg (hPlx, P9656_LAS0BA, hPlx->addrDesc[hPlx->addrSpace].dwLocalBase);
}

BYTE P9656_ReadByteLocal (P9656_HANDLE hPlx, DWORD dwLocalAddr)
{
    DWORD dwOffset = hPlx->addrDesc[hPlx->addrSpace].dwMask & dwLocalAddr;
    P9656_SetMode (hPlx, dwLocalAddr);
    return P9656_ReadByte(hPlx, hPlx->addrSpace, dwOffset);
}

void P9656_WriteByteLocal (P9656_HANDLE hPlx, DWORD dwLocalAddr, BYTE data)
{
    DWORD dwOffset = hPlx->addrDesc[hPlx->addrSpace].dwMask & dwLocalAddr;
    P9656_SetMode (hPlx, dwLocalAddr);
    P9656_WriteByte(hPlx, hPlx->addrSpace, dwOffset, data);
}

WORD P9656_ReadWordLocal (P9656_HANDLE hPlx, DWORD dwLocalAddr)
{
    DWORD dwOffset = hPlx->addrDesc[hPlx->addrSpace].dwMask & dwLocalAddr;
    P9656_SetMode (hPlx, dwLocalAddr);
    return P9656_ReadWord(hPlx, hPlx->addrSpace, dwOffset);
}

void P9656_WriteWordLocal (P9656_HANDLE hPlx, DWORD dwLocalAddr, WORD data)
{
    DWORD dwOffset = hPlx->addrDesc[hPlx->addrSpace].dwMask & dwLocalAddr;
    P9656_SetMode (hPlx, dwLocalAddr);
    P9656_WriteWord(hPlx, hPlx->addrSpace, dwOffset, data);
}

DWORD P9656_ReadDWordLocal (P9656_HANDLE hPlx, DWORD dwLocalAddr)
{
    DWORD dwOffset = hPlx->addrDesc[hPlx->addrSpace].dwMask & dwLocalAddr;
    P9656_SetMode (hPlx, dwLocalAddr);
    return P9656_ReadDWord(hPlx, hPlx->addrSpace, dwOffset);
}

void P9656_WriteDWordLocal (P9656_HANDLE hPlx, DWORD dwLocalAddr, DWORD data)
{
    DWORD dwOffset = hPlx->addrDesc[hPlx->addrSpace].dwMask & dwLocalAddr;
    P9656_SetMode (hPlx, dwLocalAddr);
    P9656_WriteDWord(hPlx, hPlx->addrSpace, dwOffset, data);
}

void P9656_ReadWriteBlockLocal (P9656_HANDLE hPlx, DWORD dwLocalAddr, PVOID buf, 
                    DWORD dwBytes, BOOL fIsRead, P9656_MODE mode)
{
    DWORD dwOffset = hPlx->addrDesc[hPlx->addrSpace].dwMask & dwLocalAddr;
    P9656_SetMode (hPlx, dwLocalAddr);
    P9656_ReadWriteBlock(hPlx, dwOffset, buf, dwBytes, fIsRead, hPlx->addrSpace, mode);
}

void P9656_ReadBlockLocal (P9656_HANDLE hPlx, DWORD dwLocalAddr, PVOID buf, 
                    DWORD dwBytes, P9656_MODE mode)
{
    P9656_ReadWriteBlockLocal (hPlx, dwLocalAddr, buf, dwBytes, TRUE, mode);
}

void P9656_WriteBlockLocal (P9656_HANDLE hPlx, DWORD dwLocalAddr, PVOID buf, 
                     DWORD dwBytes, P9656_MODE mode)
{
    P9656_ReadWriteBlockLocal (hPlx, dwLocalAddr, buf, dwBytes, FALSE, mode);
}

BOOL P9656_IntIsEnabled (P9656_HANDLE hPlx)
{
    if (!hPlx->Int.hThread)
        return FALSE;
    return TRUE;
}

VOID P9656_IntHandler (PVOID pData)
{
    P9656_HANDLE hPlx = (P9656_HANDLE) pData;
    P9656_INT_RESULT intResult;
    intResult.dwCounter = hPlx->Int.Int.dwCounter;
    intResult.dwLost = hPlx->Int.Int.dwLost;
    intResult.fStopped = hPlx->Int.Int.fStopped;
    intResult.dwStatusReg = hPlx->Int.Trans[0].Data.Dword;
    hPlx->Int.funcIntHandler(hPlx, &intResult);  
}

BOOL P9656_IntEnable (P9656_HANDLE hPlx, P9656_INT_HANDLER funcIntHandler)
{
    DWORD dwIntStatus;
    DWORD dwAddr;

    // check if interrupt is already enabled
    if (hPlx->Int.hThread)
        return FALSE;

    dwIntStatus = P9656_ReadReg (hPlx, P9656_INTCSR);

    BZERO(hPlx->Int.Trans);
    // This is a sample of handling interrupts:
    // Two transfer commands are issued. First the value of the interrupt control/status
    // register is read. Then, a value of ZERO is written.
    // This will cancel interrupts after the first interrupt occurs.
    // When using interrupts, this section will have to change:
    // you must put transfer commands to CANCEL the source of the interrupt, otherwise, the 
    // PC will hang when an interrupt occurs!
    dwAddr = hPlx->addrDesc[P9656_ADDR_REG].dwAddr + P9656_INTCSR;
    hPlx->Int.Trans[0].cmdTrans = hPlx->addrDesc[P9656_ADDR_REG].fIsMemory ? RM_DWORD : RP_DWORD;
    hPlx->Int.Trans[0].dwPort = dwAddr;
    hPlx->Int.Trans[1].cmdTrans = hPlx->addrDesc[P9656_ADDR_REG].fIsMemory ? WM_DWORD : WP_DWORD;
    hPlx->Int.Trans[1].dwPort = dwAddr;
    hPlx->Int.Trans[1].Data.Dword = dwIntStatus & ~(BIT8|BIT10); // put here the data to write to the control register
    hPlx->Int.Int.dwCmds = 2; 
    hPlx->Int.Int.Cmd = hPlx->Int.Trans;
    hPlx->Int.Int.dwOptions |= INTERRUPT_CMD_COPY;
 
    // this calls WD_IntEnable() and creates an interrupt handler thread
    hPlx->Int.funcIntHandler = funcIntHandler;
    if (!InterruptThreadEnable(&hPlx->Int.hThread, hPlx->hWD, &hPlx->Int.Int, P9656_IntHandler, (PVOID) hPlx))
        return FALSE;

    // this physically enables interrupts
    P9656_WriteReg (hPlx, P9656_INTCSR, dwIntStatus | (BIT8|BIT10));

    return TRUE;
}

void P9656_IntDisable (P9656_HANDLE hPlx)
{
    DWORD dwIntStatus;

    if (!hPlx->Int.hThread)
        return;

    // this disables interrupts
    dwIntStatus = P9656_ReadReg (hPlx, P9656_INTCSR);
    P9656_WriteReg (hPlx, P9656_INTCSR, dwIntStatus & ~(BIT8|BIT10));

    // this calls WD_IntDisable()
    InterruptThreadDisable(hPlx->Int.hThread);
    hPlx->Int.hThread = NULL;
}

P9656_DMA_HANDLE P9656_DMAOpen (P9656_HANDLE hPlx, DWORD dwLocalAddr, PVOID buf, 
    DWORD dwBytes, BOOL fIsRead, P9656_MODE mode, P9656_DMA_CHANNEL dmaChannel)
{
    DWORD dwDMAMODE, dwDMADPR, dwDMALADR;
    DWORD dwChannelShift = (dmaChannel==P9656_DMA_CHANNEL_0) ? 0 : P9656_DMA_CHANNEL_SHIFT;
    BOOL fAutoinc = TRUE;
    P9656_DMA_HANDLE hDma;
    
    hDma = (P9656_DMA_HANDLE) malloc (sizeof(P9656_DMA_STRUCT));
    if (hDma==NULL)
    {
        sprintf( P9656_ErrorString, "Failed allocating memory for dma handle!\n");
        goto Exit;
    }
    BZERO (*hDma);
    hDma->dmaChannel = dmaChannel;
    hDma->dma.dwBytes = dwBytes;
    hDma->dma.pUserAddr = buf; 
    hDma->dma.dwOptions = 0; 
    WD_DMALock (hPlx->hWD, &hDma->dma);
    if (!hDma->dma.hDma) 
    {
        sprintf( P9656_ErrorString, "Failed locking the buffer!\n");
        goto Exit;
    }
    if (hDma->dma.dwPages==1)
    {
        //dma of one page ==> direct dma
        dwDMAMODE = 
            (fAutoinc ? 0 : BIT11) 
            | BIT6 
            | (mode==P9656_MODE_BYTE ? 0 : mode==P9656_MODE_WORD ? BIT0 : (BIT1 | BIT0));
        dwDMADPR = BIT0 | (fIsRead ? BIT3 : 0);
        dwDMALADR = dwLocalAddr;

        P9656_WriteReg (hPlx, P9656_DMAMODE + dwChannelShift, dwDMAMODE);
        P9656_WriteReg (hPlx, P9656_DMAPADR + dwChannelShift, (DWORD) hDma->dma.Page[0].pPhysicalAddr);
        P9656_WriteReg (hPlx, P9656_DMALADR + dwChannelShift, dwDMALADR);
        P9656_WriteReg (hPlx, P9656_DMASIZ + dwChannelShift, hDma->dma.Page[0].dwBytes);
        P9656_WriteReg (hPlx, P9656_DMADPR + dwChannelShift, dwDMADPR);
    }
    else
    {
        DWORD dwAlignShift, dwPageNumber, dwMemoryCopied;
        typedef struct {
            DWORD dwPADR;
            DWORD dwLADR;
            DWORD dwSIZ;
            DWORD dwDPR;
        } DMA_LIST;
        DMA_LIST *pList;

        //dma of more then one page ==> chain dma
        hDma->dmaList.dwBytes = hDma->dma.dwPages * sizeof(DMA_LIST) + 0x10; // includes extra 0x10 bytes for quadword alignment
        hDma->dmaList.pUserAddr = NULL;
        hDma->dmaList.dwOptions = DMA_KERNEL_BUFFER_ALLOC;
        WD_DMALock (hPlx->hWD, &hDma->dmaList);
        if (!hDma->dmaList.hDma)
        {
            sprintf (P9656_ErrorString, "Failed allocating the chain buffer!\n");
            goto Exit;
        }

        //setting chain of dma pages in the memory
        dwMemoryCopied = 0;
        dwAlignShift = 0x10 - (DWORD) hDma->dmaList.pUserAddr & 0xf;  
        // verification that bits 0-3 are zero (quadword aligned)
        pList = (DMA_LIST *) ((DWORD) hDma->dmaList.pUserAddr + dwAlignShift);
        for (dwPageNumber=0; dwPageNumber<hDma->dma.dwPages; dwPageNumber++)
        {
            pList[dwPageNumber].dwPADR = (DWORD) hDma->dma.Page[dwPageNumber].pPhysicalAddr;
            pList[dwPageNumber].dwLADR = dwLocalAddr + (fAutoinc ? dwMemoryCopied : 0);
            pList[dwPageNumber].dwSIZ = hDma->dma.Page[dwPageNumber].dwBytes;
            pList[dwPageNumber].dwDPR = 
                ((DWORD) hDma->dmaList.Page[0].pPhysicalAddr + dwAlignShift + sizeof(DMA_LIST)*(dwPageNumber+1))
                | BIT0 | (fIsRead ? BIT3 : 0);
            dwMemoryCopied += hDma->dma.Page[dwPageNumber].dwBytes;
        }
        pList[dwPageNumber - 1].dwDPR |= BIT1; // mark end of chain
    
        dwDMAMODE = (fAutoinc ? 0 : BIT11) 
                    | BIT6
                    | BIT9        // chain transfer
                     | (mode==P9656_MODE_BYTE ? 0 : mode==P9656_MODE_WORD ? BIT0 : (BIT1 | BIT0));
        dwDMADPR = ((DWORD)hDma->dmaList.Page[0].pPhysicalAddr + dwAlignShift) | BIT0; 
        // starting the dma
        P9656_WriteReg (hPlx, P9656_DMAMODE + dwChannelShift, dwDMAMODE);
        P9656_WriteReg (hPlx, P9656_DMADPR + dwChannelShift, dwDMADPR);
    }

    return hDma;

Exit:
    if (hDma!=NULL)
        P9656_DMAClose(hPlx,hDma);
    return NULL;
}

void P9656_DMAClose (P9656_HANDLE hPlx, P9656_DMA_HANDLE hDma)
{
    if (hDma->dma.hDma)
        WD_DMAUnlock(hPlx->hWD, &hDma->dma);
    if (hDma->dmaList.hDma)
        WD_DMAUnlock(hPlx->hWD, &hDma->dmaList);
    free (hDma);
}

BOOL P9656_DMAIsDone (P9656_HANDLE hPlx, P9656_DMA_HANDLE hDma)
{
    return (P9656_ReadByte(hPlx, P9656_ADDR_REG, P9656_DMACSR + 
        hDma->dmaChannel) & BIT4) == BIT4;
}

void P9656_DMAStart (P9656_HANDLE hPlx, P9656_DMA_HANDLE hDma, BOOL fBlocking)
{
    P9656_WriteByte (hPlx, P9656_ADDR_REG, P9656_DMACSR + hDma->dmaChannel, 
        BIT0 | BIT1);

    //Busy wait for plx to finish transfer
    if (fBlocking) 
        while (!P9656_DMAIsDone(hPlx, hDma))
            ;
}

BOOL P9656_DMAReadWriteBlock (P9656_HANDLE hPlx, DWORD dwLocalAddr, PVOID buf, 
    DWORD dwBytes, BOOL fIsRead, P9656_MODE mode, P9656_DMA_CHANNEL dmaChannel)
{
    P9656_DMA_HANDLE hDma;
    if (dwBytes==0) 
        return TRUE;

    hDma = P9656_DMAOpen(hPlx, dwLocalAddr, buf, dwBytes, fIsRead, mode, dmaChannel);
    if (!hDma) 
        return FALSE;

    P9656_DMAStart(hPlx, hDma, TRUE);
    P9656_DMAClose(hPlx, hDma);
    return TRUE;
}

BOOL P9656_EEPROMValid(P9656_HANDLE hPlx)
{
    return (P9656_ReadReg(hPlx, P9656_CNTRL) & BIT28)==BIT28;
}

BOOL P9656_EEPROMReadWord(P9656_HANDLE hPlx, DWORD dwOffset, PWORD pwData)
{
    DWORD dwData;
    DWORD dwAddr;

    if (dwOffset % 2)
    {
        sprintf (P9656_ErrorString, "The offset is not even\n");
        return FALSE;
    }
    dwAddr = dwOffset - (dwOffset % 4);

    if (!P9656_EEPROMReadDWord(hPlx, dwAddr, &dwData))
        return FALSE;

    *pwData = (WORD) (dwData >> ((dwOffset % 4)*8));

    return TRUE;
}

BOOL P9656_EEPROMWriteWord(P9656_HANDLE hPlx, DWORD dwOffset, WORD wData)
{
    DWORD dwData;
    DWORD dwAddr;

    dwAddr = dwOffset - (dwOffset % 4);

    if (!P9656_EEPROMReadDWord(hPlx, dwAddr, &dwData))
        return FALSE;

    switch (dwOffset % 4)
    {
    case 0:
        dwData = (dwData & 0xffff0000) | wData;
        break;
    case 2:
        dwData = (dwData & 0x0000ffff) | (wData << 16);
        break;
    default:
        sprintf (P9656_ErrorString, "The offset is not even\n");
        return FALSE;
    }

    return P9656_EEPROMWriteDWord(hPlx, dwAddr, dwData);
}

void P9656_Sleep(P9656_HANDLE hPlx, DWORD dwMicroSeconds)
{
    WD_SLEEP sleep;

    BZERO (sleep);
    sleep.dwMicroSeconds = dwMicroSeconds;
    WD_Sleep( hPlx->hWD, &sleep);
}

BYTE P9656_EEPROMEnable(P9656_HANDLE hPlx, WORD addr)
{
    BYTE old_val;

    old_val = P9656_ReadByte(hPlx, P9656_ADDR_REG, P9656_PROT_AREA);
    
    addr /= 4;
    addr &= 0x7f;

    P9656_WriteByte(hPlx, P9656_ADDR_REG, P9656_PROT_AREA, (BYTE)addr);
    P9656_Sleep(hPlx, 10000);

    return old_val * 4; //expand from dwords to bytes
}

void P9656_EEPROMDataReadWrite(P9656_HANDLE hPlx, BOOL fIsRead, PDWORD pdwData)
{
    WD_PCI_CONFIG_DUMP pciCnf;

    BZERO (pciCnf);
    pciCnf.pciSlot = hPlx->pciSlot;
    pciCnf.pBuffer = pdwData;
    pciCnf.dwOffset = P9656_VPD_DATA;
    pciCnf.dwBytes = 4;
    pciCnf.fIsRead = fIsRead;
    WD_PciConfigDump(hPlx->hWD,&pciCnf);
}

void P9656_EEPROMAddrReadWrite(P9656_HANDLE hPlx, BOOL fIsRead, PWORD pwAddr)
{
    WD_PCI_CONFIG_DUMP pciCnf;

    BZERO (pciCnf);
    pciCnf.pciSlot = hPlx->pciSlot;
    pciCnf.pBuffer = pwAddr;
    pciCnf.dwOffset = P9656_VPD_ADDR;
    pciCnf.dwBytes = 2;
    pciCnf.fIsRead = fIsRead;
    WD_PciConfigDump(hPlx->hWD,&pciCnf);
}

BOOL P9656_EEPROMReadDWord(P9656_HANDLE hPlx, DWORD dwOffset, PDWORD pdwData)
{
    WORD wVal;
    WORD wAddr;
    int i;

    if (dwOffset % 4)
    {
        sprintf (P9656_ErrorString, "The offset is not a multiple of 4\n");
        return FALSE;
    }
    wAddr = (((WORD)dwOffset) & (~BIT15)) ;
    
    for (i=0; i<10; i++)
    {
        P9656_EEPROMAddrReadWrite(hPlx, FALSE, &wAddr);
        P9656_Sleep(hPlx, 10000);
        P9656_EEPROMAddrReadWrite(hPlx, TRUE, &wVal);
        if (wVal & BIT15)
            break;
    }
    
    if (i==10)
    {
        sprintf (P9656_ErrorString, "Acknowledge to EEPROM read was not received\n");
        return FALSE;
    }

    P9656_EEPROMDataReadWrite(hPlx, TRUE, pdwData);

    return TRUE;
}

BOOL P9656_EEPROMWriteDWord(P9656_HANDLE hPlx, DWORD dwOffset, DWORD dwData)
{
    DWORD dwReadback;
    WORD wAddr;
    WORD wVal;
    int i;
    BOOL fRet;
    BOOL fReadOk = FALSE;
    BYTE bEnableOffset;

    if (dwOffset % 4)
    {
        sprintf (P9656_ErrorString, "The offset is not a multiple of 4\n");
        return FALSE;
    }
    wAddr = (WORD)dwOffset;
    bEnableOffset = P9656_EEPROMEnable(hPlx, wAddr);
    wAddr = wAddr | BIT15;

    for (i=0; i<10; i++)
    {
        P9656_EEPROMDataReadWrite(hPlx, FALSE, &dwData);
        P9656_EEPROMAddrReadWrite(hPlx, FALSE, &wAddr);
        P9656_Sleep(hPlx, 10000);
        P9656_EEPROMAddrReadWrite(hPlx, TRUE, &wVal);
        if ((wVal & BIT15) == 0)
            break;
    }

    fReadOk = P9656_EEPROMReadDWord(hPlx, dwOffset, &dwReadback);

    if (fReadOk && dwReadback==dwData)
        fRet = TRUE;
    else
    {
        fRet = FALSE;
        if (fReadOk)
            sprintf (P9656_ErrorString, "Write 0x%08x, Read 0x%08x\n",dwData, dwReadback);
        else
            sprintf (P9656_ErrorString, "Error reading EEPROM\n");
    }
    P9656_EEPROMEnable(hPlx, bEnableOffset); 
    return fRet;
}