Audit and eliminate redundant #include directives in src/{pld,svf,xsvf}.
[openocd.git] / src / pld / xilinx_bit.c
1 /***************************************************************************
2 * Copyright (C) 2006 by Dominic Rath *
3 * Dominic.Rath@gmx.de *
4 * *
5 * This program is free software; you can redistribute it and/or modify *
6 * it under the terms of the GNU General Public License as published by *
7 * the Free Software Foundation; either version 2 of the License, or *
8 * (at your option) any later version. *
9 * *
10 * This program is distributed in the hope that it will be useful, *
11 * but WITHOUT ANY WARRANTY; without even the implied warranty of *
12 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the *
13 * GNU General Public License for more details. *
14 * *
15 * You should have received a copy of the GNU General Public License *
16 * along with this program; if not, write to the *
17 * Free Software Foundation, Inc., *
18 * 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. *
19 ***************************************************************************/
20 #ifdef HAVE_CONFIG_H
21 #include "config.h"
22 #endif
23
24 #include "xilinx_bit.h"
25 #include "pld.h"
26 #include "log.h"
27
28 #include <sys/stat.h>
29
30
31 int read_section(FILE *input_file, int length_size, char section, u32 *buffer_length, u8 **buffer)
32 {
33 u8 length_buffer[4];
34 int length;
35 char section_char;
36 int read_count;
37
38 if ((length_size != 2) && (length_size != 4))
39 {
40 LOG_ERROR("BUG: length_size neither 2 nor 4");
41 return ERROR_PLD_FILE_LOAD_FAILED;
42 }
43
44 if ((read_count = fread(&section_char, 1, 1, input_file)) != 1)
45 {
46 return ERROR_PLD_FILE_LOAD_FAILED;
47 }
48
49 if (section_char != section)
50 {
51 return ERROR_PLD_FILE_LOAD_FAILED;
52 }
53
54 if ((read_count = fread(length_buffer, 1, length_size, input_file)) != length_size)
55 {
56 return ERROR_PLD_FILE_LOAD_FAILED;
57 }
58
59 if (length_size == 4)
60 length = be_to_h_u32(length_buffer);
61 else /* (length_size == 2) */
62 length = be_to_h_u16(length_buffer);
63
64 if (buffer_length)
65 *buffer_length = length;
66
67 *buffer = malloc(length);
68
69 if ((read_count = fread(*buffer, 1, length, input_file)) != length)
70 {
71 return ERROR_PLD_FILE_LOAD_FAILED;
72 }
73
74 return ERROR_OK;
75 }
76
77 int xilinx_read_bit_file(xilinx_bit_file_t *bit_file, char *filename)
78 {
79 FILE *input_file;
80 struct stat input_stat;
81 int read_count;
82
83 if (!filename || !bit_file)
84 return ERROR_INVALID_ARGUMENTS;
85
86 if (stat(filename, &input_stat) == -1)
87 {
88 LOG_ERROR("couldn't stat() %s: %s", filename, strerror(errno));
89 return ERROR_PLD_FILE_LOAD_FAILED;
90 }
91
92 if (S_ISDIR(input_stat.st_mode))
93 {
94 LOG_ERROR("%s is a directory", filename);
95 return ERROR_PLD_FILE_LOAD_FAILED;
96 }
97
98 if (input_stat.st_size == 0){
99 LOG_ERROR("Empty file %s", filename);
100 return ERROR_PLD_FILE_LOAD_FAILED;
101 }
102
103 if (!(input_file = fopen(filename, "rb")))
104 {
105 LOG_ERROR("couldn't open %s: %s", filename, strerror(errno));
106 return ERROR_PLD_FILE_LOAD_FAILED;
107 }
108
109 if ((read_count = fread(bit_file->unknown_header, 1, 13, input_file)) != 13)
110 {
111 LOG_ERROR("couldn't read unknown_header from file '%s'", filename);
112 return ERROR_PLD_FILE_LOAD_FAILED;
113 }
114
115 if (read_section(input_file, 2, 'a', NULL, &bit_file->source_file) != ERROR_OK)
116 return ERROR_PLD_FILE_LOAD_FAILED;
117
118 if (read_section(input_file, 2, 'b', NULL, &bit_file->part_name) != ERROR_OK)
119 return ERROR_PLD_FILE_LOAD_FAILED;
120
121 if (read_section(input_file, 2, 'c', NULL, &bit_file->date) != ERROR_OK)
122 return ERROR_PLD_FILE_LOAD_FAILED;
123
124 if (read_section(input_file, 2, 'd', NULL, &bit_file->time) != ERROR_OK)
125 return ERROR_PLD_FILE_LOAD_FAILED;
126
127 if (read_section(input_file, 4, 'e', &bit_file->length, &bit_file->data) != ERROR_OK)
128 return ERROR_PLD_FILE_LOAD_FAILED;
129
130 LOG_DEBUG("bit_file: %s %s %s,%s %i", bit_file->source_file, bit_file->part_name,
131 bit_file->date, bit_file->time, bit_file->length);
132
133 fclose(input_file);
134
135 return ERROR_OK;
136 }