Subversion Repositories Kolibri OS

Rev

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