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, see <http://www.gnu.org/licenses/>. *
  17  ***************************************************************************/
  18
  19 #ifdef HAVE_CONFIG_H
  20 #include "config.h"
  21 #endif
  22
  23 #include "xilinx_bit.h"
  24 #include "pld.h"
  25 #include <helper/log.h>
  26
  27 #include <sys/stat.h>
  28
  29
  30 static int read_section(FILE *input_file, int length_size, char section,
  31         uint32_t *buffer_length, uint8_t **buffer)
  32 {
  33         uint8_t length_buffer[4];
  34         int length;
  35         char section_char;
  36         int read_count;
  37
  38         if ((length_size != 2) && (length_size != 4)) {
  39                 LOG_ERROR("BUG: length_size neither 2 nor 4");
  40                 return ERROR_PLD_FILE_LOAD_FAILED;
  41         }
  42
  43         read_count = fread(&section_char, 1, 1, input_file);
  44         if (read_count != 1)
  45                 return ERROR_PLD_FILE_LOAD_FAILED;
  46
  47         if (section_char != section)
  48                 return ERROR_PLD_FILE_LOAD_FAILED;
  49
  50         read_count = fread(length_buffer, 1, length_size, input_file);
  51         if (read_count != length_size)
  52                 return ERROR_PLD_FILE_LOAD_FAILED;
  53
  54         if (length_size == 4)
  55                 length = be_to_h_u32(length_buffer);
  56         else    /* (length_size == 2) */
  57                 length = be_to_h_u16(length_buffer);
  58
  59         if (buffer_length)
  60                 *buffer_length = length;
  61
  62         *buffer = malloc(length);
  63
  64         read_count = fread(*buffer, 1, length, input_file);
  65         if (read_count != length)
  66                 return ERROR_PLD_FILE_LOAD_FAILED;
  67
  68         return ERROR_OK;
  69 }
  70
  71 int xilinx_read_bit_file(struct xilinx_bit_file *bit_file, const char *filename)
  72 {
  73         FILE *input_file;
  74         struct stat input_stat;
  75         int read_count;
  76
  77         if (!filename || !bit_file)
  78                 return ERROR_COMMAND_SYNTAX_ERROR;
  79
  80         if (stat(filename, &input_stat) == -1) {
  81                 LOG_ERROR("couldn't stat() %s: %s", filename, strerror(errno));
  82                 return ERROR_PLD_FILE_LOAD_FAILED;
  83         }
  84
  85         if (S_ISDIR(input_stat.st_mode)) {
  86                 LOG_ERROR("%s is a directory", filename);
  87                 return ERROR_PLD_FILE_LOAD_FAILED;
  88         }
  89
  90         if (input_stat.st_size == 0) {
  91                 LOG_ERROR("Empty file %s", filename);
  92                 return ERROR_PLD_FILE_LOAD_FAILED;
  93         }
  94
  95         input_file = fopen(filename, "rb");
  96         if (input_file == NULL) {
  97                 LOG_ERROR("couldn't open %s: %s", filename, strerror(errno));
  98                 return ERROR_PLD_FILE_LOAD_FAILED;
  99         }
 100
 101         read_count = fread(bit_file->unknown_header, 1, 13, input_file);
 102         if (read_count != 13) {
 103                 LOG_ERROR("couldn't read unknown_header from file '%s'", filename);
 104                 return ERROR_PLD_FILE_LOAD_FAILED;
 105         }
 106
 107         if (read_section(input_file, 2, 'a', NULL, &bit_file->source_file) != ERROR_OK)
 108                 return ERROR_PLD_FILE_LOAD_FAILED;
 109
 110         if (read_section(input_file, 2, 'b', NULL, &bit_file->part_name) != ERROR_OK)
 111                 return ERROR_PLD_FILE_LOAD_FAILED;
 112
 113         if (read_section(input_file, 2, 'c', NULL, &bit_file->date) != ERROR_OK)
 114                 return ERROR_PLD_FILE_LOAD_FAILED;
 115
 116         if (read_section(input_file, 2, 'd', NULL, &bit_file->time) != ERROR_OK)
 117                 return ERROR_PLD_FILE_LOAD_FAILED;
 118
 119         if (read_section(input_file, 4, 'e', &bit_file->length, &bit_file->data) != ERROR_OK)
 120                 return ERROR_PLD_FILE_LOAD_FAILED;
 121
 122         LOG_DEBUG("bit_file: %s %s %s,%s %" PRIi32 "", bit_file->source_file, bit_file->part_name,
 123                 bit_file->date, bit_file->time, bit_file->length);
 124
 125         fclose(input_file);
 126
 127         return ERROR_OK;
 128 }