#ifdef HAVE_CONFIG_H
# include <config.h>
#endif
#include <stdbool.h>
#include <stdlib.h>
#include "format.h"
#include "xalloc.h"
#include "xerror.h"
#include "error.h"
#include "error-progname.h"
#include "gettext.h"
#define _(str) gettext (str)
struct spec
{
unsigned int directives;
unsigned int arg_count;
bool args_used[10];
};
static void *
format_parse (const char *format, char **invalid_reason)
{
struct spec spec;
struct spec *result;
spec.directives = 0;
spec.arg_count = 0;
for (; *format != '\0';)
if (*format++ == '%')
if (*format >= '0' && *format <= '9')
{
unsigned int number;
spec.directives++;
number = *format - '0';
while (spec.arg_count <= number)
spec.args_used[spec.arg_count++] = false;
if (spec.args_used[number])
{
*invalid_reason =
xasprintf (_("Multiple references to %%%c."), *format);
goto bad_format;
}
spec.args_used[number] = true;
format++;
}
result = (struct spec *) xmalloc (sizeof (struct spec));
*result = spec;
return result;
bad_format:
return NULL;
}
static void
format_free (void *descr)
{
struct spec *spec = (struct spec *) descr;
free (spec);
}
static int
format_get_number_of_directives (void *descr)
{
struct spec *spec = (struct spec *) descr;
return spec->directives;
}
static bool
format_check (const lex_pos_ty *pos, void *msgid_descr, void *msgstr_descr,
bool equality, bool noisy, const char *pretty_msgstr)
{
struct spec *spec1 = (struct spec *) msgid_descr;
struct spec *spec2 = (struct spec *) msgstr_descr;
bool err = false;
unsigned int i;
for (i = 0; i < spec1->arg_count || i < spec2->arg_count; i++)
{
bool arg_used1 = (i < spec1->arg_count && spec1->args_used[i]);
bool arg_used2 = (i < spec2->arg_count && spec2->args_used[i]);
if (arg_used1 != arg_used2)
{
if (noisy)
{
error_with_progname = false;
error_at_line (0, 0, pos->file_name, pos->line_number,
arg_used1
? _("a format specification for argument %u doesn't exist in '%s'")
: _("a format specification for argument %u, as in '%s', doesn't exist in 'msgid'"),
i, pretty_msgstr);
error_with_progname = true;
}
err = true;
break;
}
}
return err;
}
struct formatstring_parser formatstring_qt =
{
format_parse,
format_free,
format_get_number_of_directives,
format_check
};
#ifdef TEST
#include <stdio.h>
#include "getline.h"
static void
format_print (void *descr)
{
struct spec *spec = (struct spec *) descr;
unsigned int i;
if (spec == NULL)
{
printf ("INVALID");
return;
}
printf ("(");
for (i = 0; i < spec->arg_count; i++)
{
if (i > 0)
printf (" ");
if (spec->args_used[i])
printf ("*");
else
printf ("_");
}
printf (")");
}
int
main ()
{
for (;;)
{
char *line = NULL;
size_t line_size = 0;
int line_len;
char *invalid_reason;
void *descr;
line_len = getline (&line, &line_size, stdin);
if (line_len < 0)
break;
if (line_len > 0 && line[line_len - 1] == '\n')
line[--line_len] = '\0';
invalid_reason = NULL;
descr = format_parse (line, &invalid_reason);
format_print (descr);
printf ("\n");
if (descr == NULL)
printf ("%s\n", invalid_reason);
free (invalid_reason);
free (line);
}
return 0;
}
#endif