/**
* tifiles_file_read_flash:
* @filename: name of FLASH file to open.
* @content: where to store the file content.
*
* Load the FLASH file into a FlashContent structure.
*
* Structure content must be freed with #tifiles_content_delete_flash when
* no longer used.
*
* Return value: an error code, 0 otherwise.
**/
TIEXPORT2 int tifiles_file_read_flash(const char *filename, FlashContent *content)
{
if (filename == NULL || content == NULL)
{
tifiles_critical("%s: an argument is NULL", __FUNCTION__);
return ERR_INVALID_FILE;
}
#if !defined(DISABLE_TI8X)
if (tifiles_calc_is_ti8x(tifiles_file_get_model(filename)))
return ti8x_file_read_flash(filename, content);
else
#endif
#if !defined(DISABLE_TI9X)
if (tifiles_calc_is_ti9x(tifiles_file_get_model(filename)) || tifiles_file_is_tib(filename))
return ti9x_file_read_flash(filename, content);
else
#endif
if(content->model == CALC_NSPIRE)
return tnsp_file_read_flash(filename, content);
else
return ERR_BAD_CALC;
return 0;
}
/**
* tifiles_file_is_os:
* @filename: a filename as string.
*
* Check whether file is a FLASH OS file (tib or XXu)
*
* Return value: a boolean value.
**/
TIEXPORT2 int TICALL tifiles_file_is_os(const char *filename)
{
int i;
char *e = tifiles_fext_get(filename);
if (!strcmp(e, ""))
return 0;
if (!tifiles_file_is_ti(filename))
return 0;
if(tifiles_file_is_tib(filename))
return !0;
if(tifiles_file_is_tno(filename))
return !0;
for (i = 1; i < CALC_MAX + 1; i++)
{
if (!g_ascii_strcasecmp(e, FLASH_OS_FILE_EXT[i]))
return !0;
}
return 0;
}
int ti68k_is_a_tib_file(const char *filename)
{
int ret1 = tifiles_file_is_flash(filename);
int ret2 = tifiles_file_is_tib (filename);
return ret1 || ret2;
}
/**
* ti9x_file_display:
* @filename: a TI file.
*
* Determine file class and display internal content.
*
* Return value: an error code, 0 otherwise.
**/
int ti9x_file_display(const char *filename)
{
Ti9xRegular *content1;
Ti9xBackup *content2;
Ti9xFlash *content3;
int ret;
// the testing order is important: regular before backup (due to TI89/92+)
if (tifiles_file_is_flash(filename) || tifiles_file_is_tib(filename))
{
content3 = tifiles_content_create_flash(CALC_TI92);
ret = ti9x_file_read_flash(filename, content3);
if (!ret)
{
ti9x_content_display_flash(content3);
tifiles_content_delete_flash(content3);
}
}
else if (tifiles_file_is_regular(filename))
{
content1 = tifiles_content_create_regular(CALC_TI92);
ret = ti9x_file_read_regular(filename, content1);
if (!ret)
{
tifiles_file_display_regular(content1);
tifiles_content_delete_regular(content1);
}
}
else if (tifiles_file_is_backup(filename))
{
content2 = tifiles_content_create_backup(CALC_TI92);
ret = ti9x_file_read_backup(filename, content2);
if (!ret)
{
ti9x_content_display_backup(content2);
tifiles_content_delete_backup(content2);
}
}
else
{
tifiles_info("Unknown file type !");
return ERR_BAD_FILE;
}
return ret;
}
/**
* ti9x_file_read_flash:
* @filename: name of flash file to open.
* @content: where to store the file content.
*
* Load the flash file into a #FlashContent structure.
*
* Structure content must be freed with #tifiles_content_delete_flash when
* no longer used. If error occurs, the structure content is released for you.
*
* Return value: an error code, 0 otherwise.
**/
int ti9x_file_read_flash(const char *filename, Ti9xFlash *head)
{
FILE *f;
Ti9xFlash *content = head;
long cur_pos = 0;
int tib = 0;
char signature[9];
int ret = ERR_FILE_IO;
if (head == NULL)
{
tifiles_critical("%s: an argument is NULL", __FUNCTION__);
return ERR_INVALID_FILE;
}
if (!tifiles_file_is_flash(filename) && !tifiles_file_is_tib(filename))
{
ret = ERR_INVALID_FILE;
goto tfrf2;
}
// detect file type (old or new format)
tib = tifiles_file_is_tib(filename);
f = g_fopen(filename, "rb");
if (f == NULL)
{
tifiles_info("Unable to open this file: %s", filename);
ret = ERR_FILE_OPEN;
goto tfrf2;
}
if (fseek(f, 0, SEEK_END)) goto tfrf;
cur_pos = ftell(f);
if (cur_pos < 0) goto tfrf;
if (fseek(f, 0, SEEK_SET)) goto tfrf;
// The TI-68k series' members have at best 4 MB of Flash.
// TIB files larger than that size are insane.
if (cur_pos >= (4L << 20))
{
ret = ERR_INVALID_FILE;
goto tfrf;
}
if (tib)
{
// tib is an old format but mainly used by developers
memset(content, 0, sizeof(Ti9xFlash));
content->data_length = (uint32_t)cur_pos;
strncpy(content->name, "basecode", sizeof(content->name) - 1);
content->name[sizeof(content->name) - 1] = 0;
content->data_type = 0x23; // FLASH os
content->data_part = (uint8_t *)g_malloc0(content->data_length);
if (content->data_part == NULL)
{
ret = ERR_MALLOC;
goto tfrf;
}
if (fread(content->data_part, 1, content->data_length, f) < content->data_length) goto tfrf;
switch(content->data_part[8])
{
case 1: content->device_type = DEVICE_TYPE_92P; break; // TI92+
case 3: content->device_type = DEVICE_TYPE_89; break; // TI89
// value added by the TI community according to HWID parameter
// doesn't have any 'legal' existence.
case 8: content->device_type = DEVICE_TYPE_92P; break; // V200PLT
case 9: content->device_type = DEVICE_TYPE_89; break; // Titanium
}
content->next = NULL;
}
else
{
for (content = head;; content = content->next)
{
if (fread_8_chars(f, signature) < 0) goto tfrf;
content->model = tifiles_file_get_model(filename);
if (fread_byte(f, &(content->revision_major)) < 0) goto tfrf;
if (fread_byte(f, &(content->revision_minor)) < 0) goto tfrf;
if (fread_byte(f, &(content->flags)) < 0) goto tfrf;
if (fread_byte(f, &(content->object_type)) < 0) goto tfrf;
if (fread_byte(f, &(content->revision_day)) < 0) goto tfrf;
if (fread_byte(f, &(content->revision_month)) < 0) goto tfrf;
if (fread_word(f, &(content->revision_year)) < 0) goto tfrf;
if (fskip(f, 1) < 0) goto tfrf;
if (fread_8_chars(f, content->name) < 0) goto tfrf;
if (fskip(f, 23) < 0) goto tfrf;
if (fread_byte(f, &(content->device_type)) < 0) goto tfrf;
if (fread_byte(f, &(content->data_type)) < 0) goto tfrf;
if (fskip(f, 23) < 0) goto tfrf;
if (fread_byte(f, &(content->hw_id)) < 0) goto tfrf;
if (fread_long(f, &(content->data_length)) < 0) goto tfrf;
if (content->data_type != TI89_LICENSE && !check_device_type(content->device_type))
{
ret = ERR_INVALID_FILE;
goto tfrf;
}
if (!check_data_type(content->data_type))
{
ret = ERR_INVALID_FILE;
goto tfrf;
}
// TODO: modify this code if TI ever makes a TI-eZ80 model with more than 4 MB of Flash memory...
if (content->data_length > 4U * 1024 * 1024 - 65536U)
{
// Data length larger than Flash memory size - boot code sector size doesn't look right.
ret = ERR_INVALID_FILE;
goto tfrf;
}
content->data_part = (uint8_t *)g_malloc0(content->data_length);
if (content->data_part == NULL)
{
ret = ERR_MALLOC;
goto tfrf;
}
if (fread(content->data_part, 1, content->data_length, f) < content->data_length) goto tfrf;
if ( (content->data_type == TI83p_AMS && content->data_part[0] != 0x80)
|| (content->data_type == TI83p_APPL && content->data_part[0] != 0x81))
{
ret = ERR_INVALID_FILE;
goto tfrf;
}
content->next = NULL;
// check for end of file
if (fread_8_chars(f, signature) < 0)
{
break;
}
if (strcmp(signature, "**TIFL**") || feof(f))
{
break;
}
if (fseek(f, -8, SEEK_CUR)) goto tfrf;
content->next = (Ti9xFlash *)g_malloc0(sizeof(Ti9xFlash));
if (content->next == NULL)
{
ret = ERR_MALLOC;
goto tfrf;
}
}
}
fclose(f);
return 0;
tfrf: // release on exit
tifiles_critical("%s: error reading / understanding file %s", __FUNCTION__, filename);
fclose(f);
tfrf2:
tifiles_content_delete_flash(content);
return ret;
}
/**
* tifiles_file_test:
* @filename: a filename as string.
* @type: type to check
* @target: hand-held model or CALC_NONE for no filtering
*
* Check whether #filename is a TI file of type #type useable on a #target model.
* This function is a generic one which overwrap and extends the tifiles_file_is_*
* functions.
*
* This is a powerful function which allows checking of a specific file type for
* a given target.
*
* Return value: a boolean value.
**/
TIEXPORT2 int TICALL tifiles_file_test(const char *filename, FileClass type, CalcModel target)
{
char *e = tifiles_fext_get(filename);
if (!tifiles_file_is_ti(filename))
return 0;
if (!strcmp(e, ""))
return 0;
if(target > CALC_MAX)
{
tifiles_critical("tifiles_file_test: invalid target argument! This is a bug.");
return 0;
}
if(type & TIFILE_SINGLE)
{
if(target && !g_ascii_strncasecmp(e, GROUP_FILE_EXT[target], 2))
return !0;
else
return tifiles_file_is_single(filename);
}
if(type & TIFILE_GROUP)
{
if(target && !g_ascii_strcasecmp(e, GROUP_FILE_EXT[target]))
return !0;
else
return tifiles_file_is_group(filename);
}
if(type & TIFILE_REGULAR)
{
return tifiles_file_test(filename, TIFILE_SINGLE, target) ||
tifiles_file_test(filename, TIFILE_GROUP, target);
}
if(type & TIFILE_BACKUP)
{
if(target && !g_ascii_strcasecmp(e, BACKUP_FILE_EXT[target]))
return !0;
else
return tifiles_file_is_backup(filename);
}
if(type & TIFILE_OS)
{
if(target && !g_ascii_strcasecmp(e, FLASH_OS_FILE_EXT[target]))
return !0;
else if(target && tifiles_file_is_tib(filename))
{
FILE *f;
uint8_t data[16];
f = g_fopen(filename, "rb");
if(f == NULL)
return 0;
fread_n_chars(f, 16, (char *)data);
fclose(f);
switch(data[8])
{
case 1: if(target != CALC_TI92P) return 0;
case 3: if(target != CALC_TI89) return 0;
case 8: if(target != CALC_V200) return 0;
case 9: if(target != CALC_TI89T) return 0;
}
return !0;
}
else
return tifiles_file_is_os(filename);
}
if(type & TIFILE_APP)
{
if(target && !g_ascii_strcasecmp(e, FLASH_APP_FILE_EXT[target]))
return !0;
else
return tifiles_file_is_app(filename);
}
if(type & TIFILE_FLASH)
{
return tifiles_file_test(filename, TIFILE_OS, target) ||
tifiles_file_test(filename, TIFILE_APP, target);
}
if(type & TIFILE_TIGROUP)
{
if(target)
{
// No easy/light way for this part: we have to load the whole file
// and to parse the TigEntry structures.
TigContent *content;
int ret, ok=0;
int k;
if(!tifiles_file_has_tig_header(filename))
return 0;
content = tifiles_content_create_tigroup(CALC_NONE, 0);
ret = tifiles_file_read_tigroup(filename, content);
if(ret) return 0;
for (k = 0; k < content->n_apps; k++)
{
TigEntry *te = content->app_entries[k];
if(tifiles_calc_are_compat(te->content.regular->model, target))
ok++;
}
for (k = 0; k < content->n_vars; k++)
{
TigEntry *te = content->var_entries[k];
if(tifiles_calc_are_compat(te->content.regular->model, target))
ok++;
}
tifiles_content_delete_tigroup(content);
return ok;
}
else
return tifiles_file_is_tigroup(filename);
}
return 0;
}
void clist_refresh(void)
{
GtkTreeView *view = GTK_TREE_VIEW(clist_wnd);
GtkTreeSelection *selection;
GtkTreeViewColumn *col;
GtkTreeIter iter;
GdkPixbuf *pix1, *pix2, *pix;
GList *dirlist;
gsize br, bw;
gchar *utf8;
int i;
if(working_mode & MODE_CMD)
return;
// reparse folders
tilp_local_selection_destroy();
tilp_dirlist_local();
selection = gtk_tree_view_get_selection(view);
g_signal_handlers_block_by_func(G_OBJECT(selection), tree_selection_changed, NULL);
gtk_list_store_clear(list);
g_signal_handlers_unblock_by_func(G_OBJECT(selection), tree_selection_changed, NULL);
// sort files
for(i = 0; i < CLIST_NVCOLS; i++)
{
col = gtk_tree_view_get_column(view, i);
gtk_tree_view_column_set_sort_indicator(col, FALSE);
}
switch (options.local_sort)
{
case SORT_BY_NAME:
tilp_file_sort_by_name();
col = gtk_tree_view_get_column(view, COLUMN_NAME);
gtk_tree_view_column_set_sort_indicator(col, TRUE);
gtk_tree_view_column_set_sort_order(col, options.local_sort_order ? GTK_SORT_ASCENDING : GTK_SORT_DESCENDING);
break;
case SORT_BY_TYPE:
tilp_file_sort_by_type();
col = gtk_tree_view_get_column(view, COLUMN_TYPE);
gtk_tree_view_column_set_sort_indicator(col, TRUE);
gtk_tree_view_column_set_sort_order(col, options.local_sort_order ? GTK_SORT_ASCENDING : GTK_SORT_DESCENDING);
break;
case SORT_BY_DATE:
tilp_file_sort_by_date();
col = gtk_tree_view_get_column(view, COLUMN_DATE);
gtk_tree_view_column_set_sort_indicator(col, TRUE);
gtk_tree_view_column_set_sort_order(col, options.local_sort_order ? GTK_SORT_ASCENDING : GTK_SORT_DESCENDING);
break;
case SORT_BY_SIZE:
tilp_file_sort_by_size();
col = gtk_tree_view_get_column(view, COLUMN_SIZE);
gtk_tree_view_column_set_sort_indicator(col, TRUE);
gtk_tree_view_column_set_sort_order(col, options.local_sort_order ? GTK_SORT_ASCENDING : GTK_SORT_DESCENDING);
break;
}
pix2 = gtk_widget_render_icon(GTK_WIDGET(view), GTK_STOCK_DIRECTORY, GTK_ICON_SIZE_MENU, NULL);
pix1 = gtk_widget_render_icon(GTK_WIDGET(view), GTK_STOCK_GO_UP, GTK_ICON_SIZE_MENU, NULL);
for (dirlist = local.dirlist; dirlist != NULL; dirlist = dirlist->next)
{
FileEntry *fe = (FileEntry *) dirlist->data;
gboolean b;
CalcModel s = tifiles_file_get_model(fe->name);
CalcModel t = options.calc_model;
b = options.show_all || S_ISDIR(fe->attrib) ||
tifiles_file_is_tib(fe->name) ||
#if 0
tifiles_file_is_tigroup(fe->name) ||
#else
tifiles_file_test(fe->name, TIFILE_TIGROUP, options.calc_model) ||
#endif
tifiles_calc_are_compat(s, t);
if(!b)
continue;
if (S_ISDIR(fe->attrib))
{
pix = strcmp(fe->name, "..") ? pix2 : pix1;
}
else
{
char icon_name[2048];
strcpy(icon_name, tifiles_file_get_icon(fe->name));
if (!strcmp(icon_name, ""))
strcpy(icon_name, "TIicon1");
strcat(icon_name, ".ico");
tilp_file_underscorize(icon_name);
pix = create_pixbuf(icon_name);
}
// filenames are stored in the 'glib filename encoding' and GTK+ uses utf8
utf8 = g_filename_to_utf8(fe->name, -1, &br, &bw, NULL);
gtk_list_store_append(list, &iter);
gtk_list_store_set(list, &iter,
COLUMN_NAME, utf8,
COLUMN_TYPE, tilp_file_get_type(fe),
COLUMN_SIZE, tilp_file_get_size(fe),
COLUMN_DATE, tilp_file_get_date(fe),
COLUMN_DATA, (gpointer) fe,
COLUMN_ICON, pix,
-1);
g_free(utf8);
}
g_object_unref(pix1);
g_object_unref(pix2);
}
// The main function
int main(int argc, char **argv)
{
char *msg = NULL;
char buffer[256];
int i;
int ret;
// init library
tifiles_library_init();
// test tifiles.c
printf("Library version : <%s>\n", tifiles_version_get());
printf("--\n");
// test error.c
tifiles_error_get(515, &msg);
printf("Error message: <%s>\n", msg);
#ifndef __WIN32__
free(msg);
#endif
printf("--\n");
// test type2str.c
printf("tifiles_string_to_model: <%i> <%i>\n", CALC_TI92,
tifiles_string_to_model(tifiles_model_to_string(CALC_TI92)));
printf("tifiles_string_to_attribute: <%i> <%i>\n", ATTRB_LOCKED,
tifiles_string_to_attribute(tifiles_attribute_to_string(ATTRB_LOCKED)));
printf("tifiles_string_to_class: <%i> <%i>\n", TIFILE_SINGLE,
tifiles_string_to_class(tifiles_class_to_string(TIFILE_SINGLE)));
printf("--\n");
// test filetypes.c
for(i = CALC_TI73; i <= CALC_V200; i++)
{
printf("%s (%i) ", tifiles_fext_of_group(i), i);
}
printf("\n");
for(i = CALC_TI73; i <= CALC_V200; i++)
{
printf("%s ", tifiles_fext_of_backup(i));
}
printf("\n");
for(i = CALC_TI73; i <= CALC_V200; i++)
{
printf("%s ", tifiles_fext_of_flash_os(i));
}
printf("\n");
for(i = CALC_TI73; i <= CALC_V200; i++)
{
printf("%s ", tifiles_fext_of_flash_app(i));
}
printf("\n");
printf("--\n");
printf("<%s> <%s>\n", "foo.bar", tifiles_fext_get("foo.bar"));
ret = tifiles_file_is_ti(PATH("misc/str.92s"));
printf("tifiles_file_is_ti: %i\n", ret);
ret = tifiles_file_is_single(PATH("misc/str.92s"));
printf("tifiles_file_is_single: %i\n", ret);
ret = tifiles_file_is_group(PATH("misc/group.92g"));
printf("tifiles_file_is_group: %i\n", ret);
ret = tifiles_file_is_regular(PATH("misc/str.92s"));
printf("tifiles_file_is_regular: %i\n", ret);
ret = tifiles_file_is_regular(PATH("misc/group.92g"));
printf("tifiles_file_is_regular: %i\n", ret);
ret = tifiles_file_is_backup(PATH("misc/backup.83b"));
printf("tifiles_file_is_backup: %i\n", ret);
ret = tifiles_file_is_flash(PATH("misc/ticabfra.89k"));
printf("tifiles_file_is_flash: %i\n", ret);
ret = tifiles_file_is_flash(PATH("misc/TI73_OS160.73U"));
printf("tifiles_file_is_flash: %i\n", ret);
ret = tifiles_file_is_tib(PATH("misc/ams100.tib"));
printf("tifiles_file_is_tib: %i\n", ret);
ret = tifiles_file_is_tigroup(PATH("misc/test.tig"));
printf("tifiles_file_is_tigroup: %i\n", ret);
printf("--\n");
// test typesxx.c
printf("tifiles_file_get_model: %s\n",
tifiles_model_to_string(tifiles_file_get_model(PATH("misc/str.92s"))));
printf("tifiles_file_get_class: %s\n",
tifiles_class_to_string(tifiles_file_get_class(PATH("misc/group.92g"))));
printf("tifiles_file_get_type: %s\n",
tifiles_file_get_type(PATH("misc/TI73_OS160.73U")));
printf("tifiles_file_get_icon: %s\n",
tifiles_file_get_icon(PATH("misc/str.92s")));
printf("--\n");
// test misc.c
printf("tifiles_calc_is_ti8x: %i\n", tifiles_calc_is_ti8x(CALC_TI83));
printf("tifiles_calc_is_ti9x: %i\n", tifiles_calc_is_ti9x(CALC_TI89));
printf("tifiles_has_folder: %i\n", tifiles_has_folder(CALC_TI92));
printf("tifiles_is_flash: %i\n", tifiles_is_flash(CALC_TI73));
printf("tifiles_get_varname: <%s>\n", tifiles_get_varname("fld\\var"));
printf("tifiles_get_fldname: <%s>\n", tifiles_get_fldname("fld\\var"));
tifiles_build_fullname(CALC_TI89, buffer, "fld", "var");
printf("tifiles_build_fullname: <%s>\n", buffer);
printf("--\n");
// test filesxx.c & grouped.c
do
{
// TI73 support
change_dir(PATH("ti73"));
ret = test_ti73_backup_support(); if (ret) break;
ret = test_ti73_regular_support(); if (ret) break;
ret = test_ti73_group_support(); if (ret) break;
ret = test_ti73_ungroup_support(); if (ret) break;
// TI82 support
change_dir(PATH("ti82"));
ret = test_ti82_backup_support(); if (ret) break;
ret = test_ti82_regular_support(); if (ret) break;
ret = test_ti82_group_support(); if (ret) break;
ret = test_ti82_ungroup_support(); if (ret) break;
// TI83 support
change_dir(PATH("ti83"));
ret = test_ti83_backup_support(); if (ret) break;
ret = test_ti83_regular_support(); if (ret) break;
ret = test_ti83_group_support(); if (ret) break;
ret = test_ti83_ungroup_support(); if (ret) break;
// TI84+ support
change_dir(PATH("ti84p"));
ret = test_ti84p_regular_support(); if (ret) break;
ret = test_ti84p_group_support(); if (ret) break;
ret = test_ti84p_ungroup_support(); if (ret) break;
ret = test_ti84p_flash_support(); if (ret) break;
// TI85 support
change_dir(PATH("ti85"));
ret = test_ti85_regular_support(); if (ret) break;
// TI86 support
change_dir(PATH("ti86"));
ret = test_ti86_backup_support(); if (ret) break;
ret = test_ti86_regular_support(); if (ret) break;
ret = test_ti86_group_support(); if (ret) break;
ret = test_ti86_ungroup_support(); if (ret) break;
// TI89 support
change_dir(PATH("ti89"));
ret = test_ti89_regular_support(); if (ret) break;
ret = test_ti89_flash_support(); if (ret) break;
ret = test_v200_regular_support(); if (ret) break;
// TI92 support
change_dir(PATH("ti92"));
ret = test_ti92_backup_support(); if (ret) break;
ret = test_ti92_regular_support(); if (ret) break;
ret = test_ti92_group_support(); if (ret) break;
ret = test_ti92_ungroup_support(); if (ret) break;
// TIXX certificates
change_dir(PATH("certs"));
ret = test_ti8x_cert_support(); if (ret) break;
ret = test_ti9x_cert_support(); if (ret) break;
// Add/Del files
change_dir(PATH("misc"));
ret = test_ti8x_group_merge(); if (ret) break;
change_dir(PATH("tig"));
ret = test_tigroup();
} while(0);
// end of test
tifiles_library_exit();
return ret;
}
/**
* ti9x_file_read_flash:
* @filename: name of flash file to open.
* @content: where to store the file content.
*
* Load the flash file into a #FlashContent structure.
*
* Structure content must be freed with #tifiles_content_delete_flash when
* no longer used. If error occurs, the structure content is released for you.
*
* Return value: an error code, 0 otherwise.
**/
int ti9x_file_read_flash(const char *filename, Ti9xFlash *head)
{
FILE *f;
Ti9xFlash *content = head;
int tib = 0;
char signature[9];
if (!tifiles_file_is_flash(filename) && !tifiles_file_is_tib(filename))
{
return ERR_INVALID_FILE;
}
if (head == NULL)
{
tifiles_critical("%s: an argument is NULL", __FUNCTION__);
return ERR_INVALID_FILE;
}
// detect file type (old or new format)
tib = tifiles_file_is_tib(filename);
f = g_fopen(filename, "rb");
if (f == NULL)
{
tifiles_info("Unable to open this file: %s\n", filename);
return ERR_FILE_OPEN;
}
if (tib)
{ // tib is an old format but mainly used by developers
memset(content, 0, sizeof(Ti9xFlash));
if(fseek(f, 0, SEEK_END)) goto tfrf;
content->data_length = (uint32_t) ftell(f);
if(fseek(f, 0, SEEK_SET)) goto tfrf;
strcpy(content->name, "basecode");
content->data_type = 0x23; // FLASH os
content->data_part = (uint8_t *)g_malloc0(content->data_length);
if (content->data_part == NULL)
{
fclose(f);
return ERR_MALLOC;
}
if(fread(content->data_part, 1, content->data_length, f) < content->data_length) goto tfrf;
switch(content->data_part[8])
{
case 1: content->device_type = DEVICE_TYPE_92P; break; // TI92+
case 3: content->device_type = DEVICE_TYPE_89; break; // TI89
// value added by the TI community according to HWID parameter
// doesn't have any 'legal' existence.
case 8: content->device_type = DEVICE_TYPE_92P; break; // V200PLT
case 9: content->device_type = DEVICE_TYPE_89; break; // Titanium
}
content->next = NULL;
}
else
{
for (content = head;; content = content->next)
{
if(fread_8_chars(f, signature) < 0) goto tfrf;
content->model = tifiles_file_get_model(filename);
if(fread_byte(f, &(content->revision_major)) < 0) goto tfrf;
if(fread_byte(f, &(content->revision_minor)) < 0) goto tfrf;
if(fread_byte(f, &(content->flags)) < 0) goto tfrf;
if(fread_byte(f, &(content->object_type)) < 0) goto tfrf;
if(fread_byte(f, &(content->revision_day)) < 0) goto tfrf;
if(fread_byte(f, &(content->revision_month)) < 0) goto tfrf;
if(fread_word(f, &(content->revision_year)) < 0) goto tfrf;
if(fskip(f, 1) < 0) goto tfrf;
if(fread_8_chars(f, content->name) < 0) goto tfrf;
if(fskip(f, 23) < 0) goto tfrf;
if(fread_byte(f, &(content->device_type)) < 0) goto tfrf;
if(fread_byte(f, &(content->data_type)) < 0) goto tfrf;
if(fskip(f, 23) < 0) goto tfrf;
if(fread_byte(f, &(content->hw_id)) < 0) goto tfrf;
if(fread_long(f, &(content->data_length)) < 0) goto tfrf;
if(content->data_type != TI89_LICENSE && !check_device_type(content->device_type))
{
return ERR_INVALID_FILE;
}
if(!check_data_type(content->data_type))
{
return ERR_INVALID_FILE;
}
content->data_part = (uint8_t *)g_malloc0(content->data_length);
if (content->data_part == NULL)
{
fclose(f);
tifiles_content_delete_flash(content);
return ERR_MALLOC;
}
if(fread(content->data_part, 1, content->data_length, f) < content->data_length) goto tfrf;
content->next = NULL;
// check for end of file
if(fread_8_chars(f, signature) < 0)
{
break;
}
if(strcmp(signature, "**TIFL**") || feof(f))
{
break;
}
if(fseek(f, -8, SEEK_CUR)) goto tfrf;
content->next = (Ti9xFlash *)g_malloc0(sizeof(Ti9xFlash));
if (content->next == NULL)
{
fclose(f);
tifiles_content_delete_flash(content);
return ERR_MALLOC;
}
}
}
fclose(f);
return 0;
tfrf: // release on exit
tifiles_critical("%s: error reading / understanding file %s", __FUNCTION__, filename);
fclose(f);
tifiles_content_delete_flash(content);
return ERR_FILE_IO;
}
/*
Get some informations on the FLASH upgrade:
- size
- ROM base address
- os version
- calc type
*/
int ti68k_get_tib_infos(const char *filename, IMG_INFO *tib, int preload)
{
FlashContent content;
FlashContent *ptr;
int nheaders = 0;
int i;
// No filename, exits
if(!strcmp(g_basename(filename), ""))
return ERR_CANT_OPEN;
// Check valid file
if(!tifiles_file_is_ti(filename))
return ERR_NOT_TI_FILE;
if(!tifiles_file_is_tib(filename))
return ERR_INVALID_UPGRADE;
// Load file
if(tifiles_file_read_flash(filename, &content) != 0)
return ERR_INVALID_UPGRADE;
// count headers
for (ptr = &content; ptr != NULL; ptr = ptr->next)
nheaders++;
// keep the last one (data)
for (i = 0, ptr = &content; i < nheaders - 1; i++)
ptr = ptr->next;
// Load TIB into memory and relocate at SPP
if(tib->data == NULL)
tib->data = malloc(SPP + ptr->data_length + 4);
if(tib->data == NULL)
return ERR_MALLOC;
memset(tib->data + SPP, 0xff, ptr->data_length);
memcpy(tib->data + SPP, ptr->data_part, ptr->data_length);
// Update current rom infos
tib->rom_base = tib->data[BO+5 + SPP] & 0xf0;
// libtifiles can't distinguish TI89/TI89t and 92+/V200. We need to look.
switch(ptr->device_type & 0xff)
{
case DEVICE_TYPE_89: // can be a Titanium, too
switch(tib->rom_base & 0xff)
{
case 0x20: tib->calc_type = TI89; break;
case 0x80: tib->calc_type = TI89t; break;
default: return ERR_INVALID_UPGRADE;
}
break;
case DEVICE_TYPE_92P:
switch(tib->rom_base & 0xff)
{
case 0x20: tib->calc_type = V200; break;
case 0x40: tib->calc_type = TI92p; break;
default: return ERR_INVALID_UPGRADE;
}
break;
default:
printl(0, "TIB problem: %02x!\n", 0xff & ptr->device_type);
return ERR_INVALID_UPGRADE;
break;
}
tib->flash = FLASH_ROM;
tib->has_boot = 0;
tib->size = ptr->data_length + SPP;
get_rom_version(tib->data, tib->size, tib->version);
tifiles_content_delete_flash(&content);
if(!preload)
free(tib->data);
return 0;
}
