package wol
sectionYPositions = computeSectionYPositions($el), 10)"
x-init="setTimeout(() => sectionYPositions = computeSectionYPositions($el), 10)"
>
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 9let 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
sectionYPositions = computeSectionYPositions($el), 10)"
x-init="setTimeout(() => sectionYPositions = computeSectionYPositions($el), 10)"
>