From: Roland Haeder <roland@mxchange.org>
Date: Sat, 29 Mar 2014 23:17:48 +0000 (+0100)
Subject: Added a lot stuff + initial "block miner".
X-Git-Url: https://git.mxchange.org/?a=commitdiff_plain;h=d6831f8cd303201fdc04a1eff9554d126096bfeb;p=core.git

Added a lot stuff + initial "block miner".

Signed-off-by: Roland Häder <roland@mxchange.org>
---

diff --git a/contrib/chash/chash.php b/contrib/chash/chash.php
index 5bd2893d..7101f3dc 100644
--- a/contrib/chash/chash.php
+++ b/contrib/chash/chash.php
@@ -1,6 +1,11 @@
 <?php
 error_reporting(E_ALL | E_STRICT);
 
+define('HASH_ALGO', MHASH_RIPEMD320);
+define('BLOCK_SIZE', 1000);
+define('NONCE_INCREMENT', 0.1);
+define('START_TIME', microtime(TRUE));
+
 /**
  * Continued-hashing
  *
@@ -18,7 +23,7 @@ error_reporting(E_ALL | E_STRICT);
  */
 function hashString ($str) {
 	// Calculate strong hash from given string
-	$hash = mhash(MHASH_RIPEMD320, $str);
+	$hash = mhash(HASH_ALGO, $str);
 
 	// Return it hexadecimal-encoded
 	return bin2hex($hash);
@@ -142,6 +147,40 @@ function padHex ($num) {
 	return $hex;
 }
 
+/**
+ * Calculates sum from given hash
+ *
+ * @param	$hash	Hash to calculate sum from
+ * @return	$sum	Sum from given hash
+ */
+function calculateSumFromHash ($hash) {
+	// Everything starts with zero ...
+	$sum = 0;
+
+	// Loop through hash
+	for ($idx = 0; $idx < (strlen($hash) / 2); $idx++) {
+		// And add it
+		$sum = $sum + (hexdec(substr($hash, $idx, 2)) * $idx & 256);
+	} // END - for
+
+	// And return it
+	return $sum;
+}
+
+/**
+ * Calculates new nonce
+ *
+ * @param	$nonce		Old nonce to be used
+ * @return	$newNonce	New nonce
+ */
+function calculateNonce ($nonce) {
+	// Linear incrementation
+	$newNonce = $nonce + NONCE_INCREMENT;
+
+	// Return new value
+	return $newNonce;
+}
+
 /*
  * Calculate "genesis" hashes, please note that these "genesis strings" are now
  * known to the public as you can read them here in source code and therefore I
@@ -185,7 +224,7 @@ $sqrtHashes = array(
 );
 
 // Calulcate modula hash
-$modulaHash = modulaHash($sqrtHashes[0], $sqrtHashes[1]);
+$modulaHash = doubleHashString(modulaHash($sqrtHashes[0], $sqrtHashes[1]));
 
 // Output results
 print ('hashes=' . print_r($hashes, TRUE));
@@ -193,5 +232,121 @@ print ('modulaHashes=' . print_r($modulaHashes, TRUE));
 print ('sqrtHashes=' . print_r($sqrtHashes, TRUE));
 print ('modulaHash=' . $modulaHash . PHP_EOL);
 
+// Total reward + hashes
+$totalReward = 0;
+$totalHashes = 0;
+$totalBlocks = 0;
+
+// Create nonce (small)
+$nonce = 1 / mt_rand();
+
+while (TRUE) {
+	// Init hash-per-block counter
+	$hashesPerBlock = 0;
+
+	// Wait for BLOCK_SIZE iterations (= found hashes). This is one block
+	$timeBlock = microtime(TRUE);
+	$timeDisplay = $timeBlock;
+
+	// Time waited for a good block again (no iteration)
+	$timeBadHashes = 0;
+
+	while ($hashesPerBlock <= BLOCK_SIZE) {
+		// Init counter
+		$iter = 0;
+
+		// Create hash from modulaHash ("genesis hash") and nonce
+		$nonceHash = doubleHashString($modulaHash . $nonce);
+
+		// Calculate sums
+		$sumNonce  = calculateSumFromHash($nonceHash);
+		$sumModula = calculateSumFromHash($modulaHash);
+
+		// Now start the "mining" ...
+		$timeHash = microtime(TRUE);
+		while ($sumNonce <= $sumModula) {
+			// Calculate sums
+			$sumNonce  = calculateSumFromHash($nonceHash);
+			$sumModula = calculateSumFromHash($modulaHash);
+
+			// Calculate new nonce
+			$nonce = calculateNonce($nonce);
+
+			// And hash again
+			$nonceHash = doubleHashString($modulaHash . $nonce);
+
+			// Next round
+			$iter++;
+			//print ('nonce=' . $nonce . ',iter=' . $iter . PHP_EOL);
+			//print ('nonceHash=' . $nonceHash . PHP_EOL);
+			//print ('sumNonce=' . $sumNonce . PHP_EOL);
+			//print ('sumModula=' . $sumModula . PHP_EOL);
+		} // END - while
+
+		// If the iteration is zero, then no hash is found
+		if ($iter == 0) {
+			// Bad block found
+			$timeBadHashes += abs(microtime(TRUE) - $timeHash);
+
+			// Nothing found, so calculate new nonce
+			$nonce = calculateNonce($nonce);
+
+			// And next round
+			continue;
+		} // END - if
+
+		// Add amount of hashes to block (double-hash)
+		$hashesPerBlock += $iter * 2 + 2;
+
+		// Time spend in loop
+		$testTime = abs(microtime(TRUE) - $timeDisplay);
+
+		// Only every second
+		if ($testTime >= 1) {
+			// Calculate hashrate/sec
+			$timeHash = abs(microtime(TRUE) - $timeHash);
+			$hashrate = 1 / $timeHash * $iter * 2 + 2;
+			print ('hashesPerBlock=' . $hashesPerBlock . ',hashrate=' . $hashrate . ' hashes/sec.' . PHP_EOL);
+
+			// Reset timer
+			$timeDisplay = microtime(TRUE);	
+		} // END - if
+
+		// Found hash:
+		//print ('nonceHash=' . $nonceHash .',iter=' . $iter . PHP_EOL);
+	} // END - while
+
+	// Time taken for one block
+	$timeBlock = abs(microtime(TRUE) - $timeBlock);
+	//print ('calculateSumFromHash(modulaHash)=' . calculateSumFromHash($modulaHash) . PHP_EOL);
+	//print ('calculateSumFromHash(nonceHash)=' . calculateSumFromHash($nonceHash) . PHP_EOL);
+
+	// Calculate reward
+	$reward = abs($timeBlock - $timeBadHashes) / $hashrate * $hashesPerBlock / BLOCK_SIZE * 1000;
+	print ('timeBlock=' . $timeBlock . ',timeBadHashes=' . $timeBadHashes . ',hashesPerBlock=' . $hashesPerBlock .',reward=' . $reward . PHP_EOL);
+
+	// Block completed
+	$totalHashes += $hashesPerBlock;
+	$totalBlocks++;
+	$hashesPerBlock = 0;
+
+	// Calculate next hash from both hashes
+	$modulaHash = doubleHashString(modulaHash($nonceHash, $modulaHash));
+
+	// Calculate new nonce
+	$nonce = calculateNonce($nonce);
+
+	// Add reward to total
+	$totalReward += $reward;
+
+	// Calculate average block value
+	$blockValue = $totalReward / $totalBlocks * $totalHashes / (BLOCK_SIZE * $totalBlocks);
+
+	// Calculate reward per hour (= 3600 seconds)
+	$rewardPerHour = $totalReward / abs(microtime(TRUE) - START_TIME) * 3600;
+
+	print ('totalReward=' . $totalReward . ',blockValue=' . $blockValue . ',rewardPerHour=' . $rewardPerHour . PHP_EOL);
+} // END - while
+
 // [EOF]
 ?>