macbook扩容:自动挂载

-- =================================================================
-- 自动挂载脚本 for macOS
-- =================================================================

on write_log(log_string)
	try
		-- display dialog log_string buttons {"好的"} default button "好的" with title "USB挂载调试" giving up after 5
	end try
	-- set log_file_path to (POSIX path of (path to desktop)) & "usb_mount_log.txt"
	-- do shell script "echo \"$(date '+%Y-%m-%d %H:%M:%S') --- " & quoted form of log_string & "\" >> " & quoted form of log_file_path
end write_log

on run {input, parameters}
	write_log("自动化流程已触发。")
	set myUSBName to "TECLAB"
	
	repeat with eachItem in input
		try
			set mountedVolumeName to name of (info for eachItem)
			if mountedVolumeName is myUSBName then
				write_log("U盘 '" & myUSBName & "' 已匹配。")
				set usbPath to POSIX path of eachItem
				set mountTxtPath to usbPath & "mount.txt"
				
				if (do shell script "if [ -f " & quoted form of mountTxtPath & " ]; then echo 'found'; else echo 'not found'; fi") is "found" then
					write_log("成功找到 mount.txt。")
					set receiptFilePath_posix to POSIX path of ((path to home folder as text) & "Library:Caches:" & myUSBName & "_mounted_links.txt")
					do shell script "> " & quoted form of receiptFilePath_posix
					set homePath to POSIX path of (path to home folder)
					
					set mountConfig to paragraphs of (read (POSIX file mountTxtPath))
					
					repeat with aLine in mountConfig
						set currentLine to aLine as string
						if (currentLine contains "->") and (character 1 of currentLine is not "#") then
							try
								set oldDelimiters to AppleScript's text item delimiters
								set AppleScript's text item delimiters to "->"
								set pathParts to text items of currentLine
								set AppleScript's text item delimiters to oldDelimiters
								
								set source_rel to do shell script "echo " & quoted form of (item 1 of pathParts) & " | xargs"
								set target_raw to do shell script "echo " & quoted form of (item 2 of pathParts) & " | xargs"
								
								if source_rel is not "" and target_raw is not "" then
									set source_full_pattern to usbPath & source_rel
									
									set target_full to target_raw
									if target_full starts with "~/" then
										set target_full to homePath & (text 2 thru -1 of target_full)
									end if
									
									write_log("处理中... 源: " & source_full_pattern & " -> 目标: " & target_full)
									
									-- 【核心逻辑: 检查源路径是否包含通配符】
									if source_full_pattern contains "*" then
										write_log("检测到通配符，切换到多对一链接模式。")
										set linkCommand to "TARGET_DIR=" & quoted form of target_full & "; " & ¬
											"RECEIPT_FILE=" & quoted form of receiptFilePath_posix & "; " & ¬
											"if [ -d \"$TARGET_DIR\" ]; then " & ¬
											"  for item in " & source_full_pattern & "; do " & ¬
											"    if [ -e \"$item\" ]; then " & ¬
											"      itemName=$(basename \"$item\"); " & ¬
											"      targetLink=\"$TARGET_DIR/$itemName\"; " & ¬
											"      if [ ! -e \"$targetLink\" ]; then " & ¬
											"        ln -s \"$item\" \"$targetLink\"; " & ¬
											"        echo \"$targetLink\" >> \"$RECEIPT_FILE\"; " & ¬
											"      fi; " & ¬
											"    fi; " & ¬
											"  done; " & ¬
											"fi"
										do shell script linkCommand
										write_log("【成功】通配符匹配的项目已处理完毕。")
									else
										-- 【标准一对一链接逻辑】
										if (do shell script "if [ -e " & quoted form of source_full_pattern & " ]; then echo 'yes'; else echo 'no'; fi") is "no" then
											write_log("【跳过】原因：U盘上的源路径不存在。")
										else if (do shell script "if [ -e " & quoted form of target_full & " ] || [ -L " & quoted form of target_full & " ]; then echo 'yes'; else echo 'no'; fi") is "yes" then
											write_log("【跳过】原因：Mac上的目标路径已存在同名项。")
										else
											write_log("检查通过，准备创建标准链接...")
											do shell script "mkdir -p \"$(dirname " & quoted form of target_full & ")\" && ln -s " & quoted form of source_full_pattern & " " & quoted form of target_full
											write_log("【成功】标准链接已创建！")
											do shell script "echo " & quoted form of target_full & " >> " & quoted form of receiptFilePath_posix
										end if
									end if
								end if
							on error errMsg
								write_log("【行处理错误】处理 '" & currentLine & "' 时出错: " & errMsg)
							end try
						end if
					end repeat
					write_log("所有任务处理完毕。")
				else
					write_log("【错误】在U盘根目录未找到 mount.txt 文件。")
				end if
			end if
		on error errMsg
			write_log("【脚本致命错误】：" & errMsg)
		end try
	end repeat
	return input
end run

-- =================================================================
-- 自动卸载脚本 for macOS
-- =================================================================

-- 在这里设置您的U盘名称，必须与挂载脚本中的名称完全一致
property myUSBName : "TECLAB"

-- on idle 处理程序会由系统定期调用
on idle
	-- 构建U盘应该被挂载的路径
	set usbVolumePath to "/Volumes/" & myUSBName
	
	-- 检查该路径是否存在
	try
		-- 如果do shell script成功，说明U盘还在，什么都不做
		do shell script "test -d " & quoted form of usbVolumePath
	on error
		-- 如果do shell script失败，说明路径不存在，即U盘已被拔出
		-- 开始执行卸载清理操作
		
		-- 构建“收据”文件的完整路径
		set receiptFileName to myUSBName & "_mounted_links.txt"
		set receiptFileHFSPath to (path to home folder as text) & "Library:Caches:" & receiptFileName
		set receiptFilePath_posix to POSIX path of receiptFileHFSPath
		
		try
			-- 读取收据文件，获取所有需要删除的链接路径列表
			set links_to_delete to paragraphs of (read (POSIX file receiptFilePath_posix))
			
			-- 遍历列表，逐个删除链接
			repeat with linkPath in links_to_delete
				if linkPath is not "" then
					-- 使用 rm 命令删除符号链接
					do shell script "rm " & quoted form of (linkPath as string)
				end if
			end repeat
			
			-- 所有链接都删除后，删除收据文件本身，完成清理
			do shell script "rm " & quoted form of receiptFilePath_posix
			
		on error
			-- 如果收据文件不存在或读取失败，说明没有需要清理的链接，
			-- 安静地忽略错误即可。
		end try
	end try
	
	-- 设置下一次检查的间隔时间（秒）
	return 15
end idle

-- on quit 处理程序确保即使用户尝试关闭它，它也能继续在后台运行
on quit
	continue quit
end quit