home *** CD-ROM | disk | FTP | other *** search
/ linuxmafia.com 2016 / linuxmafia.com.tar / linuxmafia.com / pub / palmos / astro-src-2.1.0beta.tar.gz / astro-src-2.1.0beta.tar / astro-src-2.1.0beta / source / PalmUtil.c < prev    next >
C/C++ Source or Header  |  2000-09-26  |  5KB  |  190 lines
  1. /*
  2.  * Astro Info - a an astronomical calculator/almanac for PalmOS devices.
  3.  * 
  4.  * $Id: PalmUtil.c,v 1.2 2000/08/09 12:34:57 mheinz Exp $
  5.  * Copyright (C) 2000, Michael Heinz
  6.  * 
  7.  * This program is free software; you can redistribute it and/or
  8.  * modify it under the terms of the GNU General Public License
  9.  * as published by the Free Software Foundation; either version 2
  10.  * of the License, or (at your option) any later version.
  11.  * 
  12.  * This program is distributed in the hope that it will be useful,
  13.  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  14.  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  15.  * GNU General Public License for more details.
  16.  * 
  17.  * You should have received a copy of the GNU General Public License
  18.  * along with this program; if not, write to the Free Software
  19.  * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA  02111-1307, USA.
  20.  */
  21.  
  22. #include <PalmOS.h>
  23. #include "PalmUtil.h"
  24. #include "MathLib.h"
  25.  
  26.  
  27. /*
  28.  * Returns true if the ROM version is at least
  29.  * minVersion.
  30.  */
  31. Boolean CheckMinRomVersion(UInt32 minVersion)
  32. {
  33.     UInt32 romVersion;
  34.     
  35.     FtrGet(sysFtrCreator,
  36.            sysFtrNumROMVersion,
  37.            &romVersion);
  38.  
  39.     return (minVersion <= romVersion);
  40. }
  41.  
  42. /* Retrieve the current value of a field. */
  43. int GetNumField(FormPtr formPtr, UInt16 id)
  44. { 
  45.     FieldPtr fld = (FieldPtr)FrmGetObjectPtr(formPtr, 
  46.                                              FrmGetObjectIndex(formPtr, 
  47.                                                                id)); 
  48.     char *s = FldGetTextPtr(fld);
  49.     return StrAToI(s);
  50. }
  51.  
  52. /*
  53.  * Convert a double to a string.
  54.  * s = destination string
  55.  * d = number to convert
  56.  * p = # of digits to the right of the decimal.
  57.  * l = the maximum length of s.
  58.  */
  59. void
  60. StrDToA(char *s,
  61.         double d,
  62.         int p,
  63.         int l)
  64. {
  65.     int c;
  66.     double i,f;
  67.  
  68.     c = 0;
  69.  
  70.     if (d < 0.0)
  71.         s[c++] = '-';
  72.  
  73.     d = fabs(d);
  74.     i = floor(d);
  75.     f = d - i;
  76.  
  77.     StrIToA(&s[c],
  78.             i);
  79.  
  80.     if (p == 0 || c >= l) 
  81.         return;
  82.     
  83.     c = StrLen(s);
  84.     s[c++] = '.';
  85.     
  86.     while (p-- > 0 && c < l) {
  87.         f = f * 10.0;
  88.         i = floor(f);
  89.         f = f - i;
  90.         s[c++] = 48 + i;
  91.     }
  92.     s[c] = 0;    
  93. }
  94.  
  95. #define MAXDBRECORDS 16
  96.  
  97. DBRecord**
  98. GetDBList(UInt32 type,
  99.           UInt32 creator,
  100.           int *count) 
  101. {
  102.     Err error;
  103.     Boolean newSearch = 1;
  104.     
  105.     DmSearchStateType* state = (DmSearchStateType*)MemPtrNew(sizeof(DmSearchStateType));
  106.     DBRecord** recordList = (DBRecord**)MemPtrNew(sizeof(DBRecord*)*MAXDBRECORDS);
  107.  
  108.     *count = 0;
  109.     while (*count < MAXDBRECORDS) 
  110.     {
  111.         DBRecord* record = MemPtrNew(sizeof(DBRecord));
  112.         recordList[*count] = record;
  113.         
  114.         error = DmGetNextDatabaseByTypeCreator(newSearch,
  115.                                                state,
  116.                                                type,
  117.                                                creator,
  118.                                                0,
  119.                                                &(record->cardNo),
  120.                                                &(record->dbID));
  121.         if (error) 
  122.         {
  123.             MemPtrFree(record);
  124.             break;
  125.         }
  126.  
  127.         error = DmDatabaseInfo(record->cardNo,
  128.                                record->dbID,
  129.                                record->name,
  130.                                NULL, NULL, NULL,NULL,
  131.                                NULL, NULL, NULL, NULL,
  132.                                NULL, NULL);
  133.         if (error)
  134.         {
  135.             MemPtrFree(record);
  136.             break;
  137.         }
  138.                                
  139.         newSearch = 0;
  140.         (*count)++;
  141.     }
  142.     
  143.     MemPtrFree(state);
  144.     
  145.     if ((*count) == 0) 
  146.     {
  147.         FreeDBList(recordList,0);
  148.         return NULL;
  149.     }
  150.     
  151.     return recordList;
  152. }
  153.  
  154. void
  155. FreeDBList(DBRecord **recordList, int count)
  156. {
  157.     int i;
  158.     for (i=0; i < count; i++) 
  159.     {
  160.         DBRecord *record = recordList[i];
  161.         MemPtrFree(record);
  162.     }
  163.     MemPtrFree(recordList);
  164. }
  165.  
  166. void
  167. GotoApplication(UInt32 ApplId) 
  168. {
  169.     Err err;
  170.     UInt16 cardNo;
  171.     LocalID dbID;
  172.     DmSearchStateType dss;
  173.  
  174.     /*
  175.      * Bounce the application
  176.      */
  177.     err = DmGetNextDatabaseByTypeCreator(true,
  178.                                          &dss,
  179.                                          sysFileTApplication,
  180.                                          ApplId,
  181.                                          true,
  182.                                          &cardNo,
  183.                                          &dbID);
  184.     ErrFatalDisplayIf(err != errNone,"Failed to launch application!");
  185.     
  186.     SysUIAppSwitch(cardNo,dbID,
  187.                    sysAppLaunchCmdNormalLaunch,
  188.                    NULL);
  189. }
  190.