Rev 4634 | Rev 5515 | Go to most recent revision | Details | Compare with Previous | Last modification | View Log | RSS feed
Rev | Author | Line No. | Line |
---|---|---|---|
3444 | leency | 1 | //copyf - copy file or folder with content |
2 | :int copyf(dword from1, in1) |
||
3434 | leency | 3 | { |
3440 | leency | 4 | dword error; |
5 | BDVK CopyFile_atr1; |
||
3444 | leency | 6 | if (!from1) || (!in1) |
7 | { |
||
8 | notify("Error: too less copyf params!"); |
||
9 | notify(from1); |
||
10 | notify(in1); |
||
11 | return; |
||
12 | } |
||
13 | if (error = GetFileInfo(from1, #CopyFile_atr1)) |
||
14 | { |
||
4645 | leency | 15 | debugln("Error: copyf->GetFileInfo"); |
3444 | leency | 16 | return error; |
17 | } |
||
18 | if (isdir(from1)) |
||
19 | return CopyFolder(from1, in1); |
||
3440 | leency | 20 | else |
4059 | leency | 21 | { |
22 | copyf_Draw_Progress(from1+strchr(from1, '/')); |
||
3444 | leency | 23 | return CopyFile(from1, in1); |
4059 | leency | 24 | } |
3440 | leency | 25 | } |
3434 | leency | 26 | |
3440 | leency | 27 | :int CopyFile(dword copy_from3, copy_in3) |
28 | { |
||
29 | BDVK CopyFile_atr; |
||
30 | dword error, cbuf; |
||
3444 | leency | 31 | if (error = GetFileInfo(copy_from3, #CopyFile_atr)) |
3877 | leency | 32 | { |
4645 | leency | 33 | debugln("Error: CopyFile->GetFileInfo"); |
3877 | leency | 34 | } |
3434 | leency | 35 | else |
36 | { |
||
3440 | leency | 37 | cbuf = malloc(CopyFile_atr.sizelo); |
3444 | leency | 38 | if (error = ReadFile(0, CopyFile_atr.sizelo, cbuf, copy_from3)) |
3877 | leency | 39 | { |
4645 | leency | 40 | debugln("Error: CopyFile->ReadFile"); |
3877 | leency | 41 | } |
3440 | leency | 42 | else |
43 | { |
||
4645 | leency | 44 | if (error = WriteFile(CopyFile_atr.sizelo, cbuf, copy_in3)) debugln("Error: CopyFile->WriteFile"); |
3440 | leency | 45 | } |
3434 | leency | 46 | } |
3440 | leency | 47 | free(cbuf); |
3444 | leency | 48 | if (error) debug_error(copy_from3, error); |
3440 | leency | 49 | return error; |
3434 | leency | 50 | } |
51 | |||
3444 | leency | 52 | :int CopyFolder(dword from2, in2) |
3434 | leency | 53 | { |
3444 | leency | 54 | dword dirbuf, fcount, i, filename; |
55 | char copy_from2[4096], copy_in2[4096], error; |
||
3434 | leency | 56 | |
3444 | leency | 57 | if (error = GetDir(#dirbuf, #fcount, from2, DIRS_ONLYREAL)) |
3440 | leency | 58 | { |
4645 | leency | 59 | debugln("Error: CopyFolder->GetDir"); |
3440 | leency | 60 | debug_error(from2, error); |
61 | free(dirbuf); |
||
3444 | leency | 62 | return error; |
3440 | leency | 63 | } |
4023 | leency | 64 | |
3444 | leency | 65 | if (chrnum(in2, '/')>2) && (error = CreateDir(in2)) |
3434 | leency | 66 | { |
4645 | leency | 67 | debugln("Error: CopyFolder->CreateDir"); |
3444 | leency | 68 | debug_error(in2, error); |
69 | free(dirbuf); |
||
70 | return error; |
||
3434 | leency | 71 | } |
72 | |||
73 | for (i=0; i |
||
74 | { |
||
75 | filename = i*304+dirbuf+72; |
||
3444 | leency | 76 | strcpy(#copy_from2, from2); |
77 | chrcat(#copy_from2, '/'); |
||
78 | strcat(#copy_from2, filename); |
||
79 | strcpy(#copy_in2, in2); |
||
80 | chrcat(#copy_in2, '/'); |
||
81 | strcat(#copy_in2, filename); |
||
82 | |||
83 | if ( TestBit(ESDWORD[filename-40], 4) ) //isdir? |
||
3434 | leency | 84 | { |
85 | if ( (!strcmp(filename, ".")) || (!strcmp(filename, "..")) ) continue; |
||
3440 | leency | 86 | CopyFolder(#copy_from2, #copy_in2); |
3434 | leency | 87 | } |
88 | else |
||
89 | { |
||
4023 | leency | 90 | copyf_Draw_Progress(filename); |
3444 | leency | 91 | if (error=CopyFile(#copy_from2, #copy_in2)) |
92 | { |
||
4645 | leency | 93 | if (fabs(error)==8) { debugln("Stop copying."); break;} //TODO: may be need grobal var like stop_all |
3444 | leency | 94 | error=CopyFile(#copy_from2, #copy_in2); // #2 :) |
95 | } |
||
3434 | leency | 96 | } |
97 | } |
||
98 | free(dirbuf); |
||
3444 | leency | 99 | return error; |
3434 | leency | 100 | } |
101 | |||
4023 | leency | 102 | #ifdef LANG_RUS |
103 | unsigned char *ERROR_TEXT[]={ |
||
104 | "Код #0: успешно", |
||
105 | "Ошибка #1: не определена база и/или раздел жёсткого диска", |
||
106 | "Ошибка #2: функция не поддерживается для этой файловой системы", |
||
4634 | Albom | 107 | "Ошибка #3: неизвестная файловая система", |
4023 | leency | 108 | 0, |
109 | "Ошибка #5: файл или папка не найдены", |
||
110 | "Ошибка #6: конец файла", |
||
111 | "Ошибка #7: указатель находится все памяти приложения", |
||
112 | "Ошибка #8: недостаточно места на диске", |
||
113 | "Ошибка #9: таблица FAT разрушена", |
||
114 | "Ошибка #10: доступ запрещен", |
||
115 | "Ошибка #11: ошибка устройсва", |
||
116 | 0, 0, 0, 0, 0, 0, 0, 0, 0, |
||
117 | 0, 0, 0, 0, 0, 0, 0, 0, 0, |
||
118 | "Ошибка #30: недостаточно памяти", |
||
119 | "Ошибка #31: файл не является исполняемым", |
||
120 | "Ошибка #32: слишком много процессов", 0}; |
||
121 | #else |
||
122 | unsigned char *ERROR_TEXT[]={ |
||
123 | "Code #0 - No error, compleated successfully", |
||
124 | "Error #1 - Base or partition of a hard disk is not defined", |
||
125 | "Error #2 - Function isn't supported for this file system", |
||
126 | "Error #3 - Unknown file system", |
||
127 | 0, |
||
128 | "Error #5 - File or folder not found", |
||
129 | "Error #6 - End of file", |
||
130 | "Error #7 - Pointer lies outside of application memory", |
||
131 | "Error #8 - Too less disk space", |
||
132 | "Error #9 - FAT table is destroyed", |
||
133 | "Error #10 - Access denied", |
||
134 | "Error #11 - Device error", |
||
135 | 0, 0, 0, 0, 0, 0, 0, 0, 0, |
||
136 | 0, 0, 0, 0, 0, 0, 0, 0, 0, |
||
137 | "Error #30 - Not enough memory", |
||
138 | "Error #31 - File is not executable", |
||
139 | "Error #32 - Too many processes", 0}; |
||
140 | #endif |
||
3440 | leency | 141 | |
142 | :dword get_error(int N) |
||
3434 | leency | 143 | { |
3440 | leency | 144 | char error[256]; |
145 | N = fabs(N); |
||
146 | if (N<=33) |
||
3434 | leency | 147 | { |
148 | strcpy(#error, ERROR_TEXT[N]); |
||
149 | } |
||
150 | else |
||
151 | { |
||
152 | strcpy(#error, itoa(N)); |
||
153 | strcat(#error, " - Unknown error number O_o"); |
||
154 | } |
||
155 | return #error; |
||
156 | } |
||
157 | |||
3440 | leency | 158 | :void debug_error(dword path, error_number) |
3434 | leency | 159 | { |
4645 | leency | 160 | if (path) debugln(path); |
161 | debugln(get_error(error_number)); |
||
3434 | leency | 162 | }=33) |