linux-packaging-mono/support/x-struct-str.c

126 lines
2.5 KiB
C
Raw Normal View History

/*
* A helper routine to copy the strings between differing structures.
*/
#include <stdlib.h>
#include <string.h>
#include <limits.h>
#include "mph.h"
#define MAX_OFFSETS 10
#define OFFSET_SHIFT 1
#define lstr_at(p, n) (*(char**)(((char*)(p))+(n >> OFFSET_SHIFT)))
#define str_at(p, n) ( \
(((n) & MPH_STRING_OFFSET_MASK) == MPH_STRING_OFFSET_ARRAY) \
? (char*)(p) + (n >> OFFSET_SHIFT) \
: lstr_at(p, n) \
)
char* MPH_INTERNAL
_mph_copy_structure_strings (
void *to, const mph_string_offset_t *to_offsets,
const void *from, const mph_string_offset_t *from_offsets,
size_t num_strings)
{
int i;
size_t buflen;
int len[MAX_OFFSETS];
char *buf, *cur = NULL;
g_assert (num_strings < MAX_OFFSETS);
for (i = 0; i < num_strings; ++i) {
lstr_at (to, to_offsets[i]) = NULL;
}
buflen = num_strings;
for (i = 0; i < num_strings; ++i) {
const char* s = str_at(from, from_offsets[i]);
len [i] = s ? strlen (s) : 0;
if (len[i] < INT_MAX - buflen)
buflen += len[i];
else
len[i] = -1;
}
cur = buf = malloc (buflen);
if (buf == NULL) {
return NULL;
}
for (i = 0; i < num_strings; ++i) {
if (len[i] > 0) {
lstr_at (to, to_offsets[i]) =
strcpy (cur, str_at (from, from_offsets[i]));
cur += (len[i] +1);
}
}
return buf;
}
#ifdef TEST
/*
* To run the tests:
* $ gcc -DTEST -I.. `pkg-config --cflags --libs glib-2.0` x-struct-str.c
* $ ./a.out
*/
#include <stdio.h>
struct foo {
char *a;
int b;
char *c;
char d[10];
};
struct bar {
int b;
char *a;
double d;
char *c;
char *e;
};
int
main ()
{
/* test copying foo to bar */
struct foo f = {"hello", 42, "world", "!!"};
struct bar b;
mph_string_offset_t foo_offsets[] = {
MPH_STRING_OFFSET(struct foo, a, MPH_STRING_OFFSET_PTR),
MPH_STRING_OFFSET(struct foo, c, MPH_STRING_OFFSET_PTR),
MPH_STRING_OFFSET(struct foo, d, MPH_STRING_OFFSET_ARRAY)
};
mph_string_offset_t bar_offsets[] = {
MPH_STRING_OFFSET(struct bar, a, MPH_STRING_OFFSET_PTR),
MPH_STRING_OFFSET(struct bar, c, MPH_STRING_OFFSET_PTR),
MPH_STRING_OFFSET(struct bar, e, MPH_STRING_OFFSET_PTR)
};
char *buf;
buf = _mph_copy_structure_strings (&b, bar_offsets,
&f, foo_offsets, 3);
printf ("b.a=%s\n", b.a);
printf ("b.c=%s\n", b.c);
printf ("b.e=%s\n", b.e);
f.c = NULL;
buf = _mph_copy_structure_strings (&b, bar_offsets,
&f, foo_offsets, 3);
printf ("b.a=%s\n", b.a);
printf ("b.c=%s\n", b.c);
printf ("b.e=%s\n", b.e);
return 0;
}
#endif