u_long outBit_Sx (int verbosity, const char *text, u_char *buf, int startbit, int bitlen)
{
u_long value;
value = getBits(buf,0,startbit,bitlen);
if (bitlen <= 8) {
out_SB (verbosity,text,(int)value);
} else if (bitlen <= 16) {
out_SW (verbosity,text,(int)value);
} else if (bitlen <= 24) {
out_ST (verbosity,text,(int)value);
} else {
out_SL (verbosity,text,value);
}
return value;
}
int print_vps_decode (int v, u_char *b, int len)
{
// warning! Nipples e.g. _2_7 may not be msb...lsb order!
// see: ETSI EN 300 231 for this notation!
u_int pcs;
u_int cni_1_4;
u_int pil;
u_int pty;
u_int day, month, hour, minute;
u_int country_5_8;
u_int npp, npp_0_1, npp_2_7;
out_nl (v,"VPS data:");
print_databytes (8,"Data:", b, len);
indent (+1);
// -- starts at EN 300 231 8.2.2 Fig.9 Table
// -- Byte 3..15 , so byte 3 => [0]
// -- vps_data_block:
// -- Byte 3+4: not relevant to PDC
// -- Info from datasheet SAA4700 (Philips)
outBit_Sx_NL (v,"(program source identification (binary coded)): ", b, 0, 8);
outBit_Sx_NL (v,"(program source identification (ASCII seq)): ", b+1, 0, 8);
// -- PCS
pcs = outBit_S2x_NL (v,"PCS audio: ", b+2, 0, 2,
(char *(*)(u_long)) dvbstrVPS_pcs_audio );
pcs = outBit_Sx_NL (v,"PCS reserved: ", b+2, 2, 2);
cni_1_4 = outBit_Sx (v,"CNI reserved: ", b+2, 4, 4);
if (cni_1_4 == 0x0F) out_nl (4, " [= Unenhanced VPS]");
else out_nl (4, " [= Enhanced VPS]");
// -- Byte 6..10: not relevant to PDC
// -- Info from datasheet SAA4700 (Philips)
outBit_Sx_NL (v,"(program/test picture identification): ", b+3, 0, 8);
outBit_Sx_NL (v,"(internal information exchange): ", b+4, 0, 8);
outBit_Sx_NL (v,"(address assignment of signal distribution): ", b+5, 0, 16);
outBit_Sx_NL (v,"(messages/commands): ", b+7, 0, 8);
pil = getBits (b, 8, 2, 20);
npp_0_1 = getBits (b, 8, 0, 2);
day = getBits (b, 8, 2, 5);
month = getBits (b, 8, 7, 4);
hour = getBits (b, 8, 11, 5);
minute = getBits (b, 8, 16, 6);
country_5_8 = getBits (b, 8, 22, 4);
npp_2_7 = getBits (b, 8, 26, 6);
pty = getBits (b, 8, 32, 8); // byte 15
out_SB_NL (v,"NPP_1: ", npp_0_1);
out_ST (v,"Program Identificaion Label (PIL): ", pil);
if (day != 0x00) {
out_nl (v," [= month=%d day=%d hour=%d min=%d]",
month, day, hour, minute);
} else {
char *s;
switch (pil) {
case 0x07FFF: s = "Timer-control code (TC)"; break;
case 0x07FBF: s = "Record inhibit/Terminate (RI/T)"; break;
case 0x07F7F: s = "Interrruption code (INT)"; break;
case 0x07F3F: s = "Continuation code"; break;
case 0xFFFFF: s = "Program selected by PTY"; break;
default: s = "UNKOWN code"; break;
}
out_nl (v," [= %s]",s);
}
out_S2B_NL (v,"Country: ", country_5_8,
dvbstrVPS_cni_countrycode(1+(country_5_8 << 4)) );
out_SB_NL (v,"NPP_2: ", npp_2_7);
npp = (npp_0_1 << 6) + (npp_2_7); // msb ... lsb
out_S2B_NL (v," ==> Network/Program Provider (NPP): ", npp, dvbstrVPS_npp(npp) );
out_S2B_NL (v,"Program Type (PTY): ", pty, dvbstrVPS_pty(pty) );
indent (-1);
return len;
}
