gas/config/tc-m88k.c

179 static char *get_bf PARAMS ((char *param, unsigned *valp));
180 static char *get_cmp PARAMS ((char *param, unsigned *valp));
181 static char *get_cnd PARAMS ((char *param, unsigned *valp));
182 static char *get_bf2 PARAMS ((char *param, int bc));
183 static char *get_bf_offset_expression PARAMS ((char *param, unsigned *offsetp));
184 static char *get_cr PARAMS ((char *param, unsigned *regnop));
185 static char *get_fcr PARAMS ((char *param, unsigned *regnop));
186 static char *get_imm16 PARAMS ((char *param, struct m88k_insn *insn));
187 static char *get_o6 PARAMS ((char *param, unsigned *valp));
189 static char *get_reg PARAMS ((char *param, unsigned *regnop, unsigned int reg_prefix));
190 static char *get_vec9 PARAMS ((char *param, unsigned *valp));
191 static char *getval PARAMS ((char *param, unsigned int *valp));
192 static char *get_pcr PARAMS ((char *param, struct m88k_insn *insn,
196 			   char *param, struct m88k_insn *insn));
394   char *param, *thisfrag;
403   for (param = op; *param != 0 && !ISSPACE (*param); param++)
405   c = *param;
406   *param++ = '\0';
424   while (!calcop (format, param, &insn))
511 calcop (format, param, insn)
513      char *param;
527    * correctly reported only if param == "", although there could be
539       if (param == NULL)
547 	  return (*param == 0 || *param == '\n');
550 	  if (f != *param++)
555 	  param = get_reg (param, &val, reg_prefix);
561 	  param = get_o6 (param, &val);
570 	  param = get_reg (param, &val, reg_prefix);
576 	  param = get_reg (param, &val, reg_prefix);
582 	  param = get_reg (param, &val, 'r');
587 	  param = get_imm16 (param, insn);
591 	  param = get_bf (param, &val);
596 	  param = get_pcr (param, insn, RELOC_PC16);
600 	  param = get_pcr (param, insn, RELOC_PC26);
604 	  param = get_cmp (param, &val);
609 	  param = get_cnd (param, &val);
614 	  param = get_cr (param, &val);
619 	  param = get_fcr (param, &val);
624 	  param = get_vec9 (param, &val);
638 match_name (param, assoc_tab, valp)
639      char *param;
653       if (!strncmp (param, name, name_len))
656 	  return param + name_len;
662 get_reg (param, regnop, reg_prefix)
663      char *param;
671   c = *param++;
676   c = *param++;
679       regno = *param++ - '0';
685 	      return param;
687 	  c = *param - '0';
694 		  return param + 1;
700 	      return param;
705   else if (c == 's' && param[0] == 'p')
708       return param + 1;
715 get_imm16 (param, insn)
716      char *param;
727   if (*param == REGISTER_PREFIX)
729       param++;
734   if (!strncmp (param, "hi16", 4) && !ISALNUM (param[4]))
737       param += 4;
739   else if (!strncmp (param, "lo16", 4) && !ISALNUM (param[4]))
742       param += 4;
745   else if (!strncmp (param, "iw16", 4) && !ISALNUM (param[4]))
748       param += 4;
758   input_line_pointer = param;
760   param = input_line_pointer;
788   return param;
792 get_pcr (param, insn, reloc)
793      char *param;
800   input_line_pointer = param;
814 get_cmp (param, valp)
815      char *param;
821   save_ptr = param;
825   if (*param == REGISTER_PREFIX)
826     param++;
828   param = match_name (param, cmpslot, valp);
831   if (param == NULL)
833       param = save_ptr;
836       input_line_pointer = param;
838       param = input_line_pointer;
849   return param;
853 get_cnd (param, valp)
854      char *param;
859   if (ISDIGIT (*param))
861       param = getval (param, &val);
873       if (*param == REGISTER_PREFIX)
874 	param++;
877       param[0] = TOLOWER (param[0]);
878       param[1] = TOLOWER (param[1]);
880       param = match_name (param, cndmsk, valp);
882       if (param == NULL)
889   return param;
893 get_bf2 (param, bc)
894      char *param;
902       c = *param;
904 	return param;
910 	return param;
911       param++;
916 get_bf_offset_expression (param, offsetp)
917      char *param;
924   if (*param == REGISTER_PREFIX && ISALPHA (param[1]))
925     param++;
928   if (ISALPHA (param[0]))
930       param[0] = TOLOWER (param[0]);
931       param[1] = TOLOWER (param[1]);
933       param = match_name (param, cmpslot, offsetp);
935       return param;
939       input_line_pointer = param;
941       param = input_line_pointer;
945   return param;
949 get_bf (param, valp)
950      char *param;
958   xp = get_bf2 (param, '<');
961   input_line_pointer = param;
965       param = get_bf_offset_expression (param, &offset);
967       if (param == NULL)
973       param = get_bf2 (xp, '>');
974       if (*param == 0)
976       *param++ = 0;		/* Overwrite the '>' */
982       if (xp + 1 != param)
988   return param;
992 get_cr (param, regnop)
993      char *param;
1000   if (*param++ != REGISTER_PREFIX)
1004   if (!strncmp (param, "cr", 2))
1006       param += 2;
1008       regno = *param++ - '0';
1014 	      return param;
1016 	  c = *param - '0';
1023 		  return param + 1;
1029 	      return param;
1035   param = match_name (param,
1039   return param;
1043 get_fcr (param, regnop)
1044      char *param;
1051   if (*param++ != REGISTER_PREFIX)
1055   if (!strncmp (param, "fcr", 3))
1057       param += 3;
1059       regno = *param++ - '0';
1065 	      return param;
1067 	  c = *param - '0';
1074 		  return param + 1;
1080 	      return param;
1086   param = match_name (param, fcr_regs, regnop);
1088   return param;
1092 get_vec9 (param, valp)
1093      char *param;
1100   input_line_pointer = param;
1102   param = input_line_pointer;
1110   return param;
1114 get_o6 (param, valp)
1115      char *param;
1122   input_line_pointer = param;
1124   param = input_line_pointer;
1132   return (param);
1141 getval (param, valp)
1142      char *param;
1148   c = *param++;
1151       c = *param++;
1154 	  c = *param++;
1159 	      c = *param++;
1169 	      c = *param++ - '0';
1179 	  c = *param++ - '0';
1184   return param - 1;