// File: /workspace/github_c_makefile_star2_O1/gadget114514[P]fatfs-example/fatfs/source/ff.c
// Function: f_getfree
FRESULT f_getfree (
	const TCHAR* path,	/* Logical drive number */
	DWORD* nclst,		/* Pointer to a variable to return number of free clusters */
	FATFS** fatfs		/* Pointer to return pointer to corresponding filesystem object */
)
{
	FRESULT res;
	FATFS *fs;
	DWORD nfree, clst, sect, stat;
	UINT i;
	FFOBJID obj;


	/* Get logical drive */
	res = find_volume(&path, &fs, 0);
	if (res == FR_OK) {
		*fatfs = fs;				/* Return ptr to the fs object */
		/* If free_clst is valid, return it without full FAT scan */
		if (fs->free_clst <= fs->n_fatent - 2) {
			*nclst = fs->free_clst;
		} else {
			/* Scan FAT to obtain number of free clusters */
			nfree = 0;
			if (fs->fs_type == FS_FAT12) {	/* FAT12: Scan bit field FAT entries */
				clst = 2; obj.fs = fs;
				do {
					stat = get_fat(&obj, clst);
					if (stat == 0xFFFFFFFF) { res = FR_DISK_ERR; break; }
					if (stat == 1) { res = FR_INT_ERR; break; }
					if (stat == 0) nfree++;
				} while (++clst < fs->n_fatent);
			} else {
#if FF_FS_EXFAT
				if (fs->fs_type == FS_EXFAT) {	/* exFAT: Scan allocation bitmap */
					BYTE bm;
					UINT b;

					clst = fs->n_fatent - 2;	/* Number of clusters */
					sect = fs->database;		/* Assuming bitmap starts at cluster 2 */
					i = 0;						/* Offset in the sector */
					do {	/* Counts numbuer of bits with zero in the bitmap */
						if (i == 0) {
							res = move_window(fs, sect++);
							if (res != FR_OK) break;
						}
						for (b = 8, bm = fs->win[i]; b && clst; b--, clst--) {
							if (!(bm & 1)) nfree++;
							bm >>= 1;
						}
						i = (i + 1) % SS(fs);
					} while (clst);
				} else
#endif
				{	/* FAT16/32: Scan WORD/DWORD FAT entries */
					clst = fs->n_fatent;	/* Number of entries */
					sect = fs->fatbase;		/* Top of the FAT */
					i = 0;					/* Offset in the sector */
					do {	/* Counts numbuer of entries with zero in the FAT */
						if (i == 0) {
							res = move_window(fs, sect++);
							if (res != FR_OK) break;
						}
						if (fs->fs_type == FS_FAT16) {
							if (ld_word(fs->win + i) == 0) nfree++;
							i += 2;
						} else {
							if ((ld_dword(fs->win + i) & 0x0FFFFFFF) == 0) nfree++;
							i += 4;
						}
						i %= SS(fs);
					} while (--clst);
				}
			}
			*nclst = nfree;			/* Return the free clusters */
			fs->free_clst = nfree;	/* Now free_clst is valid */
			fs->fsi_flag |= 1;		/* FAT32: FSInfo is to be updated */
		}
	}

	LEAVE_FF(fs, res);
}

// Assembly:
pushq %rbp
movq %rsp, %rbp
pushq %r15
pushq %r14
pushq %r13
pushq %r12
pushq %rbx
subq $0x38, %rsp
movq %rdx, %r15
movq %rsi, %rbx
leaq -0x40(%rbp), %rax
movq %rdi, (%rax)
leaq -0x38(%rbp), %rsi
movq %rax, %rdi
xorl %edx, %edx
callq 0x146e
testl %eax, %eax
jne 0x332d
movq -0x38(%rbp), %r14
movq %r14, (%r15)
movq 0x18(%r14), %rax
movq 0x20(%r14), %r12
leaq -0x2(%r12), %rcx
cmpq %rcx, %rax
jbe 0x327b
cmpb $0x1, (%r14)
jne 0x3285
leaq -0x60(%rbp), %r15
movq %r14, (%r15)
movl $0x2, %r12d
xorl %r13d, %r13d
movq %r15, %rdi
movq %r12, %rsi
callq 0x1fc1
testl %eax, %eax
je 0x3268
cmpl $-0x1, %eax
je 0x331c
cmpl $0x1, %eax
jne 0x326b
jmp 0x3315
incq %r13
incq %r12
cmpq 0x20(%r14), %r12
jb 0x3246
xorl %eax, %eax
jmp 0x3321
movq %rax, (%rbx)
xorl %eax, %eax
jmp 0x332d
movq %rbx, -0x30(%rbp)
movq 0x38(%r14), %r15
xorl %r13d, %r13d
xorl %ebx, %ebx
testl %ebx, %ebx
jne 0x32a8
movq %r14, %rdi
movq %r15, %rsi
callq 0x1f73
testl %eax, %eax
jne 0x330f
incq %r15
cmpb $0x2, (%r14)
movl %ebx, %eax
jne 0x32c4
movb 0x58(%r14,%rax), %cl
orb 0x59(%r14,%rax), %cl
sete %al
movl $0x2, %ecx
jmp 0x32fa
movzbl 0x5b(%r14,%rax), %ecx
movzbl 0x5a(%r14,%rax), %edx
shll $0x10, %ecx
shll $0x8, %edx
orl %ecx, %edx
movzbl 0x59(%r14,%rax), %ecx
orl %edx, %ecx
shll $0x8, %ecx
movzbl 0x58(%r14,%rax), %eax
andl $0xfffff00, %ecx        # imm = 0xFFFFF00
orq %rax, %rcx
sete %al
movl $0x4, %ecx
addl %ecx, %ebx
movzbl %al, %eax
addq %rax, %r13
andl $0x1ff, %ebx            # imm = 0x1FF
decq %r12
jne 0x3292
xorl %eax, %eax
movq -0x30(%rbp), %rbx
jmp 0x3321
movl $0x2, %eax
jmp 0x3321
movl $0x1, %eax
movq %r13, (%rbx)
movq %r13, 0x18(%r14)
orb $0x1, 0x4(%r14)
addq $0x38, %rsp
popq %rbx
popq %r12
popq %r13
popq %r14
popq %r15
popq %rbp
retq