| | |
| | | * SCPI_EXPR_ERROR - parser error |
| | | * SCPI_EXPR_NO_MORE - no more data |
| | | */ |
| | | static scpi_expr_result_t numericRange(lex_state_t * state, scpi_bool_t * isRange, scpi_token_t * valueFrom, scpi_token_t * valueTo) |
| | | { |
| | | static scpi_expr_result_t numericRange(lex_state_t * state, scpi_bool_t * isRange, scpi_token_t * valueFrom, scpi_token_t * valueTo) { |
| | | if (scpiLex_DecimalNumericProgramData(state, valueFrom)) { |
| | | if (scpiLex_Colon(state, valueTo)) { |
| | | *isRange = TRUE; |
| | |
| | | * SCPI_EXPR_NO_MORE - no more data |
| | | * @see SCPI_ExprNumericListEntryInt, SCPI_ExprNumericListEntryDouble |
| | | */ |
| | | scpi_expr_result_t SCPI_ExprNumericListEntry(scpi_t * context, scpi_parameter_t * param, int index, scpi_bool_t * isRange, scpi_parameter_t * valueFrom, scpi_parameter_t * valueTo) |
| | | { |
| | | scpi_expr_result_t SCPI_ExprNumericListEntry(scpi_t * context, scpi_parameter_t * param, int index, scpi_bool_t * isRange, scpi_parameter_t * valueFrom, scpi_parameter_t * valueTo) { |
| | | lex_state_t lex; |
| | | int i; |
| | | scpi_expr_result_t res = SCPI_EXPR_OK; |
| | |
| | | * SCPI_EXPR_NO_MORE - no more data |
| | | * @see SCPI_ExprNumericListEntry, SCPI_ExprNumericListEntryDouble |
| | | */ |
| | | scpi_expr_result_t SCPI_ExprNumericListEntryInt(scpi_t * context, scpi_parameter_t * param, int index, scpi_bool_t * isRange, int32_t * valueFrom, int32_t * valueTo) |
| | | { |
| | | scpi_expr_result_t SCPI_ExprNumericListEntryInt(scpi_t * context, scpi_parameter_t * param, int index, scpi_bool_t * isRange, int32_t * valueFrom, int32_t * valueTo) { |
| | | scpi_expr_result_t res; |
| | | scpi_bool_t range = FALSE; |
| | | scpi_parameter_t paramFrom; |
| | |
| | | * SCPI_EXPR_NO_MORE - no more data |
| | | * @see SCPI_ExprNumericListEntry, SCPI_ExprNumericListEntryInt |
| | | */ |
| | | scpi_expr_result_t SCPI_ExprNumericListEntryDouble(scpi_t * context, scpi_parameter_t * param, int index, scpi_bool_t * isRange, double * valueFrom, double * valueTo) |
| | | { |
| | | scpi_expr_result_t SCPI_ExprNumericListEntryDouble(scpi_t * context, scpi_parameter_t * param, int index, scpi_bool_t * isRange, double * valueFrom, double * valueTo) { |
| | | scpi_expr_result_t res; |
| | | scpi_bool_t range = FALSE; |
| | | scpi_parameter_t paramFrom; |
| | |
| | | * @param length length of values array |
| | | * @param dimensions real number of dimensions |
| | | */ |
| | | static scpi_expr_result_t channelSpec(scpi_t * context, lex_state_t * state, int32_t * values, size_t length, size_t * dimensions) |
| | | { |
| | | static scpi_expr_result_t channelSpec(scpi_t * context, lex_state_t * state, int32_t * values, size_t length, size_t * dimensions) { |
| | | scpi_parameter_t param; |
| | | size_t i = 0; |
| | | while(scpiLex_DecimalNumericProgramData(state, ¶m)) { |
| | | while (scpiLex_DecimalNumericProgramData(state, ¶m)) { |
| | | if (i < length) { |
| | | SCPI_ParamToInt(context, ¶m, &values[i]); |
| | | SCPI_ParamToInt32(context, ¶m, &values[i]); |
| | | } |
| | | |
| | | if (scpiLex_SpecificCharacter(state, ¶m, '!')) { |
| | |
| | | if (i == 0) { |
| | | return SCPI_EXPR_NO_MORE; |
| | | } else { |
| | | // there was at least one number followed by !, but after ! was not another number |
| | | /* there was at least one number followed by !, but after ! was not another number */ |
| | | return SCPI_EXPR_ERROR; |
| | | } |
| | | } |
| | |
| | | * @param length length of values arrays |
| | | * @param dimensions real number of dimensions |
| | | */ |
| | | static scpi_expr_result_t channelRange(scpi_t * context, lex_state_t * state, scpi_bool_t * isRange, int32_t * valuesFrom, int32_t * valuesTo, size_t length, size_t * dimensions) |
| | | { |
| | | static scpi_expr_result_t channelRange(scpi_t * context, lex_state_t * state, scpi_bool_t * isRange, int32_t * valuesFrom, int32_t * valuesTo, size_t length, size_t * dimensions) { |
| | | scpi_token_t token; |
| | | scpi_expr_result_t err; |
| | | size_t fromDimensions; |
| | |
| | | *dimensions = fromDimensions; |
| | | return SCPI_EXPR_OK; |
| | | } |
| | | } else if (err == SCPI_EXPR_NO_MORE) { |
| | | err = SCPI_EXPR_ERROR; |
| | | } |
| | | |
| | | return err; |
| | |
| | | * @param length length of values arrays |
| | | * @param dimensions real number of dimensions |
| | | */ |
| | | scpi_expr_result_t SCPI_ExprChannelListEntry(scpi_t * context, scpi_parameter_t * param, int index, scpi_bool_t * isRange, int32_t * valuesFrom, int32_t * valuesTo, size_t length, size_t * dimensions) |
| | | { |
| | | scpi_expr_result_t SCPI_ExprChannelListEntry(scpi_t * context, scpi_parameter_t * param, int index, scpi_bool_t * isRange, int32_t * valuesFrom, int32_t * valuesTo, size_t length, size_t * dimensions) { |
| | | lex_state_t lex; |
| | | int i; |
| | | scpi_expr_result_t res = SCPI_EXPR_OK; |
| | |
| | | lex.pos = lex.buffer; |
| | | lex.len = param->len - 2; |
| | | |
| | | // detect channel list expression |
| | | /* detect channel list expression */ |
| | | if (!scpiLex_SpecificCharacter(&lex, &token, '@')) { |
| | | SCPI_ErrorPush(context, SCPI_ERROR_EXPRESSION_PARSING_ERROR); |
| | | return SCPI_EXPR_ERROR; |
| | |
| | | if (res == SCPI_EXPR_ERROR) { |
| | | SCPI_ErrorPush(context, SCPI_ERROR_EXPRESSION_PARSING_ERROR); |
| | | } |
| | | if (res == SCPI_EXPR_NO_MORE) { |
| | | if (!scpiLex_IsEos(&lex)) { |
| | | res = SCPI_EXPR_ERROR; |
| | | SCPI_ErrorPush(context, SCPI_ERROR_EXPRESSION_PARSING_ERROR); |
| | | } |
| | | } |
| | | return res; |
| | | } |