代码与法律

鹅鹅鹅鹅

https://www.zhihu.com/question/12523235406

鹅鹅鹅鹅

我在QQ群里找人替我定制软件。过了段时间他说好了，就下载了他的脚本。他要求我付款，我没有付款。然后我运行了那个脚本，检验他的功能对不对。后来发现功能错了。联系那人又不在线。

如果他告我没付款，我说他的软件功能不对，等他功能改正了再付款，改正之前不付。法律是否支持？谁能证明他的功能不对，也许换了台电脑功能又正常了？

要求的功能：逐字节比较两文件二进制数据，从头到尾相同位置完全相等就是相同文件。

a目录有的文件，就只留一份，其他相同的删除。a目录没有的，b目录里面的，就只保留b目录的

1. function Compare-FilesByteByByte {
   
2. 
   
3. param (
   
4. 
   
5. [string]$FilePath1,
   
6. 
   
7. [string]$FilePath2
   
8. 
   
9. )
   
10. 
    
11. 
    
12. # 检查文件大小是否相同
    
13. 
    
14. $file1Size = (Get-Item $FilePath1).Length
    
15. 
    
16. $file2Size = (Get-Item $FilePath2).Length
    
17. 
    
18. if ($file1Size -ne $file2Size) {
    
19. 
    
20. return $false
    
21. 
    
22. }
    
23. 
    
24. 
    
25. # 打开文件流
    
26. 
    
27. $stream1 = [System.IO.File]::OpenRead($FilePath1)
    
28. 
    
29. $stream2 = [System.IO.File]::OpenRead($FilePath2)
    
30. 
    
31. 
    
32. try {
    
33. 
    
34. # 逐字节比对
    
35. 
    
36. for ($i = 0; $i -lt $file1Size; $i++) {
    
37. 
    
38. $byte1 = $stream1.ReadByte()
    
39. 
    
40. $byte2 = $stream2.ReadByte()
    
41. 
    
42. 
    
43. if ($byte1 -ne $byte2) {
    
44. 
    
45. return $false
    
46. 
    
47. }
    
48. 
    
49. }
    
50. 
    
51. 
    
52. return $true
    
53. 
    
54. }
    
55. 
    
56. finally {
    
57. 
    
58. # 关闭文件流
    
59. 
    
60. $stream1.Close()
    
61. 
    
62. $stream2.Close()
    
63. 
    
64. }
    
65. 
    
66. }
    
67. 
    
68. 
    
69. function Remove-DuplicateFiles {
    
70. 
    
71. param (
    
72. 
    
73. [string[]]$Folders
    
74. 
    
75. )
    
76. 
    
77. 
    
78. # 用于存储已检查的文件路径
    
79. 
    
80. $checkedFiles = @()
    
81. 
    
82. 
    
83. # 遍历所有文件夹
    
84. 
    
85. foreach ($folder in $Folders) {
    
86. 
    
87. # 获取文件夹中的所有文件
    
88. 
    
89. $files = Get-ChildItem -Path $folder -Recurse -File
    
90. 
    
91. 
    
92. foreach ($file in $files) {
    
93. 
    
94. $isDuplicate = $false
    
95. 
    
96. 
    
97. # 与已检查的文件逐字节比对
    
98. 
    
99. foreach ($checkedFile in $checkedFiles) {
    
100. 
     
101. if (Compare-FilesByteByByte -FilePath1 $file.FullName -FilePath2 $checkedFile) {
     
102. 
     
103. $isDuplicate = $true
     
104. 
     
105. Write-Host "发现重复文件: $($file.FullName) 与 $checkedFile"
     
106. 
     
107. # 删除当前文件
     
108. 
     
109. Remove-Item -Path $file.FullName -Force
     
110. 
     
111. Write-Host "已删除文件: $($file.FullName)"
     
112. 
     
113. break
     
114. 
     
115. }
     
116. 
     
117. }
     
118. 
     
119. 
     
120. # 如果文件不是重复的，则添加到已检查的文件列表中
     
121. 
     
122. if (-not $isDuplicate) {
     
123. 
     
124. $checkedFiles += $file.FullName
     
125. 
     
126. }
     
127. 
     
128. }
     
129. 
     
130. }
     
131. 
     
132. }
     
133. 
     
134. 
     
135. # 文件夹路径
     
136. 
     
137. $folderA = "C:\Users\Administrator\Documents\新建文件夹 (2)"
     
138. 
     
139. $folderB = "C:\Users\Administrator\Desktop\新建文件夹2"
     
140. 
     
141. $folderC = "D:"
     
142. 
     
143. 
     
144. Remove-DuplicateFiles -Folders @($folderA, $folderB, $folderC)

复制代码