MAC vendor lookup: Difference between revisions
Content added Content deleted
| Line 67: | Line 67: | ||
This code requires BaCon 3.8.2 or higher. |
This code requires BaCon 3.8.2 or higher. |
||
<lang bacon>OPTION TLS TRUE |
<lang bacon>OPTION TLS TRUE |
||
website$ = "api.macvendors.com" |
website$ = "api.macvendors.com" |
||
mac$ = "b0:52:16:d0:3c:fb" |
mac$ = "b0:52:16:d0:3c:fb" |
||
OPEN website$ & ":443" FOR NETWORK AS mynet |
OPEN website$ & ":443" FOR NETWORK AS mynet |
||
SEND "GET /" & mac$ & " HTTP/1.1\r\nHost: " & website$ & "\r\n\r\n" TO mynet |
SEND "GET /" & mac$ & " HTTP/1.1\r\nHost: " & website$ & "\r\n\r\n" TO mynet |
||
RECEIVE info$ FROM mynet |
RECEIVE info$ FROM mynet |
||
CLOSE NETWORK mynet |
CLOSE NETWORK mynet |
||
PRINT TOKEN$(info$, 2, "\r\n\r\n")</lang> |
PRINT TOKEN$(info$, 2, "\r\n\r\n")</lang> |
||
{{out}} |
{{out}} |
||