DIY编程器网

 找回密码
 注册

QQ登录

只需一步,快速开始

扫一扫,访问微社区

查看: 2227|回复: 0
打印 上一主题 下一主题

开源一个HEX转BIN代码

[复制链接]
跳转到指定楼层
楼主
发表于 2014-1-1 10:32:33 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
typedef signed char int8_t;
typedef unsigned char uint8_t;
typedef signed short int16_t;
typedef unsigned short uint16_t;
typedef signed int int32_t;
typedef unsigned int uint32_t;
typedef float flt_t;
typedef double lflt_t;
#define _not_hex_(src) ((('0' > src) || ('9' < src)) && (('a' > src) || ('f' < src)) && (('A' > src) || ('F' < src)))
#define _hex_trans_eq_(src,dst) \
{ \
        if (_not_hex_(src)) \
        { \
                return HEX_ERR; \
        } \
        if (('0' <= (src)) && ('9' >= (src))) \
        { \
                dst = (src) - '0'; \
        } \
        else if (('a' <= (src)) && ('f' >= (src))) \
        { \
                dst = (src) - 'a' + 10; \
        } \
        else if (('A' <= (src)) && ('F' >= (src))) \
        { \
                dst = (src) - 'A' + 10; \
        } \
}
#define _hex_trans_or_(src,dst) \
{ \
        if (_not_hex_(src)) \
        { \
                return HEX_ERR; \
        } \
        if (('0' <= (src)) && ('9' >= (src))) \
        { \
                dst |= (src) - '0'; \
        } \
        else if (('a' <= (src)) && ('f' >= (src))) \
        { \
                dst |= (src) - 'a' + 10; \
        } \
        else if (('A' <= (src)) && ('F' >= (src))) \
        { \
                dst |= (src) - 'A' + 10; \
        } \
}
#define _hex_trans_or_shift_(src,dst) \
{ \
        dst <<= 4; \
        _hex_trans_or_(src,dst); \
}
enum RESULT{HEX_ERR = -1, HEX_DATA_OK = 0, HEX_END_OK = 1, HEX_LBA_OK = 2, HEX_SEG_OK = 3};
int8_t _hex2bin_(const uint8_t* src, uint8_t* dst, uint8_t* data_type, uint8_t* data_len, uint16_t* data_addr)
{
        uint8_t check_sum, i;
        // 如果源code长度小于11,表明源code有误!
        if (11 > strlen((const char*)src))
        {
                return HEX_ERR;
        }
        // 校验起始字节是否为':',如果不为':',表明源code有误!
        if (':' != *src++)
        {
                return HEX_ERR;
        }
        // 得到数据长度的高4位
        _hex_trans_eq_(*src, *data_len);
        src++;
        // 得到数据长度的低4位
        _hex_trans_or_shift_(*src, *data_len);
        src++;
        // 校验和
        check_sum = *data_len;
        // 得到数据地址
        _hex_trans_eq_(*src, *data_addr);
        src++;
        _hex_trans_or_shift_(*src, *data_addr);
        src++;
        // 校验和
        check_sum += *data_addr;
        _hex_trans_or_shift_(*src, *data_addr);
        src++;
        _hex_trans_or_shift_(*src, *data_addr);
        src++;
        // 校验和
        check_sum += *data_addr;
        // 得到数据类型
        _hex_trans_eq_(*src, *data_type);
        src++;
        _hex_trans_or_shift_(*src, *data_type);
        src++;
        // 校验和
        check_sum += *data_type;
        switch (*data_type)
        {
        case 0: // 数据记录
                for (i = *data_len; i; i--, dst++)
                {
                        _hex_trans_eq_(*src, *dst);
                        src++;
                        _hex_trans_or_shift_(*src, *dst);
                        src++;
                        // 校验和
                        check_sum += *dst;
                }
                // 校验
                _hex_trans_eq_(*src, i);
                src++;
                _hex_trans_or_shift_(*src, i);
                check_sum += i;
                return check_sum? HEX_ERR : HEX_DATA_OK;
        case 1: // 文件结束记录
                if (*data_addr)
                {
                        return HEX_ERR;
                }
                // 校验
                _hex_trans_eq_(*src, i);
                src++;
                _hex_trans_or_shift_(*src, i);
                check_sum += i;
                return check_sum? HEX_ERR : HEX_END_OK;
        case 2: // 扩展段地址记录
                if (*data_addr)
                {
                        return HEX_ERR;
                }
                // 得到扩展段地址
                _hex_trans_eq_(*src, *data_addr);
                src++;
                _hex_trans_or_shift_(*src, *data_addr);
                src++;
                // 校验和
                check_sum += *data_addr;
                _hex_trans_or_shift_(*src, *data_addr);
                src++;
                _hex_trans_or_shift_(*src, *data_addr);
                src++;
                // 校验和
                check_sum += *data_addr;
                return check_sum? HEX_ERR : HEX_SEG_OK;
        case 4: // 扩展线性地址记录
                if (*data_addr)
                {
                        return HEX_ERR;
                }
                // 得到扩展段地址
                // 得到数据地址
                _hex_trans_eq_(*src, *data_addr);
                src++;
                _hex_trans_or_shift_(*src, *data_addr);
                src++;
                // 校验和
                check_sum += *data_addr;
                _hex_trans_or_shift_(*src, *data_addr);
                src++;
                _hex_trans_or_shift_(*src, *data_addr);
                src++;
                // 校验和
                check_sum += *data_addr;
                return check_sum? HEX_ERR : HEX_LBA_OK;
        default:
                return HEX_ERR;
        }
        return HEX_ERR;
}
int8_t hex2bin(const int8_t* src_file_path, const int8_t* dst_file_path)
{
        uint8_t buffer_hex[1024], buffer_bin[256];
        uint8_t data_type, len_bin;
        uint16_t addr_low;
        uint32_t addr_high = 0;
        FILE* src_file;
        FILE* dst_file;
        src_file = fopen((const char*)src_file_path, "r");
        if (!src_file)
        {
                return -1;
        }
        dst_file = fopen((const char*)dst_file_path, "wb");
        if (!dst_file)
        {
                fclose(src_file);
                return -1;
        }
        for ( ; !feof(src_file); )
        {
                if (NULL == fgets((char*)buffer_hex, 1024, src_file))
                {
                        break;
                }
                if (HEX_ERR == _hex2bin_((const uint8_t*)buffer_hex, (uint8_t*)buffer_bin, &data_type, &len_bin, &addr_low))
                {
                        break;
                }
                switch (data_type)
                {
                case 0: // 数据记录
                        if (ftell(dst_file) != addr_low + addr_high)
                        {
                                fseek(dst_file, addr_low + addr_high, SEEK_SET);
                        }
                        if (1 != fwrite((const uint8_t*)buffer_bin, len_bin, 1, dst_file))
                        {
                                fclose(src_file);
                                fclose(dst_file);
                                return -1;
                        }
                        break;
                case 1: // 文件结束记录
                        fclose(src_file);
                        fclose(dst_file);
                        return 0;
                case 2: // 扩展段地址记录
                        addr_high = ((uint32_t)addr_low) << 2;
                        break;
                case 4: // 扩展线性地址记录
                        addr_high = ((uint32_t)addr_low) << 16;
                        break;
                default:
                        fclose(src_file);
                        fclose(dst_file);
                        return -1;
                }
        }
        fclose(src_file);
        fclose(dst_file);
        return 0;
}
int main(void)
{
        if (!hex2bin((const int8_t*)"avr-test.hex",(const int8_t*)"avr-test.bin"))
                printf("ok!\n");
        return 0;
}
分享到:  QQ好友和群QQ好友和群 QQ空间QQ空间 腾讯微博腾讯微博 腾讯朋友腾讯朋友 微信微信
收藏收藏 分享分享 支持支持 反对反对
您需要登录后才可以回帖 登录 | 注册

本版积分规则

小黑屋|文字版|手机版|DIY编程器网 ( 桂ICP备14005565号-1 )

GMT+8, 2024-11-1 08:06 , 耗时 0.162498 秒, 19 个查询请求 , Gzip 开启.

各位嘉宾言论仅代表个人观点,非属DIY编程器网立场。

桂公网安备 45031202000115号

DIY编程器群(超员):41210778 DIY编程器

DIY编程器群1(满员):3044634 DIY编程器1

diy编程器群2:551025008 diy编程器群2

QQ:28000622;Email:libyoufer@sina.com

本站由桂林市临桂区技兴电子商务经营部独家赞助。旨在技术交流,请自觉遵守国家法律法规,一旦发现将做封号删号处理。

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