mirror of
https://github.com/autc04/Retro68.git
synced 2024-11-19 03:05:15 +00:00
134 lines
2.9 KiB
C
134 lines
2.9 KiB
C
#include <errno.h>
|
|
#include <stdio.h>
|
|
#include <stdlib.h>
|
|
#include <string.h>
|
|
#include <unistd.h>
|
|
|
|
#include "libiberty.h"
|
|
|
|
#include "stubs.h"
|
|
|
|
#ifndef HAVE_DCGETTEXT
|
|
const char *dcgettext(const char *domain, const char *msg, int category)
|
|
{
|
|
return msg;
|
|
}
|
|
#endif /* !HAVE_DCGETTEXT */
|
|
|
|
#ifndef HAVE_LIBINTL_DGETTEXT
|
|
const char *libintl_dgettext(const char *domain, const char *msg)
|
|
{
|
|
return msg;
|
|
}
|
|
#endif /* !HAVE_LIBINTL_DGETTEXT */
|
|
|
|
#ifndef HAVE_GETLINE
|
|
/* Read a line from IN. LINE points to a malloc'd buffer that is extended as
|
|
necessary. ALLOC points to the allocated length of LINE. Returns
|
|
the length of the string read (including any trailing \n) */
|
|
|
|
ssize_t getline(char **line, size_t *alloc, FILE *in)
|
|
{
|
|
size_t len = 0;
|
|
|
|
if (!*alloc) {
|
|
*alloc = 200;
|
|
*line = xmalloc(*alloc);
|
|
}
|
|
|
|
while (1) {
|
|
if (!fgets(*line + len, *alloc - len, in))
|
|
return 0;
|
|
len += strlen(*line + len);
|
|
if (len && (*line)[len - 1] == '\n')
|
|
return len;
|
|
|
|
*alloc *= 2;
|
|
*line = xrealloc(*line, *alloc);
|
|
}
|
|
}
|
|
#endif
|
|
|
|
/* fatal error & exit */
|
|
void fatal(const char *format, ...)
|
|
{
|
|
va_list args;
|
|
|
|
va_start(args, format);
|
|
fprintf(stderr, "%s: ", elf2flt_progname);
|
|
vfprintf(stderr, format, args);
|
|
fprintf(stderr, "\n");
|
|
va_end(args);
|
|
exit(1);
|
|
}
|
|
|
|
/* fatal error, perror & exit */
|
|
void fatal_perror(const char *format, ...)
|
|
{
|
|
int e = errno;
|
|
va_list args;
|
|
|
|
va_start(args, format);
|
|
fprintf(stderr, "%s: ", elf2flt_progname);
|
|
vfprintf(stderr, format, args);
|
|
fprintf(stderr, ": %s\n", strerror(e));
|
|
va_end(args);
|
|
exit(1);
|
|
}
|
|
|
|
/* open a file or fail */
|
|
FILE *xfopen(const char *path, const char *mode)
|
|
{
|
|
FILE *ret = fopen(path, mode);
|
|
if (!ret)
|
|
fatal_perror("Unable to open '%s'", path);
|
|
return ret;
|
|
}
|
|
|
|
/* Append a string SRC to an options array DST */
|
|
void append_option(options_t *dst, const char *src)
|
|
{
|
|
if (dst->alloc == dst->num) {
|
|
size_t a = (dst->num + 2) * 2;
|
|
void *o = xmalloc(sizeof(*dst->options) * a);
|
|
|
|
memcpy(o, dst->options, sizeof(*dst->options) * dst->num);
|
|
free(dst->options);
|
|
dst->options = o;
|
|
dst->alloc = a;
|
|
}
|
|
|
|
dst->options[dst->num] = src;
|
|
dst->num++;
|
|
}
|
|
|
|
/* Split and append a string SRC to an options array DST */
|
|
void append_option_str(options_t *dst, const char *src, const char *delim)
|
|
{
|
|
char *tok_src = xstrdup(src);
|
|
char *tok = strtok(tok_src, delim);
|
|
while (tok) {
|
|
append_option(dst, tok);
|
|
tok = strtok(NULL, delim);
|
|
}
|
|
/* don't free tok_src since options_t now points to it */
|
|
}
|
|
|
|
/* Append an options array SRC to another options array DST */
|
|
void append_options(options_t *dst, const options_t *src)
|
|
{
|
|
if (dst->alloc < dst->num + src->num) {
|
|
size_t a = (dst->num + src->num + 2) * 2;
|
|
void *o = xmalloc(sizeof(*dst->options) * a);
|
|
|
|
memcpy(o, dst->options, sizeof(*dst->options) * dst->num);
|
|
free(dst->options);
|
|
dst->options = o;
|
|
dst->alloc = a;
|
|
}
|
|
|
|
memcpy(&dst->options[dst->num], &src->options[0],
|
|
sizeof(*dst->options) * src->num);
|
|
dst->num += src->num;
|
|
}
|