char *getCString(VObject *vObj)
{
if (VALUE_TYPE(vObj) == VCVT_USTRINGZ)
return fakeCString(vObjectUStringZValue(vObj));
if (VALUE_TYPE(vObj) == VCVT_STRINGZ)
return PL_strdup(vObjectStringZValue(vObj));
return NULL;
}
static void printValue(FILE *fp, VObject *o, int level)
{
switch (VALUE_TYPE(o)) {
case VCVT_USTRINGZ: {
char c;
char *t,*s;
s = t = fakeCString(USTRINGZ_VALUE_OF(o));
fputc('"',fp);
while (c=*t,c) {
fputc(c,fp);
if (c == '\n') indent(fp,level+2);
t++;
}
fputc('"',fp);
deleteStr(s);
break;
}
case VCVT_STRINGZ: {
char c;
const char *s = STRINGZ_VALUE_OF(o);
fputc('"',fp);
while (c=*s,c) {
fputc(c,fp);
if (c == '\n') indent(fp,level+2);
s++;
}
fputc('"',fp);
break;
}
case VCVT_UINT:
fprintf(fp,"%d", INTEGER_VALUE_OF(o)); break;
case VCVT_ULONG:
fprintf(fp,"%ld", LONG_VALUE_OF(o)); break;
case VCVT_RAW:
fprintf(fp,"[raw data]"); break;
case VCVT_VOBJECT:
fprintf(fp,"[vobject]\n");
printVObject_(fp,VOBJECT_VALUE_OF(o),level+1);
break;
case 0:
fprintf(fp,"[none]"); break;
default:
fprintf(fp,"[unknown]"); break;
}
}
static void writeValue(OFile *fp, VObject *o, unsigned long size)
{
if (o == 0) return;
switch (VALUE_TYPE(o)) {
case VCVT_USTRINGZ: {
char *s = fakeCString(USTRINGZ_VALUE_OF(o));
if (isAPropertyOf(o, VCQuotedPrintableProp))
writeQPString(fp, s, 1);
else
writeQPString(fp, s, 0);
deleteStr(s);
break;
}
case VCVT_STRINGZ: {
if (isAPropertyOf(o, VCQuotedPrintableProp))
writeQPString(fp, STRINGZ_VALUE_OF(o), 1);
else
writeQPString(fp, STRINGZ_VALUE_OF(o), 0);
break;
}
case VCVT_UINT: {
char buf[16];
snprintf(buf,sizeof(buf),"%u", INTEGER_VALUE_OF(o));
appendsOFile(fp,buf);
break;
}
case VCVT_ULONG: {
char buf[16];
snprintf(buf,sizeof(buf),"%lu", LONG_VALUE_OF(o));
appendsOFile(fp,buf);
break;
}
case VCVT_RAW: {
appendcOFile(fp,'\n');
writeBase64(fp,(unsigned char*)(ANY_VALUE_OF(o)),size);
break;
}
case VCVT_VOBJECT:
appendcOFile(fp,'\n');
writeVObject_(fp,VOBJECT_VALUE_OF(o));
break;
}
}
