From e182c98c0334d320bb3771e8d25b1b85486a7071 Mon Sep 17 00:00:00 2001
From: John Was <janek.jan@gmail.com>
Date: Thu, 19 Sep 2013 18:08:05 +0200
Subject: [PATCH] regon in Company

---
 src/Faker/Provider/pl_PL/Company.php | 55 ++++++++++++++++++++++++++++
 1 file changed, 55 insertions(+)
 create mode 100644 src/Faker/Provider/pl_PL/Company.php

diff --git a/src/Faker/Provider/pl_PL/Company.php b/src/Faker/Provider/pl_PL/Company.php
new file mode 100644
index 00000000..0bb94edc
--- /dev/null
+++ b/src/Faker/Provider/pl_PL/Company.php
@@ -0,0 +1,55 @@
+<?php
+
+namespace Faker\Provider\pl_PL;
+
+class Company extends \Faker\Provider\Company
+{
+	/**
+	 * Register of the National Economy
+	 * @link http://pl.wikipedia.org/wiki/REGON
+	 * @return 9 digit number
+	 */
+	public static function regon()
+	{
+		$weights = Array(8, 9, 2, 3, 4, 5, 6, 7);
+		$regionNumber = static::numberBetween(0, 49) * 2 + 1;
+		$result = array((int)($regionNumber / 10), $regionNumber % 10);
+		for ($i = 2; $i < count($weights); $i++) {
+			$result[$i] = static::randomDigit();
+		}
+		$checksum = 0;
+		for ($i = 0; $i < count($result); $i++) {
+			$checksum += $weights[$i] * $result[$i];
+		}
+		$checksum %= 11;
+		if ($checksum == 10) {
+			$checksum = 0;
+		}
+		$result[] = $checksum;
+		return implode('', $result);
+	}
+
+	/**
+	 * Register of the National Economy, local entity number
+	 * @link http://pl.wikipedia.org/wiki/REGON
+	 * @return 14 digit number
+	 */
+	public static function regonLocal()
+	{
+		$weights = array(2, 4, 8, 5, 0, 9, 7, 3, 6, 1, 2, 4, 8);
+		$result = str_split(static::regon());
+		for ($i = count($result); $i < count($weights); $i++) {
+			$result[$i] = static::randomDigit();
+		}
+		$checksum = 0;
+		for ($i = 0; $i < count($result); $i++) {
+			$checksum += $weights[$i] * $result[$i];
+		}
+		$checksum %= 11;
+		if ($checksum == 10) {
+			$checksum = 0;
+		}
+		$result[] = $checksum;
+		return implode('', $result); 
+	}
+}