assembler: Don't change the size of opcodes!

Until now, the assembler had relocation-related fields added to struct
brw_instruction. This changes the size of the structure and break code
assuming the opcode structure is really 16 bytes, for instance the
emission code in brw_eu_emit.c.

With this commit, we build on the infrastructure that slowly emerged in
the few previous commits to add a relocatable instruction with the
needed fields.

Signed-off-by: Damien Lespiau <damien.lespiau@intel.com>
This commit is contained in:
Damien Lespiau 2013-01-21 21:41:36 +00:00
parent a45a47183a
commit 79c62f1134
4 changed files with 134 additions and 98 deletions

View File

@ -1463,9 +1463,6 @@ struct brw_instruction
GLuint ud; GLuint ud;
float f; float f;
} bits3; } bits3;
char *first_reloc_target, *second_reloc_target; // first for JIP, second for UIP
GLint first_reloc_offset, second_reloc_offset; // in number of instructions
}; };
struct brw_compact_instruction { struct brw_compact_instruction {

View File

@ -137,6 +137,7 @@ typedef struct {
enum assembler_instruction_type { enum assembler_instruction_type {
GEN4ASM_INSTRUCTION_GEN, GEN4ASM_INSTRUCTION_GEN,
GEN4ASM_INSTRUCTION_GEN_RELOCATABLE,
GEN4ASM_INSTRUCTION_LABEL, GEN4ASM_INSTRUCTION_LABEL,
}; };
@ -144,6 +145,12 @@ struct label_instruction {
char *name; char *name;
}; };
struct relocatable_instruction {
struct brw_instruction gen;
char *first_reloc_target, *second_reloc_target; // JIP and UIP respectively
GLint first_reloc_offset, second_reloc_offset; // in number of instructions
};
/** /**
* This structure is just the list container for instructions accumulated by * This structure is just the list container for instructions accumulated by
* the parser and labels. * the parser and labels.
@ -153,6 +160,7 @@ struct brw_program_instruction {
unsigned inst_offset; unsigned inst_offset;
union { union {
struct brw_instruction gen; struct brw_instruction gen;
struct relocatable_instruction reloc;
struct label_instruction label; struct label_instruction label;
} instruction; } instruction;
struct brw_program_instruction *next; struct brw_program_instruction *next;
@ -169,6 +177,11 @@ static inline char *label_name(struct brw_program_instruction *i)
return i->instruction.label.name; return i->instruction.label.name;
} }
static inline bool is_relocatable(struct brw_program_instruction *intruction)
{
return intruction->type == GEN4ASM_INSTRUCTION_GEN_RELOCATABLE;
}
/** /**
* This structure is a list of instructions. It is the final output of the * This structure is a list of instructions. It is the final output of the
* parser. * parser.

View File

@ -124,6 +124,17 @@ static void brw_program_add_instruction(struct brw_program *p,
brw_program_append_entry(p, list_entry); brw_program_append_entry(p, list_entry);
} }
static void brw_program_add_relocatable(struct brw_program *p,
struct relocatable_instruction *reloc)
{
struct brw_program_instruction *list_entry;
list_entry = calloc(sizeof(struct brw_program_instruction), 1);
list_entry->type = GEN4ASM_INSTRUCTION_GEN_RELOCATABLE;
list_entry->instruction.reloc = *reloc;
brw_program_append_entry(p, list_entry);
}
static void brw_program_add_label(struct brw_program *p, const char *label) static void brw_program_add_label(struct brw_program *p, const char *label)
{ {
struct brw_program_instruction *list_entry; struct brw_program_instruction *list_entry;
@ -143,6 +154,7 @@ static void brw_program_add_label(struct brw_program *p, const char *label)
int integer; int integer;
double number; double number;
struct brw_instruction instruction; struct brw_instruction instruction;
struct relocatable_instruction relocatable;
struct brw_program program; struct brw_program program;
struct region region; struct region region;
struct regtype regtype; struct regtype regtype;
@ -227,14 +239,14 @@ static void brw_program_add_label(struct brw_program *p, const char *label)
%type <integer> simple_int %type <integer> simple_int
%type <instruction> instruction unaryinstruction binaryinstruction %type <instruction> instruction unaryinstruction binaryinstruction
%type <instruction> binaryaccinstruction trinaryinstruction sendinstruction %type <instruction> binaryaccinstruction trinaryinstruction sendinstruction
%type <instruction> jumpinstruction %type <instruction> syncinstruction
%type <instruction> breakinstruction syncinstruction
%type <instruction> msgtarget %type <instruction> msgtarget
%type <instruction> instoptions instoption_list predicate %type <instruction> instoptions instoption_list predicate
%type <instruction> mathinstruction %type <instruction> mathinstruction
%type <instruction> subroutineinstruction %type <instruction> nopinstruction
%type <instruction> multibranchinstruction %type <relocatable> relocatableinstruction breakinstruction
%type <instruction> nopinstruction loopinstruction ifelseinstruction haltinstruction %type <relocatable> ifelseinstruction loopinstruction haltinstruction
%type <relocatable> multibranchinstruction subroutineinstruction jumpinstruction
%type <string> label %type <string> label
%type <program> instrseq %type <program> instrseq
%type <integer> instoption %type <integer> instoption
@ -390,6 +402,16 @@ instrseq: instrseq pragma
brw_program_init(&$$); brw_program_init(&$$);
brw_program_add_instruction(&$$, &$1); brw_program_add_instruction(&$$, &$1);
} }
| instrseq relocatableinstruction SEMICOLON
{
brw_program_add_relocatable(&$1, &$2);
$$ = $1;
}
| relocatableinstruction SEMICOLON
{
brw_program_init(&$$);
brw_program_add_relocatable(&$$, &$1);
}
| instrseq SEMICOLON | instrseq SEMICOLON
{ {
$$ = $1; $$ = $1;
@ -422,16 +444,19 @@ instruction: unaryinstruction
| binaryaccinstruction | binaryaccinstruction
| trinaryinstruction | trinaryinstruction
| sendinstruction | sendinstruction
| jumpinstruction
| ifelseinstruction
| breakinstruction
| syncinstruction | syncinstruction
| mathinstruction | mathinstruction
| subroutineinstruction
| multibranchinstruction
| nopinstruction | nopinstruction
| haltinstruction ;
| loopinstruction
/* relocatableinstruction are instructions that needs a relocation pass */
relocatableinstruction: ifelseinstruction
| loopinstruction
| haltinstruction
| multibranchinstruction
| subroutineinstruction
| jumpinstruction
| breakinstruction
; ;
ifelseinstruction: ENDIF ifelseinstruction: ENDIF
@ -442,11 +467,11 @@ ifelseinstruction: ENDIF
YYERROR; YYERROR;
} }
memset(&$$, 0, sizeof($$)); memset(&$$, 0, sizeof($$));
$$.header.opcode = $1; $$.gen.header.opcode = $1;
$$.header.thread_control |= BRW_THREAD_SWITCH; $$.gen.header.thread_control |= BRW_THREAD_SWITCH;
$$.bits1.da1.dest_horiz_stride = 1; $$.gen.bits1.da1.dest_horiz_stride = 1;
$$.bits1.da1.src1_reg_file = BRW_ARCHITECTURE_REGISTER_FILE; $$.gen.bits1.da1.src1_reg_file = BRW_ARCHITECTURE_REGISTER_FILE;
$$.bits1.da1.src1_reg_type = BRW_REGISTER_TYPE_UD; $$.gen.bits1.da1.src1_reg_type = BRW_REGISTER_TYPE_UD;
} }
| ENDIF execsize relativelocation instoptions | ENDIF execsize relativelocation instoptions
{ {
@ -457,8 +482,8 @@ ifelseinstruction: ENDIF
YYERROR; YYERROR;
} }
memset(&$$, 0, sizeof($$)); memset(&$$, 0, sizeof($$));
$$.header.opcode = $1; $$.gen.header.opcode = $1;
$$.header.execution_size = $2; $$.gen.header.execution_size = $2;
$$.first_reloc_target = $3.reloc_target; $$.first_reloc_target = $3.reloc_target;
$$.first_reloc_offset = $3.imm32; $$.first_reloc_offset = $3.imm32;
} }
@ -470,18 +495,18 @@ ifelseinstruction: ENDIF
$3.imm32 |= (1 << 16); $3.imm32 |= (1 << 16);
memset(&$$, 0, sizeof($$)); memset(&$$, 0, sizeof($$));
$$.header.opcode = $1; $$.gen.header.opcode = $1;
$$.header.execution_size = $2; $$.gen.header.execution_size = $2;
$$.header.thread_control |= BRW_THREAD_SWITCH; $$.gen.header.thread_control |= BRW_THREAD_SWITCH;
set_instruction_dest(&$$, &ip_dst); set_instruction_dest(&$$.gen, &ip_dst);
set_instruction_src0(&$$, &ip_src); set_instruction_src0(&$$.gen, &ip_src);
set_instruction_src1(&$$, &$3); set_instruction_src1(&$$.gen, &$3);
$$.first_reloc_target = $3.reloc_target; $$.first_reloc_target = $3.reloc_target;
$$.first_reloc_offset = $3.imm32; $$.first_reloc_offset = $3.imm32;
} else if(IS_GENp(6)) { } else if(IS_GENp(6)) {
memset(&$$, 0, sizeof($$)); memset(&$$, 0, sizeof($$));
$$.header.opcode = $1; $$.gen.header.opcode = $1;
$$.header.execution_size = $2; $$.gen.header.execution_size = $2;
$$.first_reloc_target = $3.reloc_target; $$.first_reloc_target = $3.reloc_target;
$$.first_reloc_offset = $3.imm32; $$.first_reloc_offset = $3.imm32;
} else { } else {
@ -504,14 +529,14 @@ ifelseinstruction: ENDIF
YYERROR; YYERROR;
} }
memset(&$$, 0, sizeof($$)); memset(&$$, 0, sizeof($$));
set_instruction_predicate(&$$, &$1); set_instruction_predicate(&$$.gen, &$1);
$$.header.opcode = $2; $$.gen.header.opcode = $2;
$$.header.execution_size = $3; $$.gen.header.execution_size = $3;
if(!IS_GENp(6)) { if(!IS_GENp(6)) {
$$.header.thread_control |= BRW_THREAD_SWITCH; $$.gen.header.thread_control |= BRW_THREAD_SWITCH;
set_instruction_dest(&$$, &ip_dst); set_instruction_dest(&$$.gen, &ip_dst);
set_instruction_src0(&$$, &ip_src); set_instruction_src0(&$$.gen, &ip_src);
set_instruction_src1(&$$, &$4); set_instruction_src1(&$$.gen, &$4);
} }
$$.first_reloc_target = $4.reloc_target; $$.first_reloc_target = $4.reloc_target;
$$.first_reloc_offset = $4.imm32; $$.first_reloc_offset = $4.imm32;
@ -524,9 +549,9 @@ ifelseinstruction: ENDIF
YYERROR; YYERROR;
} }
memset(&$$, 0, sizeof($$)); memset(&$$, 0, sizeof($$));
set_instruction_predicate(&$$, &$1); set_instruction_predicate(&$$.gen, &$1);
$$.header.opcode = $2; $$.gen.header.opcode = $2;
$$.header.execution_size = $3; $$.gen.header.execution_size = $3;
$$.first_reloc_target = $4.reloc_target; $$.first_reloc_target = $4.reloc_target;
$$.first_reloc_offset = $4.imm32; $$.first_reloc_offset = $4.imm32;
$$.second_reloc_target = $5.reloc_target; $$.second_reloc_target = $5.reloc_target;
@ -542,14 +567,14 @@ loopinstruction: predicate WHILE execsize relativelocation instoptions
* offset is the second source operand. The offset is added * offset is the second source operand. The offset is added
* to the pre-incremented IP. * to the pre-incremented IP.
*/ */
set_instruction_dest(&$$, &ip_dst); set_instruction_dest(&$$.gen, &ip_dst);
memset(&$$, 0, sizeof($$)); memset(&$$, 0, sizeof($$));
set_instruction_predicate(&$$, &$1); set_instruction_predicate(&$$.gen, &$1);
$$.header.opcode = $2; $$.gen.header.opcode = $2;
$$.header.execution_size = $3; $$.gen.header.execution_size = $3;
$$.header.thread_control |= BRW_THREAD_SWITCH; $$.gen.header.thread_control |= BRW_THREAD_SWITCH;
set_instruction_src0(&$$, &ip_src); set_instruction_src0(&$$.gen, &ip_src);
set_instruction_src1(&$$, &$4); set_instruction_src1(&$$.gen, &$4);
$$.first_reloc_target = $4.reloc_target; $$.first_reloc_target = $4.reloc_target;
$$.first_reloc_offset = $4.imm32; $$.first_reloc_offset = $4.imm32;
} else if (IS_GENp(6)) { } else if (IS_GENp(6)) {
@ -557,9 +582,9 @@ loopinstruction: predicate WHILE execsize relativelocation instoptions
dest must have the same element size as src0. dest must have the same element size as src0.
dest horizontal stride must be 1. */ dest horizontal stride must be 1. */
memset(&$$, 0, sizeof($$)); memset(&$$, 0, sizeof($$));
set_instruction_predicate(&$$, &$1); set_instruction_predicate(&$$.gen, &$1);
$$.header.opcode = $2; $$.gen.header.opcode = $2;
$$.header.execution_size = $3; $$.gen.header.execution_size = $3;
$$.first_reloc_target = $4.reloc_target; $$.first_reloc_target = $4.reloc_target;
$$.first_reloc_offset = $4.imm32; $$.first_reloc_offset = $4.imm32;
} else { } else {
@ -571,7 +596,7 @@ loopinstruction: predicate WHILE execsize relativelocation instoptions
{ {
// deprecated // deprecated
memset(&$$, 0, sizeof($$)); memset(&$$, 0, sizeof($$));
$$.header.opcode = $1; $$.gen.header.opcode = $1;
}; };
haltinstruction: predicate HALT execsize relativelocation relativelocation instoptions haltinstruction: predicate HALT execsize relativelocation relativelocation instoptions
@ -579,15 +604,15 @@ haltinstruction: predicate HALT execsize relativelocation relativelocation insto
// for Gen6, Gen7 // for Gen6, Gen7
/* Gen6, Gen7 bspec: dst and src0 must be the null reg. */ /* Gen6, Gen7 bspec: dst and src0 must be the null reg. */
memset(&$$, 0, sizeof($$)); memset(&$$, 0, sizeof($$));
set_instruction_predicate(&$$, &$1); set_instruction_predicate(&$$.gen, &$1);
$$.header.opcode = $2; $$.gen.header.opcode = $2;
$$.header.execution_size = $3; $$.gen.header.execution_size = $3;
$$.first_reloc_target = $4.reloc_target; $$.first_reloc_target = $4.reloc_target;
$$.first_reloc_offset = $4.imm32; $$.first_reloc_offset = $4.imm32;
$$.second_reloc_target = $5.reloc_target; $$.second_reloc_target = $5.reloc_target;
$$.second_reloc_offset = $5.imm32; $$.second_reloc_offset = $5.imm32;
set_instruction_dest(&$$, &dst_null_reg); set_instruction_dest(&$$.gen, &dst_null_reg);
set_instruction_src0(&$$, &src_null_reg); set_instruction_src0(&$$.gen, &src_null_reg);
}; };
multibranchinstruction: multibranchinstruction:
@ -595,28 +620,28 @@ multibranchinstruction:
{ {
/* Gen7 bspec: dest must be null. use Switch option */ /* Gen7 bspec: dest must be null. use Switch option */
memset(&$$, 0, sizeof($$)); memset(&$$, 0, sizeof($$));
set_instruction_predicate(&$$, &$1); set_instruction_predicate(&$$.gen, &$1);
$$.header.opcode = $2; $$.gen.header.opcode = $2;
$$.header.execution_size = $3; $$.gen.header.execution_size = $3;
$$.header.thread_control |= BRW_THREAD_SWITCH; $$.gen.header.thread_control |= BRW_THREAD_SWITCH;
$$.first_reloc_target = $4.reloc_target; $$.first_reloc_target = $4.reloc_target;
$$.first_reloc_offset = $4.imm32; $$.first_reloc_offset = $4.imm32;
set_instruction_dest(&$$, &dst_null_reg); set_instruction_dest(&$$.gen, &dst_null_reg);
} }
| predicate BRC execsize relativelocation relativelocation instoptions | predicate BRC execsize relativelocation relativelocation instoptions
{ {
/* Gen7 bspec: dest must be null. src0 must be null. use Switch option */ /* Gen7 bspec: dest must be null. src0 must be null. use Switch option */
memset(&$$, 0, sizeof($$)); memset(&$$, 0, sizeof($$));
set_instruction_predicate(&$$, &$1); set_instruction_predicate(&$$.gen, &$1);
$$.header.opcode = $2; $$.gen.header.opcode = $2;
$$.header.execution_size = $3; $$.gen.header.execution_size = $3;
$$.header.thread_control |= BRW_THREAD_SWITCH; $$.gen.header.thread_control |= BRW_THREAD_SWITCH;
$$.first_reloc_target = $4.reloc_target; $$.first_reloc_target = $4.reloc_target;
$$.first_reloc_offset = $4.imm32; $$.first_reloc_offset = $4.imm32;
$$.second_reloc_target = $5.reloc_target; $$.second_reloc_target = $5.reloc_target;
$$.second_reloc_offset = $5.imm32; $$.second_reloc_offset = $5.imm32;
set_instruction_dest(&$$, &dst_null_reg); set_instruction_dest(&$$.gen, &dst_null_reg);
set_instruction_src0(&$$, &src_null_reg); set_instruction_src0(&$$.gen, &src_null_reg);
} }
; ;
@ -638,12 +663,12 @@ subroutineinstruction:
execution size must be 2. execution size must be 2.
*/ */
memset(&$$, 0, sizeof($$)); memset(&$$, 0, sizeof($$));
set_instruction_predicate(&$$, &$1); set_instruction_predicate(&$$.gen, &$1);
$$.header.opcode = $2; $$.gen.header.opcode = $2;
$$.header.execution_size = 1; /* execution size must be 2. Here 1 is encoded 2. */ $$.gen.header.execution_size = 1; /* execution size must be 2. Here 1 is encoded 2. */
$4.reg_type = BRW_REGISTER_TYPE_D; /* dest type should be DWORD */ $4.reg_type = BRW_REGISTER_TYPE_D; /* dest type should be DWORD */
set_instruction_dest(&$$, &$4); set_instruction_dest(&$$.gen, &$4);
struct src_operand src0; struct src_operand src0;
memset(&src0, 0, sizeof(src0)); memset(&src0, 0, sizeof(src0));
@ -652,7 +677,7 @@ subroutineinstruction:
src0.horiz_stride = 1; /*encoded 1*/ src0.horiz_stride = 1; /*encoded 1*/
src0.width = 1; /*encoded 2*/ src0.width = 1; /*encoded 2*/
src0.vert_stride = 2; /*encoded 2*/ src0.vert_stride = 2; /*encoded 2*/
set_instruction_src0(&$$, &src0); set_instruction_src0(&$$.gen, &src0);
$$.first_reloc_target = $5.reloc_target; $$.first_reloc_target = $5.reloc_target;
$$.first_reloc_offset = $5.imm32; $$.first_reloc_offset = $5.imm32;
@ -666,15 +691,15 @@ subroutineinstruction:
src0 region control must be <2,2,1> (not specified clearly. should be same as CALL) src0 region control must be <2,2,1> (not specified clearly. should be same as CALL)
*/ */
memset(&$$, 0, sizeof($$)); memset(&$$, 0, sizeof($$));
set_instruction_predicate(&$$, &$1); set_instruction_predicate(&$$.gen, &$1);
$$.header.opcode = $2; $$.gen.header.opcode = $2;
$$.header.execution_size = 1; /* execution size of RET should be 2 */ $$.gen.header.execution_size = 1; /* execution size of RET should be 2 */
set_instruction_dest(&$$, &dst_null_reg); set_instruction_dest(&$$.gen, &dst_null_reg);
$5.reg_type = BRW_REGISTER_TYPE_D; $5.reg_type = BRW_REGISTER_TYPE_D;
$5.horiz_stride = 1; /*encoded 1*/ $5.horiz_stride = 1; /*encoded 1*/
$5.width = 1; /*encoded 2*/ $5.width = 1; /*encoded 2*/
$5.vert_stride = 2; /*encoded 2*/ $5.vert_stride = 2; /*encoded 2*/
set_instruction_src0(&$$, &$5); set_instruction_src0(&$$.gen, &$5);
} }
; ;
@ -1089,14 +1114,14 @@ jumpinstruction: predicate JMPI execsize relativelocation2
* is the post-incremented IP plus the offset. * is the post-incremented IP plus the offset.
*/ */
memset(&$$, 0, sizeof($$)); memset(&$$, 0, sizeof($$));
$$.header.opcode = $2; $$.gen.header.opcode = $2;
$$.header.execution_size = ffs(1) - 1; $$.gen.header.execution_size = ffs(1) - 1;
if(advanced_flag) if(advanced_flag)
$$.header.mask_control = BRW_MASK_DISABLE; $$.gen.header.mask_control = BRW_MASK_DISABLE;
set_instruction_predicate(&$$, &$1); set_instruction_predicate(&$$.gen, &$1);
set_instruction_dest(&$$, &ip_dst); set_instruction_dest(&$$.gen, &ip_dst);
set_instruction_src0(&$$, &ip_src); set_instruction_src0(&$$.gen, &ip_src);
set_instruction_src1(&$$, &$4); set_instruction_src1(&$$.gen, &$4);
$$.first_reloc_target = $4.reloc_target; $$.first_reloc_target = $4.reloc_target;
$$.first_reloc_offset = $4.imm32; $$.first_reloc_offset = $4.imm32;
} }
@ -1123,9 +1148,9 @@ breakinstruction: predicate breakop execsize relativelocation relativelocation i
{ {
// for Gen6, Gen7 // for Gen6, Gen7
memset(&$$, 0, sizeof($$)); memset(&$$, 0, sizeof($$));
set_instruction_predicate(&$$, &$1); set_instruction_predicate(&$$.gen, &$1);
$$.header.opcode = $2; $$.gen.header.opcode = $2;
$$.header.execution_size = $3; $$.gen.header.execution_size = $3;
$$.first_reloc_target = $4.reloc_target; $$.first_reloc_target = $4.reloc_target;
$$.first_reloc_offset = $4.imm32; $$.first_reloc_offset = $4.imm32;
$$.second_reloc_target = $5.reloc_target; $$.second_reloc_target = $5.reloc_target;

View File

@ -421,24 +421,25 @@ int main(int argc, char **argv)
} }
for (entry = compiled_program.first; entry; entry = entry->next) { for (entry = compiled_program.first; entry; entry = entry->next) {
struct brw_instruction *inst = & entry->instruction.gen; struct relocatable_instruction *reloc = &entry->instruction.reloc;
struct brw_instruction *inst = &reloc->gen;
if (is_label(entry)) if (!is_relocatable(entry))
continue; continue;
if (inst->first_reloc_target) if (reloc->first_reloc_target)
inst->first_reloc_offset = label_to_addr(inst->first_reloc_target, entry->inst_offset) - entry->inst_offset; reloc->first_reloc_offset = label_to_addr(reloc->first_reloc_target, entry->inst_offset) - entry->inst_offset;
if (inst->second_reloc_target) if (reloc->second_reloc_target)
inst->second_reloc_offset = label_to_addr(inst->second_reloc_target, entry->inst_offset) - entry->inst_offset; reloc->second_reloc_offset = label_to_addr(reloc->second_reloc_target, entry->inst_offset) - entry->inst_offset;
if (inst->second_reloc_offset) { if (reloc->second_reloc_offset) {
// this is a branch instruction with two offset arguments // this is a branch instruction with two offset arguments
inst->bits3.break_cont.jip = jump_distance(inst->first_reloc_offset); inst->bits3.break_cont.jip = jump_distance(reloc->first_reloc_offset);
inst->bits3.break_cont.uip = jump_distance(inst->second_reloc_offset); inst->bits3.break_cont.uip = jump_distance(reloc->second_reloc_offset);
} else if (inst->first_reloc_offset) { } else if (reloc->first_reloc_offset) {
// this is a branch instruction with one offset argument // this is a branch instruction with one offset argument
int offset = inst->first_reloc_offset; int offset = reloc->first_reloc_offset;
/* bspec: Unlike other flow control instructions, the offset used by JMPI is relative to the incremented instruction pointer rather than the IP value for the instruction itself. */ /* bspec: Unlike other flow control instructions, the offset used by JMPI is relative to the incremented instruction pointer rather than the IP value for the instruction itself. */
int is_jmpi = inst->header.opcode == BRW_OPCODE_JMPI; // target relative to the post-incremented IP, so delta == 1 if JMPI int is_jmpi = inst->header.opcode == BRW_OPCODE_JMPI; // target relative to the post-incremented IP, so delta == 1 if JMPI