export.c 19 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608609610611612613614615616617618619620621622623624625626627628629630631632633634635636637638639640641642643644645646647648649650651652653654655656657658659660661662663664665666667668669670671672673674675676677678679680681682683684685686687
  1. /* export.c: Routines for file exports
  2. Copyright (C) 2002-2004 Sebastian Reichelt
  3. Copyright (C) 2003-2005 Kevin Kofler
  4. Copyright (C) 2004 Billy Charvet
  5. This program is free software; you can redistribute it and/or modify
  6. it under the terms of the GNU General Public License as published by
  7. the Free Software Foundation; either version 2, or (at your option)
  8. any later version.
  9. This program is distributed in the hope that it will be useful,
  10. but WITHOUT ANY WARRANTY; without even the implied warranty of
  11. MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
  12. GNU General Public License for more details.
  13. You should have received a copy of the GNU General Public License
  14. along with this program; if not, write to the Free Software Foundation,
  15. Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. */
  16. #include "export.h"
  17. #ifdef TIOS_SUPPORT
  18. #include "exp_tios.h"
  19. #endif /* TIOS_SUPPORT */
  20. #ifdef FLASH_OS_SUPPORT
  21. #include "exp_os.h"
  22. #endif /* FLASH_OS_SUPPORT */
  23. #ifdef NOSTUB_DLL_SUPPORT
  24. #include "exp_ndll.h"
  25. #endif /* NOSTUB_DLL_SUPPORT */
  26. #ifdef FARGO_SUPPORT
  27. #include "exp_farg.h"
  28. #endif /* FARGO_SUPPORT */
  29. #ifdef DATA_VAR_SUPPORT
  30. #include "exp_data.h"
  31. #endif /* DATA_VAR_SUPPORT */
  32. #ifdef DEBUGGING_INFO_SUPPORT
  33. #include "exp_dbg.h"
  34. #endif /* DEBUGGING_INFO_SUPPORT */
  35. #include "../formats/tios.h"
  36. #include "../formats/tiosupgd.h"
  37. #include "../special.h"
  38. #include <string.h>
  39. typedef struct {
  40. OUTPUT_FILE_FUNCTION GetOutputFile;
  41. OUTPUT_FILE_FINALIZE_FUNCTION FinalizeOutputFile;
  42. GET_FILE_SIZE_FUNCTION GetFileSize;
  43. EXPORT_FILE_FUNCTION ExportFile, ExportDataFile;
  44. FileFormats FileFormat, DataFileFormat;
  45. unsigned int FileType, DataFileType;
  46. const char *Extension;
  47. } EXPORT_STRUCT;
  48. // Return the maximum file size allowed for a given format
  49. // (without header and footer).
  50. static SIZE GetMaxFileSize (FileFormats FileFormat, ProgramCalcs Calc)
  51. {
  52. switch (FileFormat)
  53. {
  54. case FF_TIOS:
  55. return MAX_TIOS_FILE_SIZE;
  56. case FF_TIOS_UPGRADE:
  57. if (Calc == CALC_V200 || (Calc == (CALC_TI89 | CALC_FLAG_TITANIUM)))
  58. return MAX_TIOS_UPGRADE_FILE_SIZE_NEW;
  59. else
  60. return MAX_TIOS_UPGRADE_FILE_SIZE_OLD;
  61. default:
  62. return 0;
  63. }
  64. }
  65. // Export the internal data structures to an external file for the given
  66. // calculator.
  67. static BOOLEAN ExportProgramToFormat (const PROGRAM *Program, const EXPORT_STRUCT *ExportStruct, ProgramCalcs Calc)
  68. {
  69. BOOLEAN Success;
  70. EXP_FILE File;
  71. SIZE Size, MaxSize;
  72. I4 EffectiveSize = 0;
  73. // Fill the output file struct with zeroes.
  74. memset (&File, 0, sizeof (File));
  75. // Get the file size needed to export the file.
  76. Size = ExportStruct->GetFileSize (Program);
  77. // A size of 0 indicates an error.
  78. if (Size <= 0)
  79. return FALSE;
  80. // Check for maximum file size.
  81. MaxSize = GetMaxFileSize (ExportStruct->FileFormat, Calc);
  82. if (Size > MaxSize)
  83. {
  84. Error (NULL, "Program size of %ld bytes exceeds maximum by %ld.", (long) Size, (long) (Size - MaxSize));
  85. return FALSE;
  86. }
  87. // Create an output file with the specified format.
  88. if (!(ExportStruct->GetOutputFile (&(File.File), Size, Calc, FR_MAIN, ExportStruct->FileFormat, ExportStruct->FileType, ExportStruct->Extension, !(Program->Library), &EffectiveSize)))
  89. return FALSE;
  90. // Export the program into the output file.
  91. Success = ExportStruct->ExportFile (Program, &File, Size, Calc);
  92. // Finalize and close the output file.
  93. if (ExportStruct->FinalizeOutputFile)
  94. ExportStruct->FinalizeOutputFile (&(File.File));
  95. if (Success)
  96. {
  97. if (Program->OptimizeInfo->ProgramSize < (SI4) EffectiveSize)
  98. Program->OptimizeInfo->ProgramSize = (SI4) EffectiveSize;
  99. }
  100. else
  101. return FALSE;
  102. #ifdef DATA_VAR_SUPPORT
  103. // Write the data file, if any.
  104. if (Program->DataVarInfo->Name && Program->DataSection)
  105. {
  106. if (ExportStruct->DataFileFormat == FF_NONE)
  107. {
  108. Error (NULL, "Data variable is not supported in this file format.");
  109. return FALSE;
  110. }
  111. // Fill the output file struct with zeroes.
  112. memset (&File, 0, sizeof (File));
  113. // Get the file size needed to export the file.
  114. Size = GetDataFileSize (Program);
  115. // A size of 0 indicates an error.
  116. if (Size <= 0)
  117. return FALSE;
  118. MaxSize = GetMaxFileSize (ExportStruct->DataFileFormat, Calc);
  119. // Check for maximum file size.
  120. if (Size > MaxSize)
  121. {
  122. Error (NULL, "Data variable size of %ld bytes exceeds maximum by %ld.", (long) Size, (long) (MaxSize - Size));
  123. return FALSE;
  124. }
  125. // Create an output file with the specified format.
  126. if (!(ExportStruct->GetOutputFile (&(File.File), Size, Calc, FR_DATA, ExportStruct->DataFileFormat, ExportStruct->DataFileType, "DAT", FALSE, &EffectiveSize)))
  127. return FALSE;
  128. // Export the program into the output file.
  129. Success = ExportStruct->ExportDataFile (Program, &File, Size, Calc);
  130. // Finalize and close the output file.
  131. if (ExportStruct->FinalizeOutputFile)
  132. ExportStruct->FinalizeOutputFile (&(File.File));
  133. if (Success)
  134. {
  135. if (Program->OptimizeInfo->DataSize < (SI4) EffectiveSize)
  136. Program->OptimizeInfo->DataSize = (SI4) EffectiveSize;
  137. }
  138. else
  139. return FALSE;
  140. }
  141. #endif /* DATA_VAR_SUPPORT */
  142. return TRUE;
  143. }
  144. // Export the internal data structures to external files, creating as many
  145. // files as needed.
  146. BOOLEAN ExportProgram (const PROGRAM *Program, OUTPUT_FILE_FUNCTION GetOutputFile, OUTPUT_FILE_FINALIZE_FUNCTION FinalizeOutputFile)
  147. {
  148. EXPORT_STRUCT ExportStruct = {GetOutputFile, FinalizeOutputFile, NULL, NULL, NULL, FF_TIOS, FF_TIOS, TIOS_TAG_ASM, TIOS_TAG_OTH, NULL};
  149. if (!GetOutputFile)
  150. return FALSE;
  151. #ifdef DEBUGGING_INFO_SUPPORT
  152. // If we have debugging information to export, do it.
  153. if (Program->HaveDebuggingInfo)
  154. {
  155. if (!ExportDebuggingInfo (Program, GetOutputFile, FinalizeOutputFile))
  156. return FALSE;
  157. }
  158. #endif
  159. switch (Program->Type)
  160. {
  161. #ifdef FLASH_OS_SUPPORT
  162. case PT_FLASH_OS:
  163. ExportStruct.GetFileSize = GetFlashOSFileSize;
  164. ExportStruct.ExportFile = ExportFlashOSFile;
  165. ExportStruct.FileFormat = FF_TIOS_UPGRADE;
  166. ExportStruct.FileType = 0; // Different types for Flash OSs do not exist.
  167. ExportStruct.DataFileFormat = FF_NONE;
  168. ExportStruct.DataFileType = 0;
  169. break;
  170. #endif /* FLASH_OS_SUPPORT */
  171. #ifdef NOSTUB_DLL_SUPPORT
  172. case PT_NOSTUB_DLL:
  173. ExportStruct.GetFileSize = GetNostubDLLFileSize;
  174. ExportStruct.ExportFile = ExportNostubDLLFile;
  175. ExportStruct.FileType = TIOS_TAG_OTH;
  176. ExportStruct.Extension = "DLL";
  177. break;
  178. #endif /* NOSTUB_DLL_SUPPORT */
  179. #ifdef FARGO_SUPPORT
  180. case PT_FARGO:
  181. ExportStruct.GetFileSize = GetFargoFileSize;
  182. ExportStruct.ExportFile = ExportFargoFile;
  183. ExportStruct.FileType = TIOS_TAG_PRGM;
  184. break;
  185. #endif /* FARGO_SUPPORT */
  186. default:
  187. #ifdef TIOS_SUPPORT
  188. ExportStruct.GetFileSize = GetTIOSFileSize;
  189. ExportStruct.ExportFile = ExportTIOSFile;
  190. #else /* !TIOS_SUPPORT */
  191. Error (NULL, "No default export target for this program type.");
  192. return FALSE;
  193. #endif /* !TIOS_SUPPORT */
  194. }
  195. #ifdef DATA_VAR_SUPPORT
  196. ExportStruct.ExportDataFile = ExportDataFile;
  197. #endif /* DATA_VAR_SUPPORT */
  198. {
  199. ProgramCalcs CurCalc;
  200. // For all calculators...
  201. for (CurCalc = 1; CurCalc <= HIGHEST_CALC; CurCalc <<= 1)
  202. {
  203. if (Program->Calcs & CurCalc)
  204. {
  205. if (!(ExportProgramToFormat (Program, &ExportStruct, CurCalc)))
  206. return FALSE;
  207. if (Program->Type == PT_FLASH_OS && CurCalc == CALC_TI89 && (Program->Calcs & CALC_FLAG_TITANIUM))
  208. {
  209. if (!(ExportProgramToFormat (Program, &ExportStruct, CurCalc | CALC_FLAG_TITANIUM)))
  210. return FALSE;
  211. }
  212. }
  213. }
  214. }
  215. Program->OptimizeInfo->RelocCount += Program->OptimizeInfo->NativeRelocCount;
  216. return TRUE;
  217. }
  218. // Non-embedded file output functions as defined in intrface.h.
  219. #ifndef TARGET_EMBEDDED
  220. #include <stdio.h>
  221. // Destination file name without extension.
  222. const char *DestFile = NULL;
  223. SIZE DestFileSize = 0;
  224. // Folder and variable name for main file.
  225. char ProgramFolder[MAX_NAME_LEN+1] = "main", ProgramName[MAX_NAME_LEN+1] = "program";
  226. #ifdef DATA_VAR_SUPPORT
  227. // Folder and variable name for data file.
  228. char DataFolder[MAX_NAME_LEN+1] = "", DataName[MAX_NAME_LEN+1] = "data";
  229. #endif /* DATA_VAR_SUPPORT */
  230. #ifdef PUCRUNCH_SUPPORT
  231. // Specifies whether to pack the main file with pucrunch.
  232. BOOLEAN Pack = FALSE;
  233. #endif /* PUCRUNCH_SUPPORT */
  234. // Specifies whether to output only the binary image of the program.
  235. BOOLEAN OutputBin = FALSE;
  236. // Specifies whether to output only the binary image of the main file.
  237. BOOLEAN OutputBinMainOnly = FALSE;
  238. // Maximum length of a file extension.
  239. #define MAX_FILE_EXT_LEN 3
  240. BOOLEAN GetOutputFile (INT_EXP_FILE *File, SIZE FileSize, unsigned int DestCalc, unsigned int FileRole, unsigned int FileFormat, unsigned int FileType, const char *Extension, BOOLEAN Executable ATTRIBUTE_UNUSED, I4 *EffectiveSize)
  241. {
  242. // Keep some of the parameters for finalization.
  243. File->OutputBin = OutputBin || (OutputBinMainOnly && FileRole == FR_MAIN);
  244. File->FileFormat = FileFormat;
  245. File->FileType = FileType;
  246. File->Extension = Extension;
  247. // Determine the destination file format and act accordingly.
  248. switch (FileFormat)
  249. {
  250. #ifdef TIOS_FILE_SUPPORT
  251. case FF_TIOS:
  252. {
  253. const char *FolderName, *VarName;
  254. const char *FileExtCalc, *FileExtType;
  255. unsigned int LinkType;
  256. // Calculate the size needed for the two size bytes and the
  257. // tag.
  258. SIZE VarFileSize = 2 + FileSize + 1;
  259. // If the file has an extension, add the size needed for it.
  260. if (Extension)
  261. VarFileSize += 1 + strlen (Extension) + 1;
  262. // The variable size is what the user will see.
  263. *EffectiveSize = VarFileSize;
  264. // Determine the role of the file and set the folder and
  265. // variable names according to the user settings.
  266. switch (FileRole)
  267. {
  268. case FR_MAIN:
  269. FolderName = ProgramFolder;
  270. VarName = ProgramName;
  271. break;
  272. #ifdef DATA_VAR_SUPPORT
  273. case FR_DATA:
  274. if (*DataFolder)
  275. FolderName = DataFolder;
  276. else
  277. FolderName = ProgramFolder;
  278. VarName = DataName;
  279. break;
  280. #endif /* DATA_VAR_SUPPORT */
  281. default:
  282. Error (NULL, "Unknown file role.");
  283. return FALSE;
  284. }
  285. // Determine the destination calculator and set part of the
  286. // file extension.
  287. switch (DestCalc)
  288. {
  289. case CALC_TI92:
  290. FileExtCalc = "92";
  291. break;
  292. case CALC_TI89:
  293. FileExtCalc = "89";
  294. break;
  295. case CALC_TI92PLUS:
  296. FileExtCalc = "9x";
  297. break;
  298. case CALC_V200:
  299. FileExtCalc = "v2";
  300. break;
  301. default:
  302. Error (NULL, "Unknown calculator.");
  303. return FALSE;
  304. }
  305. // Determine the file type and set the other part of the file
  306. // extension.
  307. switch (FileType)
  308. {
  309. case TIOS_TAG_STR:
  310. FileExtType = "s";
  311. LinkType = TIOS_LINK_TYPE_STR;
  312. break;
  313. case TIOS_TAG_PRGM:
  314. FileExtType = "p";
  315. LinkType = TIOS_LINK_TYPE_PRGM;
  316. break;
  317. case TIOS_TAG_ASM:
  318. FileExtType = "z";
  319. LinkType = TIOS_LINK_TYPE_ASM;
  320. break;
  321. case TIOS_TAG_OTH:
  322. FileExtType = "y";
  323. LinkType = TIOS_LINK_TYPE_OTH;
  324. break;
  325. default:
  326. Error (NULL, "Unknown file type.");
  327. return FALSE;
  328. }
  329. {
  330. SIZE FileNameSize = DestFileSize;
  331. // Create a temporary file name string.
  332. char CurOutputFileName[FileNameSize+1+MAX_FILE_EXT_LEN+1];
  333. strncpy (CurOutputFileName, DestFile, FileNameSize);
  334. // Insert the dot into the file name.
  335. CurOutputFileName [FileNameSize++] = '.';
  336. // Insert the extension. Reverse in binary mode.
  337. if (File->OutputBin)
  338. {
  339. strcpy (CurOutputFileName + FileNameSize, FileExtType);
  340. FileNameSize += strlen (FileExtType);
  341. strcpy (CurOutputFileName + FileNameSize, FileExtCalc);
  342. FileNameSize += strlen (FileExtCalc);
  343. }
  344. else
  345. {
  346. strcpy (CurOutputFileName + FileNameSize, FileExtCalc);
  347. FileNameSize += strlen (FileExtCalc);
  348. strcpy (CurOutputFileName + FileNameSize, FileExtType);
  349. FileNameSize += strlen (FileExtType);
  350. }
  351. // Zero-terminate the string.
  352. CurOutputFileName [FileNameSize] = 0;
  353. // Open a file with the specified name.
  354. if (!(File->File = fopen (CurOutputFileName, "wb")))
  355. {
  356. Error (CurOutputFileName, "Could not open file for writing.");
  357. return FALSE;
  358. }
  359. // Write the host file header, if desired.
  360. if (!File->OutputBin)
  361. {
  362. TIOS_HOST_FILE_HEADER Header;
  363. memset (&Header, 0, sizeof (Header));
  364. // Write the signature.
  365. switch (DestCalc)
  366. {
  367. case CALC_TI92:
  368. strncpy (Header.Signature, "**TI92**", 8);
  369. break;
  370. case CALC_TI89:
  371. strncpy (Header.Signature, "**TI89**", 8);
  372. break;
  373. case CALC_TI92PLUS:
  374. case CALC_V200:
  375. strncpy (Header.Signature, "**TI92P*", 8);
  376. break;
  377. default:
  378. Error (NULL, "Unknown calculator.");
  379. return FALSE;
  380. }
  381. // Write folder name.
  382. strncpy (Header.FolderName, FolderName, sizeof (Header.FolderName));
  383. // Write variable name.
  384. strncpy (Header.VarName, VarName, sizeof (Header.VarName));
  385. // Write link type.
  386. WriteHI1 (Header.LinkType, LinkType);
  387. // Write file size.
  388. WriteHI4 (Header.FileSize, VarFileSize + sizeof (TIOS_HOST_FILE_HEADER) + sizeof (TIOS_HOST_FILE_FOOTER));
  389. // Write reserved bytes.
  390. Header.Reserved1 [0] = 0x01;
  391. Header.Reserved2 [0] = 0x01;
  392. Header.Reserved2 [2] = 0x52;
  393. Header.Reserved4 [0] = 0xA5;
  394. Header.Reserved4 [1] = 0x5A;
  395. // Export the header.
  396. fwrite (&Header, sizeof (Header), 1, File->File);
  397. }
  398. // Write the on-calc file header.
  399. {
  400. TI2 EncVarFileSize;
  401. // Encode the embedded size into the target
  402. // endianness.
  403. WriteTI2 (EncVarFileSize, VarFileSize - 2);
  404. // Export the file size.
  405. fwrite (&EncVarFileSize, 2, 1, File->File);
  406. // Update the checksum, since this is still included
  407. // in the on-calc file image.
  408. File->CheckSum += ReadTI1 (EncVarFileSize.Hi) + ReadTI1 (EncVarFileSize.Lo);
  409. }
  410. return TRUE;
  411. }
  412. }
  413. break;
  414. #endif /* TIOS_FILE_SUPPORT */
  415. #ifdef TIOS_UPGRADE_FILE_SUPPORT
  416. case FF_TIOS_UPGRADE:
  417. *EffectiveSize = FileSize + sizeof (TIOS_UPGRADE_CALC_FOOTER);
  418. if (File->OutputBin)
  419. {
  420. const char *FileExtCalc;
  421. // Determine the destination calculator and set part of the
  422. // file extension.
  423. switch (DestCalc)
  424. {
  425. case CALC_TI92:
  426. FileExtCalc = "92";
  427. break;
  428. case CALC_TI89:
  429. FileExtCalc = "89";
  430. break;
  431. case CALC_TI89 | CALC_FLAG_TITANIUM:
  432. FileExtCalc = "89ti";
  433. break;
  434. case CALC_TI92PLUS:
  435. FileExtCalc = "9x";
  436. break;
  437. case CALC_V200:
  438. FileExtCalc = "v2";
  439. break;
  440. default:
  441. Error (NULL, "Unknown calculator.");
  442. return FALSE;
  443. }
  444. {
  445. SIZE FileNameSize = DestFileSize;
  446. // Create a temporary file name string.
  447. char CurOutputFileName[FileNameSize+1+4+1+sizeof("tib")];
  448. strncpy (CurOutputFileName, DestFile, FileNameSize);
  449. // Insert a dash into the file name.
  450. CurOutputFileName [FileNameSize++] = '-';
  451. // Insert the calculator model into the file name.
  452. strcpy (CurOutputFileName + FileNameSize, FileExtCalc);
  453. FileNameSize += strlen (FileExtCalc);
  454. // Insert the dot into the file name.
  455. CurOutputFileName [FileNameSize++] = '.';
  456. // Insert the .tib extension.
  457. strcpy (CurOutputFileName + FileNameSize, "tib");
  458. FileNameSize += sizeof ("tib") - 1;
  459. // Zero-terminate the string.
  460. CurOutputFileName [FileNameSize] = 0;
  461. // Open a file with the specified name.
  462. if (!(File->File = fopen (CurOutputFileName, "wb")))
  463. {
  464. Error (CurOutputFileName, "Could not open file for writing.");
  465. return FALSE;
  466. }
  467. return TRUE;
  468. }
  469. }
  470. else
  471. Error (NULL, "Support for `.??u' files is not implemented yet. Use `--outputbin'.");
  472. break;
  473. #endif /* TIOS_UPGRADE_FILE_SUPPORT */
  474. #ifdef DEBUGGING_INFO_SUPPORT
  475. case FF_GDB_COFF:
  476. *EffectiveSize = FileSize;
  477. {
  478. SIZE FileNameSize = DestFileSize+4;
  479. // Create a temporary file name string.
  480. char CurOutputFileName[FileNameSize+1];
  481. strncpy (CurOutputFileName, DestFile, DestFileSize);
  482. // Append ".dbg" to the file name.
  483. strcpy (CurOutputFileName + DestFileSize, ".dbg");
  484. // Zero-terminate the string.
  485. CurOutputFileName [FileNameSize] = 0;
  486. // Open a file with the specified name.
  487. if (!(File->File = fopen (CurOutputFileName, "wb")))
  488. {
  489. Error (CurOutputFileName, "Could not open file for writing.");
  490. return FALSE;
  491. }
  492. return TRUE;
  493. }
  494. break;
  495. #endif /* DEBUGGING_INFO_SUPPORT */
  496. default:
  497. Error (NULL, "Unrecognized output file format.");
  498. }
  499. return FALSE;
  500. }
  501. void FinalizeOutputFile (INT_EXP_FILE *File)
  502. {
  503. // Determine the destination file format and finish it.
  504. switch (File->FileFormat)
  505. {
  506. #ifdef TIOS_FILE_SUPPORT
  507. case FF_TIOS:
  508. {
  509. // Write the on-calc file footer.
  510. {
  511. TI1 EncFileTag;
  512. // Export the possible file extension.
  513. if (File->Extension)
  514. {
  515. // Export the leading 0 byte.
  516. WriteTI1 (EncFileTag, 0);
  517. fwrite (&EncFileTag, 1, 1, File->File);
  518. // Export the extension string and terminating 0
  519. // byte.
  520. fwrite (File->Extension, 1, strlen (File->Extension) + 1, File->File);
  521. // Update the checksum.
  522. while (*(File->Extension))
  523. File->CheckSum += (*(File->Extension++));
  524. }
  525. // Encode the file tag.
  526. WriteTI1 (EncFileTag, File->FileType);
  527. // Export the file tag.
  528. fwrite (&EncFileTag, 1, 1, File->File);
  529. File->CheckSum += (I1) (File->FileType);
  530. }
  531. // Write the host file footer, if desired.
  532. if (!File->OutputBin)
  533. {
  534. TIOS_HOST_FILE_FOOTER Footer;
  535. memset (&Footer, 0, sizeof (Footer));
  536. // Write the checksum.
  537. WriteHI2 (Footer.CheckSum, File->CheckSum);
  538. // Export the footer.
  539. fwrite (&Footer, sizeof (Footer), 1, File->File);
  540. }
  541. }
  542. break;
  543. #endif /* TIOS_FILE_SUPPORT */
  544. #ifdef TIOS_UPGRADE_FILE_SUPPORT
  545. case FF_TIOS_UPGRADE:
  546. {
  547. // Write the on-calc upgrade file footer.
  548. {
  549. TIOS_UPGRADE_CALC_FOOTER Footer;
  550. // Since we do not have TI's private key, we cannot
  551. // write a real checksum and signature.
  552. memset (&Footer, 0, sizeof (Footer));
  553. // Encode the fixed data we know.
  554. WriteTI2 (Footer.SignatureHeader, 0x020D);
  555. WriteTI1 (Footer.SignatureType, 0x40);
  556. // Export the footer.
  557. fwrite (&Footer, sizeof (Footer), 1, File->File);
  558. }
  559. }
  560. break;
  561. #endif /* TIOS_UPGRADE_FILE_SUPPORT */
  562. #ifdef DEBUGGING_INFO_SUPPORT
  563. case FF_GDB_COFF:
  564. // Do nothing.
  565. break;
  566. #endif /* DEBUGGING_INFO_SUPPORT */
  567. }
  568. // Close the file.
  569. fclose (File->File);
  570. }
  571. #endif /* !TARGET_EMBEDDED */