git.gag.com Git - fw/openocd/blob - src/svf/svf.c

   1 /***************************************************************************
   2  *       Copyright (C) 2009 by Simon Qian                                                                          *
   3  *       SimonQian@SimonQian.com                                                                                           *
   4  *                                                                         *
   5  *       This program is free software; you can redistribute it and/or modify  *
   6  *       it under the terms of the GNU General Public License as published by  *
   7  *       the Free Software Foundation; either version 2 of the License, or         *
   8  *       (at your option) any later version.                                                               *
   9  *                                                                                                                                                 *
  10  *       This program is distributed in the hope that it will be useful,           *
  11  *       but WITHOUT ANY WARRANTY; without even the implied warranty of            *
  12  *       MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the             *
  13  *       GNU General Public License for more details.                                              *
  14  *                                                                                                                                                 *
  15  *       You should have received a copy of the GNU General Public License         *
  16  *       along with this program; if not, write to the                                             *
  17  *       Free Software Foundation, Inc.,                                                                           *
  18  *       59 Temple Place - Suite 330, Boston, MA  02111-1307, USA.                         *
  19  ***************************************************************************/
  20
  21
  22 /* The specification for SVF is available here:
  23  * http://www.asset-intertech.com/support/svf.pdf
  24  * Below, this document is refered to as the "SVF spec".
  25  *
  26  * The specification for XSVF is available here:
  27  * http://www.xilinx.com/support/documentation/application_notes/xapp503.pdf
  28  * Below, this document is refered to as the "XSVF spec".
  29  */
  30
  31 #ifdef HAVE_CONFIG_H
  32 #include "config.h"
  33 #endif
  34
  35 #include "svf.h"
  36 #include "jtag.h"
  37 #include "time_support.h"
  38
  39
  40 // SVF command
  41 typedef enum
  42 {
  43         ENDDR,
  44         ENDIR,
  45         FREQUENCY,
  46         HDR,
  47         HIR,
  48         PIO,
  49         PIOMAP,
  50         RUNTEST,
  51         SDR,
  52         SIR,
  53         STATE,
  54         TDR,
  55         TIR,
  56         TRST,
  57 }svf_command_t;
  58
  59 const char *svf_command_name[14] =
  60 {
  61         "ENDDR",
  62         "ENDIR",
  63         "FREQUENCY",
  64         "HDR",
  65         "HIR",
  66         "PIO",
  67         "PIOMAP",
  68         "RUNTEST",
  69         "SDR",
  70         "SIR",
  71         "STATE",
  72         "TDR",
  73         "TIR",
  74         "TRST"
  75 };
  76
  77 typedef enum
  78 {
  79         TRST_ON,
  80         TRST_OFF,
  81         TRST_Z,
  82         TRST_ABSENT
  83 }trst_mode_t;
  84
  85 const char *svf_trst_mode_name[4] =
  86 {
  87         "ON",
  88         "OFF",
  89         "Z",
  90         "ABSENT"
  91 };
  92
  93 char *svf_tap_state_name[TAP_NUM_STATES];
  94
  95 #define XXR_TDI                                         (1 << 0)
  96 #define XXR_TDO                                         (1 << 1)
  97 #define XXR_MASK                                        (1 << 2)
  98 #define XXR_SMASK                                       (1 << 3)
  99 typedef struct
 100 {
 101         int len;
 102         int data_mask;
 103         u8 *tdi;
 104         u8 *tdo;
 105         u8 *mask;
 106         u8 *smask;
 107 }svf_xxr_para_t;
 108
 109 typedef struct
 110 {
 111         float frequency;
 112         tap_state_t ir_end_state;
 113         tap_state_t dr_end_state;
 114         tap_state_t runtest_run_state;
 115         tap_state_t runtest_end_state;
 116         trst_mode_t trst_mode;
 117
 118         svf_xxr_para_t hir_para;
 119         svf_xxr_para_t hdr_para;
 120         svf_xxr_para_t tir_para;
 121         svf_xxr_para_t tdr_para;
 122         svf_xxr_para_t sir_para;
 123         svf_xxr_para_t sdr_para;
 124 }svf_para_t;
 125
 126 svf_para_t svf_para;
 127 const svf_para_t svf_para_init =
 128 {
 129 //      frequency,      ir_end_state,   dr_end_state,   runtest_run_state,      runtest_end_state,      trst_mode
 130         0,                      TAP_IDLE,               TAP_IDLE,               TAP_IDLE,                       TAP_IDLE,                       TRST_Z,
 131 //      hir_para
 132 //      {len,   data_mask,      tdi,    tdo,    mask,   smask},
 133         {0,             0,                      NULL,   NULL,   NULL,   NULL},
 134 //      hdr_para
 135 //      {len,   data_mask,      tdi,    tdo,    mask,   smask},
 136         {0,             0,                      NULL,   NULL,   NULL,   NULL},
 137 //      tir_para
 138 //      {len,   data_mask,      tdi,    tdo,    mask,   smask},
 139         {0,             0,                      NULL,   NULL,   NULL,   NULL},
 140 //      tdr_para
 141 //      {len,   data_mask,      tdi,    tdo,    mask,   smask},
 142         {0,             0,                      NULL,   NULL,   NULL,   NULL},
 143 //      sir_para
 144 //      {len,   data_mask,      tdi,    tdo,    mask,   smask},
 145         {0,             0,                      NULL,   NULL,   NULL,   NULL},
 146 //      sdr_para
 147 //      {len,   data_mask,      tdi,    tdo,    mask,   smask},
 148         {0,             0,                      NULL,   NULL,   NULL,   NULL},
 149 };
 150
 151 typedef struct
 152 {
 153         int line_num;           // used to record line number of the check operation
 154                                                 // so more information could be printed
 155         int enabled;            // check is enabled or not
 156         int buffer_offset;      // buffer_offset to buffers
 157         int bit_len;            // bit length to check
 158 }svf_check_tdo_para_t;
 159
 160 #define SVF_CHECK_TDO_PARA_SIZE 1024
 161 static svf_check_tdo_para_t *svf_check_tdo_para = NULL;
 162 static int svf_check_tdo_para_index = 0;
 163
 164 #define dimof(a)                                        (sizeof(a) / sizeof((a)[0]))
 165
 166 static int svf_read_command_from_file(int fd);
 167 static int svf_check_tdo(void);
 168 static int svf_add_check_para(u8 enabled, int buffer_offset, int bit_len);
 169 static int svf_run_command(struct command_context_s *cmd_ctx, char *cmd_str);
 170 static int handle_svf_command(struct command_context_s *cmd_ctx, char *cmd, char **args, int argc);
 171
 172 static int svf_fd = 0;
 173 static char *svf_command_buffer = NULL;
 174 static int svf_command_buffer_size = 0;
 175 static int svf_line_number = 1;
 176
 177 static jtag_tap_t *tap = NULL;
 178 static tap_state_t last_state = TAP_RESET;
 179
 180 #define SVF_MAX_BUFFER_SIZE_TO_COMMIT   (4 * 1024)
 181 static u8 *svf_tdi_buffer = NULL, *svf_tdo_buffer = NULL, *svf_mask_buffer = NULL;
 182 static int svf_buffer_index = 0, svf_buffer_size = 0;
 183 static int svf_quiet = 0;
 184
 185
 186 int svf_register_commands(struct command_context_s *cmd_ctx)
 187 {
 188         register_command(cmd_ctx, NULL, "svf", handle_svf_command,
 189                 COMMAND_EXEC, "run svf <file>");
 190
 191         return ERROR_OK;
 192 }
 193
 194 void svf_free_xxd_para(svf_xxr_para_t *para)
 195 {
 196         if (NULL != para)
 197         {
 198                 if (para->tdi != NULL)
 199                 {
 200                         free(para->tdi);
 201                         para->tdi = NULL;
 202                 }
 203                 if (para->tdo != NULL)
 204                 {
 205                         free(para->tdo);
 206                         para->tdo = NULL;
 207                 }
 208                 if (para->mask != NULL)
 209                 {
 210                         free(para->mask);
 211                         para->mask = NULL;
 212                 }
 213                 if (para->smask != NULL)
 214                 {
 215                         free(para->smask);
 216                         para->smask = NULL;
 217                 }
 218         }
 219 }
 220
 221 static int handle_svf_command(struct command_context_s *cmd_ctx, char *cmd, char **args, int argc)
 222 {
 223 #define SVF_NUM_OF_OPTIONS                      1
 224         int command_num = 0, i;
 225         int ret = ERROR_OK;
 226         long long time_ago;
 227
 228         if ((argc < 1) || (argc > (1 + SVF_NUM_OF_OPTIONS)))
 229         {
 230                 command_print(cmd_ctx, "usage: svf <file> [quiet]");
 231                 return ERROR_FAIL;
 232         }
 233
 234         // parse variant
 235         svf_quiet = 0;
 236         for (i = 1; i < argc; i++)
 237         {
 238                 if (!strcmp(args[i], "quiet"))
 239                 {
 240                         svf_quiet = 1;
 241                 }
 242                 else
 243                 {
 244                         LOG_ERROR("unknown variant for svf: %s", args[i]);
 245
 246                         // no need to free anything now
 247                         return ERROR_FAIL;
 248                 }
 249         }
 250
 251         if ((svf_fd = open(args[0], O_RDONLY)) < 0)
 252         {
 253                 command_print(cmd_ctx, "file \"%s\" not found", args[0]);
 254
 255                 // no need to free anything now
 256                 return ERROR_FAIL;
 257         }
 258
 259         LOG_USER("svf processing file: \"%s\"", args[0]);
 260
 261         // get time
 262         time_ago = timeval_ms();
 263
 264         // init
 265         svf_line_number = 1;
 266         svf_command_buffer_size = 0;
 267
 268         svf_check_tdo_para_index = 0;
 269         svf_check_tdo_para = malloc(sizeof(svf_check_tdo_para_t) * SVF_CHECK_TDO_PARA_SIZE);
 270         if (NULL == svf_check_tdo_para)
 271         {
 272                 LOG_ERROR("not enough memory");
 273                 ret = ERROR_FAIL;
 274                 goto free_all;
 275         }
 276
 277         svf_buffer_index = 0;
 278         // double the buffer size
 279         // in case current command cannot be commited, and next command is a bit scan command
 280         // here is 32K bits for this big scan command, it should be enough
 281         // buffer will be reallocated if buffer size is not enough
 282         svf_tdi_buffer = (u8 *)malloc(2 * SVF_MAX_BUFFER_SIZE_TO_COMMIT);
 283         if (NULL == svf_tdi_buffer)
 284         {
 285                 LOG_ERROR("not enough memory");
 286                 ret = ERROR_FAIL;
 287                 goto free_all;
 288         }
 289         svf_tdo_buffer = (u8 *)malloc(2 * SVF_MAX_BUFFER_SIZE_TO_COMMIT);
 290         if (NULL == svf_tdo_buffer)
 291         {
 292                 LOG_ERROR("not enough memory");
 293                 ret = ERROR_FAIL;
 294                 goto free_all;
 295         }
 296         svf_mask_buffer = (u8 *)malloc(2 * SVF_MAX_BUFFER_SIZE_TO_COMMIT);
 297         if (NULL == svf_mask_buffer)
 298         {
 299                 LOG_ERROR("not enough memory");
 300                 ret = ERROR_FAIL;
 301                 goto free_all;
 302         }
 303         svf_buffer_size = 2 * SVF_MAX_BUFFER_SIZE_TO_COMMIT;
 304
 305         memcpy(&svf_para, &svf_para_init, sizeof(svf_para));
 306         for (i = 0; i < (int)dimof(svf_tap_state_name); i++)
 307         {
 308                 svf_tap_state_name[i] = (char *)tap_state_name(i);
 309         }
 310         // TAP_RESET
 311         jtag_add_tlr();
 312
 313         while ( ERROR_OK == svf_read_command_from_file(svf_fd) )
 314         {
 315                 if (ERROR_OK != svf_run_command(cmd_ctx, svf_command_buffer))
 316                 {
 317                         LOG_ERROR("fail to run command at line %d", svf_line_number);
 318                         ret = ERROR_FAIL;
 319                         break;
 320                 }
 321                 command_num++;
 322         }
 323         if (ERROR_OK != jtag_execute_queue())
 324         {
 325                 ret = ERROR_FAIL;
 326         }
 327         else if (ERROR_OK != svf_check_tdo())
 328         {
 329                 ret = ERROR_FAIL;
 330         }
 331
 332         // print time
 333         command_print(cmd_ctx, "%lld ms used", timeval_ms() - time_ago);
 334
 335 free_all:
 336
 337         close(svf_fd);
 338         svf_fd = 0;
 339
 340         // free buffers
 341         if (svf_command_buffer)
 342         {
 343                 free(svf_command_buffer);
 344                 svf_command_buffer = NULL;
 345                 svf_command_buffer_size = 0;
 346         }
 347         if (svf_check_tdo_para)
 348         {
 349                 free(svf_check_tdo_para);
 350                 svf_check_tdo_para = NULL;
 351                 svf_check_tdo_para_index = 0;
 352         }
 353         if (svf_tdi_buffer)
 354         {
 355                 free(svf_tdi_buffer);
 356                 svf_tdi_buffer = NULL;
 357         }
 358         if (svf_tdo_buffer)
 359         {
 360                 free(svf_tdo_buffer);
 361                 svf_tdo_buffer = NULL;
 362         }
 363         if (svf_mask_buffer)
 364         {
 365                 free(svf_mask_buffer);
 366                 svf_mask_buffer = NULL;
 367         }
 368         svf_buffer_index = 0;
 369         svf_buffer_size = 0;
 370
 371         svf_free_xxd_para(&svf_para.hdr_para);
 372         svf_free_xxd_para(&svf_para.hir_para);
 373         svf_free_xxd_para(&svf_para.tdr_para);
 374         svf_free_xxd_para(&svf_para.tir_para);
 375         svf_free_xxd_para(&svf_para.sdr_para);
 376         svf_free_xxd_para(&svf_para.sir_para);
 377
 378         if (ERROR_OK == ret)
 379         {
 380                 command_print(cmd_ctx, "svf file programmed successfully for %d commands", command_num);
 381         }
 382         else
 383         {
 384                 command_print(cmd_ctx, "svf file programmed failed");
 385         }
 386
 387         return ret;
 388 }
 389
 390 #define SVFP_CMD_INC_CNT                        1024
 391 static int svf_read_command_from_file(int fd)
 392 {
 393         char ch, *tmp_buffer = NULL;
 394         int cmd_pos = 0, cmd_ok = 0, slash = 0, comment = 0;
 395
 396         while (!cmd_ok && (read(fd, &ch, 1) > 0) )
 397         {
 398                 switch(ch)
 399                 {
 400                 case '!':
 401                         slash = 0;
 402                         comment = 1;
 403                         break;
 404                 case '/':
 405                         if (++slash == 2)
 406                         {
 407                                 comment = 1;
 408                         }
 409                         break;
 410                 case ';':
 411                         slash = 0;
 412                         if (!comment)
 413                         {
 414                                 cmd_ok = 1;
 415                         }
 416                         break;
 417                 case '\n':
 418                         svf_line_number++;
 419                 case '\r':
 420                         slash = 0;
 421                         comment = 0;
 422                         break;
 423                 default:
 424                         if (!comment)
 425                         {
 426                                 if (cmd_pos >= svf_command_buffer_size - 1)
 427                                 {
 428                                         tmp_buffer = (char*)malloc(svf_command_buffer_size + SVFP_CMD_INC_CNT);         // 1 more byte for '\0'
 429                                         if (NULL == tmp_buffer)
 430                                         {
 431                                                 LOG_ERROR("not enough memory");
 432                                                 return ERROR_FAIL;
 433                                         }
 434                                         if (svf_command_buffer_size > 0)
 435                                         {
 436                                                 memcpy(tmp_buffer, svf_command_buffer, svf_command_buffer_size);
 437                                         }
 438                                         if (svf_command_buffer != NULL)
 439                                         {
 440                                                 free(svf_command_buffer);
 441                                         }
 442                                         svf_command_buffer = tmp_buffer;
 443                                         svf_command_buffer_size += SVFP_CMD_INC_CNT;
 444                                         tmp_buffer = NULL;
 445                                 }
 446                                 svf_command_buffer[cmd_pos++] = (char)toupper(ch);
 447                         }
 448                         break;
 449                 }
 450         }
 451
 452         if (cmd_ok)
 453         {
 454                 svf_command_buffer[cmd_pos] = '\0';
 455                 return ERROR_OK;
 456         }
 457         else
 458         {
 459                 return ERROR_FAIL;
 460         }
 461 }
 462
 463 static int svf_parse_cmd_string(char *str, int len, char **argus, int *num_of_argu)
 464 {
 465         int pos = 0, num = 0, space_found = 1;
 466
 467         while (pos < len)
 468         {
 469                 switch(str[pos])
 470                 {
 471                 case '\n':
 472                 case '\r':
 473                 case '!':
 474                 case '/':
 475                         LOG_ERROR("fail to parse svf command");
 476                         return ERROR_FAIL;
 477                         break;
 478                 case ' ':
 479                         space_found = 1;
 480                         str[pos] = '\0';
 481                         break;
 482                 default:
 483                         if (space_found)
 484                         {
 485                                 argus[num++] = &str[pos];
 486                                 space_found = 0;
 487                         }
 488                         break;
 489                 }
 490                 pos++;
 491         }
 492
 493         *num_of_argu = num;
 494
 495         return ERROR_OK;
 496 }
 497
 498 static int svf_tap_state_is_stable(tap_state_t state)
 499 {
 500         return ((TAP_RESET == state) || (TAP_IDLE == state) || (TAP_DRPAUSE == state) || (TAP_IRPAUSE == state));
 501 }
 502
 503 static int svf_tap_state_is_valid(tap_state_t state)
 504 {
 505         return state >= 0 && state < TAP_NUM_STATES;
 506 }
 507
 508 static int svf_find_string_in_array(char *str, char **strs, int num_of_element)
 509 {
 510         int i;
 511
 512         for (i = 0; i < num_of_element; i++)
 513         {
 514                 if (!strcmp(str, strs[i]))
 515                 {
 516                         return i;
 517                 }
 518         }
 519         return 0xFF;
 520 }
 521
 522 static int svf_adjust_array_length(u8 **arr, int orig_bit_len, int new_bit_len)
 523 {
 524         int new_byte_len = (new_bit_len + 7) >> 3;
 525
 526         if ((NULL == *arr) || (((orig_bit_len + 7) >> 3) < ((new_bit_len + 7) >> 3)))
 527         {
 528                 if (*arr != NULL)
 529                 {
 530                         free(*arr);
 531                         *arr = NULL;
 532                 }
 533                 *arr = (u8*)malloc(new_byte_len);
 534                 if (NULL == *arr)
 535                 {
 536                         LOG_ERROR("not enough memory");
 537                         return ERROR_FAIL;
 538                 }
 539                 memset(*arr, 0, new_byte_len);
 540         }
 541         return ERROR_OK;
 542 }
 543
 544 static int svf_copy_hexstring_to_binary(char *str, u8 **bin, int orig_bit_len, int bit_len)
 545 {
 546         int i, str_len = strlen(str), str_byte_len = (bit_len + 3) >> 2, loop_cnt;
 547         u8 ch, need_write = 1;
 548
 549         if (ERROR_OK != svf_adjust_array_length(bin, orig_bit_len, bit_len))
 550         {
 551                 LOG_ERROR("fail to adjust length of array");
 552                 return ERROR_FAIL;
 553         }
 554
 555         if (str_byte_len > str_len)
 556         {
 557                 loop_cnt = str_byte_len;
 558         }
 559         else
 560         {
 561                 loop_cnt = str_len;
 562         }
 563
 564         for (i = 0; i < loop_cnt; i++)
 565         {
 566                 if (i < str_len)
 567                 {
 568                         ch = str[str_len - i - 1];
 569                         if ((ch >= '0') && (ch <= '9'))
 570                         {
 571                                 ch = ch - '0';
 572                         }
 573                         else if ((ch >= 'A') && (ch <= 'F'))
 574                         {
 575                                 ch = ch - 'A' + 10;
 576                         }
 577                         else
 578                         {
 579                                 LOG_ERROR("invalid hex string");
 580                                 return ERROR_FAIL;
 581                         }
 582                 }
 583                 else
 584                 {
 585                         ch = 0;
 586                 }
 587
 588                 // check valid
 589                 if (i >= str_byte_len)
 590                 {
 591                         // all data written, other data should be all '0's and needn't to be written
 592                         need_write = 0;
 593                         if (ch != 0)
 594                         {
 595                                 LOG_ERROR("value execede length");
 596                                 return ERROR_FAIL;
 597                         }
 598                 }
 599                 else if (i == (str_byte_len - 1))
 600                 {
 601                         // last data byte, written if valid
 602                         if ((ch & ~((1 << (bit_len - 4 * i)) - 1)) != 0)
 603                         {
 604                                 LOG_ERROR("value execede length");
 605                                 return ERROR_FAIL;
 606                         }
 607                 }
 608
 609                 if (need_write)
 610                 {
 611                         // write bin
 612                         if (i % 2)
 613                         {
 614                                 // MSB
 615                                 (*bin)[i / 2] |= ch << 4;
 616                         }
 617                         else
 618                         {
 619                                 // LSB
 620                                 (*bin)[i / 2] = 0;
 621                                 (*bin)[i / 2] |= ch;
 622                         }
 623                 }
 624         }
 625
 626         return ERROR_OK;
 627 }
 628
 629 static int svf_check_tdo(void)
 630 {
 631         int i, len, index;
 632
 633         for (i = 0; i < svf_check_tdo_para_index; i++)
 634         {
 635                 index = svf_check_tdo_para[i].buffer_offset;
 636                 len = svf_check_tdo_para[i].bit_len;
 637                 if ((svf_check_tdo_para[i].enabled)
 638                         && buf_cmp_mask(&svf_tdi_buffer[index], &svf_tdo_buffer[index], &svf_mask_buffer[index], len))
 639                 {
 640                         unsigned bitmask;
 641                         unsigned received, expected, tapmask;
 642                         if (svf_check_tdo_para[i].bit_len >= 32)
 643                         {
 644                                 bitmask = 0xFFFFFFFF;
 645                         }
 646                         else
 647                         {
 648                                 bitmask = (1 << svf_check_tdo_para[i].bit_len) - 1;
 649                         }
 650                         memcpy(&received, svf_tdi_buffer + index, sizeof(unsigned));
 651                         memcpy(&expected, svf_tdo_buffer + index, sizeof(unsigned));
 652                         memcpy(&tapmask, svf_mask_buffer + index, sizeof(unsigned));
 653                         LOG_ERROR("tdo check error at line %d",
 654                                           svf_check_tdo_para[i].line_num);
 655                         LOG_ERROR("read = 0x%X, want = 0x%X, mask = 0x%X",
 656                                           received & bitmask,
 657                                           expected & bitmask,
 658                                           tapmask & bitmask);
 659                         return ERROR_FAIL;
 660                 }
 661         }
 662         svf_check_tdo_para_index = 0;
 663
 664         return ERROR_OK;
 665 }
 666
 667 static int svf_add_check_para(u8 enabled, int buffer_offset, int bit_len)
 668 {
 669         if (svf_check_tdo_para_index >= SVF_CHECK_TDO_PARA_SIZE)
 670         {
 671                 LOG_ERROR("toooooo many operation undone");
 672                 return ERROR_FAIL;
 673         }
 674
 675         svf_check_tdo_para[svf_check_tdo_para_index].line_num = svf_line_number;
 676         svf_check_tdo_para[svf_check_tdo_para_index].bit_len = bit_len;
 677         svf_check_tdo_para[svf_check_tdo_para_index].enabled = enabled;
 678         svf_check_tdo_para[svf_check_tdo_para_index].buffer_offset = buffer_offset;
 679         svf_check_tdo_para_index++;
 680
 681         return ERROR_OK;
 682 }
 683
 684 static int svf_execute_tap(void)
 685 {
 686         if (ERROR_OK != jtag_execute_queue())
 687         {
 688                 return ERROR_FAIL;
 689         }
 690         else if (ERROR_OK != svf_check_tdo())
 691         {
 692                 return ERROR_FAIL;
 693         }
 694
 695         svf_buffer_index = 0;
 696
 697         return ERROR_OK;
 698 }
 699
 700 // not good to use this
 701 extern void* cmd_queue_alloc(size_t size);
 702 extern void jtag_queue_command(jtag_command_t * cmd);
 703
 704 static int svf_run_command(struct command_context_s *cmd_ctx, char *cmd_str)
 705 {
 706         char *argus[256], command;
 707         int num_of_argu = 0, i;
 708
 709         // tmp variable
 710         int i_tmp;
 711
 712         // for RUNTEST
 713         int run_count;
 714         float min_time, max_time;
 715         // for XXR
 716         svf_xxr_para_t *xxr_para_tmp;
 717         u8 **pbuffer_tmp;
 718         scan_field_t field;
 719         // for STATE
 720         tap_state_t *path = NULL, state;
 721
 722         if (!svf_quiet)
 723         {
 724                 LOG_USER("%s", svf_command_buffer);
 725         }
 726
 727         if (ERROR_OK != svf_parse_cmd_string(cmd_str, strlen(cmd_str), argus, &num_of_argu))
 728         {
 729                 return ERROR_FAIL;
 730         }
 731
 732         command = svf_find_string_in_array(argus[0], (char **)svf_command_name, dimof(svf_command_name));
 733         switch(command)
 734         {
 735         case ENDDR:
 736         case ENDIR:
 737                 if (num_of_argu != 2)
 738                 {
 739                         LOG_ERROR("invalid parameter of %s", argus[0]);
 740                         return ERROR_FAIL;
 741                 }
 742                 i_tmp = svf_find_string_in_array(argus[1], (char **)svf_tap_state_name, dimof(svf_tap_state_name));
 743                 if (svf_tap_state_is_stable(i_tmp))
 744                 {
 745                         if (command == ENDIR)
 746                         {
 747                                 svf_para.ir_end_state = i_tmp;
 748                                 LOG_DEBUG("\tir_end_state = %s", svf_tap_state_name[svf_para.ir_end_state]);
 749                         }
 750                         else
 751                         {
 752                                 svf_para.dr_end_state = i_tmp;
 753                                 LOG_DEBUG("\tdr_end_state = %s", svf_tap_state_name[svf_para.dr_end_state]);
 754                         }
 755                 }
 756                 else
 757                 {
 758                         LOG_ERROR("%s is not valid state", argus[1]);
 759                         return ERROR_FAIL;
 760                 }
 761                 break;
 762         case FREQUENCY:
 763                 if ((num_of_argu != 1) && (num_of_argu != 3))
 764                 {
 765                         LOG_ERROR("invalid parameter of %s", argus[0]);
 766                         return ERROR_FAIL;
 767                 }
 768                 if (1 == num_of_argu)
 769                 {
 770                         // TODO: set jtag speed to full speed
 771                         svf_para.frequency = 0;
 772                 }
 773                 else
 774                 {
 775                         if (strcmp(argus[2], "HZ"))
 776                         {
 777                                 LOG_ERROR("HZ not found in FREQUENCY command");
 778                                 return ERROR_FAIL;
 779                         }
 780                         if (ERROR_OK != svf_execute_tap())
 781                         {
 782                                 return ERROR_FAIL;
 783                         }
 784                         svf_para.frequency = atof(argus[1]);
 785                         // TODO: set jtag speed to
 786                         if (svf_para.frequency > 0)
 787                         {
 788                                 command_run_linef(cmd_ctx, "jtag_khz %d", (int)svf_para.frequency / 1000);
 789                                 LOG_DEBUG("\tfrequency = %f", svf_para.frequency);
 790                         }
 791                 }
 792                 break;
 793         case HDR:
 794                 xxr_para_tmp = &svf_para.hdr_para;
 795                 goto XXR_common;
 796         case HIR:
 797                 xxr_para_tmp = &svf_para.hir_para;
 798                 goto XXR_common;
 799         case TDR:
 800                 xxr_para_tmp = &svf_para.tdr_para;
 801                 goto XXR_common;
 802         case TIR:
 803                 xxr_para_tmp = &svf_para.tir_para;
 804                 goto XXR_common;
 805         case SDR:
 806                 xxr_para_tmp = &svf_para.sdr_para;
 807                 goto XXR_common;
 808         case SIR:
 809                 xxr_para_tmp = &svf_para.sir_para;
 810                 goto XXR_common;
 811                 XXR_common:
 812                 // XXR length [TDI (tdi)] [TDO (tdo)][MASK (mask)] [SMASK (smask)]
 813                 if ((num_of_argu > 10) || (num_of_argu % 2))
 814                 {
 815                         LOG_ERROR("invalid parameter of %s", argus[0]);
 816                         return ERROR_FAIL;
 817                 }
 818                 i_tmp = xxr_para_tmp->len;
 819                 xxr_para_tmp->len = atoi(argus[1]);
 820                 LOG_DEBUG("\tlength = %d", xxr_para_tmp->len);
 821                 xxr_para_tmp->data_mask = 0;
 822                 for (i = 2; i < num_of_argu; i += 2)
 823                 {
 824                         if ((strlen(argus[i + 1]) < 3) || (argus[i + 1][0] != '(') || (argus[i + 1][strlen(argus[i + 1]) - 1] != ')'))
 825                         {
 826                                 LOG_ERROR("data section error");
 827                                 return ERROR_FAIL;
 828                         }
 829                         argus[i + 1][strlen(argus[i + 1]) - 1] = '\0';
 830                         // TDI, TDO, MASK, SMASK
 831                         if (!strcmp(argus[i], "TDI"))
 832                         {
 833                                 // TDI
 834                                 pbuffer_tmp = &xxr_para_tmp->tdi;
 835                                 xxr_para_tmp->data_mask |= XXR_TDI;
 836                         }
 837                         else if (!strcmp(argus[i], "TDO"))
 838                         {
 839                                 // TDO
 840                                 pbuffer_tmp = &xxr_para_tmp->tdo;
 841                                 xxr_para_tmp->data_mask |= XXR_TDO;
 842                         }
 843                         else if (!strcmp(argus[i], "MASK"))
 844                         {
 845                                 // MASK
 846                                 pbuffer_tmp = &xxr_para_tmp->mask;
 847                                 xxr_para_tmp->data_mask |= XXR_MASK;
 848                         }
 849                         else if (!strcmp(argus[i], "SMASK"))
 850                         {
 851                                 // SMASK
 852                                 pbuffer_tmp = &xxr_para_tmp->smask;
 853                                 xxr_para_tmp->data_mask |= XXR_SMASK;
 854                         }
 855                         else
 856                         {
 857                                 LOG_ERROR("unknow parameter: %s", argus[i]);
 858                                 return ERROR_FAIL;
 859                         }
 860                         if (ERROR_OK != svf_copy_hexstring_to_binary(&argus[i + 1][1], pbuffer_tmp, i_tmp, xxr_para_tmp->len))
 861                         {
 862                                 LOG_ERROR("fail to parse hex value");
 863                                 return ERROR_FAIL;
 864                         }
 865                         LOG_DEBUG("\t%s = 0x%X", argus[i], (**(int**)pbuffer_tmp) & ((1 << (xxr_para_tmp->len)) - 1));
 866                 }
 867                 // If a command changes the length of the last scan of the same type and the MASK parameter is absent,
 868                 // the mask pattern used is all cares
 869                 if (!(xxr_para_tmp->data_mask & XXR_MASK) && (i_tmp != xxr_para_tmp->len))
 870                 {
 871                         // MASK not defined and length changed
 872                         if (ERROR_OK != svf_adjust_array_length(&xxr_para_tmp->mask, i_tmp, xxr_para_tmp->len))
 873                         {
 874                                 LOG_ERROR("fail to adjust length of array");
 875                                 return ERROR_FAIL;
 876                         }
 877                         buf_set_ones(xxr_para_tmp->mask, xxr_para_tmp->len);
 878                 }
 879                 // do scan if necessary
 880                 if (SDR == command)
 881                 {
 882                         // check buffer size first, reallocate if necessary
 883                         i = svf_para.hdr_para.len + svf_para.sdr_para.len + svf_para.tdr_para.len;
 884                         if ((svf_buffer_size - svf_buffer_index) < ((i + 7) >> 3))
 885                         {
 886 #if 1
 887                                 // simply print error message
 888                                 LOG_ERROR("buffer is not enough, report to author");
 889                                 return ERROR_FAIL;
 890 #else
 891                                 u8 *buffer_tmp;
 892
 893                                 // reallocate buffer
 894                                 buffer_tmp = (u8 *)malloc(svf_buffer_index + ((i + 7) >> 3));
 895                                 if (NULL == buffer_tmp)
 896                                 {
 897                                         LOG_ERROR("not enough memory");
 898                                         return ERROR_FAIL;
 899                                 }
 900                                 memcpy(buffer_tmp, svf_tdi_buffer, svf_buffer_index);
 901                                 // svf_tdi_buffer isn't NULL here
 902                                 free(svf_tdi_buffer);
 903                                 svf_tdi_buffer = buffer_tmp;
 904
 905                                 buffer_tmp = (u8 *)malloc(svf_buffer_index + ((i + 7) >> 3));
 906                                 if (NULL == buffer_tmp)
 907                                 {
 908                                         LOG_ERROR("not enough memory");
 909                                         return ERROR_FAIL;
 910                                 }
 911                                 memcpy(buffer_tmp, svf_tdo_buffer, svf_buffer_index);
 912                                 // svf_tdo_buffer isn't NULL here
 913                                 free(svf_tdo_buffer);
 914                                 svf_tdo_buffer = buffer_tmp;
 915
 916                                 buffer_tmp = (u8 *)malloc(svf_buffer_index + ((i + 7) >> 3));
 917                                 if (NULL == buffer_tmp)
 918                                 {
 919                                         LOG_ERROR("not enough memory");
 920                                         return ERROR_FAIL;
 921                                 }
 922                                 memcpy(buffer_tmp, svf_mask_buffer, svf_buffer_index);
 923                                 // svf_mask_buffer isn't NULL here
 924                                 free(svf_mask_buffer);
 925                                 svf_mask_buffer = buffer_tmp;
 926
 927                                 buffer_tmp = NULL;
 928                                 svf_buffer_size = svf_buffer_index + ((i + 7) >> 3);
 929 #endif
 930                         }
 931
 932                         // assemble dr data
 933                         i = 0;
 934                         buf_set_buf(svf_para.hdr_para.tdi, 0, &svf_tdi_buffer[svf_buffer_index], i, svf_para.hdr_para.len);
 935                         i += svf_para.hdr_para.len;
 936                         buf_set_buf(svf_para.sdr_para.tdi, 0, &svf_tdi_buffer[svf_buffer_index], i, svf_para.sdr_para.len);
 937                         i += svf_para.sdr_para.len;
 938                         buf_set_buf(svf_para.tdr_para.tdi, 0, &svf_tdi_buffer[svf_buffer_index], i, svf_para.tdr_para.len);
 939                         i += svf_para.tdr_para.len;
 940
 941                         // add check data
 942                         if (svf_para.sdr_para.data_mask & XXR_TDO)
 943                         {
 944                                 // assemble dr mask data
 945                                 i = 0;
 946                                 buf_set_buf(svf_para.hdr_para.mask, 0, &svf_mask_buffer[svf_buffer_index], i, svf_para.hdr_para.len);
 947                                 i += svf_para.hdr_para.len;
 948                                 buf_set_buf(svf_para.sdr_para.mask, 0, &svf_mask_buffer[svf_buffer_index], i, svf_para.sdr_para.len);
 949                                 i += svf_para.sdr_para.len;
 950                                 buf_set_buf(svf_para.tdr_para.mask, 0, &svf_mask_buffer[svf_buffer_index], i, svf_para.tdr_para.len);
 951                                 i += svf_para.tdr_para.len;
 952                                 // assemble dr check data
 953                                 i = 0;
 954                                 buf_set_buf(svf_para.hdr_para.tdo, 0, &svf_tdo_buffer[svf_buffer_index], i, svf_para.hdr_para.len);
 955                                 i += svf_para.hdr_para.len;
 956                                 buf_set_buf(svf_para.sdr_para.tdo, 0, &svf_tdo_buffer[svf_buffer_index], i, svf_para.sdr_para.len);
 957                                 i += svf_para.sdr_para.len;
 958                                 buf_set_buf(svf_para.tdr_para.tdo, 0, &svf_tdo_buffer[svf_buffer_index], i, svf_para.tdr_para.len);
 959                                 i += svf_para.tdr_para.len;
 960
 961                                 svf_add_check_para(1, svf_buffer_index, i);
 962                         }
 963                         else
 964                         {
 965                                 svf_add_check_para(0, svf_buffer_index, i);
 966                         }
 967                         field.tap = tap;
 968                         field.num_bits = i;
 969                         field.out_value = &svf_tdi_buffer[svf_buffer_index];
 970
 971                         field.in_value = &svf_tdi_buffer[svf_buffer_index];
 972
 973
 974
 975
 976                         jtag_add_plain_dr_scan(1, &field, svf_para.dr_end_state);
 977
 978                         svf_buffer_index += (i + 7) >> 3;
 979                         last_state = svf_para.dr_end_state;
 980                 }
 981                 else if (SIR == command)
 982                 {
 983                         // check buffer size first, reallocate if necessary
 984                         i = svf_para.hir_para.len + svf_para.sir_para.len + svf_para.tir_para.len;
 985                         if ((svf_buffer_size - svf_buffer_index) < ((i + 7) >> 3))
 986                         {
 987 #if 1
 988                                 // simply print error message
 989                                 LOG_ERROR("buffer is not enough, report to author");
 990                                 return ERROR_FAIL;
 991 #else
 992                                 u8 *buffer_tmp;
 993
 994                                 // reallocate buffer
 995                                 buffer_tmp = (u8 *)malloc(svf_buffer_index + ((i + 7) >> 3));
 996                                 if (NULL == buffer_tmp)
 997                                 {
 998                                         LOG_ERROR("not enough memory");
 999                                         return ERROR_FAIL;
1000                                 }
1001                                 memcpy(buffer_tmp, svf_tdi_buffer, svf_buffer_index);
1002                                 // svf_tdi_buffer isn't NULL here
1003                                 free(svf_tdi_buffer);
1004                                 svf_tdi_buffer = buffer_tmp;
1005
1006                                 buffer_tmp = (u8 *)malloc(svf_buffer_index + ((i + 7) >> 3));
1007                                 if (NULL == buffer_tmp)
1008                                 {
1009                                         LOG_ERROR("not enough memory");
1010                                         return ERROR_FAIL;
1011                                 }
1012                                 memcpy(buffer_tmp, svf_tdo_buffer, svf_buffer_index);
1013                                 // svf_tdo_buffer isn't NULL here
1014                                 free(svf_tdo_buffer);
1015                                 svf_tdo_buffer = buffer_tmp;
1016
1017                                 buffer_tmp = (u8 *)malloc(svf_buffer_index + ((i + 7) >> 3));
1018                                 if (NULL == buffer_tmp)
1019                                 {
1020                                         LOG_ERROR("not enough memory");
1021                                         return ERROR_FAIL;
1022                                 }
1023                                 memcpy(buffer_tmp, svf_mask_buffer, svf_buffer_index);
1024                                 // svf_mask_buffer isn't NULL here
1025                                 free(svf_mask_buffer);
1026                                 svf_mask_buffer = buffer_tmp;
1027
1028                                 buffer_tmp = NULL;
1029                                 svf_buffer_size = svf_buffer_index + ((i + 7) >> 3);
1030 #endif
1031                         }
1032
1033                         // assemble ir data
1034                         i = 0;
1035                         buf_set_buf(svf_para.hir_para.tdi, 0, &svf_tdi_buffer[svf_buffer_index], i, svf_para.hir_para.len);
1036                         i += svf_para.hir_para.len;
1037                         buf_set_buf(svf_para.sir_para.tdi, 0, &svf_tdi_buffer[svf_buffer_index], i, svf_para.sir_para.len);
1038                         i += svf_para.sir_para.len;
1039                         buf_set_buf(svf_para.tir_para.tdi, 0, &svf_tdi_buffer[svf_buffer_index], i, svf_para.tir_para.len);
1040                         i += svf_para.tir_para.len;
1041
1042                         // add check data
1043                         if (svf_para.sir_para.data_mask & XXR_TDO)
1044                         {
1045                                 // assemble dr mask data
1046                                 i = 0;
1047                                 buf_set_buf(svf_para.hir_para.mask, 0, &svf_mask_buffer[svf_buffer_index], i, svf_para.hir_para.len);
1048                                 i += svf_para.hir_para.len;
1049                                 buf_set_buf(svf_para.sir_para.mask, 0, &svf_mask_buffer[svf_buffer_index], i, svf_para.sir_para.len);
1050                                 i += svf_para.sir_para.len;
1051                                 buf_set_buf(svf_para.tir_para.mask, 0, &svf_mask_buffer[svf_buffer_index], i, svf_para.tir_para.len);
1052                                 i += svf_para.tir_para.len;
1053                                 // assemble dr check data
1054                                 i = 0;
1055                                 buf_set_buf(svf_para.hir_para.tdo, 0, &svf_tdo_buffer[svf_buffer_index], i, svf_para.hir_para.len);
1056                                 i += svf_para.hir_para.len;
1057                                 buf_set_buf(svf_para.sir_para.tdo, 0, &svf_tdo_buffer[svf_buffer_index], i, svf_para.sir_para.len);
1058                                 i += svf_para.sir_para.len;
1059                                 buf_set_buf(svf_para.tir_para.tdo, 0, &svf_tdo_buffer[svf_buffer_index], i, svf_para.tir_para.len);
1060                                 i += svf_para.tir_para.len;
1061
1062                                 svf_add_check_para(1, svf_buffer_index, i);
1063                         }
1064                         else
1065                         {
1066                                 svf_add_check_para(0, svf_buffer_index, i);
1067                         }
1068                         field.tap = tap;
1069                         field.num_bits = i;
1070                         field.out_value = &svf_tdi_buffer[svf_buffer_index];
1071
1072                         field.in_value = &svf_tdi_buffer[svf_buffer_index];
1073
1074
1075
1076
1077                         jtag_add_plain_ir_scan(1, &field, svf_para.ir_end_state);
1078
1079                         svf_buffer_index += (i + 7) >> 3;
1080                         last_state = svf_para.ir_end_state;
1081                 }
1082                 break;
1083         case PIO:
1084         case PIOMAP:
1085                 LOG_ERROR("PIO and PIOMAP are not supported");
1086                 return ERROR_FAIL;
1087                 break;
1088         case RUNTEST:
1089                 // RUNTEST [run_state] run_count run_clk [min_time SEC [MAXIMUM max_time SEC]] [ENDSTATE end_state]
1090                 // RUNTEST [run_state] min_time SEC [MAXIMUM max_time SEC] [ENDSTATE end_state]
1091                 if ((num_of_argu < 3) && (num_of_argu > 11))
1092                 {
1093                         LOG_ERROR("invalid parameter of %s", argus[0]);
1094                         return ERROR_FAIL;
1095                 }
1096                 // init
1097                 run_count = 0;
1098                 min_time = 0;
1099                 max_time = 0;
1100                 i = 1;
1101                 // run_state
1102                 i_tmp = svf_find_string_in_array(argus[i], (char **)svf_tap_state_name, dimof(svf_tap_state_name));
1103                 if (svf_tap_state_is_valid(i_tmp))
1104                 {
1105                         if (svf_tap_state_is_stable(i_tmp))
1106                         {
1107                                 svf_para.runtest_run_state = i_tmp;
1108
1109                                 // When a run_state is specified, the new  run_state becomes the default end_state
1110                                 svf_para.runtest_end_state = i_tmp;
1111                                 LOG_DEBUG("\trun_state = %s", svf_tap_state_name[svf_para.runtest_run_state]);
1112                                 i++;
1113                         }
1114                         else
1115                         {
1116                                 LOG_ERROR("%s is not valid state", svf_tap_state_name[i_tmp]);
1117                                 return ERROR_FAIL;
1118                         }
1119                 }
1120                 // run_count run_clk
1121                 if (((i + 2) <= num_of_argu) && strcmp(argus[i + 1], "SEC"))
1122                 {
1123                         if (!strcmp(argus[i + 1], "TCK"))
1124                         {
1125                                 // clock source is TCK
1126                                 run_count = atoi(argus[i]);
1127                                 LOG_DEBUG("\trun_count@TCK = %d", run_count);
1128                         }
1129                         else
1130                         {
1131                                 LOG_ERROR("%s not supported for clock", argus[i + 1]);
1132                                 return ERROR_FAIL;
1133                         }
1134                         i += 2;
1135                 }
1136                 // min_time SEC
1137                 if (((i + 2) <= num_of_argu) && !strcmp(argus[i + 1], "SEC"))
1138                 {
1139                         min_time = atof(argus[i]);
1140                         LOG_DEBUG("\tmin_time = %fs", min_time);
1141                         i += 2;
1142                 }
1143                 // MAXIMUM max_time SEC
1144                 if (((i + 3) <= num_of_argu) && !strcmp(argus[i], "MAXIMUM") && !strcmp(argus[i + 2], "SEC"))
1145                 {
1146                         max_time = atof(argus[i + 1]);
1147                         LOG_DEBUG("\tmax_time = %fs", max_time);
1148                         i += 3;
1149                 }
1150                 // ENDSTATE end_state
1151                 if (((i + 2) <= num_of_argu) && !strcmp(argus[i], "ENDSTATE"))
1152                 {
1153                         i_tmp = svf_find_string_in_array(argus[i + 1], (char **)svf_tap_state_name, dimof(svf_tap_state_name));
1154                         if (svf_tap_state_is_stable(i_tmp))
1155                         {
1156                                 svf_para.runtest_end_state = i_tmp;
1157                                 LOG_DEBUG("\tend_state = %s", svf_tap_state_name[svf_para.runtest_end_state]);
1158                         }
1159                         else
1160                         {
1161                                 LOG_ERROR("%s is not valid state", svf_tap_state_name[i_tmp]);
1162                                 return ERROR_FAIL;
1163                         }
1164                         i += 2;
1165                 }
1166                 // calculate run_count
1167                 if ((0 == run_count) && (min_time > 0))
1168                 {
1169                         run_count = min_time * svf_para.frequency;
1170                 }
1171                 // all parameter should be parsed
1172                 if (i == num_of_argu)
1173                 {
1174                         if (run_count > 0)
1175                         {
1176                                 // run_state and end_state is checked to be stable state
1177                                 // TODO: do runtest
1178 #if 1
1179                                 // enter into run_state if necessary
1180                                 if (last_state != svf_para.runtest_run_state)
1181                                 {
1182                                         jtag_command_t * cmd = cmd_queue_alloc(sizeof(jtag_command_t));
1183
1184                                         jtag_queue_command(cmd);
1185
1186                                         cmd->type = JTAG_STATEMOVE;
1187                                         cmd->cmd.statemove = cmd_queue_alloc(sizeof(statemove_command_t));
1188                                         cmd->cmd.statemove->end_state = svf_para.runtest_run_state;
1189
1190                                         cmd_queue_end_state = cmd_queue_cur_state = cmd->cmd.statemove->end_state;
1191                                 }
1192
1193                                 // call jtag_add_clocks
1194                                 jtag_add_clocks(run_count);
1195
1196                                 if (svf_para.runtest_end_state != svf_para.runtest_run_state)
1197                                 {
1198                                         // move to end_state
1199                                         jtag_command_t * cmd = cmd_queue_alloc(sizeof(jtag_command_t));
1200
1201                                         jtag_queue_command(cmd);
1202                                         cmd->type = JTAG_STATEMOVE;
1203                                         cmd->cmd.statemove = cmd_queue_alloc(sizeof(statemove_command_t));
1204                                         cmd->cmd.statemove->end_state = svf_para.runtest_end_state;
1205
1206                                         cmd_queue_end_state = cmd_queue_cur_state = cmd->cmd.statemove->end_state;
1207                                 }
1208                                 last_state = svf_para.runtest_end_state;
1209 #else
1210                                 if (svf_para.runtest_run_state != TAP_IDLE)
1211                                 {
1212                                         // RUNTEST can only executed in TAP_IDLE
1213                                         LOG_ERROR("cannot runtest in %s state", svf_tap_state_name[svf_para.runtest_run_state]);
1214                                         return ERROR_FAIL;
1215                                 }
1216
1217                                 jtag_add_runtest(run_count, svf_para.runtest_end_state);
1218 #endif
1219                         }
1220                 }
1221                 else
1222                 {
1223                         LOG_ERROR("fail to parse parameter of RUNTEST, %d out of %d is parsed", i, num_of_argu);
1224                         return ERROR_FAIL;
1225                 }
1226                 break;
1227         case STATE:
1228                 // STATE [pathstate1 [pathstate2 ...[pathstaten]]] stable_state
1229                 if (num_of_argu < 2)
1230                 {
1231                         LOG_ERROR("invalid parameter of %s", argus[0]);
1232                         return ERROR_FAIL;
1233                 }
1234                 if (num_of_argu > 2)
1235                 {
1236                         // STATE pathstate1 ... stable_state
1237                         path = (tap_state_t *)malloc((num_of_argu - 1) * sizeof(tap_state_t));
1238                         if (NULL == path)
1239                         {
1240                                 LOG_ERROR("not enough memory");
1241                                 return ERROR_FAIL;
1242                         }
1243                         num_of_argu--;          // num of path
1244                         i_tmp = 1;                      // path is from patameter 1
1245                         for (i = 0; i < num_of_argu; i++)
1246                         {
1247                                 path[i] = svf_find_string_in_array(argus[i_tmp++], (char **)svf_tap_state_name, dimof(svf_tap_state_name));
1248                                 if (!svf_tap_state_is_valid(path[i]))
1249                                 {
1250                                         LOG_ERROR("%s is not valid state", svf_tap_state_name[path[i]]);
1251                                         return ERROR_FAIL;
1252                                 }
1253                                 if (TAP_RESET == path[i])
1254                                 {
1255                                         if (i > 0)
1256                                         {
1257                                                 jtag_add_pathmove(i, path);
1258                                         }
1259                                         jtag_add_tlr();
1260                                         num_of_argu -= i + 1;
1261                                         i = -1;
1262                                 }
1263                         }
1264                         if (num_of_argu > 0)
1265                         {
1266                                 // execute last path if necessary
1267                                 if (svf_tap_state_is_stable(path[num_of_argu - 1]))
1268                                 {
1269                                         // last state MUST be stable state
1270                                         // TODO: call path_move
1271                                         jtag_add_pathmove(num_of_argu, path);
1272                                         last_state = path[num_of_argu - 1];
1273                                         LOG_DEBUG("\tmove to %s by path_move", svf_tap_state_name[path[num_of_argu - 1]]);
1274                                 }
1275                                 else
1276                                 {
1277                                         LOG_ERROR("%s is not valid state", svf_tap_state_name[path[num_of_argu - 1]]);
1278                                         return ERROR_FAIL;
1279                                 }
1280                         }
1281                         // no need to keep this memory, in jtag_add_pathmove, path will be duplicated
1282                         if (NULL != path)
1283                         {
1284                                 free(path);
1285                                 path = NULL;
1286                         }
1287                 }
1288                 else
1289                 {
1290                         // STATE stable_state
1291                         state = svf_find_string_in_array(argus[1], (char **)svf_tap_state_name, dimof(svf_tap_state_name));
1292                         if (svf_tap_state_is_stable(state))
1293                         {
1294                                 // TODO: move to state
1295                                 jtag_command_t * cmd = cmd_queue_alloc(sizeof(jtag_command_t));
1296
1297                                 jtag_queue_command(cmd);
1298
1299                                 cmd->type = JTAG_STATEMOVE;
1300                                 cmd->cmd.statemove = cmd_queue_alloc(sizeof(statemove_command_t));
1301                                 cmd->cmd.statemove->end_state = state;
1302
1303                                 cmd_queue_end_state = cmd_queue_cur_state = cmd->cmd.statemove->end_state;
1304                                 last_state = state;
1305
1306                                 LOG_DEBUG("\tmove to %s by state_move", svf_tap_state_name[state]);
1307                         }
1308                         else
1309                         {
1310                                 LOG_ERROR("%s is not valid state", svf_tap_state_name[state]);
1311                                 return ERROR_FAIL;
1312                         }
1313                 }
1314                 break;
1315         case TRST:
1316                 // TRST trst_mode
1317                 if (num_of_argu != 2)
1318                 {
1319                         LOG_ERROR("invalid parameter of %s", argus[0]);
1320                         return ERROR_FAIL;
1321                 }
1322                 if (svf_para.trst_mode != TRST_ABSENT)
1323                 {
1324                         if (ERROR_OK != svf_execute_tap())
1325                         {
1326                                 return ERROR_FAIL;
1327                         }
1328                         i_tmp = svf_find_string_in_array(argus[1], (char **)svf_trst_mode_name, dimof(svf_trst_mode_name));
1329                         switch (i_tmp)
1330                         {
1331                         case TRST_ON:
1332                                 last_state = TAP_RESET;
1333                                 jtag_add_reset(1, 0);
1334                                 break;
1335                         case TRST_Z:
1336                         case TRST_OFF:
1337                                 jtag_add_reset(0, 0);
1338                                 break;
1339                         case TRST_ABSENT:
1340                                 break;
1341                         default:
1342                                 LOG_ERROR("unknown TRST mode: %s", argus[1]);
1343                                 return ERROR_FAIL;
1344                         }
1345                         svf_para.trst_mode = i_tmp;
1346                         LOG_DEBUG("\ttrst_mode = %s", svf_trst_mode_name[svf_para.trst_mode]);
1347                 }
1348                 else
1349                 {
1350                         LOG_ERROR("can not accpet TRST command if trst_mode is ABSENT");
1351                         return ERROR_FAIL;
1352                 }
1353                 break;
1354         default:
1355                 LOG_ERROR("invalid svf command: %s", argus[0]);
1356                 return ERROR_FAIL;
1357                 break;
1358         }
1359
1360         if (debug_level >= LOG_LVL_DEBUG)
1361         {
1362                 // for convenient debugging, execute tap if possible
1363                 if ((svf_buffer_index > 0) && \
1364                         (((command != STATE) && (command != RUNTEST)) || \
1365                         ((command == STATE) && (num_of_argu == 2))))
1366                 {
1367                         if (ERROR_OK != svf_execute_tap())
1368                         {
1369                                 return ERROR_FAIL;
1370                         }
1371
1372                         // output debug info
1373                         if ((SIR == command) || (SDR == command))
1374                         {
1375                                 int read_value;
1376                                 memcpy(&read_value, svf_tdi_buffer, sizeof(int));
1377                                 // in debug mode, data is from index 0
1378                                 int read_mask = (1 << (svf_check_tdo_para[0].bit_len)) - 1;
1379                                 LOG_DEBUG("\tTDO read = 0x%X", read_value & read_mask);
1380                         }
1381                 }
1382         }
1383         else
1384         {
1385                 // for fast executing, execute tap if necessary
1386                 // half of the buffer is for the next command
1387                 if (((svf_buffer_index >= SVF_MAX_BUFFER_SIZE_TO_COMMIT) || (svf_check_tdo_para_index >= SVF_CHECK_TDO_PARA_SIZE / 2)) && \
1388                         (((command != STATE) && (command != RUNTEST)) || \
1389                         ((command == STATE) && (num_of_argu == 2))))
1390                 {
1391                         return svf_execute_tap();
1392                 }
1393         }
1394
1395         return ERROR_OK;
1396 }