| | |
| | | static size_t writeNewLine(scpi_t * context) { |
| | | if (context->output_count > 0) { |
| | | size_t len; |
| | | len = writeData(context, "\r\n", 2); |
| | | #ifndef SCPI_LINE_ENDING |
| | | #error no termination character defined |
| | | #endif |
| | | len = writeData(context, SCPI_LINE_ENDING, strlen(SCPI_LINE_ENDING)); |
| | | flushData(context); |
| | | return len; |
| | | } else { |
| | |
| | | context->output_count = 0; |
| | | context->input_count = 0; |
| | | |
| | | SCPI_DEBUG_COMMAND(context); |
| | | /* if callback exists - call command callback */ |
| | | if (cmd->callback != NULL) { |
| | | if ((cmd->callback(context) != SCPI_RES_OK) && !context->cmd_error) { |
| | |
| | | /** |
| | | * Return prefix of nondecimal base |
| | | * @param base |
| | | * @return |
| | | * @return |
| | | */ |
| | | static const char * getBasePrefix(int8_t base) { |
| | | switch (base) { |
| | |
| | | * @param context |
| | | * @param val |
| | | * @param base |
| | | * @return |
| | | * @return |
| | | */ |
| | | size_t SCPI_ResultIntBase(scpi_t * context, int32_t val, int8_t base) { |
| | | char buffer[33]; |
| | |
| | | * @param context |
| | | * @param data |
| | | * @param len |
| | | * @return |
| | | * @return |
| | | */ |
| | | size_t SCPI_ResultArbitraryBlock(scpi_t * context, const char * data, size_t len) { |
| | | size_t result = 0; |
| | |
| | | * @param context |
| | | * @param parameter |
| | | * @param mandatory |
| | | * @return |
| | | * @return |
| | | */ |
| | | scpi_bool_t SCPI_Parameter(scpi_t * context, scpi_parameter_t * parameter, scpi_bool_t mandatory) { |
| | | lex_state_t * state; |
| | |
| | | * Detect if parameter is number |
| | | * @param parameter |
| | | * @param suffixAllowed |
| | | * @return |
| | | * @return |
| | | */ |
| | | scpi_bool_t SCPI_ParamIsNumber(scpi_parameter_t * parameter, scpi_bool_t suffixAllowed) { |
| | | switch (parameter->type) { |
| | |
| | | * @param context |
| | | * @param parameter |
| | | * @param value result |
| | | * @return true if succesful |
| | | * @return TRUE if succesful |
| | | */ |
| | | scpi_bool_t SCPI_ParamToInt(scpi_t * context, scpi_parameter_t * parameter, int32_t * value) { |
| | | |
| | |
| | | * @param context |
| | | * @param parameter |
| | | * @param value result |
| | | * @return true if succesful |
| | | * @return TRUE if succesful |
| | | */ |
| | | scpi_bool_t SCPI_ParamToDouble(scpi_t * context, scpi_parameter_t * parameter, double * value) { |
| | | scpi_bool_t result = FALSE; |
| | |
| | | * @param context |
| | | * @param value |
| | | * @param mandatory |
| | | * @return |
| | | * @return |
| | | */ |
| | | scpi_bool_t SCPI_ParamDouble(scpi_t * context, double * value, scpi_bool_t mandatory) { |
| | | scpi_bool_t result; |
| | |
| | | * @param context |
| | | * @param value |
| | | * @param mandatory |
| | | * @return |
| | | * @return |
| | | */ |
| | | scpi_bool_t SCPI_ParamInt(scpi_t * context, int32_t * value, scpi_bool_t mandatory) { |
| | | scpi_bool_t result; |
| | |
| | | * @param value |
| | | * @param len |
| | | * @param mandatory |
| | | * @return |
| | | * @return |
| | | */ |
| | | scpi_bool_t SCPI_ParamCharacters(scpi_t * context, const char ** value, size_t * len, scpi_bool_t mandatory) { |
| | | scpi_bool_t result; |
| | |
| | | * @param value result pointer to data |
| | | * @param len result length of data |
| | | * @param mandatory |
| | | * @return |
| | | * @return |
| | | */ |
| | | scpi_bool_t SCPI_ParamArbitraryBlock(scpi_t * context, const char ** value, size_t * len, scpi_bool_t mandatory) { |
| | | scpi_bool_t result; |
| | |
| | | * @param parameter - should be PROGRAM_MNEMONIC |
| | | * @param options - NULL terminated list of choices |
| | | * @param value - index to options |
| | | * @return |
| | | * @return |
| | | */ |
| | | scpi_bool_t SCPI_ParamToChoice(scpi_t * context, scpi_parameter_t * parameter, const scpi_choice_def_t * options, int32_t * value) { |
| | | size_t res; |
| | |
| | | * @param options specifications of choices numbers (patterns) |
| | | * @param tag numerical representatio of choice |
| | | * @param text result text |
| | | * @return true if succesfule, else false |
| | | * @return TRUE if succesfule, else false |
| | | */ |
| | | scpi_bool_t SCPI_ChoiceToName(const scpi_choice_def_t * options, int32_t tag, const char ** text) { |
| | | int i; |
| | |
| | | * @param context |
| | | * @param value |
| | | * @param mandatory |
| | | * @return |
| | | * @return |
| | | */ |
| | | scpi_bool_t SCPI_ParamBool(scpi_t * context, scpi_bool_t * value, scpi_bool_t mandatory) { |
| | | scpi_bool_t result; |
| | |
| | | * @param options |
| | | * @param value |
| | | * @param mandatory |
| | | * @return |
| | | * @return |
| | | */ |
| | | scpi_bool_t SCPI_ParamChoice(scpi_t * context, const scpi_choice_def_t * options, int32_t * value, scpi_bool_t mandatory) { |
| | | scpi_bool_t result; |
| | |
| | | * Parse one parameter and detect type |
| | | * @param state |
| | | * @param token |
| | | * @return |
| | | * @return |
| | | */ |
| | | int scpiParser_parseProgramData(lex_state_t * state, scpi_token_t * token) { |
| | | scpi_token_t tmp; |
| | |
| | | * @param state |
| | | * @param token |
| | | * @param numberOfParameters |
| | | * @return |
| | | * @return |
| | | */ |
| | | int scpiParser_parseAllProgramData(lex_state_t * state, scpi_token_t * token, int * numberOfParameters) { |
| | | |
| | |
| | | * @param state |
| | | * @param buffer |
| | | * @param len |
| | | * @return |
| | | * @return |
| | | */ |
| | | int scpiParser_detectProgramMessageUnit(scpi_parser_state_t * state, char * buffer, int len) { |
| | | lex_state_t lex_state; |
| | |
| | | * - suitable for one handle to multiple commands |
| | | * @param context |
| | | * @param cmd |
| | | * @return |
| | | * @return |
| | | */ |
| | | scpi_bool_t SCPI_IsCmd(scpi_t * context, const char * cmd) { |
| | | const char * pattern; |
| | | |
| | | if (!context->param_list.cmd) { |
| | | return FALSE; |
| | | } |
| | | |
| | | const char * pattern = context->param_list.cmd->pattern; |
| | | pattern = context->param_list.cmd->pattern; |
| | | return matchCommand (pattern, cmd, strlen (cmd), NULL, 0); |
| | | } |
| | | |