decoder/rds.c

   1 /*
   2  * Copyright (C) 2009, 2010 by Nils Faerber <nils.faerber@kernelconcepts.de>
   3  *
   4  * This program is free software; you can redistribute it and/or
   5  * modify it under the terms of the GNU General Public License
   6  * as published by the Free Software Foundation; either version
   7  * 2 of the License, or (at your option) any later version.
   8  *
   9  */
  10
  11 #include <stdio.h>
  12 #include <string.h>
  13 #include <stdlib.h>
  14 #include <time.h>
  15 #include <unistd.h>
  16 #include <sys/stat.h>
  17 #include <fcntl.h>
  18 #include <limits.h>
  19
  20 #include <sqlite3.h>
  21
  22 #include "rds.h"
  23 #include "rds_consts.h"
  24 #include "tmc.h"
  25
  26 //#define DEBUG 1
  27
  28
  29 static struct rds_info_s rds_info;
  30 static struct tm rds_time;
  31
  32 static struct _RDS_Private {
  33         void (*rds_PI_cb)(unsigned short PI, unsigned char ccode, unsigned char ptype, unsigned char pref, void *user_data);
  34         void *rds_PI_cb_data;
  35         void (*rds_sname_cb)(char *sname, void *user_data);
  36         void *rds_sname_cb_data;
  37         void (*rds_sinfo_cb)(unsigned char TP, unsigned char TA, unsigned char MS, unsigned char PTY, void *user_data);
  38         void *rds_sinfo_cb_data;
  39         void (*rds_radiotext_cb)(char *radio_text, void *user_data);
  40         void *rds_radiotext_cb_data;
  41         void (*rds_date_time_cb)(struct tm *dtime, void *user_data);
  42         void *rds_date_time_cb_data;
  43         void (*rds_afinfo_cb)(unsigned char cnt, double *AF, void *user_data);
  44         void *rds_afinfo_cb_data;
  45 } _rds_private;
  46
  47 void rds_init(void) {
  48         memset(&_rds_private, 0, sizeof(struct _RDS_Private));
  49 }
  50
  51 void rds_set_PI_cb(void (*rds_PI_cb)(unsigned short PI, unsigned char ccode, unsigned char ptype, unsigned char pref, void *user_data), void *user_data)
  52 {
  53         _rds_private.rds_PI_cb = rds_PI_cb;
  54         _rds_private.rds_PI_cb_data = user_data;
  55 }
  56
  57 void rds_set_sname_cb(void (*rds_sname_cb)(char *sname, void *user_data), void *user_data)
  58 {
  59         _rds_private.rds_sname_cb = rds_sname_cb;
  60         _rds_private.rds_sname_cb_data = user_data;
  61 }
  62
  63 void rds_set_sinfo_cb(void (*rds_sinfo_cb)(unsigned char TP, unsigned char TA, unsigned char MS, unsigned char PTY, void *user_data), void *user_data)
  64 {
  65         _rds_private.rds_sinfo_cb = rds_sinfo_cb;
  66         _rds_private.rds_sinfo_cb_data = user_data;
  67 }
  68
  69 void rds_set_afinfo_cb(void (*rds_afinfo_cb)(unsigned char cnt, double *AF, void *user_data), void *user_data)
  70 {
  71         _rds_private.rds_afinfo_cb = rds_afinfo_cb;
  72         _rds_private.rds_afinfo_cb_data = user_data;
  73 }
  74
  75 void rds_set_radiotext_cb(void (*rds_radiotext_cb)(char *radio_text, void *user_data), void *user_data)
  76 {
  77         _rds_private.rds_radiotext_cb = rds_radiotext_cb;
  78         _rds_private.rds_radiotext_cb_data = user_data;
  79 }
  80
  81 void rds_set_date_time_cb(void (*rds_date_time_cb)(struct tm *dtime, void *user_data), void *user_data)
  82 {
  83         _rds_private.rds_date_time_cb = rds_date_time_cb;
  84         _rds_private.rds_date_time_cb_data = user_data;
  85 }
  86
  87
  88 int rds_receive_group(int rds_fd, unsigned short *rdsgroup)
  89 {
  90 static unsigned char expected = 0;
  91 int rb;
  92 unsigned char rbuf[3];
  93 unsigned short block;
  94 unsigned char offset;
  95
  96         rb = read(rds_fd, rbuf, 3);
  97         if (rb <= 0)
  98                 return 0;
  99         if (rb != 3) {
 100                 printf("#read err rb=%d\n", rb);
 101                 return 0;
 102         }
 103         block = rbuf[0] | (rbuf[1] << 8);
 104         offset = rbuf[2] & 0x07;
 105
 106         if (rbuf[2] & 0x80) {
 107                 if (OutputFlags & RDS_RECEIVE_INDICATOR)
 108                         printf("E");
 109         } else {
 110                 // printf("group block=0x%04x offs=0x%02x\n", block, offset);
 111                 if (offset != expected) {
 112                         if (OutputFlags & RDS_RECEIVE_INDICATOR)
 113                                 printf("block out of sync - resetting\n");
 114                         expected = 0;
 115                         memset(rdsgroup, 0, sizeof(rdsgroup));
 116                 } else {
 117                         rdsgroup[offset] = block;
 118                         expected++;
 119                         if (expected >= 4) {
 120                                 expected = 0;
 121                                 if (OutputFlags & RDS_RECEIVE_INDICATOR)
 122                                         printf(".\n");
 123                                 return 1;
 124                         }
 125                 }
 126         }
 127         if (OutputFlags & RDS_RECEIVE_INDICATOR)
 128                 printf(".");
 129
 130         return 0;
 131 }
 132
 133
 134 enum RDSGroupType { GROUP_0A=0, GROUP_0B, GROUP_1A, GROUP_1B, GROUP_2A, GROUP_2B,
 135                     GROUP_3A, GROUP_3B, GROUP_4A, GROUP_4B, GROUP_5A, GROUP_5B,
 136                     GROUP_6A, GROUP_6B, GROUP_7A, GROUP_7B, GROUP_8A, GROUP_8B,
 137                     GROUP_9A, GROUP_9B, GROUP_10A, GROUP_10B, GROUP_11A, GROUP_11B,
 138                     GROUP_12A, GROUP_12B, GROUP_13A, GROUP_13B, GROUP_14A, GROUP_14B,
 139                     GROUP_15A, GROUP_15B, GROUP_UNKNOWN };
 140
 141 void rds_decode_group(unsigned short *rdsgroup)
 142 {
 143 static unsigned short ogrp[4];
 144 static unsigned char grp_decoded = 0;
 145 unsigned char grp_type = (rdsgroup[1] >> 11);
 146 unsigned char offs;
 147 static unsigned char otextAB = 0, newtext = 0;
 148 unsigned short PI = rdsgroup[0];
 149 unsigned char textAB = 0;
 150 int local_time_off = 0;
 151 int day_code = 0;
 152 int year_, mon_, K;
 153
 154         /* we want to wait for at least two identical group transmits */
 155         if (ogrp[0] != rdsgroup[0] || ogrp[1] != rdsgroup[1] || ogrp[2] != rdsgroup[2] || ogrp[3] != rdsgroup[3]) {
 156                 ogrp[0] = rdsgroup[0];
 157                 ogrp[1] = rdsgroup[1];
 158                 ogrp[2] = rdsgroup[2];
 159                 ogrp[3] = rdsgroup[3];
 160                 //printf("grp: 0x%04x 0x%04x 0x%04x 0x%04x\n", rdsgroup[0], rdsgroup[1], rdsgroup[2], rdsgroup[3]);
 161                 grp_decoded = 0;
 162                 return;
 163         }
 164         if (grp_decoded)
 165                 return;
 166
 167         if (rds_info.PI != PI) {
 168                 /* station change? */
 169                 memset(&rds_info, 0, sizeof(rds_info));
 170                 rds_info.LTN = -1;
 171                 memset(&rds_time, 0, sizeof(rds_time));
 172                 rds_info.ccode = (PI & 0xf000) >> 12;
 173                 rds_info.ptype = (PI & 0x0f00) >> 8;
 174                 rds_info.pref = (PI & 0x00ff);
 175                 if (rds_info.pref == 0) /* something is wrong here */
 176                         return;
 177                 rds_info.PI = rdsgroup[0];
 178                 if (_rds_private.rds_PI_cb != NULL)
 179                         _rds_private.rds_PI_cb(rds_info.PI, rds_info.ccode, rds_info.ptype, rds_info.pref, _rds_private.rds_PI_cb_data);
 180                 if (OutputFlags & RDS_OUTPUT_RDSINFO)
 181                         printf("PI=%d ccode=%X ptype=%X '%s' '%s' pref=%d\n", rds_info.PI, rds_info.ccode, rds_info.ptype, ptype_stext[rds_info.ptype], ptype_ltext[rds_info.ptype], rds_info.pref);
 182         }
 183
 184         switch (grp_type) {
 185                 case GROUP_0A: { /* basic switching and tuning */
 186                         unsigned char AFc1, AFc2;
 187                         float AF1=0, AF2=0;
 188
 189                         offs = (rdsgroup[1] & 0x03);
 190                         rds_info.sname[offs*2] = ((rdsgroup[3] & 0xff00) >> 8);
 191                         rds_info.sname[(offs*2)+1] = rdsgroup[3] & 0x00ff;
 192                         if (_rds_private.rds_sname_cb != NULL)
 193                                 _rds_private.rds_sname_cb(rds_info.sname, _rds_private.rds_sname_cb_data);
 194
 195                         rds_info.TA = (rdsgroup[1] & 0x10) >> 4;
 196                         rds_info.TP = (rdsgroup[1] & 0x400) >> 10;
 197                         rds_info.MS = (rdsgroup[1] & 0x08) >> 3;
 198                         rds_info.PTY = (rdsgroup[1] & 0x3e0) >> 5;
 199                         if (_rds_private.rds_sinfo_cb != NULL)
 200                                 _rds_private.rds_sinfo_cb(rds_info.TP, rds_info.TA, rds_info.MS, rds_info.PTY, _rds_private.rds_sinfo_cb_data);
 201
 202                         AFc1 = ((rdsgroup[2] & 0xff00) >> 8);
 203                         AFc2 = (rdsgroup[2] & 0x00ff);
 204                         if (AFc1 > 225 && AFc1 < 250) {
 205                                 if (OutputFlags & RDS_OUTPUT_STATION_ID)
 206                                         printf(" %d AFs follow:\n", AFc1-224);
 207                         } else if (AFc1 > 0 && AFc1 < 205)
 208                                 AF1 = (float)87.5 + ((float)AFc1 * .1);
 209                         else if (AFc1 == 205)
 210                                 printf(" filler- \n");
 211                         if (AFc2 > 0 && AFc2 < 205)
 212                                 AF2 = (float)87.5 + ((float)AFc2 * .1);
 213
 214                         if (OutputFlags & RDS_OUTPUT_STATION_ID)
 215                                 printf("sname = '%s' %s %s %s AF1=%3.2f AF2=%3.2f PTY='%s'\n",  rds_info.sname, rds_info.TP ? "TP" : "", rds_info.TA ? "TA" : "", rds_info.MS ? "M" : "S", AF1, AF2, PTY_text[rds_info.PTY]);
 216                         }
 217                         break;
 218                 case GROUP_0B:
 219                         if (OutputFlags & RDS_OUTPUT_UNKNGRP)
 220                                 printf("group 0B\n");
 221                         break;
 222                 case GROUP_1A: { /* Programme Item Number and slow labelling codes */
 223                         unsigned char variant, day, hour, minute;
 224                         unsigned short tmc_id;
 225
 226                         variant = (rdsgroup[2] & (0x07 << 12)) >> 12;
 227                         day = (rdsgroup[3] & (0x1f << 11)) >> 11;
 228                         hour = (rdsgroup[3] & (0x1f << 6)) >> 6;
 229                         minute = (rdsgroup[3] & 0x3f);
 230                         if (OutputFlags & RDS_OUTPUT_UNKNGRP)
 231                                 printf("1A var=%d day=%d %d:%d ", variant, day, hour, minute);
 232                         if (variant == 0) {
 233                                 rds_info.ECC = (rdsgroup[2] & 0xff);
 234                                 printf(" ccode=%d ECC=0x%02x '%s' ", rds_info.ccode, rds_info.ECC, ECC_text[((rds_info.ECC & 0x0f)*16)+(rds_info.ccode-1)]);
 235                         }
 236                         if (variant == 1) {
 237                                 tmc_id = (rdsgroup[2] & 0x0fff);
 238                                 printf(" TMC ID=0x%04x", tmc_id);
 239                         }
 240                         if (variant == 2) {
 241                                 printf(" Paging ID=0x%04x", (rdsgroup[2] & 0x0fff));
 242                         }
 243                         if (variant == 3) {
 244                                 rds_info.lang_code = (rdsgroup[2] & 0xff);
 245                                 printf(" language=0x%02x ", rds_info.lang_code);
 246                                 switch (rds_info.lang_code) {
 247                                         case 0x03:
 248                                                 printf("Catalan ");
 249                                                 break;
 250                                         case 0x08:
 251                                                 printf("German ");
 252                                                 break;
 253                                         case 0x0a:
 254                                                 printf("Spanish ");
 255                                                 break;
 256                                         case 0x15:
 257                                                 printf("Italian ");
 258                                                 break;
 259                                         case 0x18:
 260                                                 printf("Latvian ");
 261                                                 break;
 262                                         case 0x1d:
 263                                                 printf("Dutch ");
 264                                                 break;
 265                                         case 0x27:
 266                                                 printf("Finnish ");
 267                                                 break;
 268                                         default:
 269                                                 printf("unknown ");
 270                                                 break;
 271                                 };
 272                         }
 273                         if (variant == 7) {
 274                                 printf(" EWS Channel ID=0x%04x", (rdsgroup[2] & 0x0fff));
 275                         }
 276                         printf("\n");
 277                         } break;
 278                 case GROUP_1B:
 279                         if (OutputFlags & RDS_OUTPUT_UNKNGRP)
 280                                 printf("group 1B\n");
 281                         break;
 282                 case GROUP_2A: /* 2A has 64 chars, 4 per group */
 283                 case GROUP_2B: /* 2B has 32 chars, 2 per group */
 284                         offs = (rdsgroup[1] & 0x0f);
 285                         textAB = (rdsgroup[1] & 0x10);
 286                         if (textAB != otextAB) {
 287                                 memset(rds_info.rtext, ' ', 64);
 288                                 rds_info.rtext[64] = '\0';
 289                         }
 290                         otextAB = textAB;
 291                         if (grp_type == GROUP_2A) {
 292                                 rds_info.rtext[offs*4] = ((rdsgroup[2] & 0xff00) >> 8);
 293                                 rds_info.rtext[(offs*4)+1] = (rdsgroup[2] & 0x00ff);
 294                                 rds_info.rtext[(offs*4)+2] = ((rdsgroup[3] & 0xff00) >> 8);
 295                                 rds_info.rtext[(offs*4)+3] = (rdsgroup[3] & 0x00ff);
 296                         } else {
 297                                 rds_info.rtext[offs*2] = ((rdsgroup[3] & 0xff00) >> 8);
 298                                 rds_info.rtext[(offs*2)+1] = (rdsgroup[3] & 0x00ff);
 299                         }
 300                         if (offs == 0) /* new text always starts at 0 */
 301                                 newtext = 1;
 302                         if ((offs == 15)) { /* all parts received */
 303                                 if (newtext == 1) {
 304                                         if (_rds_private.rds_radiotext_cb != NULL)
 305                                                 _rds_private.rds_radiotext_cb(rds_info.rtext, _rds_private.rds_radiotext_cb_data);
 306                                         if (OutputFlags & RDS_OUTPUT_RADIO_TEXT)
 307                                                 printf("RT '%s'\n", rds_info.rtext);
 308                                         newtext = 0;
 309                                 }
 310                         }
 311                         break;
 312                 case GROUP_3A: /* ODA - TMC alarm, */
 313                         rds_info.AID = rdsgroup[3];
 314                         /* TMC AID */
 315                         if (rds_info.AID == 0xcd46 || rds_info.AID == 0x0d45) {
 316                                 if ((rdsgroup[2] & 0xc000) == 0) {
 317                                         rds_info.LTN = (rdsgroup[2] & 0x0fc0) >> 6;
 318                                         rds_info.AFI = (rdsgroup[2] & 0x0020) >> 5;
 319                                         rds_info.M = (rdsgroup[2] & 0x0010) >> 4;
 320                                         rds_info.I = (rdsgroup[2] & 0x0008) >> 3;
 321                                         rds_info.N = (rdsgroup[2] & 0x0004) >> 2;
 322                                         rds_info.R = (rdsgroup[2] & 0x0002) >> 1;
 323                                         rds_info.U = (rdsgroup[2] & 0x0001);
 324                                 }
 325                                 if (rdsgroup[2] & 0x4000) {
 326                                         /* SID */
 327                                         if (rds_info.M) {
 328                                                 rds_info.G = (rdsgroup[2] & 0x3000) >> 12;
 329                                                 rds_info.Ta = (rdsgroup[2] & 0x0030) >> 4;
 330                                                 rds_info.Tw = (rdsgroup[2] & 0x000c) >> 2;
 331                                                 rds_info.Td = (rdsgroup[2] & 0x0003);
 332                                         } else {
 333                                         }
 334                                 }
 335                                 if (OutputFlags & RDS_OUTPUT_RDSINFO) {
 336                                         printf("AID = 0x%04x\n", rds_info.AID);
 337                                         printf("LTN ID = %d (0x%02x)\n", rds_info.LTN, rds_info.LTN);
 338                                         printf("Traffic information: ");
 339                                         if (rds_info.I)
 340                                                 printf("international ");
 341                                         if (rds_info.N)
 342                                                 printf("national ");
 343                                         if (rds_info.R)
 344                                                 printf("regional ");
 345                                         if (rds_info.U)
 346                                                 printf("urban ");
 347                                         printf("\n");
 348                                 }
 349                         } else if (rds_info.AID == 0x4bd7) {
 350                                 if (OutputFlags & RDS_OUTPUT_RDSINFO) {
 351                                         printf("RT+\nG2 = 0x%04x\n", rdsgroup[2]);
 352                                         printf("template = 0x%02x\n", (rdsgroup[2] & 0x00ff));
 353                                         printf("SCB = 0x%02x\n", (rdsgroup[2] & 0x0f00)>>8);
 354                                         printf("CB = 0x%02x\n", (rdsgroup[2] & 0x1000)>>12);
 355                                         printf("rfu = 0x%02x\n", (rdsgroup[2] & 0xe000)>>13);
 356                                 }
 357                         } else {
 358                                 printf("3A AID=0x%04x\n", rds_info.AID);
 359                         }
 360                         break;
 361                 case GROUP_3B:
 362                         if (OutputFlags & RDS_OUTPUT_UNKNGRP)
 363                                 printf("group 3B\n");
 364                         break;
 365                 case GROUP_4A:
 366                         //printf("group 4A - time/date\n");
 367                         rds_time.tm_sec = 0; // date/time message is sent at 00 secs +/- .2sec
 368                         rds_time.tm_min = ((rdsgroup[3] & (0x3f << 6)) >> 6);
 369                         rds_time.tm_hour = ((rdsgroup[3] & (0x0f << 12)) >> 12) | ((rdsgroup[2] & 0x01) << 4);
 370                         local_time_off = (rdsgroup[3] & 0x0f) * ((rdsgroup[3] & 0x10) ? -1 : 1);
 371                         rds_time.tm_hour += local_time_off / 2;
 372                         rds_time.tm_min = (rds_time.tm_min + ((local_time_off % 2) * 30)) % 60;
 373
 374                         day_code = (((rdsgroup[2] & 0xfffe) >> 1) | ((rdsgroup[1] & 0x03) << 15)) /*+ local_time_off*/;
 375
 376                         year_ = ((float)day_code - 15078.2) / 365.25;
 377                         mon_ = ((day_code - 14956.1) - (int)(year_ * 365.25)) / 30.6001;
 378                         rds_time.tm_mday = day_code - 14956 - (int)(year_ * 365.25) - (int)(mon_ * 30.6001);
 379                         if (mon_ == 14 || mon_ == 15)
 380                                 K = 1;
 381                         else
 382                                 K = 0;
 383                         rds_time.tm_year = year_ + K;
 384                         rds_time.tm_mon = mon_ - 1 - (K * 12) - 1;
 385
 386                         rds_time.tm_isdst = -1;
 387
 388                         if (_rds_private.rds_date_time_cb != NULL)
 389                                 _rds_private.rds_date_time_cb(&rds_time, _rds_private.rds_date_time_cb_data);
 390
 391                         if (OutputFlags & RDS_OUTPUT_DATETIME)
 392                                 printf("%s", asctime(&rds_time));
 393 #ifdef DEBUG
 394                         printf("%d:%02d - local time offset = %d, %s (dcode = %d)\n", rds_time.tm_hour, rds_time.tm_min, local_time_off, asctime(&rds_time), day_code);
 395 #endif
 396                         //printf("day=%d month=%d year=%d\n", day, mon, year);
 397                         break;
 398                 case GROUP_4B:
 399                         if (OutputFlags & RDS_OUTPUT_UNKNGRP)
 400                                 printf("GRP4B\n");
 401                         break;
 402                 case GROUP_5A:
 403                         if (OutputFlags & RDS_OUTPUT_UNKNGRP)
 404                                 printf("GRP5A\n");
 405                         break;
 406                 case GROUP_5B:
 407                         if (OutputFlags & RDS_OUTPUT_UNKNGRP)
 408                                 printf("GRP5B\n");
 409                         break;
 410                 case GROUP_6A:
 411                         if (OutputFlags & RDS_OUTPUT_UNKNGRP)
 412                                 printf("GRP6A\n");
 413                         break;
 414                 case GROUP_6B:
 415                         if (OutputFlags & RDS_OUTPUT_UNKNGRP)
 416                                 printf("GRP6B\n");
 417                         break;
 418                 case GROUP_7A:
 419                         if (OutputFlags & RDS_OUTPUT_UNKNGRP)
 420                                 printf("GRP7A\n");
 421                         break;
 422                 case GROUP_7B:
 423                         if (OutputFlags & RDS_OUTPUT_UNKNGRP)
 424                                 printf("GRP7B\n");
 425                         break;
 426                 case GROUP_8A:
 427                         if (rds_info.LTN != 0) // non TMCpro
 428                                 decode_tmc(rdsgroup);
 429                         if (rds_info.LTN == 0)
 430                                 printf("TMCpro\n");
 431                         break;
 432                 case GROUP_8B:
 433                         if (OutputFlags & RDS_OUTPUT_UNKNGRP)
 434                                 printf("GRP8B\n");
 435                         break;
 436                 case GROUP_9A:
 437                         if (OutputFlags & RDS_OUTPUT_UNKNGRP)
 438                                 printf("GRP9A\n");
 439                         break;
 440                 case GROUP_9B:
 441                         if (OutputFlags & RDS_OUTPUT_UNKNGRP)
 442                                 printf("GRP9B\n");
 443                         break;
 444                 case GROUP_10A:
 445                         if (OutputFlags & RDS_OUTPUT_UNKNGRP)
 446                                 printf("GRP10A\n");
 447                         break;
 448                 case GROUP_10B:
 449                         if (OutputFlags & RDS_OUTPUT_UNKNGRP)
 450                                 printf("GRP10B\n");
 451                         break;
 452                 case GROUP_11A: /* Open Data Application ODA */
 453                         if (OutputFlags & RDS_OUTPUT_UNKNGRP)
 454                                 printf("GRP11A ODA: #1=0x%02x #2=0x%04x #3=0x%04x\n", rdsgroup[1] & 0x1f, rdsgroup[2], rdsgroup[3]);
 455
 456                         /* we previously got an RT+ identifier, try RT+ decoding */
 457                         if (rds_info.AID == 0x4bd7) {
 458                                 printf("RT+\ntoggle: %s\n", (rdsgroup[1] & 0x10) ? "yes" : "no");
 459                                 printf("item running   : %s\n", (rdsgroup[1] & 0x08) ? "yes" : "no");
 460                                 printf("content type 1 : %d\n", (rdsgroup[1] & 0x07) << 3 | (rdsgroup[2] & 0x0e00) >> 13);
 461                                 printf("start marker 1 : %d\n", (rdsgroup[2] & 0x1f80) >> 7);
 462                                 printf("length marker 1: %d\n", (rdsgroup[2] & 0x007e) >> 1);
 463                                 printf("content type 2 : %d\n", (rdsgroup[1] & 0x01) << 4);
 464                                 printf("start marker 2 : %d\n", (rdsgroup[2] & 0x07e0) >> 5);
 465                                 printf("length marker 2: %d\n", (rdsgroup[2] & 0x001f));
 466                         }
 467                         break;
 468                 case GROUP_11B: /* Open Data Application ODA */
 469                         if (OutputFlags & RDS_OUTPUT_UNKNGRP)
 470                                 printf("GRP11B\n");
 471                         printf("11B ODA: #1=0x%02x PI=0x%04x #3=0x%04x\n", rdsgroup[1] & 0x1f, rdsgroup[2], rdsgroup[3]);
 472                         break;
 473                 case GROUP_12A: /* Open Data Application ODA */
 474                         if (OutputFlags & RDS_OUTPUT_UNKNGRP)
 475                                 printf("GRP12A\n");
 476                         break;
 477                 case GROUP_12B: /* Open Data Application ODA */
 478                         if (OutputFlags & RDS_OUTPUT_UNKNGRP)
 479                                 printf("GRP12B\n");
 480                         break;
 481                 case GROUP_13A: /* Open Data Application ODA or paging */
 482                         if (OutputFlags & RDS_OUTPUT_UNKNGRP)
 483                                 printf("GRP13A\n");
 484                         break;
 485                 case GROUP_13B: /* Open Data Application ODA */
 486                         if (OutputFlags & RDS_OUTPUT_UNKNGRP)
 487                                 printf("GRP13B\n");
 488                         break;
 489                 case GROUP_14A: /* EON */ {
 490                         unsigned char variant = rdsgroup[1] & 0x0f;
 491                         unsigned char AFc1=0, AFc2=0;
 492                         float AF1=0, AF2=0;
 493                         unsigned short PI;
 494
 495                         rds_info.PTY = (rdsgroup[1] & 0x3e0) >> 5;
 496                         rds_info.TPTN = (rdsgroup[1] & 0x400) >> 10;
 497                         rds_info.TPON = (rdsgroup[1] & 0x10) >> 4;
 498                         PI = rdsgroup[3];
 499
 500                         if (variant <= 3) { // PS
 501                                 rds_info.PS[variant*2] = ((rdsgroup[2] & 0xff00) >> 8);
 502                                 rds_info.PS[(variant*2)+1] = (rdsgroup[2] & 0x00ff);
 503                         } else if (variant == 4) {
 504                                 printf("EON variant 4\n");
 505                         } else  if (variant >= 5 && variant <= 8) { // AF - alternate frequency
 506                                 AFc1 = ((rdsgroup[2] & 0xff00) >> 8);
 507                                 AFc2 = (rdsgroup[2] & 0x00ff);
 508                                 if (AFc1 > 0 && AFc1 < 205)
 509                                         AF1 = (float)87.5 + ((float)AFc1 * .1);
 510                                 else if (AFc1 >= 225 && AFc1 <= 249)
 511                                         AF1 = AFc1 - 224;
 512                                 if (AFc2 > 0 && AFc2 < 205)
 513                                         AF2 = (float)87.5 + ((float)AFc2 * .1);
 514                                 else if (AFc2 >= 225 && AFc2 <= 249)
 515                                         AF2 = AFc2 - 224;
 516                         }
 517                         if (OutputFlags & RDS_OUTPUT_EON) {
 518                                 printf("EON var=0x%01x PTY=%d ('%s') PS='%s' AF1=%3.2f (%d) AF2=%3.2f (%d) PI=%d\n", variant, rds_info.PTY, PTY_text[rds_info.PTY], rds_info.PS, AF1, AFc1, AF2, AFc2, PI);
 519                         }
 520                         } break;
 521                 case GROUP_14B: /* Enhanced Other Networks information */
 522                         if (OutputFlags & RDS_OUTPUT_EON)
 523                                 printf("GRP14B: Enhanced Other Networks information\n");
 524                         break;
 525                 case GROUP_15A:
 526                         if (OutputFlags & RDS_OUTPUT_UNKNGRP)
 527                                 printf("GRP15A\n");
 528                         break;
 529                 case GROUP_15B: /* Fast basic tuning and switching information */
 530                         if (OutputFlags & RDS_OUTPUT_UNKNGRP)
 531                                 printf("GRP15B: Fast basic tuning and switching information\n");
 532                         break;
 533                 default:
 534                         if (OutputFlags & RDS_OUTPUT_UNKNGRP)
 535                                 printf("unkn. RDS group %d\n", grp_type);
 536                         break;
 537         }
 538
 539         /* done with this group */
 540         grp_decoded = 1;
 541 }
 542