git.sur5r.net Git - openocd/blob - src/jtag/zy1000.c

   1 /***************************************************************************
   2  *   Copyright (C) 2007-2008 by Øyvind Harboe                              *
   3  *                                                                         *
   4  *   This program is free software; you can redistribute it and/or modify  *
   5  *   it under the terms of the GNU General Public License as published by  *
   6  *   the Free Software Foundation; either version 2 of the License, or     *
   7  *   (at your option) any later version.                                   *
   8  *                                                                         *
   9  *   This program is distributed in the hope that it will be useful,       *
  10  *   but WITHOUT ANY WARRANTY; without even the implied warranty of        *
  11  *   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the         *
  12  *   GNU General Public License for more details.                          *
  13  *                                                                         *
  14  *   You should have received a copy of the GNU General Public License     *
  15  *   along with this program; if not, write to the                         *
  16  *   Free Software Foundation, Inc.,                                       *
  17  *   59 Temple Place - Suite 330, Boston, MA  02111-1307, USA.             *
  18  ***************************************************************************/
  19 #ifdef HAVE_CONFIG_H
  20 #include "config.h"
  21 #endif
  22
  23
  24 #include "log.h"
  25 #include "jtag.h"
  26 #include "bitbang.h"
  27 #include "../target/embeddedice.h"
  28
  29
  30 #include <cyg/hal/hal_io.h>             // low level i/o
  31 #include <cyg/hal/hal_diag.h>
  32
  33 #include <stdlib.h>
  34
  35 #define ZYLIN_VERSION "1.48"
  36 #define ZYLIN_DATE __DATE__
  37 #define ZYLIN_TIME __TIME__
  38 #define ZYLIN_OPENOCD "$Revision: 1241 $"
  39 #define ZYLIN_OPENOCD_VERSION "Zylin JTAG ZY1000 " ZYLIN_VERSION " " ZYLIN_DATE " " ZYLIN_TIME
  40 const char *zylin_config_dir="/config/settings";
  41
  42 extern int jtag_error;
  43
  44 /* low level command set
  45  */
  46 int zy1000_read(void);
  47 static void zy1000_write(int tck, int tms, int tdi);
  48 void zy1000_reset(int trst, int srst);
  49
  50
  51 int zy1000_speed(int speed);
  52 int zy1000_register_commands(struct command_context_s *cmd_ctx);
  53 int zy1000_init(void);
  54 int zy1000_quit(void);
  55
  56 /* interface commands */
  57 int zy1000_handle_zy1000_port_command(struct command_context_s *cmd_ctx, char *cmd, char **args, int argc);
  58
  59 static int zy1000_khz(int khz, int *jtag_speed)
  60 {
  61         if (khz==0)
  62         {
  63                 *jtag_speed=0;
  64         }
  65         else
  66         {
  67                 *jtag_speed=64000/khz;
  68         }
  69         return ERROR_OK;
  70 }
  71
  72 static int zy1000_speed_div(int speed, int *khz)
  73 {
  74         if (speed==0)
  75         {
  76                 *khz = 0;
  77         }
  78         else
  79         {
  80                 *khz=64000/speed;
  81         }
  82
  83         return ERROR_OK;
  84 }
  85
  86 static bool readPowerDropout(void)
  87 {
  88         cyg_uint32 state;
  89         // sample and clear power dropout
  90         HAL_WRITE_UINT32(ZY1000_JTAG_BASE+0x10, 0x80);
  91         HAL_READ_UINT32(ZY1000_JTAG_BASE+0x10, state);
  92         bool powerDropout;
  93         powerDropout = (state & 0x80) != 0;
  94         return powerDropout;
  95 }
  96
  97
  98 static bool readSRST(void)
  99 {
 100         cyg_uint32 state;
 101         // sample and clear SRST sensing
 102         HAL_WRITE_UINT32(ZY1000_JTAG_BASE+0x10, 0x00000040);
 103         HAL_READ_UINT32(ZY1000_JTAG_BASE+0x10, state);
 104         bool srstAsserted;
 105         srstAsserted = (state & 0x40) != 0;
 106         return srstAsserted;
 107 }
 108
 109 static int zy1000_srst_asserted(int *srst_asserted)
 110 {
 111         *srst_asserted=readSRST();
 112         return ERROR_OK;
 113 }
 114
 115 static int zy1000_power_dropout(int *dropout)
 116 {
 117         *dropout=readPowerDropout();
 118         return ERROR_OK;
 119 }
 120
 121
 122 jtag_interface_t zy1000_interface =
 123 {
 124         .name = "ZY1000",
 125         .execute_queue = bitbang_execute_queue,
 126         .speed = zy1000_speed,
 127         .register_commands = zy1000_register_commands,
 128         .init = zy1000_init,
 129         .quit = zy1000_quit,
 130         .khz = zy1000_khz,
 131         .speed_div = zy1000_speed_div,
 132         .power_dropout = zy1000_power_dropout,
 133         .srst_asserted = zy1000_srst_asserted,
 134 };
 135
 136 bitbang_interface_t zy1000_bitbang =
 137 {
 138         .read = zy1000_read,
 139         .write = zy1000_write,
 140         .reset = zy1000_reset
 141 };
 142
 143
 144
 145 static void zy1000_write(int tck, int tms, int tdi)
 146 {
 147
 148 }
 149
 150 int zy1000_read(void)
 151 {
 152         return -1;
 153 }
 154
 155 extern bool readSRST(void);
 156
 157 void zy1000_reset(int trst, int srst)
 158 {
 159         LOG_DEBUG("zy1000 trst=%d, srst=%d", trst, srst);
 160         if(!srst)
 161         {
 162                 ZY1000_POKE(ZY1000_JTAG_BASE+0x14, 0x00000001);
 163         }
 164         else
 165         {
 166                 /* Danger!!! if clk!=0 when in
 167                  * idle in TAP_IDLE, reset halt on str912 will fail.
 168                  */
 169                 ZY1000_POKE(ZY1000_JTAG_BASE+0x10, 0x00000001);
 170         }
 171
 172         if(!trst)
 173         {
 174                 ZY1000_POKE(ZY1000_JTAG_BASE+0x14, 0x00000002);
 175         }
 176         else
 177         {
 178                 /* assert reset */
 179                 ZY1000_POKE(ZY1000_JTAG_BASE+0x10, 0x00000002);
 180         }
 181
 182         if (trst||(srst&&(jtag_reset_config & RESET_SRST_PULLS_TRST)))
 183         {
 184                 waitIdle();
 185                 /* we're now in the RESET state until trst is deasserted */
 186                 ZY1000_POKE(ZY1000_JTAG_BASE+0x20, TAP_RESET);
 187         } else
 188         {
 189                 /* We'll get RCLK failure when we assert TRST, so clear any false positives here */
 190                 ZY1000_POKE(ZY1000_JTAG_BASE+0x14, 0x400);
 191         }
 192
 193         /* wait for srst to float back up */
 194         if (!srst)
 195         {
 196                 int i;
 197                 for (i=0; i<1000; i++)
 198                 {
 199                         // We don't want to sense our own reset, so we clear here.
 200                         // There is of course a timing hole where we could loose
 201                         // a "real" reset.
 202                         if (!readSRST())
 203                                 break;
 204
 205                         /* wait 1ms */
 206                         alive_sleep(1);
 207                 }
 208
 209                 if (i==1000)
 210                 {
 211                         LOG_USER("SRST didn't deassert after %dms", i);
 212                 } else if (i>1)
 213                 {
 214                         LOG_USER("SRST took %dms to deassert", i);
 215                 }
 216         }
 217 }
 218
 219 int zy1000_speed(int speed)
 220 {
 221         if(speed == 0)
 222         {
 223                 /*0 means RCLK*/
 224                 speed = 0;
 225                 ZY1000_POKE(ZY1000_JTAG_BASE+0x10, 0x100);
 226                 LOG_DEBUG("jtag_speed using RCLK");
 227         }
 228         else
 229         {
 230                 if(speed > 8190 || speed < 2)
 231                 {
 232                         LOG_USER("valid ZY1000 jtag_speed=[8190,2]. Divisor is 64MHz / even values between 8190-2, i.e. min 7814Hz, max 32MHz");
 233                         return ERROR_INVALID_ARGUMENTS;
 234                 }
 235
 236                 LOG_USER("jtag_speed %d => JTAG clk=%f", speed, 64.0/(float)speed);
 237                 ZY1000_POKE(ZY1000_JTAG_BASE+0x14, 0x100);
 238                 ZY1000_POKE(ZY1000_JTAG_BASE+0x1c, speed&~1);
 239         }
 240         return ERROR_OK;
 241 }
 242
 243 static bool savePower;
 244
 245
 246 static void setPower(bool power)
 247 {
 248         savePower = power;
 249         if (power)
 250         {
 251                 HAL_WRITE_UINT32(ZY1000_JTAG_BASE+0x14, 0x8);
 252         } else
 253         {
 254                 HAL_WRITE_UINT32(ZY1000_JTAG_BASE+0x10, 0x8);
 255         }
 256 }
 257
 258 int handle_power_command(struct command_context_s *cmd_ctx, char *cmd, char **args, int argc)
 259 {
 260         if (argc > 1)
 261         {
 262                 return ERROR_INVALID_ARGUMENTS;
 263         }
 264
 265         if (argc == 1)
 266         {
 267                 if (strcmp(args[0], "on") == 0)
 268                 {
 269                         setPower(1);
 270                 }
 271                 else if (strcmp(args[0], "off") == 0)
 272                 {
 273                         setPower(0);
 274                 } else
 275                 {
 276                         command_print(cmd_ctx, "arg is \"on\" or \"off\"");
 277                         return ERROR_INVALID_ARGUMENTS;
 278                 }
 279         }
 280
 281         command_print(cmd_ctx, "Target power %s", savePower ? "on" : "off");
 282
 283         return ERROR_OK;
 284 }
 285
 286
 287 /* Give TELNET a way to find out what version this is */
 288 int handle_zy1000_version_command(struct command_context_s *cmd_ctx, char *cmd,
 289                 char **args, int argc)
 290 {
 291         if (argc > 1)
 292         {
 293                 return ERROR_COMMAND_SYNTAX_ERROR;
 294         }
 295         if (argc == 0)
 296         {
 297                 command_print(cmd_ctx, ZYLIN_OPENOCD_VERSION);
 298         }
 299         else if (strcmp("openocd", args[0]) == 0)
 300         {
 301                 int revision;
 302                 revision = atol(ZYLIN_OPENOCD+strlen("XRevision: "));
 303                 command_print(cmd_ctx, "%d", revision);
 304         }
 305         else if (strcmp("zy1000", args[0]) == 0)
 306         {
 307                 command_print(cmd_ctx, "%s", ZYLIN_VERSION);
 308         }
 309         else if (strcmp("date", args[0]) == 0)
 310         {
 311                 command_print(cmd_ctx, "%s", ZYLIN_DATE);
 312         }
 313         else
 314         {
 315                 return ERROR_COMMAND_SYNTAX_ERROR;
 316         }
 317
 318         return ERROR_OK;
 319 }
 320
 321
 322 static int
 323 zylinjtag_Jim_Command_powerstatus(Jim_Interp *interp,
 324                                                                    int argc,
 325                 Jim_Obj * const *argv)
 326 {
 327         if (argc != 1)
 328         {
 329                 Jim_WrongNumArgs(interp, 1, argv, "powerstatus");
 330                 return JIM_ERR;
 331         }
 332
 333         cyg_uint32 status;
 334         ZY1000_PEEK(ZY1000_JTAG_BASE+0x10, status);
 335
 336         Jim_SetResult(interp, Jim_NewIntObj(interp, (status&0x80)!=0));
 337
 338         return JIM_OK;
 339 }
 340
 341 int zy1000_register_commands(struct command_context_s *cmd_ctx)
 342 {
 343         register_command(cmd_ctx, NULL, "power", handle_power_command, COMMAND_ANY,
 344                         "power <on/off> - turn power switch to target on/off. No arguments - print status.");
 345         register_command(cmd_ctx, NULL, "zy1000_version", handle_zy1000_version_command,
 346                         COMMAND_EXEC, "show zy1000 version numbers");
 347
 348         Jim_CreateCommand(interp, "powerstatus", zylinjtag_Jim_Command_powerstatus, NULL, NULL);
 349
 350         return ERROR_OK;
 351 }
 352
 353
 354
 355
 356 int zy1000_init(void)
 357 {
 358         LOG_USER("%s", ZYLIN_OPENOCD_VERSION);
 359
 360         ZY1000_POKE(ZY1000_JTAG_BASE+0x10, 0x30); // Turn on LED1 & LED2
 361
 362         setPower(true); // on by default
 363
 364
 365          /* deassert resets. Important to avoid infinite loop waiting for SRST to deassert */
 366         zy1000_reset(0, 0);
 367         zy1000_speed(jtag_speed);
 368
 369         bitbang_interface = &zy1000_bitbang;
 370
 371         return ERROR_OK;
 372 }
 373
 374 int zy1000_quit(void)
 375 {
 376
 377         return ERROR_OK;
 378 }
 379
 380
 381
 382
 383 int interface_jtag_execute_queue(void)
 384 {
 385         cyg_uint32 empty;
 386
 387         waitIdle();
 388         ZY1000_PEEK(ZY1000_JTAG_BASE+0x10, empty);
 389         /* clear JTAG error register */
 390         ZY1000_POKE(ZY1000_JTAG_BASE+0x14, 0x400);
 391
 392         if ((empty&0x400)!=0)
 393         {
 394                 LOG_WARNING("RCLK timeout");
 395                 /* the error is informative only as we don't want to break the firmware if there
 396                  * is a false positive.
 397                  */
 398 //              return ERROR_FAIL;
 399         }
 400         return ERROR_OK;
 401 }
 402
 403
 404
 405
 406
 407 static cyg_uint32 getShiftValue(void)
 408 {
 409         cyg_uint32 value;
 410         waitIdle();
 411         ZY1000_PEEK(ZY1000_JTAG_BASE+0xc, value);
 412         VERBOSE(LOG_INFO("getShiftValue %08x", value));
 413         return value;
 414 }
 415 #if 0
 416 static cyg_uint32 getShiftValueFlip(void)
 417 {
 418         cyg_uint32 value;
 419         waitIdle();
 420         ZY1000_PEEK(ZY1000_JTAG_BASE+0x18, value);
 421         VERBOSE(LOG_INFO("getShiftValue %08x (flipped)", value));
 422         return value;
 423 }
 424 #endif
 425
 426 #if 0
 427 static void shiftValueInnerFlip(const tap_state_t state, const tap_state_t endState, int repeat, cyg_uint32 value)
 428 {
 429         VERBOSE(LOG_INFO("shiftValueInner %s %s %d %08x (flipped)", tap_state_name(state), tap_state_name(endState), repeat, value));
 430         cyg_uint32 a,b;
 431         a=state;
 432         b=endState;
 433         ZY1000_POKE(ZY1000_JTAG_BASE+0xc, value);
 434         ZY1000_POKE(ZY1000_JTAG_BASE+0x8, (1<<15)|(repeat<<8)|(a<<4)|b);
 435         VERBOSE(getShiftValueFlip());
 436 }
 437 #endif
 438
 439 extern int jtag_check_value(u8 *captured, void *priv);
 440
 441 static void gotoEndState(void)
 442 {
 443         setCurrentState(cmd_queue_end_state);
 444 }
 445
 446 static __inline void scanFields(int num_fields, scan_field_t *fields, tap_state_t shiftState, int pause)
 447 {
 448         int i;
 449         int j;
 450         int k;
 451
 452         for (i = 0; i < num_fields; i++)
 453         {
 454                 cyg_uint32 value;
 455
 456                 static u8 *in_buff=NULL; /* pointer to buffer for scanned data */
 457                 static int in_buff_size=0;
 458                 u8 *inBuffer=NULL;
 459
 460
 461                 // figure out where to store the input data
 462                 int num_bits=fields[i].num_bits;
 463                 if (fields[i].in_value!=NULL)
 464                 {
 465                         inBuffer=fields[i].in_value;
 466                 } else if (fields[i].in_handler!=NULL)
 467                 {
 468                         if (in_buff_size*8<num_bits)
 469                         {
 470                                 // we need more space
 471                                 if (in_buff!=NULL)
 472                                         free(in_buff);
 473                                 in_buff=NULL;
 474                                 in_buff_size=(num_bits+7)/8;
 475                                 in_buff=malloc(in_buff_size);
 476                                 if (in_buff==NULL)
 477                                 {
 478                                         LOG_ERROR("Out of memory");
 479                                         jtag_error=ERROR_JTAG_QUEUE_FAILED;
 480                                         return;
 481                                 }
 482                         }
 483                         inBuffer=in_buff;
 484                 }
 485
 486                 // here we shuffle N bits out/in
 487                 j=0;
 488                 while (j<num_bits)
 489                 {
 490                         tap_state_t pause_state;
 491                         int l;
 492                         k=num_bits-j;
 493                         pause_state=(shiftState==TAP_DRSHIFT)?TAP_DRSHIFT:TAP_IRSHIFT;
 494                         if (k>32)
 495                         {
 496                                 k=32;
 497                                 /* we have more to shift out */
 498                         } else if (pause&&(i == num_fields-1))
 499                         {
 500                                 /* this was the last to shift out this time */
 501                                 pause_state=(shiftState==TAP_DRSHIFT)?TAP_DRPAUSE:TAP_IRPAUSE;
 502                         }
 503
 504                         // we have (num_bits+7)/8 bytes of bits to toggle out.
 505                         // bits are pushed out LSB to MSB
 506                         value=0;
 507                         if (fields[i].out_value!=NULL)
 508                         {
 509                                 for (l=0; l<k; l+=8)
 510                                 {
 511                                         value|=fields[i].out_value[(j+l)/8]<<l;
 512                                 }
 513                         }
 514                         /* mask away unused bits for easier debugging */
 515                         value&=~(((u32)0xffffffff)<<k);
 516
 517                         shiftValueInner(shiftState, pause_state, k, value);
 518
 519                         if (inBuffer!=NULL)
 520                         {
 521                                 // data in, LSB to MSB
 522                                 value=getShiftValue();
 523                                 // we're shifting in data to MSB, shift data to be aligned for returning the value
 524                                 value >>= 32-k;
 525
 526                                 for (l=0; l<k; l+=8)
 527                                 {
 528                                         inBuffer[(j+l)/8]=(value>>l)&0xff;
 529                                 }
 530                         }
 531                         j+=k;
 532                 }
 533
 534                 if (fields[i].in_handler!=NULL)
 535                 {
 536                         // invoke callback
 537                         int r=fields[i].in_handler(inBuffer, fields[i].in_handler_priv, fields+i);
 538                         if (r!=ERROR_OK)
 539                         {
 540                                 /* this will cause jtag_execute_queue() to return an error */
 541                                 jtag_error=r;
 542                         }
 543                 }
 544         }
 545 }
 546
 547 int interface_jtag_add_end_state(tap_state_t state)
 548 {
 549         return ERROR_OK;
 550 }
 551
 552
 553 int interface_jtag_add_ir_scan(int num_fields, scan_field_t *fields, tap_state_t state)
 554 {
 555
 556         int j;
 557         int scan_size = 0;
 558         jtag_tap_t *tap, *nextTap;
 559         for(tap = jtag_NextEnabledTap(NULL); tap!= NULL; tap=nextTap)
 560         {
 561                 nextTap=jtag_NextEnabledTap(tap);
 562                 int pause=(nextTap==NULL);
 563
 564                 int found = 0;
 565
 566                 scan_size = tap->ir_length;
 567
 568                 /* search the list */
 569                 for (j=0; j < num_fields; j++)
 570                 {
 571                         if (tap == fields[j].tap)
 572                         {
 573                                 found = 1;
 574
 575                                 if ((jtag_verify_capture_ir)&&(fields[j].in_handler==NULL))
 576                                 {
 577                                         jtag_set_check_value(fields+j, tap->expected, tap->expected_mask, NULL);
 578                                 } else if (jtag_verify_capture_ir)
 579                                 {
 580                                         fields[j].in_check_value = tap->expected;
 581                                         fields[j].in_check_mask = tap->expected_mask;
 582                                 }
 583
 584                                 scanFields(1, fields+j, TAP_IRSHIFT, pause);
 585                                 /* update device information */
 586                                 buf_cpy(fields[j].out_value, tap->cur_instr, scan_size);
 587
 588                                 tap->bypass = 0;
 589                                 break;
 590                         }
 591                 }
 592
 593                 if (!found)
 594                 {
 595                         /* if a device isn't listed, set it to BYPASS */
 596                         u8 ones[]={0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff};
 597
 598                         scan_field_t tmp;
 599                         memset(&tmp, 0, sizeof(tmp));
 600                         tmp.out_value = ones;
 601                         tmp.num_bits = scan_size;
 602                         scanFields(1, &tmp, TAP_IRSHIFT, pause);
 603                         /* update device information */
 604                         buf_cpy(tmp.out_value, tap->cur_instr, scan_size);
 605                         tap->bypass = 1;
 606                 }
 607         }
 608         gotoEndState();
 609
 610         return ERROR_OK;
 611 }
 612
 613
 614
 615
 616
 617 int interface_jtag_add_plain_ir_scan(int num_fields, scan_field_t *fields, tap_state_t state)
 618 {
 619         scanFields(num_fields, fields, TAP_IRSHIFT, 1);
 620         gotoEndState();
 621
 622         return ERROR_OK;
 623 }
 624
 625 /*extern jtag_command_t **jtag_get_last_command_p(void);*/
 626
 627 int interface_jtag_add_dr_scan(int num_fields, scan_field_t *fields, tap_state_t state)
 628 {
 629
 630         int j;
 631         jtag_tap_t *tap, *nextTap;
 632         for(tap = jtag_NextEnabledTap(NULL); tap!= NULL; tap=nextTap)
 633         {
 634                 nextTap=jtag_NextEnabledTap(tap);
 635                 int found=0;
 636                 int pause=(nextTap==NULL);
 637
 638                 for (j=0; j < num_fields; j++)
 639                 {
 640                         if (tap == fields[j].tap)
 641                         {
 642                                 found = 1;
 643
 644                                 scanFields(1, fields+j, TAP_DRSHIFT, pause);
 645                         }
 646                 }
 647                 if (!found)
 648                 {
 649                         scan_field_t tmp;
 650                         /* program the scan field to 1 bit length, and ignore it's value */
 651                         tmp.num_bits = 1;
 652                         tmp.out_value = NULL;
 653                         tmp.out_mask = NULL;
 654                         tmp.in_value = NULL;
 655                         tmp.in_check_value = NULL;
 656                         tmp.in_check_mask = NULL;
 657                         tmp.in_handler = NULL;
 658                         tmp.in_handler_priv = NULL;
 659
 660                         scanFields(1, &tmp, TAP_DRSHIFT, pause);
 661                 }
 662                 else
 663                 {
 664                 }
 665         }
 666         gotoEndState();
 667         return ERROR_OK;
 668 }
 669
 670 int interface_jtag_add_plain_dr_scan(int num_fields, scan_field_t *fields, tap_state_t state)
 671 {
 672         scanFields(num_fields, fields, TAP_DRSHIFT, 1);
 673         gotoEndState();
 674         return ERROR_OK;
 675 }
 676
 677
 678 int interface_jtag_add_tlr()
 679 {
 680         setCurrentState(TAP_RESET);
 681         return ERROR_OK;
 682 }
 683
 684
 685
 686
 687 extern int jtag_nsrst_delay;
 688 extern int jtag_ntrst_delay;
 689
 690 int interface_jtag_add_reset(int req_trst, int req_srst)
 691 {
 692         zy1000_reset(req_trst, req_srst);
 693         return ERROR_OK;
 694 }
 695
 696 static int zy1000_jtag_add_clocks(int num_cycles, tap_state_t state, tap_state_t clockstate)
 697 {
 698         /* num_cycles can be 0 */
 699         setCurrentState(clockstate);
 700
 701         /* execute num_cycles, 32 at the time. */
 702         int i;
 703         for (i=0; i<num_cycles; i+=32)
 704         {
 705                 int num;
 706                 num=32;
 707                 if (num_cycles-i<num)
 708                 {
 709                         num=num_cycles-i;
 710                 }
 711                 shiftValueInner(clockstate, clockstate, num, 0);
 712         }
 713
 714 #if !TEST_MANUAL()
 715         /* finish in end_state */
 716         setCurrentState(state);
 717 #else
 718         tap_state_t t=TAP_IDLE;
 719         /* test manual drive code on any target */
 720         int tms;
 721         u8 tms_scan = tap_get_tms_path(t, state);
 722
 723         for (i = 0; i < 7; i++)
 724         {
 725                 tms = (tms_scan >> i) & 1;
 726                 waitIdle();
 727                 ZY1000_POKE(ZY1000_JTAG_BASE+0x28,  tms);
 728         }
 729         waitIdle();
 730         ZY1000_POKE(ZY1000_JTAG_BASE+0x20, state);
 731 #endif
 732
 733
 734         return ERROR_OK;
 735 }
 736
 737 int interface_jtag_add_runtest(int num_cycles, tap_state_t state)
 738 {
 739         return zy1000_jtag_add_clocks(num_cycles, state, TAP_IDLE);
 740 }
 741
 742 int interface_jtag_add_clocks(int num_cycles)
 743 {
 744         return zy1000_jtag_add_clocks(num_cycles, cmd_queue_cur_state, cmd_queue_end_state);
 745 }
 746
 747 int interface_jtag_add_sleep(u32 us)
 748 {
 749         jtag_sleep(us);
 750         return ERROR_OK;
 751 }
 752
 753 int interface_jtag_add_pathmove(int num_states, tap_state_t *path)
 754 {
 755         int state_count;
 756         int tms = 0;
 757
 758         /*wait for the fifo to be empty*/
 759         waitIdle();
 760
 761         state_count = 0;
 762
 763         tap_state_t cur_state=cmd_queue_cur_state;
 764
 765         while (num_states)
 766         {
 767                 if (tap_state_transition(cur_state, FALSE) == path[state_count])
 768                 {
 769                         tms = 0;
 770                 }
 771                 else if (tap_state_transition(cur_state, TRUE) == path[state_count])
 772                 {
 773                         tms = 1;
 774                 }
 775                 else
 776                 {
 777                         LOG_ERROR("BUG: %s -> %s isn't a valid TAP transition", tap_state_name(cur_state), tap_state_name(path[state_count]));
 778                         exit(-1);
 779                 }
 780
 781                 waitIdle();
 782                 ZY1000_POKE(ZY1000_JTAG_BASE+0x28,  tms);
 783
 784                 cur_state = path[state_count];
 785                 state_count++;
 786                 num_states--;
 787         }
 788
 789         waitIdle();
 790         ZY1000_POKE(ZY1000_JTAG_BASE+0x20,  cur_state);
 791         return ERROR_OK;
 792 }
 793
 794
 795
 796 void embeddedice_write_dcc(jtag_tap_t *tap, int reg_addr, u8 *buffer, int little, int count)
 797 {
 798 //      static int const reg_addr=0x5;
 799         tap_state_t end_state=cmd_queue_end_state;
 800         if (jtag_NextEnabledTap(jtag_NextEnabledTap(NULL))==NULL)
 801         {
 802                 /* better performance via code duplication */
 803                 if (little)
 804                 {
 805                         int i;
 806                         for (i = 0; i < count; i++)
 807                         {
 808                                 shiftValueInner(TAP_DRSHIFT, TAP_DRSHIFT, 32, fast_target_buffer_get_u32(buffer, 1));
 809                                 shiftValueInner(TAP_DRSHIFT, end_state, 6, reg_addr|(1<<5));
 810                                 buffer+=4;
 811                         }
 812                 } else
 813                 {
 814                         int i;
 815                         for (i = 0; i < count; i++)
 816                         {
 817                                 shiftValueInner(TAP_DRSHIFT, TAP_DRSHIFT, 32, fast_target_buffer_get_u32(buffer, 0));
 818                                 shiftValueInner(TAP_DRSHIFT, end_state, 6, reg_addr|(1<<5));
 819                                 buffer+=4;
 820                         }
 821                 }
 822         }
 823         else
 824         {
 825                 int i;
 826                 for (i = 0; i < count; i++)
 827                 {
 828                         embeddedice_write_reg_inner(tap, reg_addr, fast_target_buffer_get_u32(buffer, little));
 829                         buffer += 4;
 830                 }
 831         }
 832 }
 833
 834 int loadFile(const char *fileName, void **data, int *len);
 835
 836 /* boolean parameter stored on config */
 837 int boolParam(char *var)
 838 {
 839         bool result = false;
 840         char *name = alloc_printf("%s/%s", zylin_config_dir, var);
 841         if (name == NULL)
 842                 return result;
 843
 844         void *data;
 845         int len;
 846         if (loadFile(name, &data, &len) == ERROR_OK)
 847         {
 848                 if (len > 1)
 849                         len = 1;
 850                 result = strncmp((char *) data, "1", len) == 0;
 851                 free(data);
 852         }
 853         free(name);
 854         return result;
 855 }
 856
 857