package wol

  1. Overview
  2. Docs
Wake-on-LAN magic packet construction

Install

dune-project
 Dependency

Authors

Maintainers

Sources

wol-1.0.tar.gz
md5=e7a5baecc01a778d3772ad52a5b597f0
sha512=a254cefa47360b7e60c875db254062645c629a95f063cd500955109e18ebd2918f1d977024747f17841ad02e8f2d911deb158552e85459b23d0c5772d52e5bb4

doc/src/wol/wol.ml.html

Source file wol.ml

1
2
3
4
5
6
7
8
9
let magic_packet (mac : Macaddr.t) =
  let mac = Macaddr.to_octets mac |> Cstruct.of_string in
  let buf = Cstruct.create 102 in
  Cstruct.BE.set_uint32 buf 0 0xFFFFFFFFl;
  Cstruct.BE.set_uint16 buf 4 0xFFFF;
  for i = 0 to 15 do
    Cstruct.blit mac 0 buf (6 + (i * 6)) 6
  done;
  buf