// File: /workspace/github_c_makefile_star2_O3/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 $0x18, %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 0x144b
testl %eax, %eax
jne 0x32f6
movq -0x38(%rbp), %r14
movq %r14, (%r15)
movq 0x18(%r14), %rax
movq 0x20(%r14), %r13
leaq -0x2(%r13), %rcx
cmpq %rcx, %rax
jbe 0x3251
movb (%r14), %al
cmpb $0x1, %al
jne 0x325b
movl $0x2, %r15d
xorl %r12d, %r12d
movq %r14, %rdi
movq %r15, %rsi
callq 0x1fb2
testl %eax, %eax
je 0x323e
cmpl $-0x1, %eax
je 0x32e5
cmpl $0x1, %eax
jne 0x3241
jmp 0x32de
incq %r12
incq %r15
cmpq 0x20(%r14), %r15
jb 0x321c
xorl %eax, %eax
jmp 0x32ea
movq %rax, (%rbx)
xorl %eax, %eax
jmp 0x32f6
movq %rbx, -0x30(%rbp)
movq 0x38(%r14), %r15
xorl %r12d, %r12d
xorl %ebx, %ebx
testl %ebx, %ebx
jne 0x3281
movq %r14, %rdi
movq %r15, %rsi
callq 0x1f5d
testl %eax, %eax
jne 0x32d8
incq %r15
movb (%r14), %al
movl %ebx, %ecx
cmpb $0x2, %al
jne 0x3298
cmpw $0x0, 0x58(%r14,%rcx)
sete %cl
movl $0x2, %edx
jmp 0x32c3
movzwl 0x5a(%r14,%rcx), %edx
movzbl 0x59(%r14,%rcx), %esi
shll $0x10, %edx
shll $0x8, %esi
movzbl 0x58(%r14,%rcx), %ecx
andl $0xfff0000, %edx        # imm = 0xFFF0000
orl %esi, %edx
orq %rcx, %rdx
sete %cl
movl $0x4, %edx
addl %edx, %ebx
movzbl %cl, %ecx
addq %rcx, %r12
andl $0x1ff, %ebx            # imm = 0x1FF
decq %r13
jne 0x3268
xorl %eax, %eax
movq -0x30(%rbp), %rbx
jmp 0x32ea
movl $0x2, %eax
jmp 0x32ea
movl $0x1, %eax
movq %r12, (%rbx)
movq %r12, 0x18(%r14)
orb $0x1, 0x4(%r14)
addq $0x18, %rsp
popq %rbx
popq %r12
popq %r13
popq %r14
popq %r15
popq %rbp
retq