import java.io.UnsupportedEncodingException;




// VCard 3.0 defintion: http://www.ietf.org/rfc/rfc2425.txt
public class VCard {


	 private byte[] toByteArray(String hex) {
	 	 java.util.Vector res = new java.util.Vector();
	 	 String part;
	 	 int pos = 0;
	 	 int len = 0;

	 	 while (pos<hex.length()) {
	 	 	len = ((hex.substring(pos,pos+1).equals("-")) ? 3 : 2);
	 	 	part = hex.substring(pos,pos+len);
	 	 	pos += len;
	 	 	int test = Integer.parseInt(part,16);
	 	 	res.add(new Byte((byte)test));
	 	 }

	 	 if (res.size()>0) {
	 	 	byte[] b = new byte[res.size()];

	 	 	for (int i=0; i<res.size(); i++) {
	 	 		Byte a = (Byte)res.elementAt(i);
	 	 		b[i] = a.byteValue();
	 	  	}

	 	 	return b;

	 	 } else {
	 	 	return null;
	 	 }
 	 }


	

	private String title, firstname, lastname, phone, email;

	public VCard(String title, String firstName, String lastName, String phone, String email) {
		this.title = title;
		this.firstname = firstName;
		this.lastname = lastName;
		this.phone = phone;
		this.email = email;

	}

	public byte[] getBodyHeader() throws UnsupportedEncodingException {
		byte[] header = new byte[3];

		header[0] = 0x49;

		byte[] headerRest = toByteArray(Integer.toHexString(getBody().length+3));

		switch(headerRest.length) {

			case 1:
				header[1] = 0x00;
				header[2] = headerRest[0];
				return header;
			case 2:
				header[1] = headerRest[1];
				header[2] = headerRest[2];
				return header;
			default:
				throw new UnsupportedEncodingException(); 
		}

	}

	public byte[] getBody() {

		byte[] value = null;
		String vcardBody = "BEGIN:VCARD\r\nVERSION:3.0\r\nN:";



		if(lastname != null) {
			vcardBody += lastname;
		}

		vcardBody += ";";

		if(firstname != null) {
			vcardBody += firstname;
		}

		vcardBody += ";;;\r\n";

		if(phone != null) {
			vcardBody += "TEL;type=pref:"+phone+"\r\n";
		}


		if(email != null) {
			vcardBody += "EMAIL;INTERNET:"+email+"\r\n";
		}

		vcardBody += "END:VCARD\r\n";

		return vcardBody.getBytes();
	}

	public byte[] getBodyHeaderWO() throws UnsupportedEncodingException {
		byte[] header = new byte[5];

		// HI for "name"
		header[0] = (byte) 0xc3;

		// +3 for the header
		byte[] headerRest = toByteArray(Integer.toHexString(getBody().length));

		switch (headerRest.length)
		{
			case 1:
				header[1] = 0x00;
				header[2] = 0x00;
				header[3] = 0x00;
				header[4] = headerRest[0];
				return header;
			case 2:
				header[1] = 0x00;
				header[2] = 0x00;
				header[3] = headerRest[0];
				header[4] = headerRest[1];
				return header;
			case 3:
				header[1] = 0x00;
				header[2] = headerRest[0];
				header[3] = headerRest[1];
				header[4] = headerRest[2];
				return header;
			case 4:
				header[1] = headerRest[0];
				header[2] = headerRest[1];
				header[3] = headerRest[2];
				header[4] = headerRest[3];
				return header;
			default:
				// throws exception if title is too long
				throw new UnsupportedEncodingException();


		}

	}


	/**
	 * 
	 * @return The "name" header
	 * @throws UnsupportedEncodingException if the title is too long
	 */
	public byte[] getTitleHeader() throws UnsupportedEncodingException {
		byte[] header = new byte[3];

		// HI for "name"
		header[0] = 0x01;

		// +3 for the header
		byte[] headerRest = toByteArray(Integer.toHexString(getTitle().length+3));

		switch (headerRest.length)
		{
			case 1:
				header[1] = 0x00;
				header[2] = headerRest[0];
				return header;
			case 2:
				header[1] = headerRest[0];
				header[2] = headerRest[1];
				return header;
			default:
				// throws exception if title is too long
				throw new UnsupportedEncodingException();
		}

	}

	public byte[] getTitle() {
		byte[] title = this.title.getBytes();
		byte[] title2 = new byte[title.length*2+2];

		int j=0;
		int i=0;
		for(i=0; i<title.length; i++) {
			title2[j] = 0x00;
			title2[j+1] = title[i];
			j += 2;
		}
		j -= 1;

		title2[j+1] = 0x00;
		title2[j+2] = 0x00;

		return title2;
	}

	public byte[] getCardBytes() throws UnsupportedEncodingException {

		int pos = 0;
		int totalLength = 13 + getTitle().length + 3 + getBody().length + 3;

		byte[] data = new byte[totalLength];

		byte[] headerRest = toByteArray(Integer.toHexString(totalLength));
		byte[] header = new byte[3];
		header[0] = (byte) 0x82;

		switch(headerRest.length) {

			case 1:
				header[1] = 0x00;
				header[2] = headerRest[0];
				break;
			case 2:
				header[1] = headerRest[0];
				header[2] = headerRest[1];
				break;
			default:
				throw new UnsupportedEncodingException();

		}


		for(int i=0; i<header.length; i++)
			data[pos++] = header[i];


		data[pos++] = (byte) 0xcb;
		data[pos++] = (byte) 0xc3;
		data[pos++] = (byte) 0x0f;
		data[pos++] = (byte) 0xa5;
		data[pos++] = (byte) 0x96;

		for(int i=0; i<getTitleHeader().length; i++)
			data[pos++] = getTitleHeader()[i];

		for(int i=0; i<getTitle().length; i++)
			data[pos++] = getTitle()[i];

		for(int i=0; i<getBodyHeaderWO().length; i++)
			data[pos++] = getBodyHeaderWO()[i];

		for(int i=0; i<getBodyHeader().length; i++)
			data[pos++] = getBodyHeader()[i];

		for(int i=0; i<getBody().length; i++)
			data[pos++] = getBody()[i];

		return data;
	}
}