/prog/ - Pandora — World4ch

Name: Anonymous 2008-01-24 20:22

# pandora.com v15 xmlrpc encrypt/decrypt routines

# for data sent to /radio/xmlrpc/v15 in a POST

# usage:

#   _xmlrpc_request_ = pandora_decrypt(_POST_data_)

#   _POST_data_ = pandora_encrypt(_xmlrpc_request_)



P = [0x62b25781, 0x36c6e49e, 0x79cecc68, 0x16a94f4, 0xb23506e5, 0xf3209930, 0x31cc9e6f, 0xf9c1c6f, 0x3ada9d11, 0xf8b18ccf, 0x8788eb, 0x3433eb64, 0x1bccf5a3, 0xdf91b435, 0xa50ea6fa, 0x8c069dcc, 0x1ff83b56, 0xa75abeba]



S = [[],[],[],[]]



S[0] =

see post >>2





S[1] =

see post >>3





S[2] =

see post >>4





S[3] =

see post >>5





def blowfish_round_function(XL):

    F = S[0][XL>

>24]

    F += S[1][(XL>

>16)&0xff]

    F &= 0xffffffff

    F ^= S[2][(XL>

>8)&0xff]

    F += S[3][XL&0xff]

    F &= 0xffffffff

    return F



def blowfish_block_decrypt(XL, XR):

    for i in xrange(17, 1, -1):

            XL ^= P[i]

            XR ^= blowfish_round_function(XL)

            XL, XR = XR, XL

    XL, XR = XR, XL

    XR ^= P[1]

    XL ^= P[0]

    return [XL, XR]



def blowfish_block_encrypt(XL, XR):

    for i in xrange(16):

            XL ^= P[i]

            XR ^= blowfish_round_function(XL)

            XL, XR = XR, XL

    XL, XR = XR, XL

    XR ^= P[16]

    XL ^= P[17]

    return [XL, XR]



def blowfish_intlist_decrypt(Li):

    Lo = []

    for i in xrange(0, len(Li), 2):

        Lo.extend(blowfish_block_decrypt(Li[i], Li[i+1]))

    return Lo



def blowfish_intlist_encrypt(Li):

    Lo = []

    for i in xrange(0, len(Li), 2):

        Lo.extend(blowfish_block_encrypt(Li[i], Li[i+1]))

    return Lo



def hexstr_to_intlist(H):

    L = []

    Hl = len(H)

    Hm = Hl%8

    for i in xrange(0, Hl-Hm, 8):

        L.append(int(H[i:i+8],16))

    if Hm > 0:

        L.append(int(H[Hl-Hm:]+('0'*(8-Hm)),16))

    return L



def intlist_to_hexstr(L):

    H = ""

    for I in L:

        s = hex(I).replace('0x','').replace('L','')

        H += ('0'*(8-len(s)))+s

    return H



def str_to_intlist(S):

    L = []

    Sl = len(s)

    Sm = Sl%4

    if Sm > 0:

        S += chr(0)*(4-Sm)

    for i in xrange(0, len(S), 4):

        L.append((ord(S[i])<<24)+(ord(S[i+1])<<16)+(ord(S[i+2])<<8)+ord(S[i+3]))

    return L



def intlist_to_str(L):

    S = ""

    for I in L:

        S += chr(I>

>24&0xff)+chr(I>>16&0xff)+chr(I>

>8&0xff)+chr(I&0xff)

    return S



def pandora_encrypt(S):

    return intlist_to_hexstr(blowfish_intlist_encrypt(str_to_intlist(S)))



def pandora_decrypt(H):

    return intlist_to_str(blowfish_intlist_decrypt(hexstr_to_intlist(H)))

Name: Anonymous 2008-02-01 19:23

# P and S boxes for method response, v15 (..ctd..)



S[2] = [0xd3d95780, 0x304df7b4, 0x97720f1, 0x7d3501b, 0x9a94dbec, 0x3b10447d, 0x53f63b1, 0xc02a3669, 0xc58f5b70, 0x3a4cb8cd, 0x9d2a647, 0x42ee5dc7, 0xeb5cbde2, 0x34bfb5be, 0x38e08f9f, 0x737bc521, 0xbd647dc0, 0xd13d4823, 0x985aeac3, 0x7ce18c79, 0x7be5c00b, 0x85eed512, 0xc267c7bb, 0xba58f6b9, 0x8091245c, 0xbc945b6a, 0xab1f0ab9, 0x2f4daf05, 0x64a349f3, 0x1e8c2ea3, 0x7b517a67, 0x3fbf9331, 0x7f8e7446, 0xd873937a, 0xf5881626, 0xea9fd9af, 0x75379be3, 0xc2eee5ff, 0x4cb952ca, 0x94f5d238, 0x4e3e9c14, 0x30fafd36, 0xaac38db8, 0x788906b6, 0x50467458, 0xebf4a9eb, 0xacc15636, 0x88a19747, 0x1a444317, 0x5749a028, 0x88cc0f4b, 0x86466508, 0x1d4056cf, 0x11fa26d1, 0x43e683aa, 0xa7e75447, 0x5d37dfd8, 0x233e664, 0xcee5ebf6, 0xf48f0aa0, 0xa350b974, 0x438d563b, 0x31231095, 0x12c84980, 0xd594996f, 0x5f43b929, 0x97ece139, 0x24e354a2, 0xf037d7e5, 0x372fbb6d, 0xf5deb0c2, 0x56a1cc9b, 0xdba3a62b, 0xf8999775, 0xf51c9bc0, 0xe8551cfe, 0xd17fd45b, 0xbb9084f1, 0x294fd01d, 0x6baf17f9, 0x62ebf7bb, 0x8ae1685f, 0xff81a190, 0xf879bea1, 0xdea50efe, 0x49acda4d, 0x4a3b2c06, 0x8bdc31dc, 0x24522f01, 0xf1d509b, 0xdef2c99b, 0xbf1884c8, 0x69189b6c, 0x44d494bc, 0x6177ee4b, 0x6585e64, 0x49c884fb, 0xec132d3b, 0x4b0c9c29, 0x4f04936a, 0x174055f5, 0x78120821, 0x4e1f132c, 0xa57e482b, 0x91c373dd, 0x50c0e21a, 0x4596e2d2, 0x90d59a08, 0xe14ced85, 0x70d6d4fe, 0x8ae3332b, 0x471e2381, 0x59f26072, 0xbbf0e131, 0x53bd38a9, 0xf8f74654, 0xaf703fe3, 0xbb9f1dbe, 0xc79f5d26, 0x38429a47, 0x9054053c, 0x339cb94c, 0xe8ebbe52, 0x5d9deb12, 0x57d6a0fc, 0x3cff2b73, 0x2b429335, 0xcc2b6c2a, 0x9b64878b, 0x8609fdd0, 0x2c1ae184, 0x72c73f10, 0xbf94c62e, 0x6dbbe9c3, 0xf6dd058d, 0xfaf092ce, 0xbbe66537, 0xda92b927, 0xff2c0b6d, 0xd8a56be3, 0x385fe7f5, 0x98b434e1, 0x490c552e, 0xc519389a, 0xcb3a33f1, 0x5f3fac14, 0xe45b476e, 0x6750dd73, 0x378f0392, 0xb7bd1f8b, 0x54ca6888, 0xa4e34198, 0x30da40d5, 0xc4004385, 0x4958a425, 0x28930a3b, 0x3a476494, 0xa233cd72, 0x1a43bed1, 0xbf2ec0aa, 0x435e6f00, 0x9a3c522c, 0x98c54fc1, 0x289d824e, 0xf54c164a, 0x422bf0ee, 0xbc49b12f, 0x265c449f, 0x6919396, 0xa9145050, 0x58b2e339, 0xf299a2b3, 0xb2523c1c, 0xf58b4712, 0x38816085, 0xb951fb44, 0x3585c0f5, 0xa1cdead, 0x2bbd1cd4, 0x7624114a, 0x47d2e912, 0x165c9c04, 0xa7879408, 0x85e9544b, 0xa77565a4, 0x3ed34509, 0xc772aaef, 0xeb0e17d3, 0xa2a0b790, 0x3258f1f8, 0xa8298d03, 0x361eb680, 0xa1d5e6f9, 0xe28bf9a8, 0x6684001e, 0x80759238, 0xa17f96c1, 0x738d155d, 0x7e052cd0, 0x1bc7edc6, 0x8fa3e733, 0x78bb8f5d, 0x50228bf6, 0xd7a153cd, 0x30c147eb, 0x74882ac4, 0xa99b432e, 0xdf3bedd2, 0x9ce4fef3, 0x4af771a2, 0x79a2f8d2, 0xa16df1f4, 0x206bf9af, 0x58b87ac4, 0x116d44c5, 0x1d529950, 0x7aa6dba0, 0xcaa942f6, 0x714a9f37, 0xd74db0b0, 0x766f4740, 0xd4a3af5e, 0x345cca3b, 0x5f9beafb, 0x462040c1, 0x87dbc680, 0x6834b2b5, 0x1219731a, 0xa5d35112, 0x1e2ae6b3, 0x604141d3, 0xa6f4ad73, 0x47a6fc27, 0x511f0f6c, 0xe2a26ed9, 0x3469774b, 0xab23f073, 0x8bf8edf2, 0xc0bff738, 0xc55c4f77, 0x6d906844, 0x2076e478, 0x758c5a86, 0xe0730fed, 0xce82b2d5, 0xa8f864a2, 0xefc59775, 0xddacc27d, 0xb5e4ab2a, 0x62da2117, 0xcae7fdb3, 0x987dd6cb, 0x17f045a4, 0xf7d78f8a, 0xbe40ee03, 0xe87f2b0f]



S[3] = [0xad44ff0d, 0xc15c210e, 0xe5006a9c, 0xf900e985, 0xba7d6647, 0x17339926, 0x5576752d, 0xc116946c, 0xa72c0df0, 0x41492492, 0xfe2fe6ad, 0x1dd57369, 0x13141bc3, 0xcd8c6c6e, 0x5395537, 0x498b1813, 0xe27429da, 0x32a2f8a6, 0xd9d98c74, 0x668e7b91, 0x47c7fb70, 0xd412f512, 0x6e6e28f4, 0xb24ba275, 0x2a7ce14a, 0x1e89cd98, 0x83b319ab, 0x8de70898, 0x7adcead7, 0x46c68710, 0xf7a6ea45, 0xf1e0040f, 0x8c0a0ec2, 0x97b40bda, 0x69d7c066, 0x9a75ca19, 0x84e3c558, 0xf1dc8ceb, 0x215cfc5, 0x784d8e73, 0xb5e9c22f, 0x7d232c89, 0x74842c8, 0xd777e873, 0x3c4426ab, 0xa1609639, 0xa1915b9d, 0x5a8e7f32, 0x11b47080, 0x14dfa5ae, 0x1e75ecad, 0x420b0b05, 0xb8ded0aa, 0xec9bf32e, 0x3b6d500e, 0x6458e0d4, 0x575d7705, 0x15609525, 0xfbb2e66d, 0x10074f41, 0x26e8a2d2, 0xd120d7a7, 0x18b628e3, 0xc57c4aa1, 0x9b4c3499, 0x4cfdf313, 0x7fae8409, 0xa2f0f5e6, 0xc2d6ad07, 0x637b8820, 0xb67d51b9, 0xacb53137, 0xc361f802, 0xd015e82, 0x20e5050e, 0x9e095d35, 0x4dbebf6b, 0x63aa5696, 0x4a918ea3, 0x36c5456, 0x5fe4656e, 0x47048da6, 0x35ea26d9, 0x2673cdaa, 0xb89ac3ca, 0xae4c0632, 0x247a1ff9, 0x88b3bde4, 0x794081c8, 0x3acfb852, 0x2c35c8d0, 0xde1fc725, 0x53a46d2e, 0x24c2853a, 0xc44657a1, 0x674fcb0e, 0xeb14117a, 0x353382b9, 0x5f8a9f33, 0x7a7d6b5d, 0x42d3c390, 0x5ca83f4a, 0x755fc604, 0x60fa14dd, 0xf37ec6d, 0x274bf918, 0x18a84159, 0xc80269ac, 0x32dddfd3, 0x72ac2f05, 0x71f03689, 0x107317ca, 0xf505acc9, 0xe1a7207f, 0x701a92a0, 0x6d5921c8, 0xbdde32df, 0xf51eadca, 0x71d7b6d6, 0x35c0fd0d, 0x657b5539, 0x37796a79, 0x207060cf, 0x724a2652, 0xd52b9c4b, 0x89e6b875, 0xbf5354ec, 0x404c0020, 0x892226b2, 0x1d19478a, 0x3241786a, 0x705ec84f, 0x9e90fb06, 0x9498cc5e, 0xe797c92c, 0xd65c4db3, 0xf3dc0e84, 0x1152fa0, 0xa9fbbab7, 0x7b33d4d4, 0xe144c4a7, 0x61af6b12, 0x47b4e21c, 0xbf2d99f1, 0xe4d356fc, 0x3b268633, 0x606f0e85, 0xc2fbd483, 0x7653514d, 0x5ebf2bee, 0x388c59b, 0x83376c93, 0x6b75db71, 0x5ae0da51, 0x6081fa07, 0xfef41dc7, 0x6154c9e1, 0x369f786e, 0x76815368, 0x40d33860, 0x13953873, 0x29b29043, 0x2cd69bc7, 0x9a94fd98, 0x7a7284d5, 0xd61c5d4, 0x73779d49, 0xf9044b57, 0xdb042d6e, 0x83411ff6, 0x631e2aba, 0x19bfa503, 0xc27f3e42, 0x5a30cb31, 0xd688d8db, 0x636907df, 0xf9fe43c5, 0xad07f822, 0x5b08719e, 0x8a779280, 0xdbc15828, 0x6decd7b9, 0xe0187c7, 0xd6b0119a, 0xd60b22c2, 0x4a444764, 0x762eebfb, 0xbfc730cd, 0x8b614f18, 0x4692e84a, 0x28e8700c, 0xa8de8be8, 0xd97dcc14, 0xc7d45234, 0x93674996, 0xab7d5fe8, 0xf5693f39, 0x6450c54, 0xdb841002, 0x3708ecb6, 0x33329e06, 0xa9cd93d6, 0x44f8b6f2, 0x9ad7ad6c, 0xdcd139bd, 0x6495a638, 0x9b0feb99, 0xdd61e62b, 0x2f0092c8, 0xe2aeeb18, 0x88791df4, 0x378294ad, 0x93b9d5e0, 0x382696f7, 0x7b84c6c0, 0x5b0c6be6, 0x61b19885, 0xf2e57ebf, 0x963a70e0, 0xa8d322a3, 0x97539bd2, 0x1f351d4f, 0x5f5a564, 0x49d160bd, 0x21c2e2f3, 0x4f0b829b, 0xcd76a6ba, 0xfe469113, 0xa9c0d654, 0xdc256fd4, 0x692dae32, 0xf38e6df9, 0xd442185f, 0x6855f1fb, 0xbe780bf8, 0x3959e379, 0xdd8b266, 0xf1a83144, 0x93aa5a92, 0xd52bfc17, 0xb1917c46, 0xa4e9e95d, 0xb97d5cc7, 0xcc08aa59, 0x15552930, 0x4eb3e543, 0xa2232733, 0x55197de5, 0x5f3e9bb, 0x6aee9067, 0x4f685baa, 0x26fa2b36, 0xcacb175e, 0x3c3baade, 0xccf73a4c, 0xbfffb8d7]

Pandora

1 Name: Anonymous 2008-01-24 20:22

54 Name: Anonymous 2008-02-01 19:23

Name: Anonymous 2008-01-24 20:22

Name: Anonymous 2008-02-01 19:23