xilinx_bit.c 4.21 KB
Newer Older
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
/***************************************************************************
 *   Copyright (C) 2006 by Dominic Rath                                    *
 *   Dominic.Rath@gmx.de                                                   *
 *                                                                         *
 *   This program is free software; you can redistribute it and/or modify  *
 *   it under the terms of the GNU General Public License as published by  *
 *   the Free Software Foundation; either version 2 of the License, or     *
 *   (at your option) any later version.                                   *
 *                                                                         *
 *   This program is distributed in the hope that it will be useful,       *
 *   but WITHOUT ANY WARRANTY; without even the implied warranty of        *
 *   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the         *
 *   GNU General Public License for more details.                          *
 *                                                                         *
 *   You should have received a copy of the GNU General Public License     *
 *   along with this program; if not, write to the                         *
 *   Free Software Foundation, Inc.,                                       *
 *   59 Temple Place - Suite 330, Boston, MA  02111-1307, USA.             *
 ***************************************************************************/
#ifdef HAVE_CONFIG_H
#include "config.h"
#endif

#include "xilinx_bit.h"
#include "pld.h"
26
#include <helper/log.h>
27
28
29
30

#include <sys/stat.h>


zwelch's avatar
zwelch committed
31
static int read_section(FILE *input_file, int length_size, char section,
32
		uint32_t *buffer_length, uint8_t **buffer)
33
{
zwelch's avatar
zwelch committed
34
	uint8_t length_buffer[4];
35
	int length;
36
37
	char section_char;
	int read_count;
zwelch's avatar
zwelch committed
38

39
40
	if ((length_size != 2) && (length_size != 4))
	{
41
		LOG_ERROR("BUG: length_size neither 2 nor 4");
42
43
44
45
46
47
48
		return ERROR_PLD_FILE_LOAD_FAILED;
	}

	if ((read_count = fread(&section_char, 1, 1, input_file)) != 1)
	{
		return ERROR_PLD_FILE_LOAD_FAILED;
	}
zwelch's avatar
zwelch committed
49

50
51
52
53
54
55
56
57
58
	if (section_char != section)
	{
		return ERROR_PLD_FILE_LOAD_FAILED;
	}

	if ((read_count = fread(length_buffer, 1, length_size, input_file)) != length_size)
	{
		return ERROR_PLD_FILE_LOAD_FAILED;
	}
zwelch's avatar
zwelch committed
59

60
61
	if (length_size == 4)
		length = be_to_h_u32(length_buffer);
62
	else /* (length_size == 2) */
63
		length = be_to_h_u16(length_buffer);
zwelch's avatar
zwelch committed
64

65
66
	if (buffer_length)
		*buffer_length = length;
zwelch's avatar
zwelch committed
67

68
	*buffer = malloc(length);
zwelch's avatar
zwelch committed
69

70
71
72
73
	if ((read_count = fread(*buffer, 1, length, input_file)) != length)
	{
		return ERROR_PLD_FILE_LOAD_FAILED;
	}
zwelch's avatar
zwelch committed
74

75
76
77
	return ERROR_OK;
}

78
int xilinx_read_bit_file(struct xilinx_bit_file *bit_file, const char *filename)
79
80
81
82
{
	FILE *input_file;
	struct stat input_stat;
	int read_count;
zwelch's avatar
zwelch committed
83

84
	if (!filename || !bit_file)
85
		return ERROR_COMMAND_SYNTAX_ERROR;
zwelch's avatar
zwelch committed
86

87
88
	if (stat(filename, &input_stat) == -1)
	{
89
		LOG_ERROR("couldn't stat() %s: %s", filename, strerror(errno));
90
91
92
93
94
		return ERROR_PLD_FILE_LOAD_FAILED;
	}

	if (S_ISDIR(input_stat.st_mode))
	{
95
		LOG_ERROR("%s is a directory", filename);
96
97
		return ERROR_PLD_FILE_LOAD_FAILED;
	}
zwelch's avatar
zwelch committed
98

zwelch's avatar
zwelch committed
99
	if (input_stat.st_size == 0) {
100
		LOG_ERROR("Empty file %s", filename);
101
102
		return ERROR_PLD_FILE_LOAD_FAILED;
	}
zwelch's avatar
zwelch committed
103

104
105
	if (!(input_file = fopen(filename, "rb")))
	{
106
		LOG_ERROR("couldn't open %s: %s", filename, strerror(errno));
107
108
		return ERROR_PLD_FILE_LOAD_FAILED;
	}
zwelch's avatar
zwelch committed
109

110
111
	if ((read_count = fread(bit_file->unknown_header, 1, 13, input_file)) != 13)
	{
112
		LOG_ERROR("couldn't read unknown_header from file '%s'", filename);
113
114
		return ERROR_PLD_FILE_LOAD_FAILED;
	}
zwelch's avatar
zwelch committed
115

116
117
	if (read_section(input_file, 2, 'a', NULL, &bit_file->source_file) != ERROR_OK)
		return ERROR_PLD_FILE_LOAD_FAILED;
zwelch's avatar
zwelch committed
118

119
120
	if (read_section(input_file, 2, 'b', NULL, &bit_file->part_name) != ERROR_OK)
		return ERROR_PLD_FILE_LOAD_FAILED;
zwelch's avatar
zwelch committed
121

122
123
124
125
126
127
128
129
	if (read_section(input_file, 2, 'c', NULL, &bit_file->date) != ERROR_OK)
		return ERROR_PLD_FILE_LOAD_FAILED;

	if (read_section(input_file, 2, 'd', NULL, &bit_file->time) != ERROR_OK)
		return ERROR_PLD_FILE_LOAD_FAILED;

	if (read_section(input_file, 4, 'e', &bit_file->length, &bit_file->data) != ERROR_OK)
		return ERROR_PLD_FILE_LOAD_FAILED;
zwelch's avatar
zwelch committed
130

duane's avatar
duane committed
131
	LOG_DEBUG("bit_file: %s %s %s,%s %" PRIi32 "", bit_file->source_file, bit_file->part_name,
132
		bit_file->date, bit_file->time, bit_file->length);
zwelch's avatar
zwelch committed
133

134
	fclose(input_file);
zwelch's avatar
zwelch committed
135

136
137
	return ERROR_OK;
}