source: sandbox/expresso2.2/phpgwapi/expressoAjax/coder.js @ 1661

Revision 1661, 9.1 KB checked in by amuller, 14 years ago (diff)

Ticket #490 - Criação dos códigos de unificação ajax
Line 
1
2// Constructor
3function coder(){
4
5}
6
7coder.prototype.url_encode = function (str){
8        var hex_chars = "0123456789ABCDEF";
9        var noEncode = /^([a-zA-Z0-9\_\-\.])$/;
10        var n, strCode, hex1, hex2, strEncode = "";
11
12        for(n = 0; n < str.length; n++) {
13                if (noEncode.test(str.charAt(n))) {
14                        strEncode += str.charAt(n);
15                } else {
16                        strCode = str.charCodeAt(n);
17                        hex1 = hex_chars.charAt(Math.floor(strCode / 16));
18                        hex2 = hex_chars.charAt(strCode % 16);
19                        strEncode += "%" + (hex1 + hex2);
20                }
21        }
22        return strEncode;
23}
24
25coder.prototype.url_decode = function (str) {
26
27        var n, strCode, strDecode = "";
28        for (n = 0; n < str.length; n++) {
29                if (str.charAt(n) == "%") {
30                        strCode = str.charAt(n + 1) + str.charAt(n + 2);
31                        strDecode += String.fromCharCode(parseInt(strCode, 16));
32                        n += 2;
33                } else {
34                        strDecode += str.charAt(n);
35                }
36        }
37        return strDecode;
38}
39
40
41/*
42 * base64.js - Base64 encoding and decoding functions
43 *
44 * Copyright (c) 2007, David Lindquist <david.lindquist@gmail.com>
45 * Released under the MIT license
46 */
47
48coder.prototype.base64_encode = function (str){
49        var chars = 'ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789+/';
50        var encoded = [];
51        var c = 0;
52        while (c < str.length) {
53                var b0 = str.charCodeAt(c++);
54                var b1 = str.charCodeAt(c++);
55                var b2 = str.charCodeAt(c++);
56                var buf = (b0 << 16) + ((b1 || 0) << 8) + (b2 || 0);
57                var i0 = (buf & (63 << 18)) >> 18;
58                var i1 = (buf & (63 << 12)) >> 12;
59                var i2 = isNaN(b1) ? 64 : (buf & (63 << 6)) >> 6;
60                var i3 = isNaN(b2) ? 64 : (buf & 63);
61                encoded[encoded.length] = chars.charAt(i0);
62                encoded[encoded.length] = chars.charAt(i1);
63                encoded[encoded.length] = chars.charAt(i2);
64                encoded[encoded.length] = chars.charAt(i3);
65        }
66        return encoded.join('');
67}
68
69coder.prototype.base64_decode = function (str) {
70        var chars = 'ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789+/=';
71        var invalid = {
72strlen: (str.length % 4 != 0),
73        chars:  new RegExp('[^' + chars + ']').test(str),
74        equals: (/=/.test(str) && (/=[^=]/.test(str) || /={3}/.test(str)))
75        };
76        if (invalid.strlen || invalid.chars || invalid.equals)
77                throw new Error('Invalid base64 data');
78        var decoded = [];
79        var c = 0;
80        while (c < str.length) {
81                var i0 = chars.indexOf(str.charAt(c++));
82                var i1 = chars.indexOf(str.charAt(c++));
83                var i2 = chars.indexOf(str.charAt(c++));
84                var i3 = chars.indexOf(str.charAt(c++));
85                var buf = (i0 << 18) + (i1 << 12) + ((i2 & 63) << 6) + (i3 & 63);
86                var b0 = (buf & (255 << 16)) >> 16;
87                var b1 = (i2 == 64) ? -1 : (buf & (255 << 8)) >> 8;
88                var b2 = (i3 == 64) ? -1 : (buf & 255);
89                decoded[decoded.length] = String.fromCharCode(b0);
90                if (b1 >= 0) decoded[decoded.length] = String.fromCharCode(b1);
91                if (b2 >= 0) decoded[decoded.length] = String.fromCharCode(b2);
92        }
93        return decoded.join('');
94}
95
96
97/**
98 * @author MD5 (Message-Digest Algorithm)
99 * *  http://www.webtoolkit.info/
100 *
101 */
102coder.prototype.md5_encode = function (string) {
103
104        function RotateLeft(lValue, iShiftBits) {
105                return (lValue<<iShiftBits) | (lValue>>>(32-iShiftBits));
106        }
107
108        function AddUnsigned(lX,lY) {
109                var lX4,lY4,lX8,lY8,lResult;
110                lX8 = (lX & 0x80000000);
111                lY8 = (lY & 0x80000000);
112                lX4 = (lX & 0x40000000);
113                lY4 = (lY & 0x40000000);
114                lResult = (lX & 0x3FFFFFFF)+(lY & 0x3FFFFFFF);
115                if (lX4 & lY4) {
116                        return (lResult ^ 0x80000000 ^ lX8 ^ lY8);
117                }
118                if (lX4 | lY4) {
119                        if (lResult & 0x40000000) {
120                                return (lResult ^ 0xC0000000 ^ lX8 ^ lY8);
121                        } else {
122                                return (lResult ^ 0x40000000 ^ lX8 ^ lY8);
123                        }
124                } else {
125                        return (lResult ^ lX8 ^ lY8);
126                }
127        }
128
129        function F(x,y,z) { return (x & y) | ((~x) & z); }
130        function G(x,y,z) { return (x & z) | (y & (~z)); }
131        function H(x,y,z) { return (x ^ y ^ z); }
132        function I(x,y,z) { return (y ^ (x | (~z))); }
133
134        function FF(a,b,c,d,x,s,ac) {
135                a = AddUnsigned(a, AddUnsigned(AddUnsigned(F(b, c, d), x), ac));
136                return AddUnsigned(RotateLeft(a, s), b);
137        };
138
139        function GG(a,b,c,d,x,s,ac) {
140                a = AddUnsigned(a, AddUnsigned(AddUnsigned(G(b, c, d), x), ac));
141                return AddUnsigned(RotateLeft(a, s), b);
142        };
143
144        function HH(a,b,c,d,x,s,ac) {
145                a = AddUnsigned(a, AddUnsigned(AddUnsigned(H(b, c, d), x), ac));
146                return AddUnsigned(RotateLeft(a, s), b);
147        };
148
149        function II(a,b,c,d,x,s,ac) {
150                a = AddUnsigned(a, AddUnsigned(AddUnsigned(I(b, c, d), x), ac));
151                return AddUnsigned(RotateLeft(a, s), b);
152        };
153
154        function ConvertToWordArray(string) {
155                var lWordCount;
156                var lMessageLength = string.length;
157                var lNumberOfWords_temp1=lMessageLength + 8;
158                var lNumberOfWords_temp2=(lNumberOfWords_temp1-(lNumberOfWords_temp1 % 64))/64;
159                var lNumberOfWords = (lNumberOfWords_temp2+1)*16;
160                var lWordArray=Array(lNumberOfWords-1);
161                var lBytePosition = 0;
162                var lByteCount = 0;
163                while ( lByteCount < lMessageLength ) {
164                        lWordCount = (lByteCount-(lByteCount % 4))/4;
165                        lBytePosition = (lByteCount % 4)*8;
166                        lWordArray[lWordCount] = (lWordArray[lWordCount] | (string.charCodeAt(lByteCount)<<lBytePosition));
167                        lByteCount++;
168                }
169                lWordCount = (lByteCount-(lByteCount % 4))/4;
170                lBytePosition = (lByteCount % 4)*8;
171                lWordArray[lWordCount] = lWordArray[lWordCount] | (0x80<<lBytePosition);
172                lWordArray[lNumberOfWords-2] = lMessageLength<<3;
173                lWordArray[lNumberOfWords-1] = lMessageLength>>>29;
174                return lWordArray;
175        };
176
177        function WordToHex(lValue) {
178                var WordToHexValue="",WordToHexValue_temp="",lByte,lCount;
179                for (lCount = 0;lCount<=3;lCount++) {
180                        lByte = (lValue>>>(lCount*8)) & 255;
181                        WordToHexValue_temp = "0" + lByte.toString(16);
182                        WordToHexValue = WordToHexValue + WordToHexValue_temp.substr(WordToHexValue_temp.length-2,2);
183                }
184                return WordToHexValue;
185        };
186        function Utf8Encode(string) {
187                string = string.replace(/\r\n/g,"\n");
188                var utftext = "";
189
190                for (var n = 0; n < string.length; n++) {
191
192                        var c = string.charCodeAt(n);
193
194                        if (c < 128) {
195                                utftext += String.fromCharCode(c);
196                        }
197                        else if((c > 127) && (c < 2048)) {
198                                utftext += String.fromCharCode((c >> 6) | 192);
199                                utftext += String.fromCharCode((c & 63) | 128);
200                        }
201                        else {
202                                utftext += String.fromCharCode((c >> 12) | 224);
203                                utftext += String.fromCharCode(((c >> 6) & 63) | 128);
204                                utftext += String.fromCharCode((c & 63) | 128);
205                        }
206
207                }
208
209                return utftext;
210        };
211        var x=Array();
212        var k,AA,BB,CC,DD,a,b,c,d;
213        var S11=7, S12=12, S13=17, S14=22;
214        var S21=5, S22=9 , S23=14, S24=20;
215        var S31=4, S32=11, S33=16, S34=23;
216        var S41=6, S42=10, S43=15, S44=21;
217
218        string = Utf8Encode(string);
219
220        x = ConvertToWordArray(string);
221
222        a = 0x67452301; b = 0xEFCDAB89; c = 0x98BADCFE; d = 0x10325476;
223
224        for (k=0;k<x.length;k+=16) {
225                AA=a; BB=b; CC=c; DD=d;
226                a=FF(a,b,c,d,x[k+0], S11,0xD76AA478);
227                d=FF(d,a,b,c,x[k+1], S12,0xE8C7B756);
228                c=FF(c,d,a,b,x[k+2], S13,0x242070DB);
229                b=FF(b,c,d,a,x[k+3], S14,0xC1BDCEEE);
230                a=FF(a,b,c,d,x[k+4], S11,0xF57C0FAF);
231                d=FF(d,a,b,c,x[k+5], S12,0x4787C62A);
232                c=FF(c,d,a,b,x[k+6], S13,0xA8304613);
233                b=FF(b,c,d,a,x[k+7], S14,0xFD469501);
234                a=FF(a,b,c,d,x[k+8], S11,0x698098D8);
235                d=FF(d,a,b,c,x[k+9], S12,0x8B44F7AF);
236                c=FF(c,d,a,b,x[k+10],S13,0xFFFF5BB1);
237                b=FF(b,c,d,a,x[k+11],S14,0x895CD7BE);
238                a=FF(a,b,c,d,x[k+12],S11,0x6B901122);
239                d=FF(d,a,b,c,x[k+13],S12,0xFD987193);
240                c=FF(c,d,a,b,x[k+14],S13,0xA679438E);
241                b=FF(b,c,d,a,x[k+15],S14,0x49B40821);
242                a=GG(a,b,c,d,x[k+1], S21,0xF61E2562);
243                d=GG(d,a,b,c,x[k+6], S22,0xC040B340);
244                c=GG(c,d,a,b,x[k+11],S23,0x265E5A51);
245                b=GG(b,c,d,a,x[k+0], S24,0xE9B6C7AA);
246                a=GG(a,b,c,d,x[k+5], S21,0xD62F105D);
247                d=GG(d,a,b,c,x[k+10],S22,0x2441453);
248                c=GG(c,d,a,b,x[k+15],S23,0xD8A1E681);
249                b=GG(b,c,d,a,x[k+4], S24,0xE7D3FBC8);
250                a=GG(a,b,c,d,x[k+9], S21,0x21E1CDE6);
251                d=GG(d,a,b,c,x[k+14],S22,0xC33707D6);
252                c=GG(c,d,a,b,x[k+3], S23,0xF4D50D87);
253                b=GG(b,c,d,a,x[k+8], S24,0x455A14ED);
254                a=GG(a,b,c,d,x[k+13],S21,0xA9E3E905);
255                d=GG(d,a,b,c,x[k+2], S22,0xFCEFA3F8);
256                c=GG(c,d,a,b,x[k+7], S23,0x676F02D9);
257                b=GG(b,c,d,a,x[k+12],S24,0x8D2A4C8A);
258                a=HH(a,b,c,d,x[k+5], S31,0xFFFA3942);
259                d=HH(d,a,b,c,x[k+8], S32,0x8771F681);
260                c=HH(c,d,a,b,x[k+11],S33,0x6D9D6122);
261                b=HH(b,c,d,a,x[k+14],S34,0xFDE5380C);
262                a=HH(a,b,c,d,x[k+1], S31,0xA4BEEA44);
263                d=HH(d,a,b,c,x[k+4], S32,0x4BDECFA9);
264                c=HH(c,d,a,b,x[k+7], S33,0xF6BB4B60);
265                b=HH(b,c,d,a,x[k+10],S34,0xBEBFBC70);
266                a=HH(a,b,c,d,x[k+13],S31,0x289B7EC6);
267                d=HH(d,a,b,c,x[k+0], S32,0xEAA127FA);
268                c=HH(c,d,a,b,x[k+3], S33,0xD4EF3085);
269                b=HH(b,c,d,a,x[k+6], S34,0x4881D05);
270                a=HH(a,b,c,d,x[k+9], S31,0xD9D4D039);
271                d=HH(d,a,b,c,x[k+12],S32,0xE6DB99E5);
272                c=HH(c,d,a,b,x[k+15],S33,0x1FA27CF8);
273                b=HH(b,c,d,a,x[k+2], S34,0xC4AC5665);
274                a=II(a,b,c,d,x[k+0], S41,0xF4292244);
275                d=II(d,a,b,c,x[k+7], S42,0x432AFF97);
276                c=II(c,d,a,b,x[k+14],S43,0xAB9423A7);
277                b=II(b,c,d,a,x[k+5], S44,0xFC93A039);
278                a=II(a,b,c,d,x[k+12],S41,0x655B59C3);
279                d=II(d,a,b,c,x[k+3], S42,0x8F0CCC92);
280                c=II(c,d,a,b,x[k+10],S43,0xFFEFF47D);
281                b=II(b,c,d,a,x[k+1], S44,0x85845DD1);
282                a=II(a,b,c,d,x[k+8], S41,0x6FA87E4F);
283                d=II(d,a,b,c,x[k+15],S42,0xFE2CE6E0);
284                c=II(c,d,a,b,x[k+6], S43,0xA3014314);
285                b=II(b,c,d,a,x[k+13],S44,0x4E0811A1);
286                a=II(a,b,c,d,x[k+4], S41,0xF7537E82);
287                d=II(d,a,b,c,x[k+11],S42,0xBD3AF235);
288                c=II(c,d,a,b,x[k+2], S43,0x2AD7D2BB);
289                b=II(b,c,d,a,x[k+9], S44,0xEB86D391);
290                a=AddUnsigned(a,AA);
291                b=AddUnsigned(b,BB);
292                c=AddUnsigned(c,CC);
293                d=AddUnsigned(d,DD);
294        }
295
296        var temp = WordToHex(a)+WordToHex(b)+WordToHex(c)+WordToHex(d);
297
298        return temp.toLowerCase();
299}
300
Note: See TracBrowser for help on using the repository browser.