Added lot of junk laying around on harvie.cz
[mirrors/Programs.git] / php / skripty / rada_crack2.php
diff --git a/php/skripty/rada_crack2.php b/php/skripty/rada_crack2.php
new file mode 100644 (file)
index 0000000..ab6011a
--- /dev/null
@@ -0,0 +1,112 @@
+<?php\r
+$start = 0;\r
+$stop = 99;\r
+$length = strlen($stop);\r
+$base = 10;\r
+\r
+//Banner\r
+//echo("Please wait, while computing...\n\n");\r
+\r
+//init\r
+srand(time());\r
+$rada = "";\r
+$notfoundlast = -3;\r
+$error = 1;\r
+$origstop = $stop;\r
+\r
+while($error) {\r
+\r
+$stop = $origstop+rand(0,10);\r
+\r
+for($i=$start;$i<=$stop;$i++) {\r
+  $bi = $i;\r
+  $i = base_convert($i, 10, $base);\r
+  if(strpos($rada, $i) == 0) {\r
+    \r
+    if( $i[0] == $rada[strlen($rada)-1] ) {\r
+      $i = substr($i, 1);\r
+      $rada = $rada.$i;\r
+    } elseif( $rada[0] == $i[strlen($i)-1] ) { \r
+      $rada = substr($rada, 1);\r
+      $rada = $i.$rada;\r
+    } else {\r
+      if(rand(0,1)) { \r
+        $rada = $i.$rada;\r
+      } else {\r
+        $rada = $rada.$i;\r
+      }\r
+    }\r
+    \r
+    //echo($i);\r
+  $i = $bi;\r
+  }\r
+}\r
+\r
+for($i=0;$i<(strlen($rada)-$length);$i++) {\r
+  $sub = substr($rada, $i, $length);\r
+  for($x=0;$x<$length;$x++) {\r
+    $rada[($i+$x)] = "R";\r
+    \r
+  }\r
+  $rada = str_replace($sub, "", $rada);\r
+  \r
+  $replace="";\r
+  for($x=0;$x<$length;$x++) {\r
+    $replace = $replace."R";\r
+  }\r
+  \r
+  $rada = str_replace($replace, $sub, $rada);\r
+}\r
+\r
+//echo($rada);\r
+\r
+//Test\r
+//echo("\n\n");\r
+$error = 0;\r
+$notfound = 0;\r
+for($i=$start;$i<=$stop;$i++) {\r
+  $bi = $i;\r
+  $i = base_convert($i, 10, $base);\r
+  if(!eregi($i, $rada)) {\r
+    //echo("Not found: $i\n");\r
+    \r
+    if( $i[0] == $rada[strlen($rada)-1] ) {\r
+      $i = substr($i, 1);\r
+      $rada = $rada.$i;\r
+    } elseif( $rada[0] == $i[strlen($i)-1] ) { \r
+      $rada = substr($rada, 1);\r
+      $rada = $i.$rada;\r
+    } else {\r
+      if(rand(0,1)) { \r
+        $rada = $i.$rada;\r
+      } else {\r
+        $rada = $rada.$i;\r
+      }\r
+    }\r
+    \r
+    $error = 1;\r
+    $notfound++;\r
+  }\r
+  $i = $bi;\r
+}\r
+//echo("Total not found: $notfound\n");\r
+if($notfoundlast == $notfound) { $error = 0; }\r
+$notfoundlast = $notfound;\r
+\r
+}\r
+\r
+for($i=$start;$i<=$stop;$i++) {\r
+ if(!eregi($i, $rada)) {\r
+   $rada = $rada.$i;\r
+ }\r
+}\r
+\r
+echo("\n\n");\r
+echo($rada);\r
+//system("pause");\r
+\r
+/*\r
+0-99:8970684924807965464133322998867361605944383525181110958785777637155047403128219391753027262000142345666906\r
+    :9084787636241342213919946403730181714887749279538935855325108368660504433128211675657061524298202326454759697280\r
+    :9594403292141101847565345422718137390898872605749946682585030241916233631528355170969780912038434861646767793100\r
+*/\r
This page took 0.142163 seconds and 4 git commands to generate.