基于WebServer的工业数据采集项目

本项目最终要实现的是通过网页的操作实现对Modbus设备(这里使用slave模拟)信息的读取以及控制。

核心思想：

        当浏览器通过http协议向web服务器发送动态数据请求时，Web服务器主进程就会Fork创建出一个新的进程来启动CGI程序，服务器与CGI通过环境变量和标准输入输出来进行信息的交互,（标准输入和标准输出已重定向），通过写服务程序实现对设备的控制和设备数据的读取（Modbus TCP通信协议）。那么最核心的就是实现对CGI进程与服务程序之间实现进程间通信。

        在此项目中，因为要在网页中显示读取到的光线传感器和加速度传感器的数据，所以，可以通过服务程序通过Modbus TCP协议来不断地读取数据，并且写入到共享内存中，那么CGI就从共享内存中读取，最终网页就呈现出读取到的数据值了；其次，需要通过网页端更改蜂鸣器和LED灯的开与关，那么就可以通过CGI将数据写入到消息队列中，服务程序读取消息队列，并且做出判断最终实现对蜂鸣器和LED灯开关的控制。

以下是代码参考：

服务程序端：(多线程)

#include <stdio.h>
#include <sys/types.h> /* See NOTES */
#include <netinet/in.h>
#include <netinet/ip.h>
#include <sys/socket.h>
#include <pthread.h>
#include <unistd.h>
#include <semaphore.h>
#include <sys/ipc.h>
#include <sys/shm.h>
#include <sys/sem.h>
#include <errno.h>
#include <string.h>
#include <sys/msg.h>
#include "modbus.h"
#define PORT 502
union semun {
    int val;
};
struct msgbuf
{
    long mtype;
    char buf[128];
};
int flag;
void Modbus_Operation();
char *Create_shm(int key);
int Create_msg(key_t key);
void *read_register(void *arg);
void *write_coil(void *arg);
void seminit(int semid, int num, int val);
void pv_semop(int semid, int num, int op);
modbus_t *ctx = NULL;
int main(int argc, char const *argv[])
{
    if (argc != 2)
    {
        printf("please input IP\n");
        return -1;
    }
    key_t key;
    Modbus_Operation(argv); //modbus实例化、设置从机ID、连接从机ID

    char *p = Create_shm(key); //创建或打开共享内存、返回映射地址

    int msgid = Create_msg(key); //消息队列
    /创建线程///
    pthread_t tid1, tid2;
    pthread_create(&tid1, NULL, read_register, p);   //读保持寄存器
    pthread_create(&tid2, NULL, write_coil, &msgid); // 写单个线圈

    pthread_join(tid1, NULL);
    pthread_join(tid2, NULL);
    shmdt(p);
    modbus_close(ctx);
    modbus_free(ctx);
    return 0;
}
//读保持寄存器
void *read_register(void *arg)
{
    char *p = (char *)arg;
    u_int16_t dest1[32] = {0};
    while (1)
    {
        //读取光线传感器数据到数组中
        modbus_read_registers(ctx, 0, 1, dest1);
        //读取加速度传感器（x\y\z）数据到数组中
        modbus_read_registers(ctx, 2, 3, dest1 + 1);
        //将读取到的数据写入到共享内存中
        sprintf(p, "光线传感器：%d,加速度传感器x:%d,y:%d,z:%d", dest1[0], dest1[1], dest1[2], dest1[3]);
        printf("%s\n", p);
        sleep(1);
    }
    pthread_exit(NULL);
}
// 写单个线圈
void *write_coil(void *arg)
{
    int msgid = *((int *)arg);
    struct msgbuf rev;
    while (1)
    {
        //读取消息，如果postman不发送set，在该句阻塞
        msgrcv(msgid, &rev, sizeof(rev) - sizeof(long), 1, 0);
        printf("rev:%d,%d\n", rev.buf[4], rev.buf[6]);
        //LED灯
        if (rev.buf[4] == '0' && rev.buf[6] == '0')
        {
            modbus_write_bit(ctx, 0, 0);
            printf("LED灯关闭\n");
        }
        else if (rev.buf[4] == '0' && rev.buf[6] == '1')
        {
            modbus_write_bit(ctx, 0, 1);
            printf("LED灯打开\n");
        }
        //蜂鸣器
        else if (rev.buf[4] == '1' && rev.buf[6] == '0')
        {
            modbus_write_bit(ctx, 1, 0);
            printf("蜂鸣器关闭\n");
        }
        else if (rev.buf[4] == '1' && rev.buf[6] == '1')
        {
            modbus_write_bit(ctx, 1, 1);
            printf("蜂鸣器打开\n");
        }
    }
    pthread_exit(NULL);
}
void Modbus_Operation(char const *argv[]) //modbus实例化、设置从机ID、连接从机ID
{
    //以TCP方式创建Modbus实例，并初始化
    ctx = modbus_new_tcp(argv[1], PORT);
    if (NULL == ctx)
    {
        perror("modbus new tcp err");
        return;
    }
    printf("modbus new tcp success,line:%d\n", __LINE__);

    //设置从机ID
    if (modbus_set_slave(ctx, 1) < 0)
    {
        perror("modbus set slave err");
        return;
    }
    printf("modbus set slave success,line:%d\n", __LINE__);

    //和从机（slave）建立连接
    if (modbus_connect(ctx) < 0)
    {
        perror("modbus connect err");
        return;
    }
    printf("modbus connect success,line:%d\n", __LINE__);
}
char *Create_shm(key_t key) //shmget创建或打开共享内存
{
    int shmid;
    //ftok生成唯一key值
    key = ftok("/home/hq/work/web/.flag", 'a');
    if (key < 0)
    {
        perror("ftok err");
        return NULL;
    }
    printf("key:%#x\n", key);

    //shmget创建或打开共享内存
    shmid = shmget(key, 128, IPC_CREAT | IPC_EXCL | 0666);
    if (shmid < 0)
    {
        if (EEXIST == errno)
        {
            shmid = shmget(key, 128, 0666);
        }
        else
        {
            perror("shmget err");
            return NULL;
        }
    }
    printf("shmid:%d\n", shmid);

    //映射
    char *p = shmat(shmid, NULL, 0);
    if (p == (char *)-1)
    {
        perror("shmat err");
        return NULL;
    }
    return p;
}
int Create_msg(key_t key) //创建或打开消息队列
{
    key = ftok("/home/hq/work/web/.flag", 'b');
    if (key < 0)
    {
        printf("ftok err\n");
        return -1;
    }
    printf("key:%d\n", key);
    //创建或打开消息队列
    int msgid = msgget(key, IPC_CREAT | IPC_EXCL | 0666);
    if (msgid <= 0)
    {
        if (errno == 17)
        {
            msgid = msgget(key, 0666);
        }
        else
        {
            printf("msgerr");
            return -1;
        }
    }
    printf("msgid:%d\n", msgid);
    return msgid;
}

CGI端：

#include "req_handle.h"

#include "log_console.h"

#include <sys/types.h>

#include <sys/ipc.h>

#include <sys/shm.h>

#include <sys/sem.h>

#include <errno.h>

#include <string.h>

#include <sys/msg.h>

#define KB 1024

#define HTML_SIZE (64 * KB)

//普通的文本回复需要增加html头部

#define HTML_HEAD "Content-Type: text/html\r\n" \

                  "Connection: close\r\n"

union semun {

    int val;

};

struct msgbuf

{

    long mtype;

    char buf[128];

};

char *createShm();

int createMsg();

/**

 * @brief 处理自定义请求，在这里添加进程通信

 * @param input

 * @return

 */

//input表示正文内容

//get 实行读保持寄存器//set实行写单线圈 1  0

int parse_and_process(char *input)

{

    int semid;

    char val_buf[2048] = {0};

    strcpy(val_buf, input);

    char *ptr = NULL;

    //这里可以根据接收的数据请求进行处理

    if (strncmp(val_buf, "get", 3) == 0) //get<=====>读共享内存

    {

        //创建共享内存，返回映射首地址

        ptr = createShm();

        //读共享内存

        log_console("%s\n", ptr);

        strcpy(val_buf, ptr);

    }

    else //set 0 0 <=====>添加消息队列

    {

        struct msgbuf arr;

        strcpy(arr.buf, val_buf); //正文内容赋给结构体变量中的数组

        arr.mtype = 1;            //消息类型

        int msgid;

        msgid = createMsg();      //创建消息队列

        msgsnd(msgid, &arr, sizeof(arr) - sizeof(long), 0);//添加消息队列

        strcpy(val_buf, "success");

    }

    //数据处理完成后，需要给服务器回复，回复内容按照http协议格式

    char reply_buf[HTML_SIZE] = {0};

    sprintf(reply_buf, "%sContent-Length: %ld\r\n\r\n", HTML_HEAD, (long)strlen(val_buf));

    strcat(reply_buf, val_buf);

    // log_console("post json_str = %s", reply_buf);



    //向标准输出写内容（标准输出服务器已做重定向）

    fputs(reply_buf, stdout);

    return 0;

}

char *createShm() //生成key值，创建共享内存

{

    key_t key;

    int shmid;

    //ftok生成唯一key值

    key = ftok("/home/hq/work/web/.flag", 'a');

    if (key < 0)

    {

        log_console("ftok err\n");

        return NULL;

    }

    log_console("key:%d\n", key);

    //shmget创建或打开共享内存

    shmid = shmget(key, 128, IPC_CREAT | IPC_EXCL | 0666);

    if (shmid < 0)

    {

        if (17 == errno)

        {

            shmid = shmget(key, 128, 0666); //shmid 别丢！！！！！

        }

        else

        {

            log_console("shmget err\n");

            return NULL;

        }

    }

    log_console("shmid:%d\n", shmid);

    //映射

    char *p = shmat(shmid, NULL, 0);

    if (p == (char *)NULL)

    {

        log_console("shmat err\n");

        return NULL;

    }

    return p;

}

int createMsg() //生成key值，创建消息队列

{

    key_t key;

    key = ftok("/home/hq/work/web/.flag", 'b');

    if (key < 0)

    {

        log_console("ftok err\n");

        return -1;

    }

    log_console("key:%#x\n", key);

    //创建或打开消息队列

    int msgid = msgget(key, IPC_CREAT | IPC_EXCL | 0666);

    if (msgid <= 0)

    {

        if (errno == 17)

        {

            msgid = msgget(key, 0666);

        }

        else

        {

            log_console("msgerr");

            return -1;

        }

    }

    log_console("msgid:%d\n", msgid);

    return msgid;

}