Fortran Coder

查看: 204|回复: 3

[绘图界面库] FORTRAN写TCP/IP协议

[复制链接]

2

帖子

1

主题

0

精华

新人

F 币
35 元
贡献
10 点
发表于 2021-3-31 14:45:00 | 显示全部楼层 |阅读模式
编程新手,请问fortran语言如何实现tcp/ip功能,应该怎么去做,可以支付报酬
回复

使用道具 举报

878

帖子

0

主题

0

精华

宗师

F 币
1560 元
贡献
870 点

规矩勋章元老勋章新人勋章水王勋章

QQ
发表于 2021-3-31 19:22:33 | 显示全部楼层
Fortran语法里没有这些内容,就像C语言,C++语言也没有这些内容一样。

我也不是很推荐用 Fortran 来完成这些事情。

如果你非要做,可以考虑封装一下操作系统的 socket 库。比如 windows 的 winsocket。

socket 的内容比较多。有 TCP,UDP 两种协议,还有客户端和服务器端。单播,组播等等。也不是三言两语可以说清楚。

很久以前,我封过一个简单的。需要 IVF 编译器才能正常编译使用。下面的范例,是做为 TCP 客户端的。其他的你看看代码,应该也容易写出来。

[Fortran] 纯文本查看 复制代码
Program Main
  Use ws2_32
  use SocketClass
  implicit none
  type(TCP_Socket) :: conn
  character(len=15) :: IP
  integer :: j
  IP = "127.0.0.1"
  j = Socket_Init()
  j = conn%Conn( SOCK_STREAM , IPPROTO_TCP , IP , 4488 )
  write(*,*) j
  j = conn%Send("Hello",5)  
  write(*,*) j
  j = conn%DisConn()
  call Socket_UnInit()
End Program Main

SocketClass.f90

7.74 KB, 下载次数: 4

4

帖子

0

主题

0

精华

入门

F 币
49 元
贡献
21 点
发表于 2021-4-6 06:54:21 | 显示全部楼层
看不懂,先膜拜一下

2

帖子

1

主题

0

精华

新人

F 币
35 元
贡献
10 点
 楼主| 发表于 4 天前 | 显示全部楼层
本帖最后由 Free 于 2021-4-16 14:20 编辑

主要做TCP的协议,后续会做UDP协议,客户端和服务器端都有,看了你的代码,实现发送功能了,但是接受还是不行。想加您QQ详细向您请教一下。
您需要登录后才可以回帖 登录 | 极速注册

本版积分规则

QQ|捐赠本站|Archiver|关于我们 About Us|群聊|Fcode

GMT+8, 2021-4-19 07:06

Powered by Discuz! X3.2

© 2001-2017 Comsenz Inc.

快速回复 返回顶部 返回列表