1 /* Select disassembly routine for specified architecture.
2    Copyright (C) 1994-2021 Free Software Foundation, Inc.
3 
4    This file is part of the GNU opcodes library.
5 
6    This library is free software; you can redistribute it and/or modify
7    it under the terms of the GNU General Public License as published by
8    the Free Software Foundation; either version 3 of the License, or
9    (at your option) any later version.
10 
11    This program is distributed in the hope that it will be useful,
12    but WITHOUT ANY WARRANTY; without even the implied warranty of
13    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
14    GNU General Public License for more details.
15 
16    You should have received a copy of the GNU General Public License
17    along with this program; if not, write to the Free Software
18    Foundation, Inc., 51 Franklin Street - Fifth Floor, Boston,
19    MA 02110-1301, USA.  */
20 
21 #include "sysdep.h"
22 #include "disassemble.h"
23 #include "safe-ctype.h"
24 #include "opintl.h"
25 
26 #ifdef ARCH_all
27 #define ARCH_aarch64
28 #define ARCH_alpha
29 #define ARCH_arc
30 #define ARCH_arm
31 #define ARCH_avr
32 #define ARCH_bfin
33 #define ARCH_cr16
34 #define ARCH_cris
35 #define ARCH_crx
36 #define ARCH_csky
37 #define ARCH_d10v
38 #define ARCH_d30v
39 #define ARCH_dlx
40 #define ARCH_bpf
41 #define ARCH_epiphany
42 #define ARCH_fr30
43 #define ARCH_frv
44 #define ARCH_ft32
45 #define ARCH_h8300
46 #define ARCH_hppa
47 #define ARCH_i386
48 #define ARCH_ia64
49 #define ARCH_ip2k
50 #define ARCH_iq2000
51 #define ARCH_lm32
52 #define ARCH_m32c
53 #define ARCH_m32r
54 #define ARCH_m68hc11
55 #define ARCH_m68hc12
56 #define ARCH_m68k
57 #define ARCH_mcore
58 #define ARCH_mep
59 #define ARCH_metag
60 #define ARCH_microblaze
61 #define ARCH_mips
62 #define ARCH_mmix
63 #define ARCH_mn10200
64 #define ARCH_mn10300
65 #define ARCH_moxie
66 #define ARCH_mt
67 #define ARCH_msp430
68 #define ARCH_nds32
69 #define ARCH_nfp
70 #define ARCH_nios2
71 #define ARCH_ns32k
72 #define ARCH_or1k
73 #define ARCH_pdp11
74 #define ARCH_pj
75 #define ARCH_powerpc
76 #define ARCH_pru
77 #define ARCH_riscv
78 #define ARCH_rs6000
79 #define ARCH_rl78
80 #define ARCH_rx
81 #define ARCH_s12z
82 #define ARCH_s390
83 #define ARCH_score
84 #define ARCH_sh
85 #define ARCH_sparc
86 #define ARCH_spu
87 #define ARCH_tic30
88 #define ARCH_tic4x
89 #define ARCH_tic54x
90 #define ARCH_tic6x
91 #define ARCH_tilegx
92 #define ARCH_tilepro
93 #define ARCH_v850
94 #define ARCH_vax
95 #define ARCH_visium
96 #define ARCH_wasm32
97 #define ARCH_xstormy16
98 #define ARCH_xc16x
99 #define ARCH_xgate
100 #define ARCH_xtensa
101 #define ARCH_z80
102 #define ARCH_z8k
103 #endif
104 
105 #ifdef ARCH_m32c
106 #include "m32c-desc.h"
107 #endif
108 
109 #ifdef ARCH_bpf
110 /* XXX this should be including bpf-desc.h instead of this hackery,
111    but at the moment it is not possible to include several CGEN
112    generated *-desc.h files simultaneously.  To be fixed in
113    CGEN...  */
114 
115 # ifdef ARCH_m32c
116 enum epbf_isa_attr
117 {
118   ISA_EBPFLE, ISA_EBPFBE, ISA_XBPFLE, ISA_XBPFBE, ISA_EBPFMAX
119 };
120 # else
121 #  include "bpf-desc.h"
122 #  define ISA_EBPFMAX ISA_MAX
123 # endif
124 #endif /* ARCH_bpf */
125 
126 disassembler_ftype
disassembler(enum bfd_architecture a,bool big ATTRIBUTE_UNUSED,unsigned long mach ATTRIBUTE_UNUSED,bfd * abfd ATTRIBUTE_UNUSED)127 disassembler (enum bfd_architecture a,
128 	      bool big ATTRIBUTE_UNUSED,
129 	      unsigned long mach ATTRIBUTE_UNUSED,
130 	      bfd *abfd ATTRIBUTE_UNUSED)
131 {
132   disassembler_ftype disassemble;
133 
134   switch (a)
135     {
136       /* If you add a case to this table, also add it to the
137 	 ARCH_all definition right above this function.  */
138 #ifdef ARCH_aarch64
139     case bfd_arch_aarch64:
140       disassemble = print_insn_aarch64;
141       break;
142 #endif
143 #ifdef ARCH_alpha
144     case bfd_arch_alpha:
145       disassemble = print_insn_alpha;
146       break;
147 #endif
148 #ifdef ARCH_arc
149     case bfd_arch_arc:
150       disassemble = arc_get_disassembler (abfd);
151       break;
152 #endif
153 #ifdef ARCH_arm
154     case bfd_arch_arm:
155       if (big)
156 	disassemble = print_insn_big_arm;
157       else
158 	disassemble = print_insn_little_arm;
159       break;
160 #endif
161 #ifdef ARCH_avr
162     case bfd_arch_avr:
163       disassemble = print_insn_avr;
164       break;
165 #endif
166 #ifdef ARCH_bfin
167     case bfd_arch_bfin:
168       disassemble = print_insn_bfin;
169       break;
170 #endif
171 #ifdef ARCH_cr16
172     case bfd_arch_cr16:
173       disassemble = print_insn_cr16;
174       break;
175 #endif
176 #ifdef ARCH_cris
177     case bfd_arch_cris:
178       disassemble = cris_get_disassembler (abfd);
179       break;
180 #endif
181 #ifdef ARCH_crx
182     case bfd_arch_crx:
183       disassemble = print_insn_crx;
184       break;
185 #endif
186 #ifdef ARCH_csky
187     case bfd_arch_csky:
188       disassemble = csky_get_disassembler (abfd);
189       break;
190 #endif
191 
192 #ifdef ARCH_d10v
193     case bfd_arch_d10v:
194       disassemble = print_insn_d10v;
195       break;
196 #endif
197 #ifdef ARCH_d30v
198     case bfd_arch_d30v:
199       disassemble = print_insn_d30v;
200       break;
201 #endif
202 #ifdef ARCH_dlx
203     case bfd_arch_dlx:
204       /* As far as I know we only handle big-endian DLX objects.  */
205       disassemble = print_insn_dlx;
206       break;
207 #endif
208 #ifdef ARCH_h8300
209     case bfd_arch_h8300:
210       if (mach == bfd_mach_h8300h || mach == bfd_mach_h8300hn)
211 	disassemble = print_insn_h8300h;
212       else if (mach == bfd_mach_h8300s
213 	       || mach == bfd_mach_h8300sn
214 	       || mach == bfd_mach_h8300sx
215 	       || mach == bfd_mach_h8300sxn)
216 	disassemble = print_insn_h8300s;
217       else
218 	disassemble = print_insn_h8300;
219       break;
220 #endif
221 #ifdef ARCH_hppa
222     case bfd_arch_hppa:
223       disassemble = print_insn_hppa;
224       break;
225 #endif
226 #ifdef ARCH_i386
227     case bfd_arch_i386:
228     case bfd_arch_iamcu:
229     case bfd_arch_l1om:
230     case bfd_arch_k1om:
231       disassemble = print_insn_i386;
232       break;
233 #endif
234 #ifdef ARCH_ia64
235     case bfd_arch_ia64:
236       disassemble = print_insn_ia64;
237       break;
238 #endif
239 #ifdef ARCH_ip2k
240     case bfd_arch_ip2k:
241       disassemble = print_insn_ip2k;
242       break;
243 #endif
244 #ifdef ARCH_bpf
245     case bfd_arch_bpf:
246       disassemble = print_insn_bpf;
247       break;
248 #endif
249 #ifdef ARCH_epiphany
250     case bfd_arch_epiphany:
251       disassemble = print_insn_epiphany;
252       break;
253 #endif
254 #ifdef ARCH_fr30
255     case bfd_arch_fr30:
256       disassemble = print_insn_fr30;
257       break;
258 #endif
259 #ifdef ARCH_lm32
260     case bfd_arch_lm32:
261       disassemble = print_insn_lm32;
262       break;
263 #endif
264 #ifdef ARCH_m32r
265     case bfd_arch_m32r:
266       disassemble = print_insn_m32r;
267       break;
268 #endif
269 #if defined(ARCH_m68hc11) || defined(ARCH_m68hc12) \
270     || defined(ARCH_9s12x) || defined(ARCH_m9s12xg)
271     case bfd_arch_m68hc11:
272       disassemble = print_insn_m68hc11;
273       break;
274     case bfd_arch_m68hc12:
275       disassemble = print_insn_m68hc12;
276       break;
277     case bfd_arch_m9s12x:
278       disassemble = print_insn_m9s12x;
279       break;
280     case bfd_arch_m9s12xg:
281       disassemble = print_insn_m9s12xg;
282       break;
283 #endif
284 #if defined(ARCH_s12z)
285     case bfd_arch_s12z:
286       disassemble = print_insn_s12z;
287       break;
288 #endif
289 #ifdef ARCH_m68k
290     case bfd_arch_m68k:
291       disassemble = print_insn_m68k;
292       break;
293 #endif
294 #ifdef ARCH_mt
295     case bfd_arch_mt:
296       disassemble = print_insn_mt;
297       break;
298 #endif
299 #ifdef ARCH_microblaze
300     case bfd_arch_microblaze:
301       disassemble = print_insn_microblaze;
302       break;
303 #endif
304 #ifdef ARCH_msp430
305     case bfd_arch_msp430:
306       disassemble = print_insn_msp430;
307       break;
308 #endif
309 #ifdef ARCH_nds32
310     case bfd_arch_nds32:
311       disassemble = print_insn_nds32;
312       break;
313 #endif
314 #ifdef ARCH_nfp
315     case bfd_arch_nfp:
316       disassemble = print_insn_nfp;
317       break;
318 #endif
319 #ifdef ARCH_ns32k
320     case bfd_arch_ns32k:
321       disassemble = print_insn_ns32k;
322       break;
323 #endif
324 #ifdef ARCH_mcore
325     case bfd_arch_mcore:
326       disassemble = print_insn_mcore;
327       break;
328 #endif
329 #ifdef ARCH_mep
330     case bfd_arch_mep:
331       disassemble = print_insn_mep;
332       break;
333 #endif
334 #ifdef ARCH_metag
335     case bfd_arch_metag:
336       disassemble = print_insn_metag;
337       break;
338 #endif
339 #ifdef ARCH_mips
340     case bfd_arch_mips:
341       if (big)
342 	disassemble = print_insn_big_mips;
343       else
344 	disassemble = print_insn_little_mips;
345       break;
346 #endif
347 #ifdef ARCH_mmix
348     case bfd_arch_mmix:
349       disassemble = print_insn_mmix;
350       break;
351 #endif
352 #ifdef ARCH_mn10200
353     case bfd_arch_mn10200:
354       disassemble = print_insn_mn10200;
355       break;
356 #endif
357 #ifdef ARCH_mn10300
358     case bfd_arch_mn10300:
359       disassemble = print_insn_mn10300;
360       break;
361 #endif
362 #ifdef ARCH_nios2
363     case bfd_arch_nios2:
364       if (big)
365 	disassemble = print_insn_big_nios2;
366       else
367 	disassemble = print_insn_little_nios2;
368       break;
369 #endif
370 #ifdef ARCH_or1k
371     case bfd_arch_or1k:
372       disassemble = print_insn_or1k;
373       break;
374 #endif
375 #ifdef ARCH_pdp11
376     case bfd_arch_pdp11:
377       disassemble = print_insn_pdp11;
378       break;
379 #endif
380 #ifdef ARCH_pj
381     case bfd_arch_pj:
382       disassemble = print_insn_pj;
383       break;
384 #endif
385 #ifdef ARCH_powerpc
386     case bfd_arch_powerpc:
387 #endif
388 #ifdef ARCH_rs6000
389     case bfd_arch_rs6000:
390 #endif
391 #if defined ARCH_powerpc || defined ARCH_rs6000
392       if (big)
393 	disassemble = print_insn_big_powerpc;
394       else
395 	disassemble = print_insn_little_powerpc;
396       break;
397 #endif
398 #ifdef ARCH_pru
399     case bfd_arch_pru:
400       disassemble = print_insn_pru;
401       break;
402 #endif
403 #ifdef ARCH_riscv
404     case bfd_arch_riscv:
405       disassemble = riscv_get_disassembler (abfd);
406       break;
407 #endif
408 #ifdef ARCH_rl78
409     case bfd_arch_rl78:
410       disassemble = rl78_get_disassembler (abfd);
411       break;
412 #endif
413 #ifdef ARCH_rx
414     case bfd_arch_rx:
415       disassemble = print_insn_rx;
416       break;
417 #endif
418 #ifdef ARCH_s390
419     case bfd_arch_s390:
420       disassemble = print_insn_s390;
421       break;
422 #endif
423 #ifdef ARCH_score
424     case bfd_arch_score:
425       if (big)
426 	disassemble = print_insn_big_score;
427       else
428 	disassemble = print_insn_little_score;
429      break;
430 #endif
431 #ifdef ARCH_sh
432     case bfd_arch_sh:
433       disassemble = print_insn_sh;
434       break;
435 #endif
436 #ifdef ARCH_sparc
437     case bfd_arch_sparc:
438       disassemble = print_insn_sparc;
439       break;
440 #endif
441 #ifdef ARCH_spu
442     case bfd_arch_spu:
443       disassemble = print_insn_spu;
444       break;
445 #endif
446 #ifdef ARCH_tic30
447     case bfd_arch_tic30:
448       disassemble = print_insn_tic30;
449       break;
450 #endif
451 #ifdef ARCH_tic4x
452     case bfd_arch_tic4x:
453       disassemble = print_insn_tic4x;
454       break;
455 #endif
456 #ifdef ARCH_tic54x
457     case bfd_arch_tic54x:
458       disassemble = print_insn_tic54x;
459       break;
460 #endif
461 #ifdef ARCH_tic6x
462     case bfd_arch_tic6x:
463       disassemble = print_insn_tic6x;
464       break;
465 #endif
466 #ifdef ARCH_ft32
467     case bfd_arch_ft32:
468       disassemble = print_insn_ft32;
469       break;
470 #endif
471 #ifdef ARCH_v850
472     case bfd_arch_v850:
473     case bfd_arch_v850_rh850:
474       disassemble = print_insn_v850;
475       break;
476 #endif
477 #ifdef ARCH_wasm32
478     case bfd_arch_wasm32:
479       disassemble = print_insn_wasm32;
480       break;
481 #endif
482 #ifdef ARCH_xgate
483     case bfd_arch_xgate:
484       disassemble = print_insn_xgate;
485       break;
486 #endif
487 #ifdef ARCH_xstormy16
488     case bfd_arch_xstormy16:
489       disassemble = print_insn_xstormy16;
490       break;
491 #endif
492 #ifdef ARCH_xc16x
493     case bfd_arch_xc16x:
494       disassemble = print_insn_xc16x;
495       break;
496 #endif
497 #ifdef ARCH_xtensa
498     case bfd_arch_xtensa:
499       disassemble = print_insn_xtensa;
500       break;
501 #endif
502 #ifdef ARCH_z80
503     case bfd_arch_z80:
504       disassemble = print_insn_z80;
505       break;
506 #endif
507 #ifdef ARCH_z8k
508     case bfd_arch_z8k:
509       if (mach == bfd_mach_z8001)
510 	disassemble = print_insn_z8001;
511       else
512 	disassemble = print_insn_z8002;
513       break;
514 #endif
515 #ifdef ARCH_vax
516     case bfd_arch_vax:
517       disassemble = print_insn_vax;
518       break;
519 #endif
520 #ifdef ARCH_visium
521      case bfd_arch_visium:
522        disassemble = print_insn_visium;
523        break;
524 #endif
525 #ifdef ARCH_frv
526     case bfd_arch_frv:
527       disassemble = print_insn_frv;
528       break;
529 #endif
530 #ifdef ARCH_moxie
531     case bfd_arch_moxie:
532       disassemble = print_insn_moxie;
533       break;
534 #endif
535 #ifdef ARCH_iq2000
536     case bfd_arch_iq2000:
537       disassemble = print_insn_iq2000;
538       break;
539 #endif
540 #ifdef ARCH_m32c
541     case bfd_arch_m32c:
542       disassemble = print_insn_m32c;
543       break;
544 #endif
545 #ifdef ARCH_tilegx
546     case bfd_arch_tilegx:
547       disassemble = print_insn_tilegx;
548       break;
549 #endif
550 #ifdef ARCH_tilepro
551     case bfd_arch_tilepro:
552       disassemble = print_insn_tilepro;
553       break;
554 #endif
555     default:
556       return 0;
557     }
558   return disassemble;
559 }
560 
561 void
disassembler_usage(FILE * stream ATTRIBUTE_UNUSED)562 disassembler_usage (FILE *stream ATTRIBUTE_UNUSED)
563 {
564 #ifdef ARCH_aarch64
565   print_aarch64_disassembler_options (stream);
566 #endif
567 #ifdef ARCH_arc
568   print_arc_disassembler_options (stream);
569 #endif
570 #ifdef ARCH_arm
571   print_arm_disassembler_options (stream);
572 #endif
573 #ifdef ARCH_mips
574   print_mips_disassembler_options (stream);
575 #endif
576 #ifdef ARCH_nfp
577   print_nfp_disassembler_options (stream);
578 #endif
579 #ifdef ARCH_powerpc
580   print_ppc_disassembler_options (stream);
581 #endif
582 #ifdef ARCH_riscv
583   print_riscv_disassembler_options (stream);
584 #endif
585 #ifdef ARCH_i386
586   print_i386_disassembler_options (stream);
587 #endif
588 #ifdef ARCH_s390
589   print_s390_disassembler_options (stream);
590 #endif
591 #ifdef ARCH_wasm32
592   print_wasm32_disassembler_options (stream);
593 #endif
594 
595   return;
596 }
597 
598 void
disassemble_init_for_target(struct disassemble_info * info)599 disassemble_init_for_target (struct disassemble_info * info)
600 {
601   if (info == NULL)
602     return;
603 
604   switch (info->arch)
605     {
606 #ifdef ARCH_aarch64
607     case bfd_arch_aarch64:
608       info->symbol_is_valid = aarch64_symbol_is_valid;
609       info->disassembler_needs_relocs = true;
610       break;
611 #endif
612 #ifdef ARCH_arm
613     case bfd_arch_arm:
614       info->symbol_is_valid = arm_symbol_is_valid;
615       info->disassembler_needs_relocs = true;
616       break;
617 #endif
618 #ifdef ARCH_csky
619     case bfd_arch_csky:
620       info->symbol_is_valid = csky_symbol_is_valid;
621       info->disassembler_needs_relocs = true;
622       break;
623 #endif
624 
625 #ifdef ARCH_ia64
626     case bfd_arch_ia64:
627       info->skip_zeroes = 16;
628       break;
629 #endif
630 #ifdef ARCH_tic4x
631     case bfd_arch_tic4x:
632       info->skip_zeroes = 32;
633       break;
634 #endif
635 #ifdef ARCH_mep
636     case bfd_arch_mep:
637       info->skip_zeroes = 256;
638       info->skip_zeroes_at_end = 0;
639       break;
640 #endif
641 #ifdef ARCH_metag
642     case bfd_arch_metag:
643       info->disassembler_needs_relocs = true;
644       break;
645 #endif
646 #ifdef ARCH_m32c
647     case bfd_arch_m32c:
648       /* This processor in fact is little endian.  The value set here
649 	 reflects the way opcodes are written in the cgen description.  */
650       info->endian = BFD_ENDIAN_BIG;
651       if (!info->private_data)
652 	{
653 	  info->private_data = cgen_bitset_create (ISA_MAX);
654 	  if (info->mach == bfd_mach_m16c)
655 	    cgen_bitset_set (info->private_data, ISA_M16C);
656 	  else
657 	    cgen_bitset_set (info->private_data, ISA_M32C);
658 	}
659       break;
660 #endif
661 #ifdef ARCH_bpf
662     case bfd_arch_bpf:
663       info->endian_code = BFD_ENDIAN_LITTLE;
664       if (!info->private_data)
665 	{
666 	  info->private_data = cgen_bitset_create (ISA_MAX);
667 	  if (info->endian == BFD_ENDIAN_BIG)
668 	    {
669 	      cgen_bitset_set (info->private_data, ISA_EBPFBE);
670 	      if (info->mach == bfd_mach_xbpf)
671 		cgen_bitset_set (info->private_data, ISA_XBPFBE);
672 	    }
673 	  else
674 	    {
675 	      cgen_bitset_set (info->private_data, ISA_EBPFLE);
676 	      if (info->mach == bfd_mach_xbpf)
677 		cgen_bitset_set (info->private_data, ISA_XBPFLE);
678 	    }
679 	}
680       break;
681 #endif
682 #ifdef ARCH_pru
683     case bfd_arch_pru:
684       info->disassembler_needs_relocs = true;
685       break;
686 #endif
687 #ifdef ARCH_powerpc
688     case bfd_arch_powerpc:
689 #endif
690 #ifdef ARCH_rs6000
691     case bfd_arch_rs6000:
692 #endif
693 #if defined (ARCH_powerpc) || defined (ARCH_rs6000)
694       disassemble_init_powerpc (info);
695       break;
696 #endif
697 #ifdef ARCH_riscv
698     case bfd_arch_riscv:
699       info->symbol_is_valid = riscv_symbol_is_valid;
700       break;
701 #endif
702 #ifdef ARCH_wasm32
703     case bfd_arch_wasm32:
704       disassemble_init_wasm32 (info);
705       break;
706 #endif
707 #ifdef ARCH_s390
708     case bfd_arch_s390:
709       disassemble_init_s390 (info);
710       break;
711 #endif
712 #ifdef ARCH_nds32
713     case bfd_arch_nds32:
714       disassemble_init_nds32 (info);
715       break;
716  #endif
717     default:
718       break;
719     }
720 }
721 
722 void
disassemble_free_target(struct disassemble_info * info)723 disassemble_free_target (struct disassemble_info *info)
724 {
725   if (info == NULL)
726     return;
727 
728   switch (info->arch)
729     {
730     default:
731       return;
732 
733 #ifdef ARCH_bpf
734     case bfd_arch_bpf:
735 #endif
736 #ifdef ARCH_m32c
737     case bfd_arch_m32c:
738 #endif
739 #if defined ARCH_bpf || defined ARCH_m32c
740       if (info->private_data)
741 	{
742 	  CGEN_BITSET *mask = info->private_data;
743 	  free (mask->bits);
744 	}
745       break;
746 #endif
747 
748 #ifdef ARCH_arc
749     case bfd_arch_arc:
750       break;
751 #endif
752 #ifdef ARCH_cris
753     case bfd_arch_cris:
754       break;
755 #endif
756 #ifdef ARCH_mmix
757     case bfd_arch_mmix:
758       break;
759 #endif
760 #ifdef ARCH_nfp
761     case bfd_arch_nfp:
762       break;
763 #endif
764 #ifdef ARCH_powerpc
765     case bfd_arch_powerpc:
766       break;
767 #endif
768 #ifdef ARCH_riscv
769     case bfd_arch_riscv:
770       break;
771 #endif
772 #ifdef ARCH_rs6000
773     case bfd_arch_rs6000:
774       break;
775 #endif
776     }
777 
778   free (info->private_data);
779 }
780 
781 /* Remove whitespace and consecutive commas from OPTIONS.  */
782 
783 char *
remove_whitespace_and_extra_commas(char * options)784 remove_whitespace_and_extra_commas (char *options)
785 {
786   char *str;
787   size_t i, len;
788 
789   if (options == NULL)
790     return NULL;
791 
792   /* Strip off all trailing whitespace and commas.  */
793   for (len = strlen (options); len > 0; len--)
794     {
795       if (!ISSPACE (options[len - 1]) && options[len - 1] != ',')
796 	break;
797       options[len - 1] = '\0';
798     }
799 
800   /* Convert all remaining whitespace to commas.  */
801   for (i = 0; options[i] != '\0'; i++)
802     if (ISSPACE (options[i]))
803       options[i] = ',';
804 
805   /* Remove consecutive commas.  */
806   for (str = options; *str != '\0'; str++)
807     if (*str == ',' && (*(str + 1) == ',' || str == options))
808       {
809 	char *next = str + 1;
810 	while (*next == ',')
811 	  next++;
812 	len = strlen (next);
813 	if (str != options)
814 	  str++;
815 	memmove (str, next, len);
816 	next[len - (size_t)(next - str)] = '\0';
817       }
818   return (strlen (options) != 0) ? options : NULL;
819 }
820 
821 /* Like STRCMP, but treat ',' the same as '\0' so that we match
822    strings like "foobar" against "foobar,xxyyzz,...".  */
823 
824 int
disassembler_options_cmp(const char * s1,const char * s2)825 disassembler_options_cmp (const char *s1, const char *s2)
826 {
827   unsigned char c1, c2;
828 
829   do
830     {
831       c1 = (unsigned char) *s1++;
832       if (c1 == ',')
833 	c1 = '\0';
834       c2 = (unsigned char) *s2++;
835       if (c2 == ',')
836 	c2 = '\0';
837       if (c1 == '\0')
838 	return c1 - c2;
839     }
840   while (c1 == c2);
841 
842   return c1 - c2;
843 }
844 
845 void
opcodes_assert(const char * file,int line)846 opcodes_assert (const char *file, int line)
847 {
848   opcodes_error_handler (_("assertion fail %s:%d"), file, line);
849   opcodes_error_handler (_("Please report this bug"));
850   abort ();
851 }
852