FreeCalypso > hg > fc-magnetite
diff src/g23m-aci/aci/line_split.c @ 162:53929b40109c
src/g23m-aci: initial import from TCS3.2/LoCosto
author | Mychaela Falconia <falcon@freecalypso.org> |
---|---|
date | Tue, 11 Oct 2016 02:02:43 +0000 |
parents | |
children | f5a1a37cbece |
line wrap: on
line diff
--- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/src/g23m-aci/aci/line_split.c Tue Oct 11 02:02:43 2016 +0000 @@ -0,0 +1,995 @@ +/* ++----------------------------------------------------------------------------- +| Project : +| Modul : line ++----------------------------------------------------------------------------- +| Copyright 2002 Texas Instruments Berlin, AG +| All rights reserved. +| +| This file is confidential and a trade secret of Texas +| Instruments Berlin, AG +| The receipt of or possession of this file does not convey +| any rights to reproduce or disclose its contents or to +| manufacture, use, or sell anything it may describe, in +| whole, or in part, without the specific written consent of +| Texas Instruments Berlin, AG. ++----------------------------------------------------------------------------- +| Purpose : This modul ... ++----------------------------------------------------------------------------- +*/ + +#include <stdio.h> +#include <stdlib.h> +#include <string.h> +#include <ctype.h> + +#include "typedefs.h" +#include "vsi.h" +#include "pei.h" +#include "aci_mem.h" +#include "P_ACI.val" + +#include "line_edit.h" +#include "line_edit_intern.h" +#include "line_split_intern.h" + +static T_LEDIT_CHAR_TYPE ledit_lookAhead (char c); +static UBYTE ledit_check_valid_basic_cmd (char c); +static UBYTE ledit_check_valid_and_cmd (char c); +static USHORT ledit_get_para_len (T_LEDIT_INTERN *leditInt, USHORT searchLen); +static USHORT ledit_get_name_len (T_LEDIT_INTERN *leditInt, T_LEDIT_NAME_TYPE nType); +static T_LEDIT_RSLT ledit_get_memory (T_LEDIT_ATCMD_M **cmdm, int size, int name); +static T_LEDIT_RSLT ledit_get_cmd_mem (T_LEDIT_INTERN *leditInt); +static T_LEDIT_RSLT ledit_assign_name (T_LEDIT_INTERN *leditInt, int len); +static T_LEDIT_RSLT ledit_assign_param (T_LEDIT_INTERN *leditInt, T_LEDIT_PARAM_TYPE pType); +static T_LEDIT_ATCMD_SUBTYPE ledit_extended_type (T_LEDIT_INTERN *leditInt); +static T_LEDIT_RSLT ledit_extended_cmd (T_LEDIT_INTERN *leditInt); +static T_LEDIT_RSLT ledit_s_cmd (T_LEDIT_INTERN *leditInt); +static T_LEDIT_RSLT ledit_dial (T_LEDIT_INTERN *leditInt); +static T_LEDIT_RSLT ledit_and_basic_cmd (T_LEDIT_INTERN *leditInt); +static T_LEDIT_RSLT ledit_basic_cmd (T_LEDIT_INTERN *leditInt); + +static T_LEDIT_RSLT ledit_restore_dial_string (char *procDialString, + int procDialStringLen, + char *origCommandLine, + int origCommandLineLen); + + +static const UBYTE basic_ATcmd [26][2] = +{ + {BATCMD_SUPPORT, ANDCMD_NO_SUPP}, /* A */ + {BATCMD_SUPPORT, ANDCMD_NO_SUPP}, /* B */ + {BATCMD_NO_SUPP, ANDCMD_SUPPORT}, /* C */ + {BATCMD_DIAL , ANDCMD_SUPPORT}, /* D <---- SPECIAL */ + {BATCMD_SUPPORT, ANDCMD_NO_SUPP}, /* E */ + {BATCMD_SUPPORT, ANDCMD_SUPPORT}, /* F */ + {BATCMD_NO_SUPP, ANDCMD_NO_SUPP}, /* G */ + {BATCMD_SUPPORT, ANDCMD_NO_SUPP}, /* H */ + {BATCMD_SUPPORT, ANDCMD_NO_SUPP}, /* I */ + {BATCMD_NO_SUPP, ANDCMD_NO_SUPP}, /* J */ + {BATCMD_NO_SUPP, ANDCMD_SUPPORT}, /* K */ + {BATCMD_SUPPORT, ANDCMD_NO_SUPP}, /* L */ + {BATCMD_SUPPORT, ANDCMD_NO_SUPP}, /* M */ + {BATCMD_NO_SUPP, ANDCMD_NO_SUPP}, /* N */ + {BATCMD_SUPPORT, ANDCMD_NO_SUPP}, /* O */ + {BATCMD_SUPPORT, ANDCMD_NO_SUPP}, /* P */ + {BATCMD_SUPPORT, ANDCMD_NO_SUPP}, /* Q */ + {BATCMD_NO_SUPP, ANDCMD_NO_SUPP}, /* R */ + {BATCMD_S_PARAM, ANDCMD_NO_SUPP}, /* S <---- SPECIAL */ + {BATCMD_SUPPORT, ANDCMD_NO_SUPP}, /* T */ + {BATCMD_NO_SUPP, ANDCMD_NO_SUPP}, /* U */ + {BATCMD_SUPPORT, ANDCMD_NO_SUPP}, /* V */ + {BATCMD_SUPPORT, ANDCMD_SUPPORT}, /* W */ + {BATCMD_SUPPORT, ANDCMD_NO_SUPP}, /* X */ + {BATCMD_NO_SUPP, ANDCMD_NO_SUPP}, /* Y */ + {BATCMD_SUPPORT, ANDCMD_NO_SUPP} /* Z */ +}; + + +/* ++--------------------------------------------------------------------+ +| PROJECT : GSM-F&D (8411) MODULE : LINE_EDIT_LIB | +| STATE : code ROUTINE : ledit_check_valid_basic_cmd | ++--------------------------------------------------------------------+ + + PURPOSE : - +*/ +static UBYTE ledit_check_valid_basic_cmd (char c) +{ + return basic_ATcmd [(int)(c-'A')][0]; +} + +/* ++--------------------------------------------------------------------+ +| PROJECT : GSM-F&D (8411) MODULE : LINE_EDIT_LIB | +| STATE : code ROUTINE : ledit_check_valid_and_cmd | ++--------------------------------------------------------------------+ + + PURPOSE : - +*/ +static UBYTE ledit_check_valid_and_cmd (char c) +{ + return basic_ATcmd [(int)(c-'A')][1]; +} + + +/* ++--------------------------------------------------------------------+ +| PROJECT : GSM-F&D (8411) MODULE : LINE_EDIT_LIB | +| STATE : code ROUTINE : ledit_lookAhead | ++--------------------------------------------------------------------+ + + PURPOSE : - qualify the character at the look ahead position +*/ + +static T_LEDIT_CHAR_TYPE ledit_lookAhead (char c) +{ + if (c EQ '\0') + return LEDIT_CHAR_TERMINATED; + + switch (c) + { + case '%': + return LEDIT_CHAR_PERCENT; + case '&': + return LEDIT_CHAR_AND; + case '+': + return LEDIT_CHAR_PLUS; + case ',': + return LEDIT_CHAR_COMMA; + case '=': + return LEDIT_CHAR_SET; + case ';': + return LEDIT_CHAR_SEPARATOR; + case '?': + return LEDIT_CHAR_READ; + default: + { + if ((c-'0') < 10 AND (c - '0') >=0) + return LEDIT_CHAR_NUMBER; + if ((c>='A') && (c<='Z')) + return LEDIT_CHAR_CHAR; + if (((c >= '!') AND (c <= '_')) OR ((c >= 123) AND ((unsigned char)c <= 127))) + /*the rest of characters*/ + return LEDIT_CHAR_EXT; + return LEDIT_CHAR_INVALID; + } + } +} + + +/* ++--------------------------------------------------------------------+ +| PROJECT : GSM-F&D (8411) MODULE : LINE_EDIT_LIB | +| STATE : code ROUTINE : ledit_get_para_len | ++--------------------------------------------------------------------+ + + PURPOSE : - calculate length of an AT command parameter +*/ +static USHORT ledit_get_para_len (T_LEDIT_INTERN *leditInt, USHORT searchLen) +{ + USHORT i = 0; +#ifdef _SIMULATION_ + TRACE_FUNCTION("ledit_get_para_len()"); +#endif + if (searchLen EQ SEARCH_BAT_LEN) + { + /* basic AT command can have numbers only e.g.: ATF123 */ + i = leditInt->execBufIter; /* start with first number */ + while (isdigit(leditInt->execBuffer[i])) + { + ++i; + } + return (i - leditInt->execBufIter); + } + else + { + /* + * dial string finish with ';' + * extended AT command is terminated by ';' or by '\0' if last one in cmd line + */ + i = leditInt->execBufIter; + + while (';' != leditInt->execBuffer[i]) + { + ++i; + if (leditInt->execBuffer[i] EQ '\0') + { + break; + } + } + if ((searchLen EQ SEARCH_DIAL_LEN) AND (';' EQ leditInt->execBuffer[i])) + { + ++i; /* for dial the ';' is important */ + } + return (i - leditInt->execBufIter); + } +} + +/* ++--------------------------------------------------------------------+ +| PROJECT : GSM-F&D (8411) MODULE : LINE_EDIT_LIB | +| STATE : code ROUTINE : ledit_get_name_len | ++--------------------------------------------------------------------+ + + PURPOSE : - get the length of an extended AT command or ATSnn where nn := 0..99 + extended name starts with '+', '%', '$' ... or every other char which is not [a-zA-Z][0-9] + after prefix must start with [A-Z] and then up to further 15 characters + of [A-Z][0-9]!%-./:_ according to V.25 ter chapter 5.4.1 +*/ +static USHORT ledit_get_name_len (T_LEDIT_INTERN *leditInt, T_LEDIT_NAME_TYPE nType) +{ + USHORT i = leditInt->execBufIter; + + if (nType EQ LEDIT_EXT_NAME) + { + ++i; /* skip prefix of extended name */ + } + /* + * first char (after extended prefix) must be [A-Z] (to capital letter done by ledit_collect()) + */ + if (isupper (leditInt->execBuffer[i])) + { + while (leditInt->execBuffer[i]) + { + if ((nType EQ LEDIT_S_NAME) AND (i > leditInt->execBufIter)) + { + if (isdigit(leditInt->execBuffer[i]) EQ 0) + { + return 0; /* invalid name for ATSnn, where nn must be [0-9]+ */ + } + if ((i - leditInt->execBufIter) > LEDIT_MAX_S_NAME_LEN) + { + return 0; /* invalid name for ATSnn, where nn is too large */ + } + } + ++i; + switch (leditInt->execBuffer[i]) + { + case '\0': + { + return (i - leditInt->execBufIter); + } + case '=': + { + if (leditInt->execBuffer[i+1] NEQ '?') + { + return (i - leditInt->execBufIter); + } + else /* AT+XXX=? */ + { + if ((leditInt->execBuffer[i+2] NEQ '\0') AND (leditInt->execBuffer[i+2] NEQ ';')) + { + return 0; /* after =? must be ';' or terminated */ + } + return (i - leditInt->execBufIter); + } + } + case '?': + { + if ((leditInt->execBuffer[i+1] NEQ '\0') AND (leditInt->execBuffer[i+1] NEQ ';')) + { + return 0; /* after ? must be ';' or terminated */ + } + return (i - leditInt->execBufIter); + } + case ';': + { + /* + * there are several extended AT cmds without "=parameter" or "=?" or "?" after the name, e.g.: +CGMM;+CGMI;+CGMR;+CGSN;... + * the ";" after the name will be parsed in ledit_get_para_len() + */ + return (i - leditInt->execBufIter); + } + } + } /* end of while (leditInt->execBuffer[i]) */ + } + return 0; /* invalid name */ +} + + +/* ++--------------------------------------------------------------------+ +| PROJECT : GSM-F&D (8411) MODULE : LINE_EDIT_LIB | +| STATE : code ROUTINE : ledit_free_cmd | ++--------------------------------------------------------------------+ + + PURPOSE : - +*/ +void ledit_free_cmd (T_LEDIT_INTERN *leditInt) +{ + + T_LEDIT_ATCMD_M *tmp = NULL; +#ifdef _SIMULATION_ + TRACE_FUNCTION("ledit_free_cmd()"); +#endif + while (leditInt->cmdm) + { + tmp = leditInt->cmdm->next; + if (leditInt->cmdm->cmd) + { + if (leditInt->cmdm->cmd->name) + { + ACI_MFREE(leditInt->cmdm->cmd->name); + } + if (leditInt->cmdm->cmd->params) + { + ACI_MFREE (leditInt->cmdm->cmd->params); + } + ACI_MFREE (leditInt->cmdm->cmd); + } +/* if (leditInt->cmdm) ... always true */ + { + ACI_MFREE (leditInt->cmdm); + } + leditInt->cmdm = tmp; + } +} + + +/* ++--------------------------------------------------------------------+ +| PROJECT : GSM-F&D (8411) MODULE : LINE_EDIT_LIB | +| STATE : code ROUTINE : ledit_get_cmd_mem | ++--------------------------------------------------------------------+ + + PURPOSE : - allocate some memory for T_LEDIT_ATCMD +*/ + +static T_LEDIT_RSLT ledit_get_cmd_mem (T_LEDIT_INTERN *leditInt) +{ + ACI_MALLOC(leditInt->cmdm,sizeof(T_LEDIT_ATCMD_M)); + if (leditInt->cmdm EQ NULL) + { + return LEDIT_FAIL; + } + memset(leditInt->cmdm, '\0', sizeof(T_LEDIT_ATCMD_M)); + leditInt->cmdm->next = NULL; + + ACI_MALLOC(leditInt->cmdm->cmd,sizeof(T_LEDIT_ATCMD)); + if (leditInt->cmdm->cmd EQ NULL) + { + return LEDIT_FAIL; + } + memset(leditInt->cmdm->cmd, '\0', sizeof(T_LEDIT_ATCMD)); + + leditInt->cmdm->cmd->type.mType = LEDIT_ATCMD_NIL; + leditInt->cmdm->cmd->type.sType = (T_LEDIT_ATCMD_SUBTYPE) LEDIT_ATCMD_NIL; + /* Initializing flag here BUG 11920 */ + leditInt->cmdm->cmd->type.append_Flag = FALSE; + leditInt->cmdm->cmd->name = NULL; + leditInt->cmdm->cmd->params = NULL; + return LEDIT_CMPL; +} + +/* ++--------------------------------------------------------------------+ +| PROJECT : GSM-F&D (8411) MODULE : LINE_EDIT_LIB | +| STATE : code ROUTINE : ledit_get_memory | ++--------------------------------------------------------------------+ + + PURPOSE : - allocate some memory (for char *) +*/ + +static T_LEDIT_RSLT ledit_get_memory (T_LEDIT_ATCMD_M **cmdm, int size, int name) +{ + + T_LEDIT_ATCMD_M **tmp = cmdm; + if (name) + { + ACI_MALLOC((*tmp)->cmd->name,size * sizeof(char)); + if ((*tmp)->cmd->name EQ NULL) + { + return LEDIT_FAIL; + } + (*tmp)->cmd->name[0]='\0'; + } + else + { + ACI_MALLOC((*tmp)->cmd->params,size * sizeof(char)); + if ((*tmp)->cmd->params EQ NULL) + { + TRACE_FUNCTION("ledit_get_memory(): returning fail"); + return LEDIT_FAIL; + } + (*tmp)->cmd->params[0]='\0'; + } + return LEDIT_CMPL; +} + + +/* ++--------------------------------------------------------------------+ +| PROJECT : GSM-F&D (8411) MODULE : LINE_EDIT_LIB | +| STATE : code ROUTINE : ledit_assign_name | ++--------------------------------------------------------------------+ + + PURPOSE : - extract the name of an AT command from command line + and put it into T_LEDIT_ATCMD member name +*/ + +static T_LEDIT_RSLT ledit_assign_name (T_LEDIT_INTERN *leditInt, int len) +{ + if(ledit_get_memory (&(leditInt->cmdm), len+1, 1) EQ LEDIT_FAIL) + { + leditInt->err.code = LEDIT_ERR_NoMemory; + leditInt->err.msg = ledit_err[LEDIT_ERR_NoMemory].msg; + return LEDIT_FAIL; + } + memcpy (leditInt->cmdm->cmd->name, leditInt->execBuffer+leditInt->execBufIter, len); + *(leditInt->cmdm->cmd->name+len) = '\0'; /* terminate name */ + leditInt->execBufIter += len; /* update iterator in execBuffer */ + return LEDIT_CMPL; +} + +/* ++--------------------------------------------------------------------+ +| PROJECT : GSM-F&D (8411) MODULE : LINE_EDIT_LIB | +| STATE : code ROUTINE : ledit_assign_param | ++--------------------------------------------------------------------+ + + PURPOSE : - extract the param(s) of an AT command from command line + and put it into T_LEDIT_ATCMD member param + - can be empty +*/ + +static T_LEDIT_RSLT ledit_assign_param (T_LEDIT_INTERN *leditInt, T_LEDIT_PARAM_TYPE pType) +{ + int len = 0; +#ifdef _SIMULATION_ + TRACE_FUNCTION("ledit_assign_param()"); +#endif + if (pType EQ LEDIT_BASIC_PARAM) + { + len = ledit_get_para_len (leditInt, SEARCH_BAT_LEN); + } + else + if (pType EQ LEDIT_DIAL_PARAM) /* dial parameter, we need the possible ';' */ + { + len = ledit_get_para_len (leditInt, SEARCH_DIAL_LEN); + /* + * If there were any 'g' or 'i' characters in a dial string that have + * been turned into 'G' or 'I' characters on conversion to upper case + * by the ledit_collect function... + * Turn them back into the lower case characters so that they affect + * CUG and CLIR in the way they were intended to. + */ + ledit_restore_dial_string ( &leditInt->execBuffer[leditInt->execBufIter], + len, + leditInt->origBuffer, + strlen(leditInt->origBuffer)); + } + else /* extended AT cmd params */ + { + len = ledit_get_para_len (leditInt, SEARCH_EXT_LEN); + } + if(ledit_get_memory (&(leditInt->cmdm), len+1, 0) EQ LEDIT_FAIL) + { + leditInt->err.code = LEDIT_ERR_NoMemory; + leditInt->err.msg = ledit_err[LEDIT_ERR_NoMemory].msg; + return LEDIT_FAIL; + } + memcpy (leditInt->cmdm->cmd->params, leditInt->execBuffer+leditInt->execBufIter, len); + *(leditInt->cmdm->cmd->params+len) = '\0'; + + /* + * update iterator in execBuffer + * for extended cmds skip the ';' + */ + if (pType EQ LEDIT_EXT_PARAM) + { + if (leditInt->execBuffer[leditInt->execBufIter+len] EQ '\0') + { + leditInt->execBufIter += len; + } + else + { + leditInt->execBufIter += len+1; /* skip the ';' */ + } + } + else + { + leditInt->execBufIter += len; + } + + return LEDIT_CMPL; +} + +/* ++--------------------------------------------------------------------+ +| PROJECT : GSM-F&D (8411) MODULE : LINE_EDIT_LIB | +| STATE : code ROUTINE : ledit_extended_type | ++--------------------------------------------------------------------+ + + PURPOSE : - +*/ +static T_LEDIT_ATCMD_SUBTYPE ledit_extended_type (T_LEDIT_INTERN *leditInt) +{ +#ifdef _SIMULATION_ + TRACE_FUNCTION("ledit_extended_type()"); +#endif + switch (ledit_lookAhead(leditInt->execBuffer[leditInt->execBufIter])) + { + case LEDIT_CHAR_SET: + { + ++(leditInt->execBufIter); + if (ledit_lookAhead(leditInt->execBuffer[leditInt->execBufIter]) EQ LEDIT_CHAR_READ) + { + ++(leditInt->execBufIter); + /*Setting flag as 1*/ + leditInt->cmdm->cmd->type.append_Flag = TRUE; + /* bug 11920*/ + return LEDIT_ATCMD_TEST; + } + /*Setting flag as 1*/ + leditInt->cmdm->cmd->type.append_Flag = TRUE; + /* bug 11920*/ + return LEDIT_ATCMD_SET; + } + case LEDIT_CHAR_READ: + { + ++(leditInt->execBufIter); + /*Setting flag as 1*/ + leditInt->cmdm->cmd->type.append_Flag = TRUE; + /* bug 11920*/ + return LEDIT_ATCMD_QUERY; + } + default: + { + /* return LEDIT_ATCMD_NIL; */ + /*Setting flag as 0. + These types need not be appended with the characters later on while reconstructing + command in leedit_fwrd_extension*/ + leditInt->cmdm->cmd->type.append_Flag = FALSE; + /* bug 11920*/ + + return LEDIT_ATCMD_SET; /* if after name no parameters e.g.: AT+CMGL; */ + } + } +} + +/* ++--------------------------------------------------------------------+ +| PROJECT : GSM-F&D (8411) MODULE : LINE_EDIT_LIB | +| STATE : code ROUTINE : ledit_extended_cmd | ++--------------------------------------------------------------------+ + + PURPOSE : - split cmd line into single canonical commands +*/ +static T_LEDIT_RSLT ledit_extended_cmd (T_LEDIT_INTERN *leditInt) +{ + int len = 0; +#ifdef _SIMULATION_ + TRACE_FUNCTION ("ledit_extended_cmd()"); +#endif + /* + * get name lenght + */ + len = ledit_get_name_len (leditInt, LEDIT_EXT_NAME); + if(len) + { + if (ledit_assign_name(leditInt, len) NEQ LEDIT_CMPL) + { + return LEDIT_FAIL; + } + leditInt->cmdm->cmd->type.mType = LEDIT_ATCMD_EXTENDED; + leditInt->cmdm->cmd->type.sType = ledit_extended_type(leditInt); + if (ledit_assign_param (leditInt, LEDIT_EXT_PARAM) NEQ LEDIT_CMPL) + { + return LEDIT_FAIL; + } + } + else + { + leditInt->err.code = LEDIT_ERR_NoValidCommand; + leditInt->err.msg = ledit_err[LEDIT_ERR_NoValidCommand].msg; + return LEDIT_FAIL; + } + return LEDIT_CMPL; +} + +/* ++--------------------------------------------------------------------+ +| PROJECT : GSM-F&D (8411) MODULE : LINE_EDIT_LIB | +| STATE : code ROUTINE : ledit_s_cmd | ++--------------------------------------------------------------------+ + + PURPOSE : - special basic AT command ATS + with own syntax similiar to extended AT commands + e.g.: ATS0? <-- query register S0 + ATS0=123 <-- set new value for register S0 + but the parameter is basic cmd like +*/ +static T_LEDIT_RSLT ledit_s_cmd (T_LEDIT_INTERN *leditInt) +{ + int len = 0; +#ifdef _SIMULATION_ + TRACE_FUNCTION ("ledit_s_cmd()"); +#endif + /* + * get name length, support for up to ATS99, but not ATS100 ! + */ + len = ledit_get_name_len (leditInt, LEDIT_S_NAME); + if(len) + { + if (ledit_assign_name(leditInt, len) NEQ LEDIT_CMPL) + { + return LEDIT_FAIL; + } + leditInt->cmdm->cmd->type.mType = LEDIT_ATCMD_S; + leditInt->cmdm->cmd->type.sType = ledit_extended_type(leditInt); /* after Sx must be [?|=] */ + if (ledit_assign_param (leditInt, LEDIT_BASIC_PARAM) NEQ LEDIT_CMPL) + { + return LEDIT_FAIL; + } + } + else + { + leditInt->err.code = LEDIT_ERR_NoValidCommand; + leditInt->err.msg = ledit_err[LEDIT_ERR_NoValidCommand].msg; + return LEDIT_FAIL; + } + return LEDIT_CMPL; +} + +/* ++--------------------------------------------------------------------+ +| PROJECT : GSM-F&D (8411) MODULE : LINE_EDIT_LIB | +| STATE : code ROUTINE : ledit_dial | ++--------------------------------------------------------------------+ + + PURPOSE : - ATD12345; , but also ATD(030)12345; or ATD!; ATD@; ... + - semantic of ATD paramter has to be checked by ATI +*/ +static T_LEDIT_RSLT ledit_dial (T_LEDIT_INTERN *leditInt) +{ +#ifdef _SIMULATION_ + TRACE_FUNCTION ("ledit_dial()"); +#endif + leditInt->cmdm->cmd->type.mType = LEDIT_ATCMD_DIAL; + leditInt->cmdm->cmd->type.sType = LEDIT_ATCMD_SET; + /*Setting flag as 0*/ + leditInt->cmdm->cmd->type.append_Flag = FALSE; + /*Issue 11920*/ + if (ledit_assign_name(leditInt, 1) NEQ LEDIT_CMPL) + { + return LEDIT_FAIL; + } + /* + * dial paramter ends with ';' -> LEDIT_EXT_PARAM + */ + if (ledit_assign_param (leditInt, LEDIT_DIAL_PARAM) NEQ LEDIT_CMPL) + { + return LEDIT_FAIL; + } + if (leditInt->execBuffer[leditInt->execBufIter]) + { + return LEDIT_FAIL; /* dial command is not the last on cmd line */ + } + return LEDIT_CMPL; +} + + +/* ++--------------------------------------------------------------------+ +| PROJECT : GSM-F&D (8411) MODULE : LINE_EDIT_LIB | +| STATE : code ROUTINE : ledit_and_basic_cmd | ++--------------------------------------------------------------------+ + + PURPOSE : - +*/ +static T_LEDIT_RSLT ledit_and_basic_cmd (T_LEDIT_INTERN *leditInt) +{ + USHORT rv = ANDCMD_NO_SUPP; +#ifdef _SIMULATION_ + TRACE_FUNCTION ("ledit_and_basic_cmd()"); +#endif + ++(leditInt->execBufIter); /* skip the & */ + + rv = ledit_check_valid_and_cmd (leditInt->execBuffer[leditInt->execBufIter]); + if(rv EQ ANDCMD_SUPPORT) + { + leditInt->cmdm->cmd->type.mType = LEDIT_ATCMD_AND; + leditInt->cmdm->cmd->type.sType = LEDIT_ATCMD_QUERY; + + /*Setting flag as 0*/ + leditInt->cmdm->cmd->type.append_Flag = FALSE; + /* bug 11920*/ + + if (ledit_assign_name(leditInt, 1) NEQ LEDIT_CMPL) + { + return LEDIT_FAIL; + } + if (ledit_assign_param (leditInt, LEDIT_BASIC_PARAM) NEQ LEDIT_CMPL) + { + return LEDIT_FAIL; + } + } + else + { + leditInt->err.code = LEDIT_ERR_NoValidCommand; + leditInt->err.msg = ledit_err[LEDIT_ERR_NoValidCommand].msg; + return LEDIT_FAIL; + } + return LEDIT_CMPL; +} +/* ++--------------------------------------------------------------------+ +| PROJECT : GSM-F&D (8411) MODULE : LINE_EDIT_LIB | +| STATE : code ROUTINE : ledit_basic_cmd | ++--------------------------------------------------------------------+ + + PURPOSE : - check for basic command + - check for dial command +*/ +static T_LEDIT_RSLT ledit_basic_cmd (T_LEDIT_INTERN *leditInt) +{ + USHORT rv = BATCMD_NO_SUPP; +#ifdef _SIMULATION_ + TRACE_FUNCTION ("ledit_basic_cmd()"); +#endif + rv = ledit_check_valid_basic_cmd (leditInt->execBuffer[leditInt->execBufIter]); + if (rv EQ BATCMD_SUPPORT) + { + leditInt->cmdm->cmd->type.mType = LEDIT_ATCMD_BASIC; + leditInt->cmdm->cmd->type.sType = LEDIT_ATCMD_SET; + + /* Setting flag as 0*/ + leditInt->cmdm->cmd->type.append_Flag = FALSE; + /* Issue 11920*/ + + if (ledit_assign_name(leditInt, 1) NEQ LEDIT_CMPL) + { + return LEDIT_FAIL; + } + if (ledit_assign_param (leditInt, LEDIT_BASIC_PARAM) NEQ LEDIT_CMPL) + { + return LEDIT_FAIL; + } + } + else if (rv EQ BATCMD_DIAL) + { + if (ledit_dial(leditInt) NEQ LEDIT_CMPL) + { + return LEDIT_FAIL; + } + } + else if (rv EQ BATCMD_S_PARAM) + { + if (ledit_s_cmd(leditInt) NEQ LEDIT_CMPL) + { + return LEDIT_FAIL; + } + } + else + { + leditInt->err.code = LEDIT_ERR_NoValidCommand; + leditInt->err.msg = ledit_err[LEDIT_ERR_NoValidCommand].msg; + return LEDIT_FAIL; + } + return LEDIT_CMPL; +} + + +/* ++--------------------------------------------------------------------+ +| PROJECT : GSM-F&D (8411) MODULE : LINE_EDIT_LIB | +| STATE : code ROUTINE : ledit_split | ++--------------------------------------------------------------------+ + + PURPOSE : - split cmd line into single canonical commands +*/ +T_LEDIT_RSLT ledit_split (T_LEDIT_INTERN *leditInt) +{ + + char c = leditInt->execBuffer[leditInt->execBufIter]; + TRACE_FUNCTION("ledit_split"); + + /* + * check first character of a command: has to be valid basic command letter, "&" or + * any extension sign "+", "%" , "$" or what ever else + */ + if(c) + { + if (ledit_get_cmd_mem (leditInt) EQ LEDIT_FAIL) + { + return LEDIT_FAIL; + } + if (isalpha(c)) + { + if (ledit_basic_cmd (leditInt) EQ LEDIT_FAIL) + { + return LEDIT_FAIL; + } + } + else if (c EQ '&') + { + if (ledit_and_basic_cmd (leditInt) EQ LEDIT_FAIL) + { + return LEDIT_FAIL; + } + } + else + { + if (ledit_extended_cmd (leditInt) EQ LEDIT_FAIL) + { + return LEDIT_FAIL; + } + } + + /* here we should peek into the next character to see if command is valid */ + switch (ledit_lookAhead(leditInt->execBuffer[leditInt->execBufIter])) + { + /* legal characters */ + case LEDIT_CHAR_PERCENT: /* '%' */ + case LEDIT_CHAR_AND: /* '&' */ + case LEDIT_CHAR_PLUS: /* '+' */ + case LEDIT_CHAR_CHAR: /* 'A' symbolic for A..Z*/ + case LEDIT_CHAR_EXT: /*The rest of the characters*/ + leditInt->cmdIndex++; /* More commands will follow */ + /*lint -fallthrough */ + case LEDIT_CHAR_TERMINATED: /* '\0' */ + return LEDIT_CMPL; + + /* illegal characters */ +#if 0 + case LEDIT_CHAR_COMMA: /* ',' */ + case LEDIT_CHAR_NUMBER: /* '0' symbolic for 0..9 */ + case LEDIT_CHAR_SEPARATOR: /* ';' */ + case LEDIT_CHAR_SET: /* '=' */ + case LEDIT_CHAR_READ: /* '?' */ + case LEDIT_CHAR_INVALID: +#endif + default: + { + return LEDIT_FAIL; + } + } + } + else + { + TRACE_ERROR ("ledit_split: unexp. EOF execBuffer"); + } + return LEDIT_FAIL; +} + +/* ++--------------------------------------------------------------------+ +| PROJECT : GSM-F&D (8411) MODULE : LINE_EDIT_LIB | +| STATE : code ROUTINE : ledit_restore_dial_string | ++--------------------------------------------------------------------+ + + PURPOSE : - + If there were any 'g' or 'i' characters in a dial string that have + been turned into 'G' or 'I' characters on conversion to upper case + by the ledit_collect function... + Turn them back into the lower case characters so that they affect + CUG and CLIR in the way they were intended to. +*/ +static T_LEDIT_RSLT ledit_restore_dial_string (char *procDialString, + int procDialStringLen, + char *origCommandLine, + int origCommandLineLen) +{ + int procDialStringIndex = 0; /* Loop index to procDialString array */ + int origCommandLineIndex = 0; /* Loop index to origCommandLine array */ + char *origDialString; /* Pointer to original dial string array in origCommandLine */ + int origDialStringIndex; /* Loop index to origDialString array */ + + TRACE_FUNCTION("ledit_restore_dial_string"); + + if ((procDialString == NULL) OR + (procDialStringLen == 0) OR + (origCommandLine == NULL) OR + (origCommandLineLen == 0)) + { + TRACE_ERROR("FAILURE: Invalid parameter"); + if (procDialString == NULL) + TRACE_EVENT_P1("procDialString = %p", procDialString); + if (procDialStringLen == 0) + TRACE_EVENT_P1("procDialStringLen = %d", procDialStringLen); + if (origCommandLine == NULL) + TRACE_EVENT_P1("origCommandLine = %p", origCommandLine); + if (origCommandLineLen == 0) + TRACE_EVENT_P1("origCommandLineLen = %d", origCommandLineLen); + return LEDIT_FAIL; + } + + /* Look for a 'G' or 'I' character in the processed dial string */ + for (procDialStringIndex = 0; + procDialStringIndex < procDialStringLen; + procDialStringIndex++) + { + if ((procDialString[procDialStringIndex] EQ 'G') OR + (procDialString[procDialStringIndex] EQ 'I')) + { + /* 'G' or 'I' found, so we have something to do */ + break; + } + } + + if (procDialStringIndex EQ procDialStringLen) + { + /* No 'G' or 'I' found, so we have nothing to do */ + TRACE_EVENT("SUCCESS: Nothing to do"); + return LEDIT_CMPL; + } + + /* + * Look for the start of the original dial string in the original command + * line by looking for 'd' or 'D' characters + */ + for (origCommandLineIndex = 0; + origCommandLineIndex < origCommandLineLen; + origCommandLineIndex++) + { + if ((origCommandLine[origCommandLineIndex] EQ 'd') OR + (origCommandLine[origCommandLineIndex] EQ 'D')) + { + /* Found the possible start of the original dial string */ + origDialString = &origCommandLine[origCommandLineIndex+1]; + origDialStringIndex = 0; + + for (procDialStringIndex = 0; + procDialStringIndex < procDialStringLen; + procDialStringIndex++) + { + /* Ignore any spaces in the original dial string */ + while (isspace(origDialString[origDialStringIndex])) + { + origDialStringIndex++; + } + + /* Do we have a matching character? */ + if (origDialString[origDialStringIndex] NEQ procDialString[procDialStringIndex]) + { + /* No: Is the mismatch just on the alphabetic case? */ + if (isalpha(origDialString[origDialStringIndex]) AND + isalpha(procDialString[procDialStringIndex]) AND + (toupper(origDialString[origDialStringIndex]) EQ + toupper(procDialString[procDialStringIndex]))) + { + /* Yes, so ignore mismatch */; + } + else + { /* No, so not the original dial string */ + break; + } + } + origDialStringIndex++; + } + + /* Have we found the original dial string? */ + if (procDialStringIndex EQ procDialStringLen) + { + /* Yes, so copy 'G'/'g' and 'I'/'i' characters from the original dial string */ + origDialStringIndex = 0; + for (procDialStringIndex = 0; + procDialStringIndex < procDialStringLen; + procDialStringIndex++) + { + /* Ignore any spaces in the original dial string */ + while (isspace(origDialString[origDialStringIndex])) + { + origDialStringIndex++; + } + + if ((procDialString[procDialStringIndex] EQ 'G') OR + (procDialString[procDialStringIndex] EQ 'I')) + { /* Copy the 'G'/'g' or 'I'/'i' character from the original dial string */ + procDialString[procDialStringIndex] = origDialString[origDialStringIndex]; + } + origDialStringIndex++; + } + + TRACE_EVENT("SUCCESS"); + return LEDIT_CMPL; + } + } + } + /* If we get this far then we haven't found the original dial string */ + TRACE_ERROR("FAILURE: Could not find original dial string"); + return LEDIT_FAIL; +} + +