[pgsqlclient-checkins] pgsqlclient_10/Mono.Security/Mono.Security/Mono.Security ASN1.cs,NONE,1.1 ASN1Convert.cs,NONE,1.1

[<car...@us...>]

Update of /cvsroot/pgsqlclient/pgsqlclient_10/Mono.Security/Mono.Security/Mono.Security
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv772

Added Files:
	ASN1.cs ASN1Convert.cs 
Log Message:
Reorganization to match mono:: cvs structure

--- NEW FILE: ASN1.cs ---
//
// ASN1.cs: Abstract Syntax Notation 1 - micro-parser and generator
//
// Author:
//	Sebastien Pouliot (spo...@mo...)
//
// (C) 2002, 2003 Motus Technologies Inc. (http://www.motus.com)
//

using System;
using System.Collections;

namespace Mono.Security {

// References:
// a.	ITU ASN.1 standards (free download)
//	http://www.itu.int/ITU-T/studygroups/com17/languages/

internal class ASN1 {

	protected byte m_nTag;
	protected byte[] m_aValue;
	protected ArrayList elist;

	public ASN1 () : this (0x00, null) {}

	public ASN1 (byte tag) : this (tag, null) {}

	public ASN1 (byte tag, byte[] data) 
	{
		m_nTag = tag;
		m_aValue = data;
	}

	public ASN1 (byte[] data) 
	{
		m_nTag = data [0];

		int nLenLength = 0;
		int nLength = data [1];

		if (nLength > 0x80) {
			// composed length
			nLenLength = nLength - 0x80;
			nLength = 0;
			for (int i = 0; i < nLenLength; i++) {
				nLength *= 256;
				nLength += data [i + 2];
			}
		}

		m_aValue = new byte [nLength];
		Array.Copy (data, (2 + nLenLength), m_aValue, 0, nLength);

		if ((m_nTag & 0x20) == 0x20) {
			int nStart = (2 + nLenLength);
			Decode (data, ref nStart, data.Length);
		}
	}

	public int Count {
		get { 
			if (elist == null)
				return 0;
			return elist.Count; 
		}
	}

	public byte Tag {
		get { return m_nTag; }
	}

	public int Length {
		get { 
			if (m_aValue != null)
				return m_aValue.Length; 
			else
				return 0;
		}
	}

	public byte[] Value {
		get { 
			if (m_aValue == null)
				GetBytes ();
			return (byte[]) m_aValue.Clone (); 
		}
		set { 
			if (value != null)
				m_aValue = (byte[]) value.Clone (); 
		}
	}

	private bool CompareArray (byte[] array1, byte[] array2)
	{
		bool bResult = (array1.Length == array2.Length);
		if (bResult) {
			for (int i = 0; i < array1.Length; i++) {
				if (array1[i] != array2[i])
					return false;
			}
		}
		return bResult;
	}

	public bool Equals (byte[] asn1) 
	{
		return CompareArray (this.GetBytes (), asn1);
	}

	public bool CompareValue (byte[] aValue) 
	{
		return CompareArray (m_aValue, aValue);
	}

	public virtual ASN1 Add (ASN1 asn1) 
	{
		if (asn1 != null) {
			if (elist == null)
				elist = new ArrayList ();
			elist.Add (asn1);
		}
		return asn1;
	}

	public virtual byte[] GetBytes () 
	{
		byte[] val = null;
		if (m_aValue != null) {
			val = m_aValue;
		}
		else if (Count > 0) {
			int esize = 0;
			ArrayList al = new ArrayList ();
			foreach (ASN1 a in elist) {
				byte[] item = a.GetBytes ();
				al.Add (item);
				esize += item.Length;
			}
			val = new byte [esize];
			int pos = 0;
			for (int i=0; i < elist.Count; i++) {
				byte[] item = (byte[]) al[i];
				Array.Copy (item, 0, val, pos, item.Length);
				pos += item.Length;
			}
		}

		byte[] der;
		int nLengthLen = 0;

		if (val != null) {
			int nLength = val.Length;
			// special for length > 127
			if (nLength > 127) {
				if (nLength < 256) {
					der = new byte [3 + nLength];
					Array.Copy (val, 0, der, 3, nLength);
					nLengthLen += 0x81;
					der[2] = (byte)(nLength);
				}
				else {
					der = new byte [4 + nLength];
					Array.Copy (val, 0, der, 4, nLength);
					nLengthLen += 0x82;
					der[2] = (byte)(nLength / 256);
					der[3] = (byte)(nLength % 256);
				}
			}
			else {
				der = new byte [2 + nLength];
				Array.Copy (val, 0, der, 2, nLength);
				nLengthLen = nLength;
			}
			if (m_aValue == null)
				m_aValue = val;
		}
		else
			der = new byte[2];

		der[0] = m_nTag;
		der[1] = (byte)nLengthLen;

		return der;
	}

	// Note: Recursive
	protected void Decode (byte[] asn1, ref int anPos, int anLength) 
	{
		byte nTag;
		int nLength;
		byte[] aValue;

		// minimum is 2 bytes (tag + length of 0)
		while (anPos < anLength - 1) {
			int nPosOri = anPos;
			DecodeTLV (asn1, ref anPos, out nTag, out nLength, out aValue);

			ASN1 elm = Add (new ASN1 (nTag, aValue));

			if ((nTag & 0x20) == 0x20) {
				int nConstructedPos = anPos;
				elm.Decode (asn1, ref nConstructedPos, nConstructedPos + nLength);
			}
			anPos += nLength; // value length
		}
	}

	// TLV : Tag - Length - Value
	protected void DecodeTLV (byte[] asn1, ref int anPos, out byte anTag, out int anLength, out byte[] aValue) 
	{
		anTag = asn1 [anPos++];
		anLength = asn1 [anPos++];

		// special case where L contains the Length of the Length + 0x80
		if ((anLength & 0x80) == 0x80) {
			int nLengthLen = anLength & 0x7F;
			anLength = 0;
			for (int i = 0; i < nLengthLen; i++)
				anLength = anLength * 256 + asn1 [anPos++];
		}

		aValue = new byte [anLength];
		Array.Copy (asn1, anPos, aValue, 0, anLength);
	}

	public ASN1 this [int index] {
		get { 		
			try {
				if (index >= elist.Count)
					return null;
				return (ASN1) elist [index];
			}
			catch {
				return null;
			}
		}
	}

	public ASN1 Element (int index, byte anTag) 
	{
		try {
			if (index >= elist.Count)
				return null;

			ASN1 elm = (ASN1) elist [index];
			if (elm.Tag == anTag)
				return elm;
			else
				return null;
		}
		catch {
			return null;
		}
	}
}

}

--- NEW FILE: ASN1Convert.cs ---
//
// ASN1Convert.cs: Abstract Syntax Notation 1 convertion routines
//
// Author:
//	Sebastien Pouliot (spo...@mo...)
//
// (C) 2003 Motus Technologies Inc. (http://www.motus.com)
//

using System;
using System.Collections;
using System.Security.Cryptography;
using System.Text;
using System.Globalization;

namespace Mono.Security {

	// References:
	// a.	ITU ASN.1 standards (free download)
	//	http://www.itu.int/ITU-T/studygroups/com17/languages/

	internal class ASN1Convert {

		// RFC3280, section 4.2.1.5
		// CAs conforming to this profile MUST always encode certificate
		// validity dates through the year 2049 as UTCTime; certificate validity
		// dates in 2050 or later MUST be encoded as GeneralizedTime.
		static public ASN1 FromDateTime (DateTime dt) 
		{
			if (dt.Year < 2050) {
				// UTCTIME
				return new ASN1 (0x17, Encoding.ASCII.GetBytes (dt.ToString ("yyMMddHHmmss") + "Z"));
			}
			else {
				// GENERALIZEDTIME
				return new ASN1 (0x18, Encoding.ASCII.GetBytes (dt.ToString ("yyyyMMddHHmmss") + "Z"));
			}
		}

		static public ASN1 FromInt32 (Int32 value) 
		{
			byte[] integer = BitConverter.GetBytes (value);
			int x = 3;
			while (integer [x] == 0x00)
				x--;
			ASN1 asn1 = new ASN1 (0x02);
			if (x == 3)
				asn1.Value = integer;
			else {
				byte[] smallerInt = new byte [x + 1];
				Array.Copy (integer, 0, smallerInt, 0, smallerInt.Length);
				asn1.Value = smallerInt;
			}
			return asn1;
		}

		static public ASN1 FromOID (string oid) 
		{
			return new ASN1 (CryptoConfig.EncodeOID (oid));
		}

		static public ASN1 FromUnsignedBigInteger (byte[] integer) 
		{
			if (integer [0] == 0x00) {
				// this first byte is added so we're sure it's an unsigned integer
				// however we can't feed it into RSAParameters or DSAParameters
				int length = integer.Length + 1;
				byte[] uinteger = new byte [length];
				Array.Copy (integer, 0, uinteger, 1, length);
				integer = uinteger;
			}
			return new ASN1 (0x02, integer);
		}

		static public int ToInt32 (ASN1 asn1) 
		{
			if (asn1.Tag != 0x02)
				throw new NotSupportedException ("Only integer can be converted");
			int x = 0;
			for (int i=0; i < asn1.Value.Length; i++)
				x = (x << 8) + asn1.Value [i];
			return x;
		}

		// Convert a binary encoded OID to human readable string representation of 
		// an OID (IETF style). Based on DUMPASN1.C from Peter Gutmann.
		static public string ToOID (ASN1 asn1) 
		{
			byte[] aOID = asn1.Value;
			StringBuilder sb = new StringBuilder ();
			// Pick apart the OID
			byte x = (byte) (aOID[0] / 40);
			byte y = (byte) (aOID[0] % 40);
			if (x > 2) {
				// Handle special case for large y if x = 2
				y += (byte) ((x - 2) * 40);
				x = 2;
			}
			sb.Append (x.ToString ());
			sb.Append (".");
			sb.Append (y.ToString ());
			ulong val = 0;
			for (x = 1; x < aOID.Length; x++) {
				val = ((val << 7) | ((byte) (aOID [x] & 0x7F)));
				if ( !((aOID [x] & 0x80) == 0x80)) {
					sb.Append (".");
					sb.Append (val.ToString ());
					val = 0;
				}
			}
			return sb.ToString ();
		}

		static public DateTime ToDateTime (ASN1 time) 
		{
			string t = Encoding.ASCII.GetString (time.Value);
			// to support both UTCTime and GeneralizedTime (and not so common format)
			string mask = null;
			switch (t.Length) {
				case 11:
					mask = "yyMMddHHmmZ"; // illegal I think ... must check
					break;
				case 13: 
					// RFC3280: 4.1.2.5.1  UTCTime
					int year = Convert.ToInt16 (t.Substring (0, 2));
					// Where YY is greater than or equal to 50, the 
					// year SHALL be interpreted as 19YY; and 
					// Where YY is less than 50, the year SHALL be 
					// interpreted as 20YY.
					if (year >= 50)
						t = "19" + t;
					else
						t = "20" + t;
					mask = "yyyyMMddHHmmssZ";
					break;
				case 15:
					mask = "yyyyMMddHHmmssZ"; // GeneralizedTime
					break;
			}
			return DateTime.ParseExact (t, mask, CultureInfo.CurrentCulture.DateTimeFormat, DateTimeStyles.AdjustToUniversal);
		}
	}
}