/*-
|
* Copyright (c) 2012-2013 Jan Breuer,
|
*
|
* All Rights Reserved
|
*
|
* Redistribution and use in source and binary forms, with or without
|
* modification, are permitted provided that the following conditions are
|
* met:
|
* 1. Redistributions of source code must retain the above copyright notice,
|
* this list of conditions and the following disclaimer.
|
* 2. Redistributions in binary form must reproduce the above copyright
|
* notice, this list of conditions and the following disclaimer in the
|
* documentation and/or other materials provided with the distribution.
|
*
|
* THIS SOFTWARE IS PROVIDED BY THE AUTHORS ``AS IS'' AND ANY EXPRESS OR
|
* IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED
|
* WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE
|
* DISCLAIMED. IN NO EVENT SHALL THE AUTHORS OR CONTRIBUTORS BE LIABLE
|
* FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
|
* CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
|
* SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR
|
* BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY,
|
* WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE
|
* OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN
|
* IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
|
*/
|
|
/**
|
* @file scpi_error.c
|
* @date Thu Nov 15 10:58:45 UTC 2012
|
*
|
* @brief Error handling and storing routines
|
*
|
*
|
*/
|
|
#include <stdint.h>
|
|
#include "scpi/parser.h"
|
#include "scpi/ieee488.h"
|
#include "scpi/error.h"
|
#include "scpi/fifo.h"
|
|
// basic FIFO
|
static fifo_t local_error_queue;
|
|
|
|
void SCPI_ErrorInit(scpi_t * context) {
|
//// FreeRTOS
|
// context->error_queue = (scpi_error_queue_t)xQueueCreate(100, sizeof(int16_t));
|
|
// basic FIFO
|
context->error_queue = (scpi_error_queue_t)&local_error_queue;
|
fifo_init((fifo_t *)context->error_queue);
|
}
|
|
/**
|
* Clear error queue
|
* @param context - scpi context
|
*/
|
void SCPI_ErrorClear(scpi_t * context) {
|
//// FreeRTOS
|
//xQueueReset((xQueueHandle)context->error_queue);
|
|
// basic FIFO
|
fifo_clear((fifo_t *)context->error_queue);
|
}
|
|
/**
|
* Pop error from queue
|
* @param context - scpi context
|
* @return error number
|
*/
|
int16_t SCPI_ErrorPop(scpi_t * context) {
|
int16_t result = 0;
|
|
//// FreeRTOS
|
//if (pdFALSE == xQueueReceive((xQueueHandle)context->error_queue, &result, 0)) {
|
// result = 0;
|
//}
|
|
// basic FIFO
|
fifo_remove((fifo_t *)context->error_queue, &result);
|
|
return result;
|
}
|
|
/**
|
* Return number of errors/events in the queue
|
* @param context
|
* @return
|
*/
|
int32_t SCPI_ErrorCount(scpi_t * context) {
|
int16_t result = 0;
|
|
//// FreeRTOS
|
//result = uxQueueMessagesWaiting((xQueueHandle)context->error_queue);
|
|
//basic FIFO
|
fifo_count((fifo_t *)context->error_queue, &result);
|
|
|
return result;
|
}
|
|
static void SCPI_ErrorPushInternal(scpi_t * context, int16_t err) {
|
//// FreeRTOS
|
//xQueueSend((xQueueHandle)context->error_queue, &err, 0);
|
|
// basic FIFO
|
fifo_add((fifo_t *)context->error_queue, err);
|
}
|
/**
|
* Push error to queue
|
* @param context - scpi context
|
* @param err - error number
|
*/
|
void SCPI_ErrorPush(scpi_t * context, int16_t err) {
|
SCPI_ErrorPushInternal(context, err);
|
|
// Command error (e.g. syntax error) ch 21.8.9
|
if ((err < -100) && (err > -199)) {
|
SCPI_RegSetBits(context, SCPI_REG_ESR, ESR_CER);
|
}
|
|
// Execution Error (e.g. range error) ch 21.8.10
|
if ((err < -200) && (err > -299)) {
|
SCPI_RegSetBits(context, SCPI_REG_ESR, ESR_EER);
|
}
|
|
// Device specific error -300, -399 ch 21.8.11
|
if ((err < -300) && (err > -399)) {
|
SCPI_RegSetBits(context, SCPI_REG_ESR, ESR_DER);
|
}
|
|
// Query error -400, -499 ch 21.8.12
|
if ((err < -400) && (err > -499)) {
|
SCPI_RegSetBits(context, SCPI_REG_ESR, ESR_QER);
|
}
|
|
// Power on event -500, -599 ch 21.8.13
|
if ((err < -500) && (err > -599)) {
|
SCPI_RegSetBits(context, SCPI_REG_ESR, ESR_PON);
|
}
|
|
// User Request Event -600, -699 ch 21.8.14
|
if ((err < -600) && (err > -699)) {
|
SCPI_RegSetBits(context, SCPI_REG_ESR, ESR_URQ);
|
}
|
|
// Request Control Event -700, -799 ch 21.8.15
|
if ((err < -700) && (err > -799)) {
|
SCPI_RegSetBits(context, SCPI_REG_ESR, ESR_REQ);
|
}
|
|
// Operation Complete Event -800, -899 ch 21.8.16
|
if ((err < -800) && (err > -899)) {
|
SCPI_RegSetBits(context, SCPI_REG_ESR, ESR_OPC);
|
}
|
|
if (context) {
|
if (context->interface && context->interface->error) {
|
context->interface->error(context, err);
|
}
|
|
context->cmd_error = TRUE;
|
}
|
}
|
|
/**
|
* Translate error number to string
|
* @param err - error number
|
* @return Error string representation
|
*/
|
const char * SCPI_ErrorTranslate(int16_t err) {
|
switch (err) {
|
case 0: return "No error";
|
case SCPI_ERROR_SYNTAX: return "Syntax error";
|
case SCPI_ERROR_INVALID_SEPARATOR: return "Invalid separator";
|
case SCPI_ERROR_UNDEFINED_HEADER: return "Undefined header";
|
case SCPI_ERROR_PARAMETER_NOT_ALLOWED: return "Parameter not allowed";
|
case SCPI_ERROR_MISSING_PARAMETER: return "Missing parameter";
|
case SCPI_ERROR_INVALID_SUFFIX: return "Invalid suffix";
|
case SCPI_ERROR_SUFFIX_NOT_ALLOWED: return "Suffix not allowed";
|
default: return "Unknown error";
|
}
|
}
|
