add const keyword to some APIs
[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 static int read_section(FILE *input_file, int length_size, char section,
32 uint32_t *buffer_length, uint8_t **buffer)
33 {
34 uint8_t length_buffer[4];
35 int length;
36 char section_char;
37 int read_count;
38
39 if ((length_size != 2) && (length_size != 4))
40 {
41 LOG_ERROR("BUG: length_size neither 2 nor 4");
42 return ERROR_PLD_FILE_LOAD_FAILED;
43 }
44
45 if ((read_count = fread(&section_char, 1, 1, input_file)) != 1)
46 {
47 return ERROR_PLD_FILE_LOAD_FAILED;
48 }
49
50 if (section_char != section)
51 {
52 return ERROR_PLD_FILE_LOAD_FAILED;
53 }
54
55 if ((read_count = fread(length_buffer, 1, length_size, input_file)) != length_size)
56 {
57 return ERROR_PLD_FILE_LOAD_FAILED;
58 }
59
60 if (length_size == 4)
61 length = be_to_h_u32(length_buffer);
62 else /* (length_size == 2) */
63 length = be_to_h_u16(length_buffer);
64
65 if (buffer_length)
66 *buffer_length = length;
67
68 *buffer = malloc(length);
69
70 if ((read_count = fread(*buffer, 1, length, input_file)) != length)
71 {
72 return ERROR_PLD_FILE_LOAD_FAILED;
73 }
74
75 return ERROR_OK;
76 }
77
78 int xilinx_read_bit_file(xilinx_bit_file_t *bit_file, const char *filename)
79 {
80 FILE *input_file;
81 struct stat input_stat;
82 int read_count;
83
84 if (!filename || !bit_file)
85 return ERROR_INVALID_ARGUMENTS;
86
87 if (stat(filename, &input_stat) == -1)
88 {
89 LOG_ERROR("couldn't stat() %s: %s", filename, strerror(errno));
90 return ERROR_PLD_FILE_LOAD_FAILED;
91 }
92
93 if (S_ISDIR(input_stat.st_mode))
94 {
95 LOG_ERROR("%s is a directory", filename);
96 return ERROR_PLD_FILE_LOAD_FAILED;
97 }
98
99 if (input_stat.st_size == 0) {
100 LOG_ERROR("Empty file %s", filename);
101 return ERROR_PLD_FILE_LOAD_FAILED;
102 }
103
104 if (!(input_file = fopen(filename, "rb")))
105 {
106 LOG_ERROR("couldn't open %s: %s", filename, strerror(errno));
107 return ERROR_PLD_FILE_LOAD_FAILED;
108 }
109
110 if ((read_count = fread(bit_file->unknown_header, 1, 13, input_file)) != 13)
111 {
112 LOG_ERROR("couldn't read unknown_header from file '%s'", filename);
113 return ERROR_PLD_FILE_LOAD_FAILED;
114 }
115
116 if (read_section(input_file, 2, 'a', NULL, &bit_file->source_file) != ERROR_OK)
117 return ERROR_PLD_FILE_LOAD_FAILED;
118
119 if (read_section(input_file, 2, 'b', NULL, &bit_file->part_name) != ERROR_OK)
120 return ERROR_PLD_FILE_LOAD_FAILED;
121
122 if (read_section(input_file, 2, 'c', NULL, &bit_file->date) != ERROR_OK)
123 return ERROR_PLD_FILE_LOAD_FAILED;
124
125 if (read_section(input_file, 2, 'd', NULL, &bit_file->time) != ERROR_OK)
126 return ERROR_PLD_FILE_LOAD_FAILED;
127
128 if (read_section(input_file, 4, 'e', &bit_file->length, &bit_file->data) != ERROR_OK)
129 return ERROR_PLD_FILE_LOAD_FAILED;
130
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);
133
134 fclose(input_file);
135
136 return ERROR_OK;
137 }