aboutsummaryrefslogtreecommitdiffstats
path: root/src/mds-kbdc/parsed.c
blob: 125259acd835aa8665b520e6f65296f263e8a6af (plain) (blame)
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
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
/**
 * mds — A micro-display server
 * Copyright © 2014  Mattias Andrée (maandree@member.fsf.org)
 * 
 * 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 3 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, see <http://www.gnu.org/licenses/>.
 */
#include "parsed.h"

#include <stdlib.h>
#include <string.h>
#include <strings.h>



/**
 * Initialise a `mds_kbdc_parsed_t*`
 * 
 * @param  this  The `mds_kbdc_parsed_t*`
 */
void mds_kbdc_parsed_initialise(mds_kbdc_parsed_t* restrict this)
{
  memset(this, 0, sizeof(mds_kbdc_parsed_t));
}


/**
 * Release all resources allocated in a `mds_kbdc_parsed_t*`
 * 
 * @param  this  The `mds_kbdc_parsed_t*`
 */
void mds_kbdc_parsed_destroy(mds_kbdc_parsed_t* restrict this)
{
  mds_kbdc_tree_free(this->tree);
  mds_kbdc_source_code_destroy(this->source_code);
  free(this->source_code);
  free(this->pathname);
  mds_kbdc_parse_error_free_all(this->errors);
  while (this->languages_ptr--)
    free(this->languages[this->languages_ptr]);
  free(this->languages);
  while (this->countries_ptr--)
    free(this->countries[this->countries_ptr]);
  free(this->countries);
  memset(this, 0, sizeof(mds_kbdc_parsed_t));
}


/**
 * Check whether a fatal errors has occurred
 * 
 * @param   this  The parsing result
 * @return        Whether a fatal errors has occurred
 */
int mds_kbdc_parsed_is_fatal(mds_kbdc_parsed_t* restrict this)
{
  return this->severest_error_level >= MDS_KBDC_PARSE_ERROR_ERROR;
}


/**
 * Print all encountered errors
 * 
 * @param  this    The parsing result
 * @param  output  The output file
 */
void mds_kbdc_parsed_print_errors(mds_kbdc_parsed_t* restrict this, FILE* output)
{
  mds_kbdc_parse_error_t** errors = this->errors;
  char* env = getenv("MDS_KBDC_ERRORS_ORDER");
  if (errors == NULL)
    return;
  if (env && (strcasecmp(env, "reversed") || strcasecmp(env, "reverse")))
    {
      while (*errors)
	errors++;
      while (errors-- != this->errors)
	mds_kbdc_parse_error_print(*errors, output);
    }
  else
    while (*errors)
      mds_kbdc_parse_error_print(*errors++, output);
  
}


/**
 * Add a new error to the list
 * 
 * @param   this              The parsing result
 * @param   severity          A `MDS_KBDC_PARSE_ERROR_*` to indicate severity
 * @param   error_is_in_file  Whether the error is in the layout code
 * @param   line              The line where the error occurred, zero-based
 * @param   start             The byte where the error started, on the line, inclusive, zero-based
 * @param   end               The byte where the error ended, on the line, exclusive, zero-based
 * @return                    The new error on success, `NULL` on error
 */
mds_kbdc_parse_error_t* mds_kbdc_parsed_new_error(mds_kbdc_parsed_t* restrict this, int severity,
						  int error_is_in_file, size_t line, size_t start, size_t end)
{
  mds_kbdc_parse_error_t* error = NULL;
  size_t old_errors_ptr = this->errors_ptr;
  int saved_errno;
  
  if (this->errors_ptr + 1 >= this->errors_size)
    {
      size_t new_errors_size = this->errors_size ? (this->errors_size << 1) : 2;
      mds_kbdc_parse_error_t** new_errors = this->errors;
      
      fail_if (xrealloc(new_errors, new_errors_size, mds_kbdc_parse_error_t*));
      this->errors = new_errors;
      this->errors_size = new_errors_size;
    }
  
  fail_if (xcalloc(error, 1, mds_kbdc_parse_error_t));
  this->errors[this->errors_ptr + 0] = error;
  this->errors[this->errors_ptr + 1] = NULL;
  this->errors_ptr++;
  
  error->severity = severity;
  if (this->severest_error_level < severity)
    this->severest_error_level = severity;
  
  fail_if ((error->pathname = strdup(this->pathname)) == NULL);
  
  if ((error->error_is_in_file = error_is_in_file))
    {
      error->line = line;
      error->start = start;
      error->end = end;
      error->code = strdup(this->source_code->real_lines[line]);
      fail_if (error->code == NULL);
    }
  
  return error;
 pfail:
  saved_errno = errno;
  free(error);
  this->errors_ptr = old_errors_ptr;
  this->errors[this->errors_ptr] = NULL;
  errno = saved_errno;
  return NULL;
}