Data update

Task/MAC-vendor-lookup/Ada/mac-vendor-lookup.ada

@@ -1,34 +0,0 @@
-with Ada.Text_IO;
-
-with AWS.Client;
-with AWS.Response;
-with AWS.Messages;
-
-procedure MAC_Vendor is
-
-   procedure Lookup (MAC : in String) is
-      use AWS.Response;
-      use AWS.Messages;
-      URL     : constant String := "http://api.macvendors.com/" & MAC;
-      Page    : constant Data   := AWS.Client.Get (URL);
-      use Ada.Text_IO;
-   begin
-      Put (MAC);
-      Set_Col (20);
-      case AWS.Response.Status_Code (Page) is
-         when S200   => Put_Line (Message_Body (Page));
-         when S404   => Put_Line ("N/A");
-         when others => Put_Line ("Error");
-      end case;
-   end Lookup;
-
-begin
-   --  Have to throttle traffic to site
-   Lookup ("88:53:2E:67:07:BE");   delay 1.500;
-   Lookup ("D4:F4:6F:C9:EF:8D");   delay 1.500;
-   Lookup ("FC:FB:FB:01:FA:21");   delay 1.500;
-   Lookup ("4c:72:b9:56:fe:bc");   delay 1.500;
-   Lookup ("00-14-22-01-23-45");   delay 1.500;
-   Lookup ("23-45-67");            delay 1.500;
-   Lookup ("foobar");
-end MAC_Vendor;

Task/MAC-vendor-lookup/PowerShell/mac-vendor-lookup.psh

@@ -1,9 +0,0 @@
-$apiRoot = "http://api.macvendors.com"
-$macAddresses = @("88:53:2E:67:07:BE", "D4:F4:6F:C9:EF:8D",
-                  "FC:FB:FB:01:FA:21", "4c:72:b9:56:fe:bc",
-                  "00-14-22-01-23-45")
-
-$macAddresses | % {
-  (Invoke-WebRequest "$apiRoot/$_").Content
-  Start-Sleep 1.5
-}

Task/MAC-vendor-lookup/VBScript/mac-vendor-lookup.vb

@@ -1,11 +0,0 @@
-a=array("00-20-6b-ba-d0-cb","00-40-ae-04-87-86")
-set WebRequest = CreateObject("WinHttp.WinHttpRequest.5.1")
-
-for each MAC in a
-  if b<>0 then   wscript.echo "Spacing next request...": wscript.sleep 2000
-  WebRequest.Open "GET", "http://api.macvendors.com/"& mac,1
-  WebRequest.Send()
-  WebRequest.WaitForResponse
-  b=b+1
-  wscript.echo mac & " -> " & WebRequest.ResponseText
-next