![Please Enable Javascript]()
{"schema":"libjg2-1",
"vpath":"/git/",
"avatar":"/git/avatar/",
"alang":"",
"gen_ut":1752657050,
"reponame":"openssl",
"desc":"OpenSSL",
"owner": { "name": "Andy Green", "email": "andy@warmcat.com", "md5": "c50933ca2aa61e0fe2c43d46bb6b59cb" },"url":"https://warmcat.com/repo/openssl",
"f":3,
"items": [
{"schema":"libjg2-1",
"cid":"6b3a5b70de85c188b9eb502f1b5a25b8",
"commit": {"type":"commit",
"time": 1529937948,
"time_ofs": 120,
"oid_tree": { "oid": "138ed7f4272c857f387d88b6dc5bae575a1c2f83", "alias": []},
"oid":{ "oid": "1753d1237429bace72a944f7654ce4b1c4364f60", "alias": []},
"msg": "PA-RISC assembly pack: make it work with GNU assembler for HP-UX.",
"sig_commit": { "git_time": { "time": 1529937948, "offset": 120 }, "name": "Andy Polyakov", "email": "appro@openssl.org", "md5": "50bd64fa2a792cbbf679fa16213a3b2a" },
"sig_author": { "git_time": { "time": 1529839769, "offset": 120 }, "name": "Andy Polyakov", "email": "appro@openssl.org", "md5": "50bd64fa2a792cbbf679fa16213a3b2a" }},
"body": "PA-RISC assembly pack: make it work with GNU assembler for HP-UX.\n\nReviewed-by: Rich Salz \u003crsalz@openssl.org\u003e\n(Merged from https://github.com/openssl/openssl/pull/6583)\n"
,
"diff": "diff --git a/crypto/aes/asm/aes-parisc.pl b/crypto/aes/asm/aes-parisc.pl\nindex b688ab3..93ed09c 100644\n--- a/crypto/aes/asm/aes-parisc.pl\n+++ b/crypto/aes/asm/aes-parisc.pl\n@@ -1012,6 +1012,11 @@ L\u005c$AES_Td\n \t.STRINGZ \u0022AES for PA-RISC, CRYPTOGAMS by \u003cappro\u005c@openssl.org\u003e\u0022\n ___\n \n+if (`$ENV{CC} -Wa,-v -c -o /dev/null -x assembler /dev/null 2\u003e\u00261`\n+\t\u003d~ /GNU assembler/) {\n+ $gnuas \u003d 1;\n+}\n+\n foreach (split(\u0022\u005cn\u0022,$code)) {\n \ts/\u005c`([^\u005c`]*)\u005c`/eval $1/ge;\n \n@@ -1022,8 +1027,12 @@ foreach (split(\u0022\u005cn\u0022,$code)) {\n \t\t$SIZE_T\u003d\u003d4 ? sprintf(\u0022extru%s,%d,8,\u0022,$1,31-$2)\n \t\t: sprintf(\u0022extrd,u%s,%d,8,\u0022,$1,63-$2)/e;\n \n+\ts/(\u005c.LEVEL\u005cs+2\u005c.0)W/$1w/\tif ($gnuas \u0026\u0026 $SIZE_T\u003d\u003d8);\n+\ts/\u005c.SPACE\u005cs+\u005c$TEXT\u005c$/.text/\tif ($gnuas \u0026\u0026 $SIZE_T\u003d\u003d8);\n+\ts/\u005c.SUBSPA.*//\t\t\tif ($gnuas \u0026\u0026 $SIZE_T\u003d\u003d8);\n \ts/,\u005c*/,/\t\t\tif ($SIZE_T\u003d\u003d4);\n \ts/\u005cbbv\u005cb(.*\u005c(%r2\u005c))/bve$1/\tif ($SIZE_T\u003d\u003d8);\n+\n \tprint $_,\u0022\u005cn\u0022;\n }\n close STDOUT;\ndiff --git a/crypto/bn/asm/parisc-mont.pl b/crypto/bn/asm/parisc-mont.pl\nindex 78ab2dc..aa9f626 100644\n--- a/crypto/bn/asm/parisc-mont.pl\n+++ b/crypto/bn/asm/parisc-mont.pl\n@@ -984,6 +984,11 @@ sub assemble {\n ref($opcode) eq 'CODE' ? \u0026$opcode($mod,$args) : \u0022\u005ct$mnemonic$mod\u005ct$args\u0022;\n }\n \n+if (`$ENV{CC} -Wa,-v -c -o /dev/null -x assembler /dev/null 2\u003e\u00261`\n+\t\u003d~ /GNU assembler/) {\n+ $gnuas \u003d 1;\n+}\n+\n foreach (split(\u0022\u005cn\u0022,$code)) {\n \ts/\u005c`([^\u005c`]*)\u005c`/eval $1/ge;\n \t# flip word order in 64-bit mode...\n@@ -991,7 +996,10 @@ foreach (split(\u0022\u005cn\u0022,$code)) {\n \t# assemble 2.0 instructions in 32-bit mode...\n \ts/^\u005cs+([a-z]+)([\u005cS]*)\u005cs+([\u005cS]*)/\u0026assemble($1,$2,$3)/e if ($BN_SZ\u003d\u003d4);\n \n-\ts/\u005cbbv\u005cb/bve/gm\tif ($SIZE_T\u003d\u003d8);\n+\ts/(\u005c.LEVEL\u005cs+2\u005c.0)W/$1w/\tif ($gnuas \u0026\u0026 $SIZE_T\u003d\u003d8);\n+\ts/\u005c.SPACE\u005cs+\u005c$TEXT\u005c$/.text/\tif ($gnuas \u0026\u0026 $SIZE_T\u003d\u003d8);\n+\ts/\u005c.SUBSPA.*//\t\t\tif ($gnuas \u0026\u0026 $SIZE_T\u003d\u003d8);\n+\ts/\u005cbbv\u005cb/bve/\t\t\tif ($SIZE_T\u003d\u003d8);\n \n \tprint $_,\u0022\u005cn\u0022;\n }\ndiff --git a/crypto/modes/asm/ghash-parisc.pl b/crypto/modes/asm/ghash-parisc.pl\nindex fef2db1..654d9e9 100644\n--- a/crypto/modes/asm/ghash-parisc.pl\n+++ b/crypto/modes/asm/ghash-parisc.pl\n@@ -724,6 +724,11 @@ sub assemble {\n ref($opcode) eq 'CODE' ? \u0026$opcode($mod,$args) : \u0022\u005ct$mnemonic$mod\u005ct$args\u0022;\n }\n \n+if (`$ENV{CC} -Wa,-v -c -o /dev/null -x assembler /dev/null 2\u003e\u00261`\n+\t\u003d~ /GNU assembler/) {\n+ $gnuas \u003d 1;\n+}\n+\n foreach (split(\u0022\u005cn\u0022,$code)) {\n \ts/\u005c`([^\u005c`]*)\u005c`/eval $1/ge;\n \tif ($SIZE_T\u003d\u003d4) {\n@@ -731,7 +736,12 @@ foreach (split(\u0022\u005cn\u0022,$code)) {\n \t\ts/cmpb,\u005c*/comb,/;\n \t\ts/,\u005c*/,/;\n \t}\n-\ts/\u005cbbv\u005cb/bve/\tif ($SIZE_T\u003d\u003d8);\n+\n+\ts/(\u005c.LEVEL\u005cs+2\u005c.0)W/$1w/\tif ($gnuas \u0026\u0026 $SIZE_T\u003d\u003d8);\n+\ts/\u005c.SPACE\u005cs+\u005c$TEXT\u005c$/.text/\tif ($gnuas \u0026\u0026 $SIZE_T\u003d\u003d8);\n+\ts/\u005c.SUBSPA.*//\t\t\tif ($gnuas \u0026\u0026 $SIZE_T\u003d\u003d8);\n+\ts/\u005cbbv\u005cb/bve/\t\t\tif ($SIZE_T\u003d\u003d8);\n+\n \tprint $_,\u0022\u005cn\u0022;\n }\n \ndiff --git a/crypto/pariscid.pl b/crypto/pariscid.pl\nindex 3d4a5f8..5a231c4 100644\n--- a/crypto/pariscid.pl\n+++ b/crypto/pariscid.pl\n@@ -255,9 +255,22 @@ L\u005c$done2\n \t.PROCEND\n ___\n }\n-$code \u003d~ s/cmpib,\u005c*/comib,/gm\tif ($SIZE_T\u003d\u003d4);\n-$code \u003d~ s/,\u005c*/,/gm\t\tif ($SIZE_T\u003d\u003d4);\n-$code \u003d~ s/\u005cbbv\u005cb/bve/gm\tif ($SIZE_T\u003d\u003d8);\n-print $code;\n+\n+if (`$ENV{CC} -Wa,-v -c -o /dev/null -x assembler /dev/null 2\u003e\u00261`\n+\t\u003d~ /GNU assembler/) {\n+ $gnuas \u003d 1;\n+}\n+\n+foreach(split(\u0022\u005cn\u0022,$code)) {\n+\n+\ts/(\u005c.LEVEL\u005cs+2\u005c.0)W/$1w/\tif ($gnuas \u0026\u0026 $SIZE_T\u003d\u003d8);\n+\ts/\u005c.SPACE\u005cs+\u005c$TEXT\u005c$/.text/\tif ($gnuas \u0026\u0026 $SIZE_T\u003d\u003d8);\n+\ts/\u005c.SUBSPA.*//\t\t\tif ($gnuas \u0026\u0026 $SIZE_T\u003d\u003d8);\n+\ts/cmpib,\u005c*/comib,/\t\tif ($SIZE_T\u003d\u003d4);\n+\ts/,\u005c*/,/\t\t\tif ($SIZE_T\u003d\u003d4);\n+\ts/\u005cbbv\u005cb/bve/\t\t\tif ($SIZE_T\u003d\u003d8);\n+\n+\tprint $_,\u0022\u005cn\u0022;\n+}\n close STDOUT;\n \ndiff --git a/crypto/rc4/asm/rc4-parisc.pl b/crypto/rc4/asm/rc4-parisc.pl\nindex 229c6c7..b9927da 100644\n--- a/crypto/rc4/asm/rc4-parisc.pl\n+++ b/crypto/rc4/asm/rc4-parisc.pl\n@@ -313,9 +313,21 @@ L\u005c$opts\n \t.STRINGZ \u0022rc4(4x,`$SZ\u003d\u003d1?\u0022char\u0022:\u0022int\u0022`)\u0022\n \t.STRINGZ \u0022RC4 for PA-RISC, CRYPTOGAMS by \u003cappro\u005c@openssl.org\u003e\u0022\n ___\n-$code \u003d~ s/\u005c`([^\u005c`]*)\u005c`/eval $1/gem;\n-$code \u003d~ s/cmpib,\u005c*/comib,/gm\tif ($SIZE_T\u003d\u003d4);\n-$code \u003d~ s/\u005cbbv\u005cb/bve/gm\tif ($SIZE_T\u003d\u003d8);\n \n-print $code;\n+if (`$ENV{CC} -Wa,-v -c -o /dev/null -x assembler /dev/null 2\u003e\u00261`\n+\t\u003d~ /GNU assembler/) {\n+ $gnuas \u003d 1;\n+}\n+\n+foreach(split(\u0022\u005cn\u0022,$code)) {\n+\ts/\u005c`([^\u005c`]*)\u005c`/eval $1/ge;\n+\n+\ts/(\u005c.LEVEL\u005cs+2\u005c.0)W/$1w/\tif ($gnuas \u0026\u0026 $SIZE_T\u003d\u003d8);\n+\ts/\u005c.SPACE\u005cs+\u005c$TEXT\u005c$/.text/\tif ($gnuas \u0026\u0026 $SIZE_T\u003d\u003d8);\n+\ts/\u005c.SUBSPA.*//\t\t\tif ($gnuas \u0026\u0026 $SIZE_T\u003d\u003d8);\n+\ts/cmpib,\u005c*/comib,/\t\tif ($SIZE_T\u003d\u003d4);\n+\ts/\u005cbbv\u005cb/bve/\t\t\tif ($SIZE_T\u003d\u003d8);\n+\n+\tprint $_,\u0022\u005cn\u0022;\n+}\n close STDOUT;\ndiff --git a/crypto/sha/asm/sha1-parisc.pl b/crypto/sha/asm/sha1-parisc.pl\nindex 822288e..88f4f2e 100644\n--- a/crypto/sha/asm/sha1-parisc.pl\n+++ b/crypto/sha/asm/sha1-parisc.pl\n@@ -260,8 +260,20 @@ $code.\u003d\u003c\u003c___;\n \t.STRINGZ \u0022SHA1 block transform for PA-RISC, CRYPTOGAMS by \u003cappro\u005c@openssl.org\u003e\u0022\n ___\n \n-$code \u003d~ s/\u005c`([^\u005c`]*)\u005c`/eval $1/gem;\n-$code \u003d~ s/,\u005c*/,/gm\t\tif ($SIZE_T\u003d\u003d4);\n-$code \u003d~ s/\u005cbbv\u005cb/bve/gm\tif ($SIZE_T\u003d\u003d8);\n-print $code;\n+if (`$ENV{CC} -Wa,-v -c -o /dev/null -x assembler /dev/null 2\u003e\u00261`\n+\t\u003d~ /GNU assembler/) {\n+ $gnuas \u003d 1;\n+}\n+\n+foreach(split(\u0022\u005cn\u0022,$code)) {\n+\ts/\u005c`([^\u005c`]*)\u005c`/eval $1/ge;\n+\n+\ts/(\u005c.LEVEL\u005cs+2\u005c.0)W/$1w/\tif ($gnuas \u0026\u0026 $SIZE_T\u003d\u003d8);\n+\ts/\u005c.SPACE\u005cs+\u005c$TEXT\u005c$/.text/\tif ($gnuas \u0026\u0026 $SIZE_T\u003d\u003d8);\n+\ts/\u005c.SUBSPA.*//\t\t\tif ($gnuas \u0026\u0026 $SIZE_T\u003d\u003d8);\n+\ts/,\u005c*/,/\t\t\tif ($SIZE_T\u003d\u003d4);\n+\ts/\u005cbbv\u005cb/bve/\t\t\tif ($SIZE_T\u003d\u003d8);\n+\n+\tprint $_,\u0022\u005cn\u0022;\n+}\n close STDOUT;\ndiff --git a/crypto/sha/asm/sha512-parisc.pl b/crypto/sha/asm/sha512-parisc.pl\nindex 5a082ba..d9933f0 100755\n--- a/crypto/sha/asm/sha512-parisc.pl\n+++ b/crypto/sha/asm/sha512-parisc.pl\n@@ -767,6 +767,11 @@ sub assemble {\n ref($opcode) eq 'CODE' ? \u0026$opcode($mod,$args) : \u0022\u005ct$mnemonic$mod\u005ct$args\u0022;\n }\n \n+if (`$ENV{CC} -Wa,-v -c -o /dev/null -x assembler /dev/null 2\u003e\u00261`\n+\t\u003d~ /GNU assembler/) {\n+ $gnuas \u003d 1;\n+}\n+\n foreach (split(\u0022\u005cn\u0022,$code)) {\n \ts/\u005c`([^\u005c`]*)\u005c`/eval $1/ge;\n \n@@ -790,9 +795,11 @@ foreach (split(\u0022\u005cn\u0022,$code)) {\n \n \ts/^\u005cs+([a-z]+)([\u005cS]*)\u005cs+([\u005cS]*)/\u0026assemble($1,$2,$3)/e if ($SIZE_T\u003d\u003d4);\n \n-\ts/cmpb,\u005c*/comb,/ if ($SIZE_T\u003d\u003d4);\n-\n-\ts/\u005cbbv\u005cb/bve/ if ($SIZE_T\u003d\u003d8);\n+\ts/(\u005c.LEVEL\u005cs+2\u005c.0)W/$1w/\tif ($gnuas \u0026\u0026 $SIZE_T\u003d\u003d8);\n+\ts/\u005c.SPACE\u005cs+\u005c$TEXT\u005c$/.text/\tif ($gnuas \u0026\u0026 $SIZE_T\u003d\u003d8);\n+\ts/\u005c.SUBSPA.*//\t\t\tif ($gnuas \u0026\u0026 $SIZE_T\u003d\u003d8);\n+\ts/cmpb,\u005c*/comb,/ \t\tif ($SIZE_T\u003d\u003d4);\n+\ts/\u005cbbv\u005cb/bve/ \t\tif ($SIZE_T\u003d\u003d8);\n \n \tprint $_,\u0022\u005cn\u0022;\n }\n","s":{"c":1752657050,"u": 38152}}
],"g": 40353,"chitpc": 0,"ehitpc": 0,"indexed":0
,
"ab": 0, "si": 0, "db":0, "di":0, "sat":0, "lfc": "0000"}