用lazarus开发Linux daemon程序及编写启动脚步

本文介绍了如何使用Lazarus开发Linux Daemon程序,包括安装Lazarus和lazdaemon开发包,编写daemon程序,手动运行测试,以及配置启动脚本。通过示例代码展示了在Lazarus中创建Daemon程序的步骤,并提供了查看Linux版本和控制服务的命令。
摘要由CSDN通过智能技术生成

用lazarus开发Linuxdaemon程序及编写启动脚步

 

Linux Daemon程序简介

Linux Daemon程序(守护进程或精灵进程)是生存期较长的一种进程。它们常常在系统自举时启动,仅当系统关闭时才终止。所以它们没有控制终端,在后台运行。

在Linux C环境下编写daemon程序,需要遵循一些基本规则,以便防止产生并不需要的交互作用。比如其中有两条重要的规则。

第一,要调用fork,然后父进程退出。这样做有两个目的:

(1)如果该daemon进程是作为一条shell命令启动的,那么父进程终止使得shell认为这条命令已经执行完毕;

(2)子进程继承了父进程的进程组ID,但具有一个新的进程ID,这就保证了子进程不是一个进程组的组长进程。这对于之后要调用的setsid是必要的前提条件。

第二,调用setsid会创建一个新会话,调用进程成为新会话的首进程,并成为一个新进程组的组长,最重要的该调用导致进程没有了控制终端。

但使用lazarus开发daemon服务程序,不用这么麻烦,只需要建立daemon工程,在其上编写代码即可。

Lazarus下开发daemon程序

安装lazarus

根据自己的系统类型,从 https://sourceforge.net/projects/lazarus/files/下载合适的rpm安装包到本地目录,包括如下三个文件:

fpc-2.6.2-0.laz.i686.rpm

fpc-src-2.6.2-0.laz.i686.rpm

lazarus-1.0.8-0.i686.rpm

命令行,进入下载目录,安装:

Rpm -ivh *.rpm

Lazarus在Linux系统默认安装在/usr/lib/lazarus目录中。

安装lazdaemon开发包

在lazarus ide的package->openpackage file(.lpk)菜单打开/usr/lib/lazarus/components/daemon/lazdaemon.lpk工程,如图:

图1 安装lazdaemon

依次compile,use->install。安装lazdaemon包,会重新编译lazaruside,并自动重启ide。

在lazarus ide的file菜单中,点击new…,弹出界面如下图,如果出现Daemon(service)applications项目,说明安装成功。

图2 新建daemonservice应用程序

Daemon例子

该例子以定期向一个注册服务器发送注册信息为例,注册服务器的代码这里没有给出,该例子主要是为了说明daemon程序如何编写。

在图2的截图中,新建Daemon(service) application项目。新建后,界面如下图。

新建工程后,默认有两个单元文件,分别是daemonMapperunit1.pas和daemonunit1.pas文件,当然还有其相应的窗体文件。

编写daemonunit1.pas单元文件内容如下:

unitDaemonUnit1;

 

{$mode objfpc}{$H+}

 

interface

 

uses

  Classes,SysUtils,FileUtil,DaemonApp,sockets,eventlog;

 

type

 

  { TRegThread }

  TRegThread=class(TThread)

  private

    FLog:TEventLog;

    procedureDoLog(Msg:String);

  public

    ConstructorCreate(ALog:TEventLog);

    ProcedureExecute;override;

  end;

 

  { TDaemon1 }

  TDaemon1=class(TDaemon)

    procedureDataModuleStart(Sender:TCustomDaemon;varOK:Boolean);

  private

    { private declarations }

    FLog:TEventLog;

    FThread:TRegThread;

    procedureStartLog;

  public

    { public declarations }

  end;

 

var

  Daemon1:TDaemon1;

 

implementation

 

procedureRegisterDaemon;

begin

  RegisterDaemonClass(TDaemon1)

end;

 

{$R

评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值