add more url's to output of disassembler (dlang#21366)

Author: WalterBright

compiler/src/dmd/backend/arm/disasmarm.d

@@ -265,6 +265,7 @@ void disassemble(uint c) @trusted
     const(char)[] s2;
     const(char)[] s3;
     char[BUFMAX] buf = '\0';
+    char[BUFMAX] url2buf = '\0';
     char[14] rbuf = '\0';
 
     buf[0] = 0;
@@ -489,8 +490,8 @@ void disassemble(uint c) @trusted
             ulong imm = decodeNImmrImms(N,immr,imms);
             p4 = wordtostring(imm);
 
-            uint n = snprintf(buf.ptr, buf.length, "%s_log_imm", p1.ptr);
-            url2 = buf[0 .. n];
+            uint n = snprintf(url2buf.ptr, url2buf.length, "%s_log_imm", p1.ptr);
+            url2 = url2buf[0 .. n];
 
             if (opc == 3 && Rd == 0x1F)
             {
@@ -1861,8 +1862,8 @@ void disassemble(uint c) @trusted
             p2 = fregString(rbuf[0 .. 4],"sd h"[size & 1],Rd);
             p3 = fregString(rbuf[4 .. 8],"sd h"[size & 1],Rn);
 
-            uint n = snprintf(buf.ptr, buf.length, "%s_advsimd_int", p1.ptr);
-            url2 = buf[0 .. n];
+            uint n = snprintf(url2buf.ptr, url2buf.length, "%s_advsimd_int", p1.ptr);
+            url2 = url2buf[0 .. n];
         }
     }
     else
@@ -2128,8 +2129,8 @@ void disassemble(uint c) @trusted
                 p2 = rbuf[0 .. n];
                 p3 = regString(sf,Rn);
             }
-            uint n = snprintf(buf.ptr, buf.length, "%s_float", p1.ptr);
-            url2 = buf[0 .. n];
+            uint n = snprintf(url2buf.ptr, url2buf.length, "%s_float", p1.ptr);
+            url2 = url2buf[0 .. n];
         }
     }
     else
@@ -2238,8 +2239,8 @@ void disassemble(uint c) @trusted
             p3 = fregString(rbuf[4 .. 8],prefix,Rn);
             p4 = fregString(rbuf[8 ..12],prefix,Rm);
 
-            uint n = snprintf(buf.ptr, buf.length, "%s_float.html", p1.ptr);
-            url2 = buf[0 .. n];
+            uint n = snprintf(url2buf.ptr, url2buf.length, "%s_float.html", p1.ptr);
+            url2 = url2buf[0 .. n];
         }
     }
 
@@ -2320,13 +2321,18 @@ void disassemble(uint c) @trusted
             case decode2(0,1,0):
             case decode2(1,1,0):
             case decode2(2,0,0):
-            case decode2(2,1,0): p1 = op24 == 0 ? "stnp" : "stp"; break;
+            case decode2(2,1,0): p1 = op24 == 0 ? "stnp" : "stp"; goto Lurl2;
 
             case decode2(0,0,1):
             case decode2(0,1,1):
             case decode2(1,1,1):
             case decode2(2,0,1):
-            case decode2(2,1,1): p1 = op24 == 0 ? "ldnp" : "ldp"; break;
+            case decode2(2,1,1): p1 = op24 == 0 ? "ldnp" : "ldp"; goto Lurl2;
+
+            Lurl2:
+                uint n = snprintf(url2buf.ptr, url2buf.length, "%s_gen", p1.ptr);
+                url2 = url2buf[0 .. n];
+                break;
 
             case decode2(1,0,0): if (op24) p1 = "stgp"; break;
             case decode2(1,0,1): if (op24) p1 = "ldpsw"; break;
@@ -2378,6 +2384,7 @@ void disassemble(uint c) @trusted
         uint ldr(uint size, uint VR, uint opc) { return (size << 3) | (VR << 2) | opc; }
 
         bool is64 = false;
+        const(char)* format = "%s_imm";
         switch (ldr(size, VR, opc))
         {
             case ldr(0,0,0): p1 = "strb";  goto Lldr8;  // https://www.scs.stanford.edu/~zyedidia/arm64/strb_imm.html
@@ -2393,11 +2400,11 @@ void disassemble(uint c) @trusted
             case ldr(1,0,1): p1 = "ldrh";  goto Lldr;
             case ldr(1,0,2): p1 = "ldrsh"; goto Lldr64;
             case ldr(1,0,3): p1 = "ldrsh"; goto Lldr;
-            case ldr(2,0,0): p1 = "str";   goto Lldr;
-            case ldr(2,0,1): p1 = "ldr";   goto Lldr;
+            case ldr(2,0,0): p1 = "str";   format = "%s_imm_gen"; goto Lldr;
+            case ldr(2,0,1): p1 = "ldr";   format = "%s_imm_gen"; goto Lldr;
             case ldr(2,0,2): p1 = "ldrsw"; goto Lldrsw;
-            case ldr(3,0,0): p1 = "str";   goto Lldr64;
-            case ldr(3,0,1): p1 = "ldr";   goto Lldr64;
+            case ldr(3,0,0): p1 = "str";   format = "%s_imm_gen"; goto Lldr64;
+            case ldr(3,0,1): p1 = "ldr";   format = "%s_imm_gen"; goto Lldr64;
             //case ldr(3,0,2): p1 = "prfm";
             Lldrsw:
                 p2 = regString(true, Rt);
@@ -2422,15 +2429,22 @@ void disassemble(uint c) @trusted
             case ldr(3,1,0): p1 = "str";  goto LsimdFp;
             case ldr(3,1,1): p1 = "ldr";  goto LsimdFp;
             LsimdFp:
+                format = "%s_imm_fpsimd";
                 uint shift = size + ((opc & 2) << 1);
                 p2 = fregString(buf[0..4], fpPrefix[shift], Rt);
                 uint offset = imm12 << shift;
                 p3 = eaString(0, cast(ubyte)Rn, offset);
                 break;
 
             default:
+                format = null;
                 break;
         }
+        if (format)
+        {
+            uint n = snprintf(url2buf.ptr, url2buf.length, format, p1.ptr);
+            url2 = url2buf[0 .. n];
+        }
     }
     }
     //printf("%x\n", field(ins, 31, 25));