akc6955.c

   1 /*
   2  * OpenI2CRADIO
   3  * RADIO CHIP AKC6955 Handler
   4  * Copyright (C) 2013-06-10 K.Ohta <whatisthis.sowhat ai gmail.com>
   5  * License: GPL2+LE
   6  *
   7  *  This program is free software; you can redistribute it and/or modify
   8  *  it under the terms of the GNU General Public License as published by
   9  *  the Free Software Foundation; either version 2,
  10  *  or (at your option) any later version.
  11  *  This library / program is distributed in the hope that it will be useful,
  12  *  but WITHOUT ANY WARRANTY; without even the implied warranty of
  13  *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
  14  *  See the GNU General Public License for more details.
  15  *
  16  *  You should have received a copy of the GNU General Public License
  17  *  along with this library; see the file COPYING. If not, write to the
  18  *  Free Software Foundation, 51 Franklin Street, Fifth Floor, Boston,
  19  *  MA 02110-1301, USA.
  20  *
  21  *  As a special exception, if you link this(includeed from sdcc) library
  22  *  with other files, some of which are compiled with SDCC,
  23  *  to produce an executable, this library does not by itself cause
  24  *  the resulting executable to be covered by the GNU General Public License.
  25  *  This exception does not however invalidate any other reasons why
  26  *  the executable file might be covered by the GNU General Public License.
  27  */
  28
  29 #include <stdarg.h>
  30 #include <stdio.h>
  31 #ifdef __SDCC
  32 #include <delay.h>
  33 #else
  34 #include <xc.h>
  35 #endif
  36 #include <string.h>
  37 #include "akc6955.h"
  38 #include "i2c_io.h"
  39 #include "idle.h"
  40 #include "power.h"
  41 #include "commondef.h"
  42
  43 void akc6955_writecmd(unsigned char reg, unsigned char data)
  44 {
  45 #ifdef __SDCC
  46     i2c_open(I2C_MASTER, I2C_SLEW_ON, 5);
  47     I2C_START();
  48     i2c_writechar(0x20);
  49     i2c_writechar(reg);
  50     i2c_writechar(data);
  51     I2C_STOP();
  52     i2c_close();
  53     delay100tcy(2);
  54 #else
  55     OpenI2C(MASTER, SLEW_OFF);
  56     StartI2C();
  57     WriteI2C(0x20);
  58     //delay1ktcy(8);
  59     WriteI2C(reg);
  60     //delay1ktcy(8);
  61     WriteI2C(data);
  62     //delay1ktcy(8);
  63     StopI2C();
  64  //   delay1ktcy(8);
  65     CloseI2C();
  66 //    CLOSEASMASTER();
  67 #endif  //    i2c_idle();
  68 }
  69
  70 unsigned char akc6955_readcmd(unsigned char reg)
  71 {
  72     unsigned char c;
  73     //    OPENASMASTER();
  74 #ifdef __SDCC
  75     i2c_open(I2C_MASTER, I2C_SLEW_ON, 5);
  76 #else
  77     OpenI2C(MASTER, SLEW_OFF);
  78 #endif
  79 #ifdef __SDCC
  80     I2C_START();
  81     i2c_writechar(0x20);
  82     i2c_writechar(reg);
  83     I2C_STOP();
  84     delay100tcy(2);
  85     I2C_START();
  86     i2c_writechar(0x21);
  87     c = i2c_readchar();
  88     I2C_ACK();
  89     I2C_STOP();
  90     i2c_close();
  91 #else
  92     StartI2C();
  93     WriteI2C(0x20);
  94   //  delay1ktcy(8);
  95     WriteI2C(reg);
  96   //  delay1ktcy(8);
  97     StopI2C();
  98     __delay_us(13);
  99     StartI2C();
 100     WriteI2C(0x21);
 101   //  delay1ktcy(8);
 102     c = ReadI2C();
 103     AckI2C();
 104     StopI2C();
 105  //   delay1ktcy(8);
 106     CloseI2C();
 107 #endif
 108     //    CLOSEASMASTER();
 109
 110     return c;
 111 }
 112
 113 void akc6955_chg_fm(unsigned char f, unsigned int freq)
 114 {
 115     __bitops_t b;
 116     unsigned char c;
 117     b.byte = akc6955_readcmd(AKC6955_POWER);
 118     b.b6 = 0;
 119     if(f != 0){
 120         rfamp_power(RFAMP_FM);
 121         b.b6 = 1;
 122         akc6955_set_fmband(fmband);
 123         akc6955_writecmd(AKC6955_POWER, b.byte);
 124         akc6955_set_freq(freq);
 125         return;
 126     }
 127     c = RFAMP_SW;
 128     if((amband < AKC6955_BAND_SW1) || (amband == AKC6955_BAND_MW4)) {
 129         c = RFAMP_MWLW;
 130     }
 131     rfamp_power(c);
 132     akc6955_writecmd(AKC6955_POWER, b.byte);
 133     akc6955_set_amband(amband);
 134     akc6955_set_freq(freq);
 135
 136 }
 137
 138 unsigned char akc6955_get_fm(void)
 139 {
 140     __bitops_t b;
 141     b.byte = akc6955_readcmd(AKC6955_POWER);
 142     if(b.b6){
 143         return 0xff;
 144     }
 145     return 0;
 146 }
 147
 148
 149 void akc6955_set_amband(unsigned char band)
 150 {
 151     unsigned char b;
 152     b = akc6955_readcmd(AKC6955_BAND);
 153     b &= 0x07; // extract FM
 154     b = b | ((band & 0x1f) << 3);
 155     akc6955_writecmd(AKC6955_BAND, b);
 156     akc6955_do_tune();
 157 }
 158
 159 void akc6955_set_fmband(unsigned char band)
 160 {
 161     unsigned char b;
 162     b = akc6955_readcmd(AKC6955_BAND);
 163     b &= 0xf8; // extract AM
 164     b = b | (band & 0x07);
 165     akc6955_writecmd(AKC6955_BAND, b);
 166     akc6955_do_tune();
 167 }
 168
 169 unsigned char akc6955_get_band(void)
 170 {
 171     return akc6955_readcmd(AKC6955_BAND);
 172 }
 173
 174
 175 void akc6955_set_power(unsigned char on)
 176 {
 177     __bitops_t b;
 178     b.byte = akc6955_readcmd(AKC6955_POWER);
 179     b.b7 = 0;
 180     if(on != 0){
 181         b.b7 = 1;
 182     }
 183     akc6955_writecmd(AKC6955_POWER, b.byte);
 184 }
 185
 186 void akc6955_do_tune(void)
 187 {
 188     __bitops_t b;
 189     b.byte = akc6955_readcmd(AKC6955_POWER);
 190     b.b5 = 0; // Tun = '0'
 191     b.b4 = 0; // Force abort scan.
 192     akc6955_writecmd(AKC6955_POWER, b.byte);
 193     idle_time_ms(1);
 194     // Need sleep?-> Need! this sequence re                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                 fer from reference code.
 195     b.b5= 1; // Tun = '1'
 196     akc6955_writecmd(AKC6955_POWER, b.byte);
 197     idle_time_ms(1);
 198     b.b5 = 0;
 199     akc6955_writecmd(AKC6955_POWER, b.byte);
 200     idle_time_ms(8);
 201 }
 202
 203 unsigned char akc6955_tune(void)
 204 {
 205     __bitops_t b;
 206     b.byte = akc6955_readcmd(AKC6955_RCH_HI);
 207     if(b.b5) {
 208         return 0xff;
 209     }
 210     return 0;
 211 }
 212
 213
 214 void akc6955_mode3k(unsigned char flag)
 215 {
 216     __bitops_t b;
 217     b.byte = akc6955_readcmd(AKC6955_CH_HI);
 218     b.b5 = 0;
 219     if(flag != 0){
 220         b.b5 = 1;
 221     }
 222     akc6955_writecmd(AKC6955_CH_HI, b.byte);
 223     akc6955_do_tune();
 224     _AKC6955_WAIT_62_5MS();
 225 }
 226
 227 void akc6955_set_tune(unsigned char mode_3k, unsigned int ch)
 228 {
 229     unsigned char band;
 230     __bitops_t f;
 231     __bitops_t b;
 232     unsigned int i = ch;
 233     unsigned char comp;
 234
 235     do { // Wait for before completed
 236         comp = akc6955_chk_donescan();
 237         idle_time_35ms();
 238     } while(comp == 0x00);
 239     f.byte = akc6955_readcmd(AKC6955_POWER);
 240     band = 0;
 241     if(f.b6 == 0){
 242         akc6955_get_amband(band);
 243     }
 244
 245     if(band == AKC6955_BAND_MW2){
 246         // BAND=AM && MW2
 247         i = ch / 3; // On MW2, Channnel must be multiple of 3.
 248         i = i * 3; // i = (i/3) * 3
 249     }
 250     if(i > 0x1fff) i = 0x1fff;
 251     //i = ch & 0x1fff;
 252
 253     b.byte = i & 0xff;
 254     akc6955_writecmd(AKC6955_CH_LO, b.byte);
 255
 256     b.byte = i >> 8;
 257     b.b6 = 1;
 258     if(mode_3k != 0){
 259         b.b5 = 1; // Mode 3K ON
 260     }
 261     akc6955_writecmd(AKC6955_CH_HI, b.byte);
 262
 263     akc6955_do_tune();
 264 }
 265
 266 void akc6955_do_scan(unsigned char up)
 267 {
 268     __bitops_t b;
 269  //   akc6955_do_tune();
 270     b.byte = akc6955_readcmd(AKC6955_POWER);
 271     b.b3 = 0;
 272     b.b4 = 0;
 273     b.b5 = 0;
 274     akc6955_writecmd(AKC6955_POWER, b.byte);
 275     b.b5 = 1; // Tune 0->1.
 276     idle_time_35ms();
 277     akc6955_writecmd(AKC6955_POWER, b.byte);
 278     idle_time_35ms();
 279     if(up != 0) {
 280         b.b3= 1;
 281     }
 282     b.b4 = 1;
 283     akc6955_writecmd(AKC6955_POWER, b.byte); // Raise seek bit to '1'.
 284 }
 285
 286 void akc6955_abort_scan(void)
 287 {
 288     unsigned char b;
 289     b = akc6955_readcmd(AKC6955_POWER);
 290     b &= 0xef;
 291     akc6955_writecmd(AKC6955_POWER, b); // Falldown seek bit to '0'.
 292 }
 293
 294 void akc6955_set_scanrate_fm(unsigned char rate)
 295 {
 296     unsigned char c;
 297     c = akc6955_readcmd(AKC6955_SPACE);
 298     c = (c & 0xcf) | ((rate & 0x03) << 4);
 299     akc6955_writecmd(AKC6955_SPACE, c);
 300 }
 301
 302 unsigned char akc6955_chk_donescan(void)
 303 {
 304     __bitops_t b;
 305     b.byte = akc6955_readcmd(AKC6955_RCH_HI);
 306     if(b.b6){
 307         return 0xff;
 308     }
 309     return 0;
 310 }
 311
 312 unsigned int akc6955_get_channel(void)
 313 {
 314     unsigned char h, l;
 315     unsigned int u;
 316     l = akc6955_readcmd(AKC6955_RCH_LO) ;
 317     h = akc6955_readcmd(AKC6955_RCH_HI) & 0x1f;
 318     u = (h << 8) | l;
 319     return u;
 320 }
 321
 322 /*
 323  * Get AM/FM Frequency: ret = KHz at AM, 10KHz @FM.
 324  */
 325 unsigned int akc6955_get_freq(void)
 326 {
 327     __bitops_t f, b;
 328     unsigned int i;
 329     unsigned int freq;
 330     unsigned char band;
 331
 332     f.byte = akc6955_readcmd(AKC6955_POWER);
 333     i = akc6955_get_channel();
 334     if(f.b6){ // 25KHz
 335         freq = (i * 5) / 2 + 3000; // freq' = 25*i[KHz] = (25 / 10) *i [10KHz]
 336     } else { // 5K
 337        b.byte = akc6955_readcmd(AKC6955_CH_HI);
 338        akc6955_get_amband(band);
 339        freq = i * 5;
 340        if((band == AKC6955_BAND_MW2) || (b.b5)){
 341            freq = i * 3;
 342        }
 343     }
 344     return freq;
 345 }
 346
 347 void akc6955_set_freq(unsigned int freq)
 348 {
 349     unsigned int ch;
 350     __bitops_t f;
 351     __bitops_t mode3k;
 352     unsigned char band;
 353
 354     f.byte = akc6955_readcmd(AKC6955_POWER);
 355     if(f.b6) { // FM
 356         akc6955_get_fmband(band);
 357 //        band &= 7;
 358         if(freq <  fmbands[band].start) freq = fmbands[band].start;
 359         if(freq >= fmbands[band].end)   freq = fmbands[band].end - 1;
 360         ch = freq - 3000;
 361         ch = (ch * 4) / 10;
 362     } else {
 363         akc6955_get_amband(band);
 364 //        if(band >= AKC6955_BAND_AMEND) band = AKC6955_BAND_AMEND - 1;
 365         if(freq <  ambands[band].start) freq = ambands[band].start;
 366         if(freq >= ambands[band].end)   freq = ambands[band].end - 1;
 367         mode3k.byte = akc6955_readcmd(AKC6955_CNR_AM);
 368         if(band == AKC6955_BAND_MW2) {
 369             ch = (freq / 9) * 3; // See datasheet.
 370         } else if(band == AKC6955_BAND_MW3) {
 371             ch = freq / 5;
 372         } else  if(mode3k.b7){
 373             ch = freq / 3;
 374         } else {
 375             ch = freq / 5;
 376         }
 377     }
 378     akc6955_set_tune(mode3k.b7, ch);
 379 }
 380
 381 void akc6955_set_userband(unsigned char start, unsigned char stop, unsigned int ch, unsigned char mode3k)
 382 {
 383     __bitops_t f;
 384
 385     f.byte = akc6955_readcmd(AKC6955_POWER);
 386     akc6955_writecmd(AKC6955_UCH_ST, start);
 387     akc6955_writecmd(AKC6955_UCH_EN, stop);
 388     if(f.b6){
 389         akc6955_set_fmband(AKC6955_BAND_FMUSER);
 390     } else {
 391         akc6955_set_amband(AKC6955_BAND_AMUSER);
 392     }
 393     akc6955_set_tune(mode3k, ch);
 394 }
 395
 396
 397 unsigned char akc6955_get_cnr(void)
 398 {
 399     __bitops_t f;
 400     __bitops_t b;
 401     f.byte = akc6955_readcmd(AKC6955_POWER);
 402     if(f.b6) { // FM
 403         b.byte = akc6955_readcmd(AKC6955_CNR_FM);
 404     } else { // AM
 405         b.byte = akc6955_readcmd(AKC6955_CNR_AM);
 406     }
 407     b.b7 = 0;
 408     return b.byte;
 409 }
 410
 411 int akc6955_read_level(void)
 412 {
 413     __bitops_t f;
 414     unsigned char rflevel, iflevel;
 415     unsigned char b;
 416     int rssi;
 417     unsigned int freq;
 418     int totallevel;
 419     int level;
 420
 421     f.byte = akc6955_readcmd(AKC6955_POWER);
 422     b =  akc6955_readcmd(AKC6955_PGALEVEL);
 423     rflevel = (b & 0xe0) >> 5;
 424     iflevel = (b & 0x1c) >> 2;
 425     totallevel = rflevel + iflevel;
 426
 427     rssi = (int)(akc6955_readcmd(AKC6955_RSSI) & 0x7f);
 428     // totallevel = rssi + 6*totallevel;
 429     level = (int)(totallevel * 6 + rssi);
 430     if(f.b6){
 431         level = 103 - level; // totallevel * 6
 432     } else {
 433         freq = akc6955_get_freq();
 434         if(freq > 2560) { // ASSUME SW
 435             level = 103 - level;
 436         } else { // ASSUME MW,LW
 437             level = 123 - level;
 438         }
 439     }
 440     return level;
 441 }
 442
 443
 444 // Get diff. unit = 100Hz.
 445 int akc6955_get_diff(void)
 446 {
 447     __bitops_t diff;
 448     __bitops_t f;
 449     int n;
 450
 451     diff.byte = akc6955_readcmd(AKC6955_FDNUM);
 452     if(diff.b7) {
 453         diff.b7 = 0;
 454         n = -((int) diff.byte);
 455     } else {
 456         diff.b7 = 0;
 457         n = (int)diff.byte;
 458     }
 459
 460     f.byte = akc6955_readcmd(AKC6955_POWER);
 461     if(f.b6) { // FM
 462         return n * 10;
 463     }
 464     return n; // 10n
 465 }
 466
 467 void akc6955_up_freq(unsigned int step)
 468 {
 469     unsigned int freq;
 470     __bitops_t mode3k;
 471
 472     freq = akc6955_get_channel();
 473     freq += step;
 474     mode3k.byte = akc6955_readcmd(AKC6955_CNR_AM);
 475     akc6955_set_tune(mode3k.b7, freq);
 476 }
 477
 478
 479 void akc6955_down_freq(unsigned int step)
 480 {
 481     unsigned int freq;
 482     __bitops_t mode3k;
 483
 484     freq = akc6955_get_channel();
 485     if(freq <= step) return;
 486     freq -= step;
 487     mode3k.byte = akc6955_readcmd(AKC6955_CNR_AM);
 488     akc6955_set_tune(mode3k.b7, freq);
 489 }
 490
 491 void akc6955_setvolumemode(unsigned char flag)
 492 {
 493     __bitops_t c;
 494     c.byte = akc6955_readcmd(AKC6955_ENABLE);
 495     c.b3 = 0;
 496     if(flag != 0x00){
 497         c.b3 = 1;
 498     }
 499     akc6955_writecmd(AKC6955_ENABLE, c.byte);
 500 }
 501
 502 unsigned char akc6955_getvolumemode(void)
 503 {
 504     __bitops_t c;
 505     c.byte = akc6955_readcmd(AKC6955_ENABLE);
 506     if(c.b3){
 507         return 0xff;
 508     }
 509     return 0;
 510 }
 511
 512 void akc6955_setvolume(unsigned char level)
 513 {
 514 //    unsigned char c;
 515 //    c = akc6955_readcmd(AKC6955_VOLUME) & 0x03;
 516     if(level > 63) level = 63;
 517     akc6955_writecmd(AKC6955_VOLUME, ((akc6955_readcmd(AKC6955_VOLUME) & 0x03) | (level << 2)));
 518 }
 519
 520 unsigned char akc6955_getvolume(void)
 521 {
 522     unsigned char c;
 523     c = akc6955_readcmd(AKC6955_VOLUME) >> 2;
 524     return c;
 525 }
 526
 527 void akc6955_set_prevolume(unsigned char level)
 528 {
 529     unsigned char c;
 530     c = akc6955_readcmd(AKC6955_PRE) & 0xf3;
 531     c |= ((level & 0x03) << 2);
 532     akc6955_writecmd(AKC6955_PRE, c);
 533 }
 534
 535 unsigned char akc6955_get_prevolume(void)
 536 {
 537     unsigned char c;
 538     c = akc6955_readcmd(AKC6955_PRE) & 0x0c;
 539     c >>= 2;
 540     return c;
 541 }
 542
 543
 544 void akc6955_setphase(unsigned char flag)
 545 {
 546     __bitops_t c;
 547     c.byte = akc6955_readcmd(AKC6955_VOLUME);
 548
 549     c.b0 = 0;
 550     if(flag != 0) {
 551         c.b0 = 1; //
 552     }
 553     akc6955_writecmd(AKC6955_VOLUME, c.byte);
 554 }
 555
 556 void akc6955_setline(unsigned char flag)
 557 {
 558     __bitops_t c;
 559     c.byte = akc6955_readcmd(AKC6955_VOLUME);
 560     c.b1 = 0;
 561     if(flag != 0) {
 562         c.b1 = 1;
 563     }
 564     akc6955_writecmd(AKC6955_VOLUME, c.byte);
 565 }
 566
 567 void akc6955_set_lowboost(unsigned char flag)
 568 {
 569     __bitops_t c;
 570     c.byte = akc6955_readcmd(AKC6955_STEREO);
 571     c.b3 = 0;
 572     if(flag != 0) {
 573         c.b3 = 1;
 574     }
 575     akc6955_writecmd(AKC6955_STEREO, c.byte);
 576 }
 577
 578 void akc6955_set_stereomode(unsigned char mode)
 579 {
 580     unsigned char c;
 581     c = akc6955_readcmd(AKC6955_STEREO);
 582     mode = (mode & 0x03) << 2;
 583     c = (c & 0xf3) | mode;
 584     akc6955_writecmd(AKC6955_STEREO, c);
 585 }
 586
 587 unsigned char akc6955_get_stereo(void)
 588 {
 589     unsigned char c;
 590     c = akc6955_readcmd(AKC6955_RCH_HI) & 0x80;
 591     return c;
 592 }
 593
 594 /*
 595  * Get battery level.
 596  * Unit = 0.01V
 597  */
 598
 599 unsigned int akc6955_get_battery(void)
 600 {
 601     unsigned int batt;
 602     unsigned char c;
 603     c = akc6955_readcmd(AKC6955_VBAT) & 0x3f;
 604     batt = 180 + c * 5;
 605     return batt;
 606 }
 607