Subversion Repositories Kolibri OS

Rev

Rev 1686 | Go to most recent revision | Blame | Compare with Previous | Last modification | View Log | Download | RSS feed

  1. ;---------------------------------------------------------------------
  2. aQuestion       db '?'
  3. caption_str     db 'KPack',0
  4. buttons1names   db ' InFile:'
  5.                 db 'OutFile:'
  6.                 db '   Path:'
  7. aCompress       db 'COMPRESS',0
  8. aDecompress     db 'DECOMPRESS',0
  9. definoutname    db 0
  10. defpath         db '/RD/1/'
  11. curedit         dd 0
  12.  
  13. info_str        db 'KPack - Kolibri Packer, version 0.13',10
  14.                 db 'Uses LZMA v4.32 compression library',10,10
  15. info_len        = $ - info_str
  16. usage_str       db 'Written by diamond in 2006, 2007, 2009 specially for KolibriOS',10
  17.                 db 'LZMA  is copyright (c) 1999-2005 by Igor Pavlov',10
  18.                 db 10
  19.                 db 'Command-line usage:',10
  20.                 db ' kpack infile [outfile]',10
  21.                 db 'If no output file is specified,',10
  22.                 db '    packed data will be written back to input file',10
  23.                 db 10
  24.                 db 'Window usage:',10
  25.                 db " enter input file name, output file name and press needed button",10
  26. usage_len       = $ - usage_str
  27. errload_str     db 'Cannot load input file',10
  28. errload_len     = $ - errload_str
  29. outfileerr_str  db 'Cannot save output file',10
  30. outfileerr_len  = $ - outfileerr_str
  31. nomem_str       db 'No memory',10
  32. nomem_len       = $ - nomem_str
  33. too_big_str     db 'failed, output is greater than input.',10
  34. too_big_len     = $ - too_big_str
  35. compressing_str db 'Compressing ... '
  36. compressing_len = $ - compressing_str
  37. lzma_memsmall_str db    'Warning: not enough memory for default LZMA settings,',10
  38.                 db '         will use less dictionary size',10
  39. lzma_memsmall_len = $ - lzma_memsmall_str
  40. notpacked_str   db 'Input file is not packed with KPack!',10
  41. notpacked_len   = $ - notpacked_str
  42. unpacked_ok     db 'Unpacked successful',10
  43. unpacked_len    = $ - unpacked_ok
  44.  
  45. done_str        db 'OK! Compression ratio: '
  46. ratio           dw      '00'
  47.                 db '%',10
  48. done_len        = $ - done_str
  49. ;---------------------------------------------------------------------
  50. align 4
  51. LiteralNextStates:
  52. db 0,0,0,0,1,2,3,4,5,6,4,5
  53. MatchNextStates:
  54. db 7,7,7,7,7,7,7,10,10,10,10,10
  55. RepNextStates:
  56. db 8,8,8,8,8,8,8,11,11,11,11,11
  57. ShortRepNextStates:
  58. db 9,9,9,9,9,9,9,11,11,11,11,11
  59. ;---------------------------------------------------------------------