使用delphi 10.2 开发linux 上的Daemon

简介: delphi 10.2 支持linux, 而且官方只是支持命令行编程,目地就是做linux 服务器端的开发。 既然是做linux服务器端的开发,那么普通的命令行运行程序,然后等待开一个黑窗口的方式就 太low了(目前就有个别语言大咖,经常在Windows 上开个黑窗口,看起来非常恶心),那么如果 避免这个尴尬的问题?     其实Linux 下也有类似windows 服务的功能,Linux Daemon 就是其中的一种方式,命令行运行后 直接返回,同时在后台建立一个同样的进程。

   delphi 10.2 支持linux, 而且官方只是支持命令行编程,目地就是做linux 服务器端的开发。

既然是做linux服务器端的开发,那么普通的命令行运行程序,然后等待开一个黑窗口的方式就

太low了(目前就有个别语言大咖,经常在Windows 上开个黑窗口,看起来非常恶心),那么如果

避免这个尴尬的问题?

    其实Linux 下也有类似windows 服务的功能,Linux Daemon 就是其中的一种方式,命令行运行后

直接返回,同时在后台建立一个同样的进程。接受客户端的访问。常见的一些linux 服务基本上都是

这样工作的。例如著名apache,mysql 等。具体的linux Daemon 的介绍,请参照本篇文章

  今天我们就使用delphi 来开发一个后台的http server, 来说明delphi 如何开发linux 的Daemon.

新建工程,建一个控制台应用。

因为这个只能在linux 运行,所以直接加入linux 支持。

因为我们要做http server, 要放一些控件,因此再加一个datamodule.

 

 然后在datamodule 上放一个Tidhttpserver 控件。

在oncommandget 里面加入以下事件。

procedure Tdmf.IdHTTPServer1CommandGet(AContext: TIdContext;
  ARequestInfo: TIdHTTPRequestInfo; AResponseInfo: TIdHTTPResponseInfo);
begin
     AResponseInfo.ContentText:='I am delphi for linux service';
end;

好了。

我们回到工程文件

输入以下代码

program Project2;

{$APPTYPE CONSOLE}

{$R *.res}
uses
  Posix.Unistd,
  Posix.SysTypes,
  System.SysUtils,
  dmp in 'dmp.pas' {dmf: TDataModule};

procedure daemon;

begin

   dmf:=Tdmf.Create(nil);
   dmf.IdHTTPServer1.Active:=True;

  try

    repeat

      sleep(10 * 1000);

    until False;

  finally
   dmf.Free;
  end;

end;

var
   pid: pid_t;

begin
  pid := fork;
  if pid = 0 then
   begin
    writeln('starting service');
     daemon;
   end;

end.

编译运行。

首先我们看一下系统中的运行进程: ps -ef

里面没有Project2 的任何信息。

我们运行这个程序

运行完后,程序立即就返回了

我们在看看系统进程里面的情况

我们可以看见这个Project2 依然在进程中。

那么这个进程是否可以正常工作呢?

我们打开浏览器,看看情况如何?

 

可以看见这个这个程序在后面运行的非常正常。

当然了,由于这是一个demo, 我没有做太多的处理,其实由于daemon 进程无法与前台直接交互,我们以后写这种应用时。

应该多用 日志 文件来记录运行情况,一般出问题时,能够快速的找到问题的根源。

那么这个程序一直在后台运行,我们再次编译和发布时,就没办法覆盖了,怎么关掉这个后台进程呢?

办法很简单,也很粗暴(反正我喜欢)。

使用linux 的kill 命令。

找到该应用的pid, 直接干掉

然后使用ps -ef 看看

Project2 已经不在了,整个世界清静了。

 

目录
打赏
0
0
0
0
9
分享
相关文章
详解Ubuntu的strings与grep命令:Linux开发的实用工具。
这就是Ubuntu中的strings和grep命令,透明且强大。我希望你喜欢这个神奇的世界,并能在你的Linux开发旅程上,通过它们找到你的方向。记住,你的电脑是你的舞台,在上面你可以做任何你想做的事,只要你敢于尝试。
137 32
Termux安卓终端美化与开发实战:从下载到插件优化,小白也能玩转Linux
Termux是一款安卓平台上的开源终端模拟器,支持apt包管理、SSH连接及Python/Node.js/C++开发环境搭建,被誉为“手机上的Linux系统”。其特点包括零ROOT权限、跨平台开发和强大扩展性。本文详细介绍其安装准备、基础与高级环境配置、必备插件推荐、常见问题解决方法以及延伸学习资源,帮助用户充分利用Termux进行开发与学习。适用于Android 7+设备,原创内容转载请注明来源。
683 76
|
9月前
|
FFmpeg开发笔记(五十九)Linux编译ijkplayer的Android平台so库
ijkplayer是由B站研发的移动端播放器,基于FFmpeg 3.4,支持Android和iOS。其源码托管于GitHub,截至2024年9月15日,获得了3.24万星标和0.81万分支,尽管已停止更新6年。本文档介绍了如何在Linux环境下编译ijkplayer的so库,以便在较新的开发环境中使用。首先需安装编译工具并调整/tmp分区大小,接着下载并安装Android SDK和NDK,最后下载ijkplayer源码并编译。详细步骤包括环境准备、工具安装及库编译等。更多FFmpeg开发知识可参考相关书籍。
280 0
FFmpeg开发笔记(五十九)Linux编译ijkplayer的Android平台so库
|
11月前
|
Linux设备驱动开发详解2
Linux设备驱动开发详解
116 6
如何进行Linux内核开发【ChatGPT】
如何进行Linux内核开发【ChatGPT】
Linux设备驱动开发详解1
Linux设备驱动开发详解
144 5
基于arm64架构国产操作系统|Linux下的RTMP|RTSP低延时直播播放器开发探究
这段内容讲述了国产操作系统背景下,大牛直播SDK针对国产操作系统与Linux平台发布的RTMP/RTSP直播播放SDK。此SDK支持arm64架构,基于X协议输出视频,采用PulseAudio和Alsa Lib处理音频,具备实时静音、快照、缓冲时间设定等功能,并支持H.265编码格式。此外,提供了示例代码展示如何实现多实例播放器的创建与管理,包括窗口布局调整、事件监听、视频分辨率变化和实时快照回调等关键功能。这一技术实现有助于提高直播服务的稳定性和响应速度,适应国产操作系统在各行业中的应用需求。
279 3
linux命令—tree
tree是一款强大的Linux命令行工具,用于以树状结构递归展示目录和文件,直观呈现层级关系。支持多种功能,如过滤、排序、权限显示及格式化输出等。安装方法因系统而异常用场景包括:基础用法(显示当前或指定目录结构)、核心参数应用(如层级控制-L、隐藏文件显示-a、完整路径输出-f)以及进阶操作(如磁盘空间分析--du、结合grep过滤内容、生成JSON格式列表-J等)。此外,还可生成网站目录结构图并导出为HTML文件。注意事项:使用Tab键补全路径避免错误;超大目录建议限制遍历层数;脚本中推荐禁用统计信息以优化性能。更多详情可查阅手册mantree。
linux命令—tree
linux命令—cd
`cd` 命令是 Linux/Unix 系统中用于切换工作目录的基础命令。支持相对路径与绝对路径,常用选项如 `-L` 和 `-P` 分别处理符号链接的逻辑与物理路径。实际操作中,可通过 `cd ..` 返回上级目录、`cd ~` 回到家目录,或利用 `cd -` 在最近两个目录间快速切换。结合 Tab 补全和 `pwd` 查看当前路径,能显著提升效率。此外,需注意特殊字符路径的正确引用及脚本中绝对路径的优先使用。
AI助理

你好,我是AI助理

可以解答问题、推荐解决方案等

登录插画

登录以查看您的控制台资源

管理云资源
状态一览
快捷访问