1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
|
page ,132 ;
title COMP.SAL - COMPARE A PAIR OF FILES
;****************** START OF SPECIFICATIONS *****************************
; MODULE NAME: COMP1.ASM
;
; DESCRIPTIVE NAME: Compare two files to show they are identical or not.
;
; FUNCTION: The paths and names of each pair of files is
; displayed as the comparing process proceeds. An
; error message will follow the names if:
; (1) a file matching the second filename can't be found,
; (2) the files are different sizes, or
; (3) either path is invalid.
;
; During the comparison, an error message will appear for any
; location that contains mismatching information in the 2
; files. The message indicates the offset into the files of
; the mismatching bytes, and the contents of the 2 bytes
; themselves (all in hex). This will occur for up to 10
; mismatching bytes - if more than 10 compare errors are
; found, the program assumes that further comparison would be
; useless, and ends its compare of the 2 files at that point.
;
; If all bytes in the 2 files match, a "Files compare OK"
; message will appear.
;
; In all cases, after the comparing of 2 files ends, comparing
; will proceed with the next pair of files that match the 2
; filenames, until no more files can be found that match the
; first filename. You are then asked if you want to compare
; any more files. Replying "N" returns you to the DOS prompt
; (such as A>); a reply of "Y" results in prompts for new
; primary and secondary filenames.
;
; In all compares, COMP looks at the last byte of one of the
; files being compared to assure that it contains a valid
; end-of-file mark (CTRL-Z, which is the hex character 1A).
; If found, no action is taken by COMP. If the end-of-file
; mark is NOT found, COMP produces the message "EOF mark not
; found". This is done because some products produce files
; whose sizes are always recorded in the directory as a
; multiple of 128 bytes, even though the actual usable data in
; the file will usually be a few bytes less than the directory
; size. In this case, COMP may produce "Compare error"
; messages when comparing the few bytes beyond the last real
; data byte in the last block of 128 bytes (COMP always
; compares the number of bytes reflected in the directory).
; Thus, the "EOF mark not found" message indicates that the
; compare errors may not have occurred in the usable data
; portion of the file.
;
; Multiple compare operations may be performed with one load
; of COMP. A prompt, "Compare more files (Y/N)?" permits additional
; executions.
;
; ENTRY POINT: "START" at ORG 100h, jumps to "INIT".
;
; INPUT: (DOS command line parameters)
; [d:][path] COMP [d:][path][filenam1[.ext]] [d:][path][filenam2[.ext]]
;
; Where
; [d:][path] before COMP to specify the drive and path that
; contains the COMP command file.
;
; [d:][path][filenam1[.ext]] - to specify the FIRST (or primary)
; file or group of files to be compared
;
; [d:][path][filenam2[.ext]] - to specify the SECOND file or group
; of files to be compared with the corresponding file
; from the FIRST group
;
; Global filename characters are allowed in both filenames,
; and will cause all of the files matching the first filename
; to be compared with the corresponding files from the second
; filename. Thus, entering COMP A:*.ASM B:*.BAK will cause
; each file from drive A: that has an extension of .ASM to be
; compared with a file of the same name (but with an extension
; of .BAK) from drive B:.
;
; If you enter only a drive specification, COMP will assume
; all files in the current directory of the specified drive.
; If you enter a path without a filename, COMP assumes all
; files in the specified directory. Thus, COMP A:\LEVEL1
; B:\LEVEL2 will compare all files in directory A:\LEVEL1 with
; the files of the same names in directory B:\LEVEL2.
;
; If no parameters are entered with the COMP command, you will
; be prompted for both. If the second parm is omitted, COMP
; will prompt for it. If you simply press ENTER when prompted
; for the second filename, COMP assumes *.* (all files
; matching the primary filename), and will use the current
; directory of the default drive.
;
; If no file matches the primary filename, COMP will prompt
; again for both parameters.
;
; EXIT-NORMAL: Errorlevel = 0, Function completed successfully.
;
; EXIT-ERROR: Errorlevel = 1, Abnormal termination due to error, wrong DOS,
; invalid parameters, unrecoverable I/O errors on the diskette.
;
; EFFECTS: Files are not altered. A Message will show result of compare.
;
; INTERNAL REFERENCES:
; ROUTINES: none
;
; DATA AREAS:
; PSP - Contains the DOS command line parameters.
; WORKAREA - Temporary storage
;
; EXTERNAL REFERENCES:
; ROUTINES:
; SYSDISPMSG - Uses the MSG parm lists to construct the messages
; on STDOUT.
; SYSLOADMSG - Loads messages, makes them accessable.
; SYSPARSE - Processes the DOS Command line, finds parms.
;
; DATA AREAS:
; COMPSM.SAL - Defines the control blocks that describe the messages
; COMPPAR.SAL - Defines the control blocks that describe the
; DOS Command line parameters.
;
; NOTES:
; This module should be processed with the SALUT preprocessor
; with the re-alignment not requested, as:
;
; SALUT COMP1,NUL
;
; To assemble these modules, the alphabetical or sequential
; ordering of segments may be used.
;
; Sample LINK command:
;
; LINK @COMP.ARF
;
; Where the COMP.ARF is defined as:
;
; COMP1+
; COMPPAR+
; COMPP+
; COMPSM+
; COMP2
;
; These modules must be linked in this order. The load module is
; a COM file, to be converted to COM with EXE2BIN.
;
; REVISION HISTORY:
; AN000 Version 4.00: add PARSER, System Message Handler,
; Add compare of code page extended attribute, if present.
;
; COPYRIGHT: The following notice is found in the OBJ code generated from
; the "COMPSM.SAL" module:
;
; "The DOS COMP Utility"
; "Version 4.00 (C) Copyright 1988 Microsoft"
; "Licensed Material - Property of Microsoft"
;
;PROGRAM AUTHOR: Original written by: Dave L.
; 3.30 modifications by Russ W.
; 4.0 modifications by: Edwin M. K.
; 4.0 modifications by: Bill L.
;****************** END OF SPECIFICATIONS *****************************
PAGE
; $SALUT (4,13,18,36)
IF1
%OUT COMPONENT=COMP, MODULE=COMP1.ASM
ENDIF
CSEG segment PARA public 'CODE' ;AN000;
assume cs:CSEG,ds:CSEG,es:CSEG,ss:CSEG ;AS SET BY DOS LOADER
PSP_HEADER EQU $ ;START OF PROGRAM SEGMENT PREFIX AREA
org 02h
MEMORY_SIZE LABEL WORD
PUBLIC MEMORY_SIZE
org 5Ch
FCB LABEL BYTE
PUBLIC FCB
org 80h
PARM_AREA LABEL BYTE
PUBLIC PARM_AREA
org 100h
EXTRN INIT:NEAR ;"INIT" IS IN COMP2.SAL
START: jmp INIT ;DEFINE THE DOS ENTRY POINT
CSEG ENDS
END START
|
