HL7 消息结构体转字符串函数 - hl72str() 函数详解

该函数的作用是将 HL7 消息的结构体指针转换成字符串形式。

函数使用了一个 char 类型的 'separators' 数组来存储 HL7 消息中的分隔符。然后通过 'join()' 函数将消息的各个部分拼接成一个字符串，同时使用 'separators' 数组中的分隔符进行分隔。最后，使用 'strncpy()' 函数将消息中的字段分隔符进行修正，并使用 'realloc()' 函数重新分配内存，使得字符串长度减少 2 个字节，最后返回转换后的字符串。

具体解释如下：

1. 'char msg_string;' / points to the message string */ 该变量是指向消息字符串的指针。

2. 'msg_string=strset('');' 该行将 'msg_string' 初始化为空字符串。

3. 'separators[0] = '\n';' 'separators[1] = '\n';' 'separators[2] = '\r';' 'separators[3] = message->lower->lower->lower->next->lower->lower->lower->data[0];' 'separators[4] = message->lower->lower->lower->next->next->lower->lower->lower->data[3];' 'separators[5] = message->lower->lower->lower->next->next->lower->lower->lower->data[0];' 'separators[6] = message->lower->lower->lower->next->next->lower->lower->lower->data[1];' 'separators[7] = '\000';' 该部分代码用来初始化 'separators' 数组，分别存储 HL7 消息中的分隔符。

4. 'msg_string = join(message, msg_string, separators);' 该行使用 'join()' 函数将消息的各个部分拼接成一个字符串，同时使用 'separators' 数组中的分隔符进行分隔。

5. 'length=strlen(msg_string);' 该行获取 'msg_string' 的长度。

6. 'strncpy(&msg_string[4], &msg_string[6], length-5);' 该行将消息中的字段分隔符进行修正，将第 4 个字符替换成第 6 个字符，并向后移动其它字符。

7. 'if (!(msg_string=(char ) realloc(msg_string, length-2))){ / not enough memory, die */ exit(1); }' 该行使用 'realloc()' 函数重新分配内存，将字符串长度减少 2 个字节，如果分配失败，则退出程序。

8. 'return msg_string;' 该行返回转换后的字符串。