xit-app
/
app-support-java
20
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

클린파킹 암복호화 클래스 추가

Browse Source
main
이범준 4 months ago
parent d0965d1c84
commit cd02e9f5a5
6 changed files with 959 additions and 0 deletions
Show Stats Download Patch File Download Diff File

308
src/main/java/cokr/xit/applib/delphi/CxAria.java
Unescape Escape View File

@ -0,0 +1,308 @@
package cokr.xit.applib.delphi;
public class CxAria {
public static int[][] SBox = {
// S-box type 1
{ 0x63, 0x7c, 0x77, 0x7b, 0xf2,
0x6b, 0x6f, 0xc5, 0x30,
0x01, 0x67, 0x2b, 0xfe,
0xd7, 0xab, 0x76, 0xca,
0x82, 0xc9, 0x7d, 0xfa,
0x59, 0x47, 0xf0, 0xad,
0xd4, 0xa2, 0xaf, 0x9c,
0xa4, 0x72, 0xc0, 0xb7,
0xfd, 0x93, 0x26, 0x36,
0x3f, 0xf7, 0xcc, 0x34,
0xa5, 0xe5, 0xf1, 0x71,
0xd8, 0x31, 0x15, 0x04,
0xc7, 0x23, 0xc3, 0x18,
0x96, 0x05, 0x9a, 0x07,
0x12, 0x80, 0xe2, 0xeb,
0x27, 0xb2, 0x75, 0x09,
0x83, 0x2c, 0x1a, 0x1b,
0x6e, 0x5a, 0xa0, 0x52,
0x3b, 0xd6, 0xb3, 0x29,
0xe3, 0x2f, 0x84, 0x53,
0xd1, 0x00, 0xed, 0x20,
0xfc, 0xb1, 0x5b, 0x6a,
0xcb, 0xbe, 0x39, 0x4a,
0x4c, 0x58, 0xcf, 0xd0,
0xef, 0xaa, 0xfb, 0x43,
0x4d, 0x33, 0x85, 0x45,
0xf9, 0x02, 0x7f, 0x50,
0x3c, 0x9f, 0xa8, 0x51,
0xa3, 0x40, 0x8f, 0x92,
0x9d, 0x38, 0xf5, 0xbc,
0xb6, 0xda, 0x21, 0x10,
0xff, 0xf3, 0xd2, 0xcd,
0x0c, 0x13, 0xec, 0x5f,
0x97, 0x44, 0x17, 0xc4,
0xa7, 0x7e, 0x3d, 0x64,
0x5d, 0x19, 0x73, 0x60,
0x81, 0x4f, 0xdc, 0x22,
0x2a, 0x90, 0x88, 0x46,
0xee, 0xb8, 0x14, 0xde,
0x5e, 0x0b, 0xdb, 0xe0,
0x32, 0x3a, 0x0a, 0x49,
0x06, 0x24, 0x5c, 0xc2,
0xd3, 0xac, 0x62, 0x91,
0x95, 0xe4, 0x79, 0xe7,
0xc8, 0x37, 0x6d, 0x8d,
0xd5, 0x4e, 0xa9, 0x6c,
0x56, 0xf4, 0xea, 0x65,
0x7a, 0xae, 0x08, 0xba,
0x78, 0x25, 0x2e, 0x1c,
0xa6, 0xb4, 0xc6, 0xe8,
0xdd, 0x74, 0x1f, 0x4b,
0xbd, 0x8b, 0x8a, 0x70,
0x3e, 0xb5, 0x66, 0x48,
0x03, 0xf6, 0x0e, 0x61,
0x35, 0x57, 0xb9, 0x86,
0xc1, 0x1d, 0x9e, 0xe1,
0xf8, 0x98, 0x11, 0x69,
0xd9, 0x8e, 0x94, 0x9b,
0x1e, 0x87, 0xe9, 0xce,
0x55, 0x28, 0xdf, 0x8c,
0xa1, 0x89, 0x0d, 0xbf,
0xe6, 0x42, 0x68, 0x41,
0x99, 0x2d, 0x0f, 0xb0,
0x54, 0xbb, 0x16 },
// S-box type 2
{ 0xe2, 0x4e, 0x54, 0xfc, 0x94,
0xc2, 0x4a, 0xcc, 0x62,
0x0d, 0x6a, 0x46, 0x3c,
0x4d, 0x8b, 0xd1, 0x5e,
0xfa, 0x64, 0xcb, 0xb4,
0x97, 0xbe, 0x2b, 0xbc,
0x77, 0x2e, 0x03, 0xd3,
0x19, 0x59, 0xc1, 0x1d,
0x06, 0x41, 0x6b, 0x55,
0xf0, 0x99, 0x69, 0xea,
0x9c, 0x18, 0xae, 0x63,
0xdf, 0xe7, 0xbb, 0x00,
0x73, 0x66, 0xfb, 0x96,
0x4c, 0x85, 0xe4, 0x3a,
0x09, 0x45, 0xaa, 0x0f,
0xee, 0x10, 0xeb, 0x2d,
0x7f, 0xf4, 0x29, 0xac,
0xcf, 0xad, 0x91, 0x8d,
0x78, 0xc8, 0x95, 0xf9,
0x2f, 0xce, 0xcd, 0x08,
0x7a, 0x88, 0x38, 0x5c,
0x83, 0x2a, 0x28, 0x47,
0xdb, 0xb8, 0xc7, 0x93,
0xa4, 0x12, 0x53, 0xff,
0x87, 0x0e, 0x31, 0x36,
0x21, 0x58, 0x48, 0x01,
0x8e, 0x37, 0x74, 0x32,
0xca, 0xe9, 0xb1, 0xb7,
0xab, 0x0c, 0xd7, 0xc4,
0x56, 0x42, 0x26, 0x07,
0x98, 0x60, 0xd9, 0xb6,
0xb9, 0x11, 0x40, 0xec,
0x20, 0x8c, 0xbd, 0xa0,
0xc9, 0x84, 0x04, 0x49,
0x23, 0xf1, 0x4f, 0x50,
0x1f, 0x13, 0xdc, 0xd8,
0xc0, 0x9e, 0x57, 0xe3,
0xc3, 0x7b, 0x65, 0x3b,
0x02, 0x8f, 0x3e, 0xe8,
0x25, 0x92, 0xe5, 0x15,
0xdd, 0xfd, 0x17, 0xa9,
0xbf, 0xd4, 0x9a, 0x7e,
0xc5, 0x39, 0x67, 0xfe,
0x76, 0x9d, 0x43, 0xa7,
0xe1, 0xd0, 0xf5, 0x68,
0xf2, 0x1b, 0x34, 0x70,
0x05, 0xa3, 0x8a, 0xd5,
0x79, 0x86, 0xa8, 0x30,
0xc6, 0x51, 0x4b, 0x1e,
0xa6, 0x27, 0xf6, 0x35,
0xd2, 0x6e, 0x24, 0x16,
0x82, 0x5f, 0xda, 0xe6,
0x75, 0xa2, 0xef, 0x2c,
0xb2, 0x1c, 0x9f, 0x5d,
0x6f, 0x80, 0x0a, 0x72,
0x44, 0x9b, 0x6c, 0x90,
0x0b, 0x5b, 0x33, 0x7d,
0x5a, 0x52, 0xf3, 0x61,
0xa1, 0xf7, 0xb0, 0xd6,
0x3f, 0x7c, 0x6d, 0xed,
0x14, 0xe0, 0xa5, 0x3d,
0x22, 0xb3, 0xf8, 0x89,
0xde, 0x71, 0x1a, 0xaf,
0xba, 0xb5, 0x81 },
// inverse of S-box type 1
{ 0x52, 0x09, 0x6a, 0xd5, 0x30,
0x36, 0xa5, 0x38, 0xbf,
0x40, 0xa3, 0x9e, 0x81,
0xf3, 0xd7, 0xfb, 0x7c,
0xe3, 0x39, 0x82, 0x9b,
0x2f, 0xff, 0x87, 0x34,
0x8e, 0x43, 0x44, 0xc4,
0xde, 0xe9, 0xcb, 0x54,
0x7b, 0x94, 0x32, 0xa6,
0xc2, 0x23, 0x3d, 0xee,
0x4c, 0x95, 0x0b, 0x42,
0xfa, 0xc3, 0x4e, 0x08,
0x2e, 0xa1, 0x66, 0x28,
0xd9, 0x24, 0xb2, 0x76,
0x5b, 0xa2, 0x49, 0x6d,
0x8b, 0xd1, 0x25, 0x72,
0xf8, 0xf6, 0x64, 0x86,
0x68, 0x98, 0x16, 0xd4,
0xa4, 0x5c, 0xcc, 0x5d,
0x65, 0xb6, 0x92, 0x6c,
0x70, 0x48, 0x50, 0xfd,
0xed, 0xb9, 0xda, 0x5e,
0x15, 0x46, 0x57, 0xa7,
0x8d, 0x9d, 0x84, 0x90,
0xd8, 0xab, 0x00, 0x8c,
0xbc, 0xd3, 0x0a, 0xf7,
0xe4, 0x58, 0x05, 0xb8,
0xb3, 0x45, 0x06, 0xd0,
0x2c, 0x1e, 0x8f, 0xca,
0x3f, 0x0f, 0x02, 0xc1,
0xaf, 0xbd, 0x03, 0x01,
0x13, 0x8a, 0x6b, 0x3a,
0x91, 0x11, 0x41, 0x4f,
0x67, 0xdc, 0xea, 0x97,
0xf2, 0xcf, 0xce, 0xf0,
0xb4, 0xe6, 0x73, 0x96,
0xac, 0x74, 0x22, 0xe7,
0xad, 0x35, 0x85, 0xe2,
0xf9, 0x37, 0xe8, 0x1c,
0x75, 0xdf, 0x6e, 0x47,
0xf1, 0x1a, 0x71, 0x1d,
0x29, 0xc5, 0x89, 0x6f,
0xb7, 0x62, 0x0e, 0xaa,
0x18, 0xbe, 0x1b, 0xfc,
0x56, 0x3e, 0x4b, 0xc6,
0xd2, 0x79, 0x20, 0x9a,
0xdb, 0xc0, 0xfe, 0x78,
0xcd, 0x5a, 0xf4, 0x1f,
0xdd, 0xa8, 0x33, 0x88,
0x07, 0xc7, 0x31, 0xb1,
0x12, 0x10, 0x59, 0x27,
0x80, 0xec, 0x5f, 0x60,
0x51, 0x7f, 0xa9, 0x19,
0xb5, 0x4a, 0x0d, 0x2d,
0xe5, 0x7a, 0x9f, 0x93,
0xc9, 0x9c, 0xef, 0xa0,
0xe0, 0x3b, 0x4d, 0xae,
0x2a, 0xf5, 0xb0, 0xc8,
0xeb, 0xbb, 0x3c, 0x83,
0x53, 0x99, 0x61, 0x17,
0x2b, 0x04, 0x7e, 0xba,
0x77, 0xd6, 0x26, 0xe1,
0x69, 0x14, 0x63, 0x55,
0x21, 0x0c, 0x7d },
// inverse of S-box type 2
{ 0x30, 0x68, 0x99, 0x1b, 0x87,
0xb9, 0x21, 0x78, 0x50,
0x39, 0xdb, 0xe1, 0x72,
0x09, 0x62, 0x3c, 0x3e,
0x7e, 0x5e, 0x8e, 0xf1,
0xa0, 0xcc, 0xa3, 0x2a,
0x1d, 0xfb, 0xb6, 0xd6,
0x20, 0xc4, 0x8d, 0x81,
0x65, 0xf5, 0x89, 0xcb,
0x9d, 0x77, 0xc6, 0x57,
0x43, 0x56, 0x17, 0xd4,
0x40, 0x1a, 0x4d, 0xc0,
0x63, 0x6c, 0xe3, 0xb7,
0xc8, 0x64, 0x6a, 0x53,
0xaa, 0x38, 0x98, 0x0c,
0xf4, 0x9b, 0xed, 0x7f,
0x22, 0x76, 0xaf, 0xdd,
0x3a, 0x0b, 0x58, 0x67,
0x88, 0x06, 0xc3, 0x35,
0x0d, 0x01, 0x8b, 0x8c,
0xc2, 0xe6, 0x5f, 0x02,
0x24, 0x75, 0x93, 0x66,
0x1e, 0xe5, 0xe2, 0x54,
0xd8, 0x10, 0xce, 0x7a,
0xe8, 0x08, 0x2c, 0x12,
0x97, 0x32, 0xab, 0xb4,
0x27, 0x0a, 0x23, 0xdf,
0xef, 0xca, 0xd9, 0xb8,
0xfa, 0xdc, 0x31, 0x6b,
0xd1, 0xad, 0x19, 0x49,
0xbd, 0x51, 0x96, 0xee,
0xe4, 0xa8, 0x41, 0xda,
0xff, 0xcd, 0x55, 0x86,
0x36, 0xbe, 0x61, 0x52,
0xf8, 0xbb, 0x0e, 0x82,
0x48, 0x69, 0x9a, 0xe0,
0x47, 0x9e, 0x5c, 0x04,
0x4b, 0x34, 0x15, 0x79,
0x26, 0xa7, 0xde, 0x29,
0xae, 0x92, 0xd7, 0x84,
0xe9, 0xd2, 0xba, 0x5d,
0xf3, 0xc5, 0xb0, 0xbf,
0xa4, 0x3b, 0x71, 0x44,
0x46, 0x2b, 0xfc, 0xeb,
0x6f, 0xd5, 0xf6, 0x14,
0xfe, 0x7c, 0x70, 0x5a,
0x7d, 0xfd, 0x2f, 0x18,
0x83, 0x16, 0xa5, 0x91,
0x1f, 0x05, 0x95, 0x74,
0xa9, 0xc1, 0x5b, 0x4a,
0x85, 0x6d, 0x13, 0x07,
0x4f, 0x4e, 0x45, 0xb2,
0x0f, 0xc9, 0x1c, 0xa6,
0xbc, 0xec, 0x73, 0x90,
0x7b, 0xcf, 0x59, 0x8f,
0xa1, 0xf9, 0x2d, 0xf2,
0xb1, 0x00, 0x94, 0x37,
0x9f, 0xd0, 0x2e, 0x9c,
0x6e, 0x28, 0x3f, 0x80,
0xf0, 0x3d, 0xd3, 0x25,
0x8a, 0xb5, 0xe7, 0x42,
0xb3, 0xc7, 0xea, 0xf7,
0x4c, 0x11, 0x33, 0x03,
0xa2, 0xac, 0x60 } };
public static int[][] KRK = {
{ 0x51, 0x7c, 0xc1, 0xb7, 0x27,
0x22, 0x0a, 0x94, 0xfe,
0x13, 0xab, 0xe8, 0xfa,
0x9a, 0x6e, 0xe0 },
{ 0x6d, 0xb1, 0x4a, 0xcc, 0x9e,
0x21, 0xc8, 0x20, 0xff,
0x28, 0xb1, 0xd5, 0xef,
0x5d, 0xe2, 0xb0 },
{ 0xdb, 0x92, 0x37, 0x1d, 0x21,
0x26, 0xe9, 0x70, 0x03,
0x24, 0x97, 0x75, 0x04,
0xe8, 0xc9, 0x0e } };
//func1
public static String CryptAria(String aKey, String source) {
if(source == null || source.equals("")) {
return "";
}
TAriaCrypt aria = TAriaCrypt.Create(null);
aria.properties.get("Encode").write(true);
aria.properties.get("Key").write(aKey);
return aria.Crypt(source);
}
//func2
public static String DecryptAria(String aKey, String source) {
if(source == null || source.equals("")) {
return "";
}
TAriaCrypt aria = TAriaCrypt.Create(null);
aria.properties.get("Encode").write(true);
aria.properties.get("Key").write(aKey);
return aria.Decrypt(source);
}
}

27
src/main/java/cokr/xit/applib/delphi/CxBase64.java
Unescape Escape View File

@ -0,0 +1,27 @@
package cokr.xit.applib.delphi;
import java.io.UnsupportedEncodingException;
import java.util.Base64;
import java.util.Base64.Decoder;
import java.util.Base64.Encoder;
public class CxBase64 {
public static String Base64Encode(byte[] input) {
String result = "";
try {
Encoder encoder = Base64.getEncoder();
result = new String(encoder.encode(input),"ISO-8859-1");
} catch (UnsupportedEncodingException e) {
e.printStackTrace();
}
return result;
}
public static byte[] Base64Decode(String input) {
Decoder decoder = Base64.getDecoder();
return decoder.decode(input);
}
}

52
src/main/java/cokr/xit/applib/delphi/CxMD5.java
Unescape Escape View File

@ -0,0 +1,52 @@
package cokr.xit.applib.delphi;
import java.io.UnsupportedEncodingException;
import java.security.MessageDigest;
import java.security.NoSuchAlgorithmException;
public class CxMD5 {
public static byte[] MD5String(String szString) {
byte[] r = new byte[0];
MessageDigest md;
try {
md = MessageDigest.getInstance("MD5");
md.update(szString.getBytes("EUC-KR"));
byte[] d = md.digest();
String hash = _toHex(d);
r = hash.getBytes("EUC-KR");
} catch (NoSuchAlgorithmException e) {
e.printStackTrace();
}
catch (UnsupportedEncodingException e) {
e.printStackTrace();
}
return r;
}
private static String _toHex(byte[] bin_data) {
StringBuilder result = new StringBuilder();
if (bin_data != null && bin_data.length != 0) {
for (int i = 0; i < bin_data.length; i++) {
result.append(String.format("%02x", bin_data[i]));
}
}
return result.toString();
}
private static byte[] _toHex(String strHex) {
if (strHex == null || strHex.length() == 0) {
return null;
}
byte[] ba = new byte[strHex.length() / 2];
for (int i = 0; i < ba.length; i++) {
ba[i] = (byte) Integer.parseInt(strHex.substring(2 * i, 2 * i + 2), 16);
}
return ba;
}
}

99
src/main/java/cokr/xit/applib/delphi/Delphi.java
Unescape Escape View File

@ -0,0 +1,99 @@
package cokr.xit.applib.delphi;
import java.nio.ByteBuffer;
import java.nio.ByteOrder;
public class Delphi {
public static int Move(byte[] source, int sourceFrom){
byte[] b = new byte[4];
b[0] = source[sourceFrom];
b[1] = source[sourceFrom+1];
b[2] = source[sourceFrom+2];
b[3] = source[sourceFrom+3];
return _bytesToInt_le(b);
}
public static void Move(int sourceInt, byte[] target, int targetFrom){
byte[] source = _intToBytes_le(sourceInt);
int j = targetFrom;
for(int z=0; z < 4; z++) {
target[j] = source[z];
j++;
}
}
public static void Move(byte[] source, int sourceFrom, byte[] target, int targetFrom, int size){
int i = sourceFrom;
int j = targetFrom;
for(int z=0; z < size; z++) {
target[j] = source[i];
i++;
j++;
}
}
public static void Move(byte[] source, int sourceFrom, int[] targetIntArray, int size){
byte[] byteTarget = new byte[targetIntArray.length];
Move(source,sourceFrom,byteTarget,0,size);
_convertIntArray(byteTarget, targetIntArray);
}
public static void Move(int[] sourceIntArray, byte[] target, int targetFrom, int size){
byte[] byteSource = new byte[sourceIntArray.length];
_convertByteArray(sourceIntArray, byteSource);
Move(byteSource,0,target,targetFrom,size);
}
public static int Inc(int num, int incNum) {
return num+incNum;
}
public static byte[] SetLength(int len) {
return new byte[len];
}
public static int Length(byte[] b){
return b.length;
}
public static int SizeOf(int[] b){
return b.length;
}
private static void _convertIntArray(byte[] b, int[] n){
for(int j = 0; j < b.length; j++ )
{
if(b[j] < 0)
n[j] = b[j] + 256;
else
n[j] = b[j];
}
}
private static void _convertByteArray(int[] n, byte[] b){
for(int j = 0; j < n.length; j++ )
{
b[j] = (byte)n[j];
}
}
private static byte[] _intToBytes_le(int num) {
return ByteBuffer.allocate(4).order(ByteOrder.LITTLE_ENDIAN).putInt(num).array();
}
private static byte[] _intToBytes_be(int num) {
return ByteBuffer.allocate(4).order(ByteOrder.BIG_ENDIAN).putInt(num).array();
}
private static int _bytesToInt_le(byte[] byteArray) {
return ByteBuffer.wrap(byteArray).order(ByteOrder.LITTLE_ENDIAN).getInt();
}
private static int _bytesToInt_be(byte[] byteArray) {
return ByteBuffer.wrap(byteArray).order(ByteOrder.BIG_ENDIAN).getInt();
}
}

7
src/main/java/cokr/xit/applib/delphi/Property.java
Unescape Escape View File

@ -0,0 +1,7 @@
package cokr.xit.applib.delphi;
public abstract class Property<O extends Object> {
public abstract O read();
public abstract void write(O o);
}

466
src/main/java/cokr/xit/applib/delphi/TAriaCrypt.java
Unescape Escape View File

@ -0,0 +1,466 @@
package cokr.xit.applib.delphi;
import java.io.UnsupportedEncodingException;
import java.util.Arrays;
import java.util.Map;
public class TAriaCrypt {
private int[] fMasterKey = new int[32];
private int fKeySize;
private String fKey;
private boolean fEncode;
Map<String,Property> properties = Map.of(
"Encode", new Encode(),
"Key", new Key(),
"KeySize", new KeySize()
);
public class Encode extends Property<Boolean> {
@Override
public Boolean read() {
return fEncode;
}
@Override
public void write(Boolean bool) {
fEncode = bool;
}
}
public class Key extends Property<String>{
@Override
public String read() {
return fKey;
}
@Override
public void write(String str) {
SetKey(str);
}
};
public class KeySize extends Property<Integer>{
@Override
public Integer read() {
return fKeySize;
}
@Override
public void write(Integer num) {
SetKeySize(num);
}
}
//privateFunc1
private void DiffusionLayer(int[] i, int[] o) {
int T;
T = (i[3] ^ i[4] ^ i[9] ^ i[14]);
o[0] = (i[6] ^ i[8] ^ i[13] ^ T);
o[5] = (i[1] ^ i[10] ^ i[15] ^ T);
o[11] = (i[2] ^ i[7] ^ i[12] ^ T);
o[14] = (i[0] ^ i[5] ^ i[11] ^ T);
T = (i[2] ^ i[5] ^ i[8] ^ i[15]);
o[1] = (i[7] ^ i[9] ^ i[12] ^ T);
o[4] = (i[0] ^ i[11] ^ i[14] ^ T);
o[10] = (i[3] ^ i[6] ^ i[13] ^ T);
o[15] = (i[1] ^ i[4] ^ i[10] ^ T);
T = (i[1] ^ i[6] ^ i[11] ^ i[12]);
o[2] = (i[4] ^ i[10] ^ i[15] ^ T);
o[7] = (i[3] ^ i[8] ^ i[13] ^ T);
o[9] = (i[0] ^ i[5] ^ i[14] ^ T);
o[12] = (i[2] ^ i[7] ^ i[9] ^ T);
T = (i[0] ^ i[7] ^ i[10] ^ i[13]);
o[3] = (i[5] ^ i[11] ^ i[14] ^ T);
o[6] = (i[2] ^ i[9] ^ i[12] ^ T);
o[8] = (i[1] ^ i[4] ^ i[15] ^ T);
o[13] = (i[3] ^ i[6] ^ i[8] ^ T);
}
private void DiffusionLayer(int[] i, int iIndex, int[] o, int oIndex) {
int T;
T = (i[iIndex + 3] ^ i[iIndex + 4] ^ i[iIndex + 9] ^ i[iIndex + 14]);
o[oIndex + 0] = (i[iIndex + 6] ^ i[iIndex + 8] ^ i[iIndex + 13] ^ T);
o[oIndex + 5] = (i[iIndex + 1] ^ i[iIndex + 10] ^ i[iIndex + 15] ^ T);
o[oIndex + 11] = (i[iIndex + 2] ^ i[iIndex + 7] ^ i[iIndex + 12] ^ T);
o[oIndex + 14] = (i[iIndex + 0] ^ i[iIndex + 5] ^ i[iIndex + 11] ^ T);
T = (i[iIndex + 2] ^ i[iIndex + 5] ^ i[iIndex + 8] ^ i[iIndex + 15]);
o[oIndex + 1] = (i[iIndex + 7] ^ i[iIndex + 9] ^ i[iIndex + 12] ^ T);
o[oIndex + 4] = (i[iIndex + 0] ^ i[iIndex + 11] ^ i[iIndex + 14] ^ T);
o[oIndex + 10] = (i[iIndex + 3] ^ i[iIndex + 6] ^ i[iIndex + 13] ^ T);
o[oIndex + 15] = (i[iIndex + 1] ^ i[iIndex + 4] ^ i[iIndex + 10] ^ T);
T = (i[iIndex + 1] ^ i[iIndex + 6] ^ i[iIndex + 11] ^ i[iIndex + 12]);
o[oIndex + 2] = (i[iIndex + 4] ^ i[iIndex + 10] ^ i[iIndex + 15] ^ T);
o[oIndex + 7] = (i[iIndex + 3] ^ i[iIndex + 8] ^ i[iIndex + 13] ^ T);
o[oIndex + 9] = (i[iIndex + 0] ^ i[iIndex + 5] ^ i[iIndex + 14] ^ T);
o[oIndex + 12] = (i[iIndex + 2] ^ i[iIndex + 7] ^ i[iIndex + 9] ^ T);
T = (i[iIndex + 0] ^ i[iIndex + 7] ^ i[iIndex + 10] ^ i[iIndex + 13]);
o[oIndex + 3] = (i[iIndex + 5] ^ i[iIndex + 11] ^ i[iIndex + 14] ^ T);
o[oIndex + 6] = (i[iIndex + 2] ^ i[iIndex + 9] ^ i[iIndex + 12] ^ T);
o[oIndex + 8] = (i[iIndex + 1] ^ i[iIndex + 4] ^ i[iIndex + 15] ^ T);
o[oIndex + 13] = (i[iIndex + 3] ^ i[iIndex + 6] ^ i[iIndex + 8] ^ T);
}
//privateFunc2
// Encryption and decryption rountine
// p: plain text, e: round keys, c: ciphertext
private void DoCrypt(int[] p, int R, int[] e, int[] c) {
int i, j;
int index = 0;
int[] t = new int[16];
for (j = 0; j < 16; j++) {
c[j] = p[j];
}
for (i = 0; i < R / 2; i++) {
for (j = 0; j < 16; j++) {
t[j] = CxAria.SBox[j % 4][e[index + j] ^ c[j]];
}
DiffusionLayer(t, c);
index += 16;
for (j = 0; j < 16; j++) {
t[j] = CxAria.SBox[(2 + j) % 4][e[index + j] ^ c[j]];
}
DiffusionLayer(t, c);
index += 16;
}
DiffusionLayer(c, t);
for (j = 0; j < 16; j++) {
c[j] = (e[index+j] ^ t[j]);
}
}
//privateFunc3
// Decryption round key generation rountine
// w0 : maskter key, d : decryption round keys
private int DecKeySetup(int[] w0, int[] d) {
int i, j, R;
int[] t = new int[16];
R = EncKeySetup(w0, d);
for (j = 0; j < 16; j++) {
t[j] = d[j];
d[j] = d[16 * R + j];
d[16 * R + j] = t[j];
}
for (i = 1; i <= R / 2; i++) {
DiffusionLayer(d, i * 16, t, 0);
DiffusionLayer(d, (R - i) * 16, d, i * 16);
for (j = 0; j < 16; j++)
d[(R - i) * 16 + j] = t[j];
}
return R;
}
//privateFunc4
// Encryption round key generation rountine
// w0 : master key, e : encryption round keys
private int EncKeySetup(int[] w0, int[] e) {
int R = (fKeySize + 256) / 32;
int q = (fKeySize - 128) / 64;
int i;
int[] t = new int[16];
int[] w1 = new int[16];
int[] w2 = new int[16];
int[] w3 = new int[16];
// t from sbox,krk,q
for (i = 0; i < 16; i++){
t[i] = CxAria.SBox[i % 4][ CxAria.KRK[q][i] ^ w0[i]];
}
//dl 1
DiffusionLayer(t, w1);
//
if (R == 14) {
for (i = 0; i < 8; i++) {
w1[i] ^= w0[16 + i];
}
} else if (R == 16) {
for (i = 0; i < 16; i++) {
w1[i] ^= w0[16 + i];
}
}
// q
q = (q == 2) ? 0 : (q + 1);
// t from sbox,krk,q
for (i = 0; i < 16; i++) {
t[i] = CxAria.SBox[(2 + i) % 4][CxAria.KRK[q][i] ^ w1[i]];
}
//dl 2
DiffusionLayer(t, w2);
//
for (i = 0; i < 16; i++) {
w2[i] ^= w0[i];
}
// q
q = (q == 2) ? 0 : (q + 1);
// t from sbox,krk,q
for (i = 0; i < 16; i++) {
t[i] = CxAria.SBox[i % 4][CxAria.KRK[q][i] ^ w2[i]];
}
//dl 3
DiffusionLayer(t, w3);
//
for (i = 0; i < 16; i++) {
w3[i] = w3[1] ^ w1[i];
}
//e초기화
for (i = 0; i < 16 * (R + 1); i++) {
e[i] = 0;
}
RotXOR(w0, 0, e, 0);
RotXOR(w1, 19, e, 0);
RotXOR(w1, 0, e, 16);
RotXOR(w2, 19, e, 16);
RotXOR(w2, 0, e, 32);
RotXOR(w3, 19, e, 32);
RotXOR(w3, 0, e, 48);
RotXOR(w0, 19, e, 48);
RotXOR(w0, 0, e, 64);
RotXOR(w1, 31, e, 64);
RotXOR(w1, 0, e, 80);
RotXOR(w2, 31, e, 80);
RotXOR(w2, 0, e, 96);
RotXOR(w3, 31, e, 96);
RotXOR(w3, 0, e, 112);
RotXOR(w0, 31, e, 112);
RotXOR(w0, 0, e, 128);
RotXOR(w1, 67, e, 128);
RotXOR(w1, 0, e, 144);
RotXOR(w2, 67, e, 144);
RotXOR(w2, 0, e, 160);
RotXOR(w3, 67, e, 160);
RotXOR(w3, 0, e, 176);
RotXOR(w0, 67, e, 176);
RotXOR(w0, 0, e, 192);
RotXOR(w1, 97, e, 192);
if (R > 12) {
RotXOR(w1, 0, e, 208);
RotXOR(w2, 97, e, 208);
RotXOR(w2, 0, e, 224);
RotXOR(w3, 97, e, 224);
}
if (R > 14) {
RotXOR(w3, 0, e, 240);
RotXOR(w0, 97, e, 240);
RotXOR(w0, 0, e, 256);
RotXOR(w1, 109, e, 256);
}
return R;
}
//privateFunc5
// Right-rotate 128 bit source string s by n bits and XOR it to target
// string t
private void RotXOR(int[] s, int n, int[] t, int index) {
int i, q;
q = n / 8;
n %= 8;
for (i = 0; i < 16; i++) {
t[index + (q + i) % 16] ^= (byte) (s[i] >> n);
if (n != 0) {
t[index + (q + i + 1) % 16] ^= (byte) (s[i] << (8 - n));
}
}
_convertIntArray(t);
}
//privateFunc6
private void SetKey(String value){
if(!fKey.equals(value)) {
fKey = value;
byte[] MD5Hash = CxMD5.MD5String(fKey);
try {
Delphi.Move(MD5Hash,0,fMasterKey,Delphi.SizeOf(fMasterKey));
} catch(Exception e){
}
}
}
//privateFunc7
private void SetKeySize(Integer num) {
if(num == 128 || num == 192 || num == 256) {
fKeySize = num;
}
}
//publicFunc1
public static TAriaCrypt Create(Object AOwner) {
TAriaCrypt newAria = new TAriaCrypt();
newAria.fEncode = true;
newAria.fKey = "";
newAria.fKeySize = 192;
return newAria;
}
//publicFunc2
public String Crypt(String value) {
String result = null;
int[] InBlock = new int[16];
int[] OutBlock = new int[16];
int RoundNumber;
int[] RoundKey = new int[16*17];
int i;
int Start;
byte[] EncryptData = new byte[0];
int EncryptSize;
byte[] CryptData = new byte[0];
int DataSize;
int ModSize;
try {
byte[] value_byte = value.getBytes("EUC-KR");
EncryptSize = Delphi.Length(value_byte);
EncryptData = Delphi.SetLength(EncryptSize + 4);
Delphi.Move(EncryptSize, EncryptData, 0);
Delphi.Move(value_byte,0,EncryptData,4,EncryptSize);
DataSize = Delphi.Length(EncryptData);
ModSize = DataSize % 16;
RoundNumber = EncKeySetup(fMasterKey, RoundKey);
Start = 1;
CryptData = Delphi.SetLength(DataSize + 16 - (DataSize % 16));
for(i = 1; i <= Math.floorDiv(DataSize,16); i++) {
Arrays.fill(InBlock, 0);
Arrays.fill(OutBlock, 0);
Delphi.Move(EncryptData, Start-1, InBlock, 16);
DoCrypt(InBlock, RoundNumber, RoundKey, OutBlock);
Delphi.Move(OutBlock,CryptData,Start-1,16);
Start = Delphi.Inc(Start,16);
}
//나머지크기
if (ModSize != 0) {
Arrays.fill(InBlock, 0);
Arrays.fill(OutBlock, 0);
Delphi.Move(EncryptData,Start-1,InBlock,ModSize);
DoCrypt(InBlock, RoundNumber, RoundKey, OutBlock);
Delphi.Move(OutBlock,CryptData,Start-1,16);
}
if(fEncode) {
result = CxBase64.Base64Encode(CryptData);
} else {
result = new String(CryptData, "EUC-KR");
}
} catch (UnsupportedEncodingException e) {
e.printStackTrace();
}
return result;
}
//publicFunc3
public String Decrypt(String value) {
String result = "";
int[] InBlock = new int[16];
int[] OutBlock = new int[16];
int RoundNumber;
int[] RoundKey = new int[16 * 17];
int i;
int Start;
byte[] CryptData;
byte[] EncryptData = new byte[0];
int EncryptSize;
int DataSize;
int ModSize;
try {
if(fEncode) {
CryptData = CxBase64.Base64Decode(value);
} else {
CryptData = value.getBytes();
}
DataSize = CryptData.length;
ModSize = DataSize % 16;
RoundNumber = DecKeySetup(fMasterKey, RoundKey);
Start = 1;
EncryptData = Delphi.SetLength(DataSize);
for (i = 1; i <= Math.floorDiv(DataSize, 16); i++) {
Arrays.fill(InBlock, 0);
Arrays.fill(OutBlock, 0);
Delphi.Move(CryptData,(Start-1),InBlock,16);
DoCrypt(InBlock, RoundNumber, RoundKey, OutBlock);
Delphi.Move(OutBlock,EncryptData,Start-1,16);
Start = Delphi.Inc(Start,16);
}
if(ModSize > 0) {
Arrays.fill(InBlock, 0);
Arrays.fill(OutBlock, 0);
Delphi.Move(CryptData,(Start-1),InBlock,16);
DoCrypt(InBlock, RoundNumber, RoundKey, OutBlock);
Delphi.Move(OutBlock,EncryptData,Start-1,16);
}
EncryptSize = Delphi.Move(EncryptData,0);
byte[] copy = new byte[EncryptSize];
Delphi.Move(EncryptData,4,copy,0,EncryptSize);
result = new String(copy,"EUC-KR");
} catch (UnsupportedEncodingException e) {
e.printStackTrace();
}
return result;
}
private static void _convertIntArray(int[] n){
for(int j = 0; j < n.length; j++ )
{
if(n[j] < 0)
n[j] = n[j] + 256;
else
n[j] = n[j];
}
}
}
Write Preview
Loading…
Cancel
Save