Subversion Repositories Kolibri OS

Rev

Blame | Last modification | View Log | Download | RSS feed

  1. struct f70{
  2.         dword   func;
  3.         dword   param1;
  4.         dword   param2;
  5.         dword   param3;
  6.         dword   param4;
  7.         char    rezerv;
  8.         dword   name;
  9. };
  10.  
  11. struct BDVK{
  12.         dword   attr;
  13.         byte    type_name;
  14.         byte    rez1, rez2, rez3;
  15.         dword   timecreate;
  16.         dword   datecreate;
  17.         dword   timelastaccess;
  18.         dword   datelastaccess;
  19.         dword   timelastedit;
  20.         dword   datelastedit;
  21.         dword   sizelo;
  22.         dword   sizehi;
  23.         char    name[518];
  24. };
  25.  
  26.  
  27. ///////////////////////////
  28. //   Ïàðàìåòðû ôàéëà    //
  29. ///////////////////////////
  30. f70 getinfo_file_70;
  31. BDVK getinfo_file_info;
  32. dword GetFileInfo(dword file_name)
  33. {    
  34.     getinfo_file_70.func = 5;
  35.     getinfo_file_70.param1 =
  36.     getinfo_file_70.param2 =
  37.     getinfo_file_70.param3 =
  38.     getinfo_file_70.param4 = #getinfo_file_info;
  39.     getinfo_file_70.rezerv = 0;
  40.     getinfo_file_70.name = file_name;
  41.     $mov eax,70
  42.     $mov ebx,#getinfo_file_70.func
  43.     $int 0x40
  44.     IF (EAX == 0) {
  45.          EAX = #getinfo_file_info;
  46.     }
  47. }
  48.  
  49.  
  50. ///////////////////////////
  51. //   Çàïóñê ïðîãðàììû    //
  52. ///////////////////////////
  53. f70 run_file_70;
  54. void RunProgram(dword run_path, run_param)
  55. {    
  56.     run_file_70.func = 7;
  57.     run_file_70.param1 =
  58.     run_file_70.param3 =
  59.     run_file_70.param4 =
  60.     run_file_70.rezerv = 0;
  61.     run_file_70.param2 = run_param;
  62.     run_file_70.name = run_path;
  63.     $mov eax,70
  64.     $mov ebx,#run_file_70.func
  65.     $int 0x40
  66. }
  67.  
  68. ///////////////////////////
  69. //    Ñîçäàíèå ïàïêè     //
  70. ///////////////////////////
  71. f70 create_dir_70;
  72. void CreateFolder(dword new_folder_path)
  73. {
  74.         create_dir_70.func = 9;
  75.         create_dir_70.param1 =
  76.         create_dir_70.param2 =
  77.         create_dir_70.param3 =
  78.         create_dir_70.param4 =
  79.         create_dir_70.rezerv = 0;
  80.         create_dir_70.name = new_folder_path;
  81.         $mov eax,70
  82.         $mov ebx,#create_dir_70.func
  83.         $int 0x40
  84. }
  85.  
  86. ////////////////////////////
  87. //  Óäàëåíèå ôàéëà/ïàïêè  //
  88. ////////////////////////////
  89. f70 del_file_70;       
  90. void DeleteFile(dword del_file_path)
  91. {    
  92.         del_file_70.func = 8;
  93.         del_file_70.param1 =
  94.         del_file_70.param2 =
  95.         del_file_70.param3 =
  96.         del_file_70.param4 =
  97.         del_file_70.rezerv = 0;
  98.         del_file_70.name = del_file_path;
  99.         $mov eax,70
  100.         $mov ebx,#del_file_70.func
  101.         $int 0x40
  102. }
  103.  
  104. ////////////////////////////
  105. //     Ïðî÷èòàòü ôàéë     //
  106. ////////////////////////////
  107. f70 read_file_70;
  108. void ReadFile(dword pos, file_size, read_buffer, file_path)
  109. {
  110.         read_file_70.func = 0;
  111.         read_file_70.param1 = pos;
  112.         read_file_70.param2 = 0;
  113.         read_file_70.param3 = file_size;
  114.         read_file_70.param4 = read_buffer;
  115.         read_file_70.rezerv = 0;
  116.         read_file_70.name = file_path;
  117.         $mov eax,70
  118.         $mov ebx,#read_file_70.func
  119.         $int 0x40
  120. }    
  121.  
  122. ///////////////////////////
  123. //    Ïðî÷èòàòü ïàïêó    //
  124. ///////////////////////////
  125. f70 read_dir_70;
  126. void ReadDir(dword file_count, read_buffer, dir_path)
  127. {    
  128.         read_dir_70.func = 1;
  129.         read_dir_70.param1 =
  130.         read_dir_70.param2 =
  131.         read_dir_70.rezerv = 0;
  132.         read_dir_70.param3 = file_count;
  133.         read_dir_70.param4 = read_buffer;
  134.         read_dir_70.name = dir_path;
  135.         $mov eax,70
  136.         $mov ebx,#read_dir_70.func
  137.         $int 0x40
  138. }  
  139.  
  140. ///////////////////////////
  141. //   Ñêîïèðîâàòü ôàéë    //
  142. ///////////////////////////
  143. f70 CopyFile_f;
  144. inline fastcall dword CopyFile(dword EBX,ECX)
  145. {
  146.         BDVK CopyFile_atr;
  147.         dword s=EBX, d=ECX, cBufer=0;
  148.         CopyFile_f.func = 5;
  149.         CopyFile_f.param1 = 0;
  150.         CopyFile_f.param2 = 0;
  151.         CopyFile_f.param3 = 0;
  152.         CopyFile_f.param4 = #CopyFile_atr;
  153.         CopyFile_f.rezerv = 0;
  154.         CopyFile_f.name = s;
  155.         $mov eax, 70
  156.         $mov ebx, #CopyFile_f
  157.         $int 0x40
  158.        
  159.         if (!EAX)
  160.         {      
  161.                 cBufer = malloc(CopyFile_atr.sizelo);  
  162.                 ReadFile(dword 0, CopyFile_atr.sizelo, cBufer, s);
  163.        
  164.                 IF (!EAX)
  165.                 {
  166.                         CopyFile_f.func = 2;
  167.                         CopyFile_f.param1 = 0;
  168.                         CopyFile_f.param2 = 0;
  169.                         CopyFile_f.param3 = CopyFile_atr.sizelo;
  170.                         CopyFile_f.param4 = cBufer;
  171.                         CopyFile_f.rezerv = 0;
  172.                         CopyFile_f.name = d;
  173.                         $mov eax, 70
  174.                         $mov ebx, #CopyFile_f
  175.                         $int 0x40
  176.                 }
  177.         }
  178. }
  179.  
  180.  
  181. //Asper
  182. void ReadAttributes(dword read_buffer, file_path)
  183. {
  184.         read_file_70.func = 5;
  185.         read_file_70.param1 = 0;
  186.         read_file_70.param2 = 0;
  187.         read_file_70.param3 = 0;
  188.         read_file_70.param4 = read_buffer;
  189.         read_file_70.rezerv = 0;
  190.         read_file_70.name = file_path;
  191.         $mov eax,70
  192.         $mov ebx,#read_file_70.func
  193.         $int 0x40
  194. }    
  195.