summaryrefslogtreecommitdiffstats
path: root/apps/plugins/euroconverter.c
diff options
context:
space:
mode:
authorLinus Nielsen Feltzing <linus@haxx.se>2004-07-15 14:02:14 +0000
committerLinus Nielsen Feltzing <linus@haxx.se>2004-07-15 14:02:14 +0000
commit57f698b5e2cdfa79c198baca5a04e3b0a44d9165 (patch)
tree384c656e27b65d5f42c53a217c6b3ab7be6965cf /apps/plugins/euroconverter.c
parentc145dacb90626e8719fadb600958432cfdf80b94 (diff)
downloadrockbox-57f698b5e2cdfa79c198baca5a04e3b0a44d9165.tar.gz
rockbox-57f698b5e2cdfa79c198baca5a04e3b0a44d9165.tar.bz2
rockbox-57f698b5e2cdfa79c198baca5a04e3b0a44d9165.zip
Patch #778688 by Pierre Delore, euroconverter for the Player
git-svn-id: svn://svn.rockbox.org/rockbox/trunk@4886 a1c6a512-1295-4272-9138-f99709370657
Diffstat (limited to 'apps/plugins/euroconverter.c')
-rw-r--r--apps/plugins/euroconverter.c626
1 files changed, 626 insertions, 0 deletions
diff --git a/apps/plugins/euroconverter.c b/apps/plugins/euroconverter.c
new file mode 100644
index 0000000000..e604521034
--- /dev/null
+++ b/apps/plugins/euroconverter.c
@@ -0,0 +1,626 @@
+/***************************************************************************
+ * __________ __ ___.
+ * Open \______ \ ____ ____ | | _\_ |__ _______ ___
+ * Source | _// _ \_/ ___\| |/ /| __ \ / _ \ \/ /
+ * Jukebox | | ( <_> ) \___| < | \_\ ( <_> > < <
+ * Firmware |____|_ /\____/ \___ >__|_ \|___ /\____/__/\_ \
+ * \/ \/ \/ \/ \/
+ * $Id$
+ *
+ * Copyright (C) 2003 Pierre Delore
+ *
+ * All files in this archive are subject to the GNU General Public License.
+ * See the file COPYING in the source tree root for full license agreement.
+ *
+ * This software is distributed on an "AS IS" basis, WITHOUT WARRANTY OF ANY
+ * KIND, either express or implied.
+ *
+ ****************************************************************************/
+#include "plugin.h"
+
+#ifdef HAVE_LCD_CHARCELLS
+
+/* Euro converter for the player */
+/*
+Use:
++ : Digit +1
+- : Digit -1
+PLAY : Next digit
+STOP : Prev digit
+ON : RESET
+ON+PLAY : Swap Euro<>Home
+MENU : Display the Menu
+ Currency -> Allows to choose the currency
+ Exit-> Exit the plugin
+
+Notes:
+I don't use float.
+I use signed long long (64 bits).
+A value have 5 digits after the . (123.45 = 12345000)
+
+To do:
+- The Irish currency needs 6 digits after the . to have sufficient precision on big number
+- Improve the config save format to be like rockbox setting
+ (use of settings_parseline(...) of setting.c ? must be extern and export in the config.h)
+*/
+
+/* Name and path of the config file*/
+#define CFGFILE "/.rockbox/euroconverter.cfg"
+
+/*Pattern for the converter*/
+static unsigned char pattern_euro[]={0x07, 0x08, 0x1E, 0x10, 0x1E, 0x08, 0x07}; /* */
+static unsigned char pattern_home[]={0x04, 0x0A, 0x11, 0x1F, 0x11, 0x11, 0x1F}; /* Home icon*/
+
+/* 1 euro = ... (remenber 5 digits after the .)*/
+static int currency[12]={
+ 655957, /*FRF France*/
+ 195583, /*DEM Germany*/
+ 1376030, /*ATS Austria*/
+ 4033990, /*BEF Belgium*/
+ 16638600, /*ESP Spain*/
+ 594573, /*FIM Finland*/
+ 78756, /*IEP Irland*/
+ 193627000, /*ITL Italy*/
+ 4033990, /*LUF Luxemburg*/
+ 220371, /*NLG Netherlands*/
+ 20048200, /*PTE Portugal*/
+ 34075100, /*GRD Greece*/
+ };
+
+/* Number of digit of the currency (for the display) */
+static int nb_digit[12]={
+ 2, /*FRF France*/
+ 2, /*DEM Germany*/
+ 2, /*ATS Austria*/
+ 2, /*BEF Belgium*/
+ 0, /*ESP Spain*/
+ 2, /*FIM Finland*/
+ 2, /*IEP Irland*/
+ 0, /*ITL Italy*/
+ 2, /*LUF Luxemburg*/
+ 2, /*NLG Netherlands*/
+ 0, /*PTE Portugal*/
+ 0 /*GRD Greece*/
+ };
+
+/* max euro to have home currency */
+static long long max_euro[12]={
+ 99999999000LL, /*FRF France 999 999.99 */
+ 99999999000LL, /*DEM Germany 999 999.99 */
+ 99999999000LL, /*ATS Austria 999 999.99 */
+ 99999999000LL, /*BEF Belgium 999 999.99 */
+ 99999999000LL, /*ESP Spain 99 999 999 */
+ 99999999000LL, /*FIM Finland 999 999.99 */
+ 99999999000LL, /*IEP Irland 999 999.99 */
+ 51645690000LL, /*ITL Italy 999 999 999 */
+ 99999999000LL, /*LUF Luxemburg 999 999.99 */
+ 99999999000LL, /*NLG Netherlands 999 999.99 */
+ 99999999000LL, /*PTE Portugal 99 999 999 */
+ 29347028000LL /*GRD Greece 99 999 999 */
+ };
+
+/* max home to have euro currency */
+/* 92233720300000 Limitation due to the max capacity of long long (2^63)*/
+static long long max_curr[12]={
+ 99999999000LL, /*FRF France 152449.02 */
+ 99999999000LL, /*DEM Germany 511291.88 */
+ 99999999000LL, /*ATS Austria 72672.83 */
+ 99999999000LL, /*BEF Belgium 24789.35 */
+ 92233720300000LL, /*ESP Spain 5543358.23 */
+ 99999999000LL, /*FIM Finland 168187.92 */
+ 9999999900LL, /*IEP Irland 1269744.51 exact value=1269738.07 */
+ 92233720300000LL,/*ITL Italy 476347.41 */
+ 99999999000LL, /*LUF Luxemburg 24789.35 */
+ 99999999000LL, /*NLG Netherlands 453780.21 */
+ 92233720300000LL, /*PTE Portugal 4600598.57 */
+ 92233720300000LL /*GRD Greece 2706777.69 */
+ };
+
+static unsigned char *abbrev_str[12] = {
+ "...FRF...", /*France*/
+ "...DEM...", /*Germany*/
+ "...ATS...", /*Austria*/
+ "...BEF...", /*Belgium*/
+ "...ESP...", /*Spain*/
+ "...FIM...", /*Finland*/
+ "...IEP...", /*Irland*/
+ "...ITL...", /*Italy*/
+ "...LUF...", /*Luxemburg*/
+ "...NLG...", /*Netherlands*/
+ "...PTE...", /*Portugal*/
+ "...GRD..." /*Greece*/
+ };
+
+
+static unsigned char heuro,hhome; /*Handles for the new patterns*/
+
+static struct plugin_api* rb;
+
+static int country; /*Country selected*/
+static int cur_pos; /*Cursor position*/
+static long long inc;
+
+
+/* 64bits*64 bits with 5 digits after the . */
+static long long mul(long long a, long long b)
+{
+ return((a*b)/100000);
+}
+
+
+/* 64bits/64 bits with 5 digits after the . */
+static long long mydiv(long long a, long long b)
+{
+ return((a*100000)/b);
+}
+
+
+/* 123.45=12345000 split => i=123 f=45000*/
+static void split(long long v, long long* i, long long* f)
+{
+ long long t;
+
+ t=v/100000LL;
+ (*i)=t;
+ (*f)=(v-(t*100000LL));
+}
+
+
+/* result=10^n */
+static long long pow10(int n)
+{
+ int i;
+ long long r;
+
+ r=1;
+ for (i=0;i<n;i++)
+ r=r*10LL;
+ return(r);
+}
+
+
+/* round the i.f at n digit after the . */
+static void round(long long* i, long long* f, int n)
+{
+
+ long long m;
+ int add=0;
+
+ m=(int)pow10(5-n-1);
+ if (((*f)/m)%10>=5)
+ add=1;
+ if (n>0)
+ {
+ (*f)=((*f)/(int)pow10(5-n))+add;
+ if ((*f)==100LL)
+ {
+ (*i)+=1;
+ (*f)=0;
+ }
+ }
+ else
+ {
+ (*i)+=add;
+ (*f)=0;
+ }
+}
+
+
+/* Display the imput and the result
+ pos: false : first line
+ : true : second line
+*/
+static void display(long long euro, long long home, bool pos)
+{
+ char c1,c2;
+ long long i,f;
+ unsigned char str[20];
+ unsigned char s1[20];
+ unsigned char s2[20];
+
+ if (pos)
+ { /*Edit the second line*/
+ c1=0x20;
+ rb->strcpy(s1,"%c%c%6d.%02d");
+ c2=0x81;
+ if (nb_digit[country]==2)
+ rb->strcpy(s2,"%c%c%06d.%02d");
+ else
+ rb->strcpy(s2,"%c%c%09d");
+ }
+ else
+ {
+ c1=0x81;
+ rb->strcpy(s1,"%c%c%06d.%02d");
+ c2=0x20;
+ if (nb_digit[country]==2)
+ rb->strcpy(s2,"%c%c%6d.%02d");
+ else
+ rb->strcpy(s2,"%c%c%9d");
+ }
+
+ rb->lcd_remove_cursor();
+ /*First line*/
+ split(euro,&i,&f);
+ if (pos)
+ round(&i,&f,2);
+ rb->snprintf(str,sizeof(str),s1,heuro,c1,(int)i,(int)f);
+
+ if (!pos)
+ {
+ rb->lcd_puts(0,0,str);
+ rb->lcd_put_cursor(10-cur_pos,0,0x5F);
+ }
+ else
+ rb->lcd_puts_scroll(0,0,str);
+
+ /*Second line*/
+ split(home,&i,&f);
+ if (!pos)
+ round(&i,&f,nb_digit[country]);
+ rb->snprintf(str,sizeof(str),s2,hhome,c2,(int)i,(int)f);
+ if (pos)
+ {
+ rb->lcd_puts(0,1,str);
+ rb->lcd_put_cursor(10-cur_pos,1,0x5F);
+ }
+ else
+ rb->lcd_puts_scroll(0,1,str);
+}
+
+
+/* Show country Abbreviation */
+static void show_abbrev(void)
+{
+// rb->lcd_remove_cursor();
+ rb->lcd_puts(2,1,abbrev_str[country]);
+ rb->sleep(HZ*3/4);
+}
+
+
+/* Save the config to disk */
+static void save_config(void)
+{
+ int fd;
+
+ fd = rb->creat(CFGFILE,0);
+ if (fd < 0)
+ {
+ rb->lcd_clear_display();
+ rb->lcd_puts(0,0,"Impossible");
+ rb->lcd_puts(0,1,"to save cfg");
+ rb->sleep(HZ);
+ }
+ else
+ {
+ rb->fprintf(fd, "%c", country+0x30);
+ rb->close(fd);
+ }
+ return;
+}
+
+
+/* Load the config from disk */
+static void load_config(void)
+{
+ int fd;
+ char line[128];
+
+ fd = rb->open(CFGFILE, O_RDONLY);
+ if (fd < 0)
+ return;
+
+ rb->read(fd, line,1);
+ country=line[0]-0x30;
+
+ if ((country>11)|| (country<0))
+ country=0;
+
+ rb->close(fd);
+ return;
+}
+
+
+/*Currency choice*/
+static void currency_menu(void)
+{
+ unsigned char *currency_str[12] = {
+ "France",
+ "Germany",
+ "Austria",
+ "Belgium",
+ "Spain",
+ "Finland",
+ "Irland",
+ "Italy",
+ "Luxemburg",
+ "Netherlands",
+ "Portugal",
+ "Greece"
+ };
+ int c=country;
+
+ rb->lcd_clear_display();
+ while (true)
+ {
+ rb->lcd_puts(0,0,"Currency:");
+ rb->lcd_puts(0,1,currency_str[c]);
+ switch (rb->button_get(true))
+ {
+ case BUTTON_RIGHT|BUTTON_REL:
+ c++;
+ if (c>11)
+ c=0;
+ break;
+ case BUTTON_LEFT|BUTTON_REL:
+ c--;
+ if (c<0)
+ c=11;
+ break;
+ case BUTTON_PLAY|BUTTON_REL:
+ country=c;
+ save_config();
+ return;
+ break;
+ case BUTTON_STOP|BUTTON_REL:
+ return;
+ }
+ }
+}
+
+
+/* Display the choice menu. */
+static int euro_menu(void)
+{
+ int c=0;
+
+
+ while (true)
+ {
+ rb->lcd_clear_display();
+ rb->lcd_puts(0,0," Currency");
+ rb->lcd_puts(0,1," Exit");
+ rb->lcd_putc(0,c,0x81);
+
+ switch (rb->button_get(true))
+ {
+ case BUTTON_RIGHT|BUTTON_REL:
+ c=1;
+ break;
+ case BUTTON_LEFT|BUTTON_REL:
+ c=0;
+ break;
+ case BUTTON_PLAY|BUTTON_REL:
+ if (c==0)
+ currency_menu();
+ else
+ return 1;
+ break;
+ case BUTTON_STOP|BUTTON_REL:
+ return 0;
+ }
+ }
+}
+
+
+/* Call when the program end */
+static void euro_exit(void)
+{
+ //Restore the old pattern (i don't find another way to do this. An idea?)
+ rb->lcd_unlock_pattern(heuro);
+ rb->lcd_unlock_pattern(hhome);
+
+ //Clear the screen
+ rb->lcd_clear_display();
+}
+
+
+/* this is the plugin entry point */
+enum plugin_status plugin_start(struct plugin_api* api, void* parameter)
+{
+ bool end, pos;
+ long long e,h,old_e,old_h;
+
+ /* this macro should be called as the first thing you do in the plugin.
+ it test that the api version and model the plugin was compiled for
+ matches the machine it is running on */
+ TEST_PLUGIN_API(api);
+
+ /* if you don't use the parameter, you can do like
+ this to avoid the compiler warning about it */
+ (void)parameter;
+
+ /* if you are using a global api pointer, don't forget to copy it!
+ otherwise you will get lovely "I04: IllInstr" errors... :-) */
+ rb = api;
+
+ /*Get the pattern handle*/
+ heuro=rb->lcd_get_locked_pattern();
+ hhome=rb->lcd_get_locked_pattern();
+ rb->lcd_define_pattern(heuro, pattern_euro);
+ rb->lcd_define_pattern(hhome, pattern_home);
+
+ h=0;
+ e=0;
+ end=false;
+ pos=false;
+ country=0;
+ cur_pos=3;
+ inc=100000;
+
+ load_config();
+
+ /*Empty the event queue*/
+ while (rb->button_get(false)!=BUTTON_NONE) ;
+
+ display(e,h,false);
+ show_abbrev();
+ display(e,h,false);
+
+ /*Main loop*/
+ while(end!=true)
+ {
+ switch (rb->button_get(true))
+ {
+ case BUTTON_MENU|BUTTON_REL:
+ switch (euro_menu())
+ {
+ case 1:
+ end=true;
+ break;
+ }
+ if (!pos)
+ {
+ if (e>max_euro[country])
+ e=0;
+ cur_pos=3;
+ }
+ else
+ {
+ if (h>max_curr[country])
+ h=0;
+ if (nb_digit[country]==2)
+ cur_pos=3;
+ else
+ cur_pos=0;
+ }
+
+ display(e,h,pos);
+ break;
+
+ case BUTTON_ON | BUTTON_PLAY:
+ pos=!pos;
+
+ case BUTTON_ON | BUTTON_REL:
+ e=0;
+ h=0;
+ if (!pos)
+ {
+ cur_pos=3;
+ inc=100000;
+ }
+ else
+ {
+ inc=100000;
+ if (nb_digit[country]==2)
+ cur_pos=3;
+ else
+ cur_pos=0;
+ }
+ show_abbrev();
+ break;
+
+ case BUTTON_STOP|BUTTON_REL:
+ cur_pos--;
+ if (!pos)
+ {
+ if (cur_pos<0)
+ cur_pos=0;
+ if (cur_pos==2)
+ cur_pos=1;
+ if (cur_pos>2)
+ inc=pow10(3+cur_pos-1);
+ else
+ inc=pow10(3+cur_pos);
+ }
+ else
+ {
+ if (cur_pos<0)
+ cur_pos=0;
+ if (nb_digit[country]==2)
+ {
+ if (cur_pos==2)
+ cur_pos=1;
+ if (cur_pos>2)
+ inc=pow10(3+cur_pos-1);
+ else
+ inc=pow10(3+cur_pos);
+ }
+ else
+ inc=pow10(5+cur_pos);
+
+ }
+ break;
+
+ case BUTTON_PLAY|BUTTON_REL:
+ cur_pos++;
+ if (!pos)
+ {
+ if (cur_pos>8)
+ cur_pos=8;
+ if (cur_pos==2)
+ cur_pos=3;
+ if (cur_pos>2)
+ inc=pow10(3+cur_pos-1);
+ else
+ inc=pow10(3+cur_pos);
+ }
+ else
+ {
+ if (cur_pos>8)
+ cur_pos=8;
+ if (nb_digit[country]==2)
+ {
+ if (cur_pos==2)
+ cur_pos=3;
+ if (cur_pos>2)
+ inc=pow10(3+cur_pos-1);
+ else
+ inc=pow10(3+cur_pos);
+ }
+ else
+ inc=pow10(5+cur_pos);
+ }
+ break;
+
+ case BUTTON_LEFT|BUTTON_REL:
+ case BUTTON_LEFT|BUTTON_REPEAT:
+ if (!pos)
+ {
+ e-=inc;
+ if (e<0)
+ e=0;
+ }
+ else
+ {
+ h-=inc;
+ if (h<0)
+ h=0;
+ }
+ break;
+
+ case BUTTON_RIGHT|BUTTON_REL:
+ case BUTTON_RIGHT|BUTTON_REPEAT:
+ old_e=e;
+ old_h=h;
+ if (!pos)
+ {
+ e+=inc;
+ if (e>max_euro[country])
+ e=old_e;
+ }
+ else
+ {
+ h+=inc;
+ if (h>max_curr[country])
+ h=old_h;
+ }
+ break;
+
+ case SYS_USB_CONNECTED:
+ rb->usb_screen();
+ euro_exit();
+ return PLUGIN_USB_CONNECTED;
+ }
+ /*Display*/
+ if (!pos) /*Euro>home*/
+ h=mul(e,currency[country]);
+ else /*Home>euro*/
+ e=mydiv(h,currency[country]);
+ display(e,h,pos);
+ }
+ euro_exit();
+ return PLUGIN_OK;
+}
+
+#endif