git-svn-id: https://spexeah.com:8443/svn/Asuro@1035 6dbc8c32-bb84-406f-8558-d1cf31a0ab0c
This commit is contained in:
29
src/prog/dhclient.pas
Normal file
29
src/prog/dhclient.pas
Normal file
@ -0,0 +1,29 @@
|
||||
{
|
||||
Prog->DHClient - DHCP Configuration Management.
|
||||
|
||||
@author(Kieron Morris <kjm@kieronmorris.me>)
|
||||
}
|
||||
unit dhclient;
|
||||
|
||||
interface
|
||||
|
||||
uses
|
||||
console, terminal, keyboard, util, strings, tracer, dhcp;
|
||||
|
||||
procedure init();
|
||||
|
||||
implementation
|
||||
|
||||
procedure run(Params : PParamList);
|
||||
begin
|
||||
tracer.push_trace('dhclient.run');
|
||||
DHCPDiscover();
|
||||
end;
|
||||
|
||||
procedure init();
|
||||
begin
|
||||
tracer.push_trace('dhclient.init');
|
||||
terminal.registerCommand('DHClient', @Run, 'Run the DHCP configuration utility.');
|
||||
end;
|
||||
|
||||
end.
|
Reference in New Issue
Block a user