Newer
Older
DNA / corlib / System / Random.cs
@Chris Bacon Chris Bacon on 21 Jan 2012 2 KB Added/updated license
// Copyright (c) 2012 DotNetAnywhere
//
// Permission is hereby granted, free of charge, to any person obtaining a copy
// of this software and associated documentation files (the "Software"), to deal
// in the Software without restriction, including without limitation the rights
// to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
// copies of the Software, and to permit persons to whom the Software is
// furnished to do so, subject to the following conditions:
//
// The above copyright notice and this permission notice shall be included in
// all copies or substantial portions of the Software.
//
// THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
// IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
// FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
// AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
// LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
// OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
// THE SOFTWARE.

#if LOCALTEST
using System;
namespace System_ {
#else
namespace System {
#endif
	public class Random {

		private const int MBIG = int.MaxValue;
		private const int MSEED = 161803398;
		private const int MZ = 0;

		private int inext, inextp;
		private int[] SeedArray = new int[56];

		public Random() : this(Environment.TickCount) { }

		public Random(int seed) {
			int ii;
			int mj, mk;

			// Numerical Recipes in C online @ http://www.library.cornell.edu/nr/bookcpdf/c7-1.pdf
			mj = MSEED - Math.Abs(seed);
			SeedArray[55] = mj;
			mk = 1;
			for (int i = 1; i < 55; i++) {  //  [1, 55] is special (Knuth)
				ii = (21 * i) % 55;
				SeedArray[ii] = mk;
				mk = mj - mk;
				if (mk < 0)
					mk += MBIG;
				mj = SeedArray[ii];
			}
			for (int k = 1; k < 5; k++) {
				for (int i = 1; i < 56; i++) {
					SeedArray[i] -= SeedArray[1 + (i + 30) % 55];
					if (SeedArray[i] < 0)
						SeedArray[i] += MBIG;
				}
			}
			inext = 0;
			inextp = 31;
		}

		public int Next() {
			return Next(0, int.MaxValue);
		}

		public int Next(int maxValue) {
			if (maxValue < 0) {
				throw new ArgumentOutOfRangeException("maxValue");
			}
			return Next(0, maxValue);
		}

		public int Next(int minValue, int maxValue) {
			if (minValue > maxValue) {
				throw new ArgumentOutOfRangeException();
			}

			if (++inext >= 56) {
				inext = 1;
			}
			if (++inextp >= 56) {
				inextp = 1;
			}

			int retVal = SeedArray[inext] - SeedArray[inextp];
			if (retVal < 0) {
				retVal += MBIG;
			}
			SeedArray[inext] = retVal;

			if (minValue == maxValue) {
				return minValue;
			}
			return (retVal % (maxValue - minValue)) + minValue;
		}

	}
}