Subversion Repositories Kolibri OS

Rev

Rev 7278 | Rev 7878 | Go to most recent revision | Details | Compare with Previous | Last modification | View Log | RSS feed

Rev Author Line No. Line
3363 leency 1
 
2
{
3
	int j;
7422 leency 4
	int iss = a;
3363 leency 5
	if (a >= b) return;
5606 pavelyakov 6
	for (j = a; j <= b; j++)
7
		if (ESDWORD[file_mas[j]*304 + buf+64] <= ESDWORD[file_mas[b]*304 + buf+64])	{ file_mas[iss] >< file_mas[j];   iss++;}
8
	Sort_by_Size (a, iss-2);
3363 leency 9
	Sort_by_Size (iss, b);
10
}
11
12
 
13
 
14
{
15
	int j;
7422 leency 16
	int isn = a;
3363 leency 17
	if (a >= b) return;
5606 pavelyakov 18
	for (j = a; j <= b; j++)
19
		if (strcmp(file_mas[j]*304 + buf+72, file_mas[b]*304 + buf+72)<=0) { file_mas[isn] >< file_mas[j];   isn++;}
20
	Sort_by_Name(a, isn-2);
3363 leency 21
	Sort_by_Name(isn, b);
22
}
23
24
 
25
 
26
{
7422 leency 27
	int j;
28
	dword filename1, filename2, ext1, ext2;
3363 leency 29
	int n, isn = a;
30
	if (a >= b) return;
5606 pavelyakov 31
	for (j = a; j <= b; j++)
3363 leency 32
	{
33
		filename1 = file_mas[j]*304 + buf+72;
34
		filename2 = file_mas[b]*304 + buf+72;
35
36
 
37
		WHILE (n>0) && (ESBYTE[filename1+n]!='.') n--;
5631 pavelyakov 38
		if (n) ext1 = filename1+n+1; else ext1=0;
5606 pavelyakov 39
		n=strlen(filename2);
5631 pavelyakov 40
		n--;
41
		WHILE (n>0) && (ESBYTE[filename2+n]!='.') n--;
42
		if (n) ext2 = filename2+n+1; else ext2=0;
5606 pavelyakov 43
3363 leency 44
 
45
		if (n<0) { file_mas[isn] >< file_mas[j];   isn++;}
5606 pavelyakov 46
		if (!n) && (strcmp(filename1, filename2)<=0) { file_mas[isn] >< file_mas[j];   isn++;}
5631 pavelyakov 47
	}
3363 leency 48
	Sort_by_Type(a, isn-2);
49
	Sort_by_Type(isn, b);
50
}
51