Exemplos de chaves públicas usadas em alguns sites
> | with(StringTools): |
# Chave pública VISA eCommerce Root (Size: 270 Bytes / 2160 Bits)
> | nVISA := "30 82 01 0a 02 82 01 01 00 af 57 de 56 1e 6e a1 da 60 b1 94 27 cb 17 db 07 3f 80 85 4f c8 9c b6 d0 f4 6f 4f cf 99 d8 e1 db c2 48 5c 3a ac 39 33 c7 1f 6a 8b 26 3d 2b 35 f5 48 b1 91 c1 02 4e 04 96 91 7b b0 33 f0 b1 14 4e 11 6f b5 40 af 1b 45 a5 4a ef 7e b6 ac f2 a0 1f 58 3f 12 46 60 3c 8d a1 e0 7d cf 57 3e 33 1e fb 47 f1 aa 15 97 07 55 66 a5 b5 2d 2e d8 80 59 b2 a7 0d b7 46 ec 21 63 ff 35 ab a5 02 cf 2a f4 4c fe 7b f5 94 5d 84 4d a8 f2 60 8f db 0e 25 3c 9f 73 71 cf 94 df 4a ea db df 72 38 8c f3 96 bd f1 17 bc d2 ba 3b 45 5a c6 a7 f6 c6 17 8b 01 9d fc 19 a8 2a 83 16 b8 3a 48 fe 4e 3e a0 ab 06 19 e9 53 f3 80 13 07 ed 2d bf 3f 0a 3c 55 20 39 2c 2c 00 69 74 95 4a bc 20 b2 a9 79 e5 18 89 91 a8 dc 1c 4d ef bb 7e 37 0b 5d fe 39 a5 88 52 8c 00 6c ec 18 7c 41 bd f6 8b 75 77 ba 60 9d 84 e7 fe 2d 02 03 01 00 01": |
> | nVISA := SubstituteAll(nVISA," ",""): |
# Conversão da representação hexadecimal de um número para a sua representação decimal
> | nVISA := convert(nVISA,decimal,hexadecimal); |
> | ifactor(nVISA,easy); |
> | nVISA/23; |
> | isprime(%); |
> | ifactor(nVISA/23,easy); |
> | ifactor(nVISA); |
Warning, computation interrupted
# Chave pública CGD caixa directa (Size: 140 Bytes / 1120 Bits)
> | nCGD := "30 81 89 02 81 81 00 d1 e2 d6 c0 3f 56 05 f4 b7 cb c2 d7 e0 63 aa bf 0e 35 de c7 c3 ca a0 2e ba 59 fa 02 49 2e 1d 95 44 1b 2b d7 88 27 47 42 2c 4f eb 20 ca 75 bf e8 2a 00 c6 d7 11 e7 3c aa 21 f4 06 97 62 80 4a fd 6f 04 42 56 f2 b1 07 0e 15 00 86 c0 cf 98 35 7c cc dc 84 84 d8 e6 c0 67 ed e2 4b 34 d2 47 3e 1d 0e 29 14 6e 64 94 37 60 f9 02 03 01 00 01": |
> | nCGD := SubstituteAll(nCGD," ",""): |
> | nCGD := convert(nCGD,decimal,hexadecimal); |
> | ifactor(nCGD,easy); |
> | nCGD/(5*83); |
> | isprime(%); |
> | ifactor(nCGD/(5*83),easy); |
> | ifactor(nCGD); |
Warning, computation interrupted
# Chave pública BPInet (Size: 140 Bytes / 1120 Bits)
> | nBPI := "30 81 89 02 81 81 00 c9 95 d3 75 cc 94 63 74 c9 e4 d5 a1 7c 60 6f c8 1a 2e 5e 0a b3 b4 94 50 5b 14 d7 39 36 5d 34 ac ed e0 61 10 4f 13 20 70 5d 71 f6 f2 d9 b6 de fb 15 86 76 c2 51 67 eb 33 cc e2 59 73 95 9d 84 39 11 c2 ea 7c 0f ed 72 0e 7d 45 da db c3 4d 15 69 b5 c3 1e 35 28 a1 07 70 d5 c3 32 0b b6 3a 3d 90 b4 f3 94 31 23 70 e7 88 69 b7 cc d6 d4 91 3f 43 a6 20 70 76 49 f9 12 d0 10 9b 0d 05 c3 94 e3 15 02 03 01 00 01": |
> | nBPI := SubstituteAll(nBPI," ",""): |
> | nBPI := convert(nBPI,decimal,hexadecimal); |
> | ifactor(nBPI,easy); |
> | ifactor(nBPI); |
Warning, computation interrupted
# Chave pública web page Departamento de Matemática (Size: 140 Bytes / 1120 Bits)
> | nDMUC := "30 81 89 02 81 81 00 db 35 3c 03 49 fc e0 48 e4 b6 7c 55 66 f3 52 08 39 b9 d8 bf eb 9c c7 e8 7a 32 54 fc 88 66 19 de a0 08 b1 19 ad a0 34 75 0c 2b 0d f5 6d 3b 9d f4 78 2e 2e fe 45 d3 7e b5 ff 7c f6 9a 3b d7 13 46 a9 e1 ab 0b 01 d8 d8 3c 65 d7 ce a3 e7 32 c3 59 54 97 54 b7 a4 6e be 07 61 25 0d 32 04 3a 99 15 19 23 9d 97 61 e1 66 5d b7 ef 81 e9 1e cd bc 25 fd 39 9b 74 6a 86 09 07 9a 98 bd 45 f2 ba 84 a1 02 03 01 00 01": |
> | nDMUC := SubstituteAll(nDMUC," ",""): |
> | nDMUC := convert(nDMUC,decimal,hexadecimal); |
> | ifactor(nDMUC,easy); |
> | nDMUC/(3^3*5*7*23*19421*18211); |
> | isprime(%); |
> | ifactor(nDMUC/(3^3*5*7*23*19421*18211),easy); |
> |