00001
00002
00003
00004
00005
00006
00007
00008
00009
00010
00011
00012
00013
00014
00015
00016
00017
00018
00019
00020
00021
00022
00023
00024
00025
00026
00027
00028
00029
00030
#include "exp.h"
00031
00032
00033
00034
00035
00036
VOID
00037
ExpRaiseException (
00038 IN PEXCEPTION_RECORD ExceptionRecord
00039 );
00040
00041
VOID
00042
ExpRaiseStatus (
00043 IN NTSTATUS ExceptionCode
00044 );
00045
00046
VOID
00047 ExRaiseException (
00048 IN PEXCEPTION_RECORD ExceptionRecord
00049 )
00050
00051
00052
00053
00054
00055
00056
00057
00058
00059
00060
00061
00062
00063
00064
00065
00066
00067
00068
00069
00070
00071
00072
00073 {
00074
00075
#ifdef DBGtvb
00076
DbgPrint(
"ExRaiseException(ExceptionRecord = %lx) Status = %lx\n",
00077 ExceptionRecord, ExceptionRecord->ExceptionCode);
00078 );
00079
#endif
00080
ExpRaiseException(ExceptionRecord);
00081
return;
00082 }
00083
00084
VOID
00085 ExpRaiseException (
00086 IN PEXCEPTION_RECORD ExceptionRecord
00087 )
00088
00089
00090
00091
00092
00093
00094
00095
00096
00097
00098
00099
00100
00101
00102
00103
00104
00105
00106 {
00107
00108 ULONG_PTR ControlPc;
00109 CONTEXT ContextRecord;
00110 FRAME_POINTERS EstablisherFrame;
00111 PRUNTIME_FUNCTION FunctionEntry;
00112 BOOLEAN InFunction;
00113 ULONG_PTR NextPc;
00114
NTSTATUS Status;
00115
00116
00117
00118
00119
00120
00121
00122 RtlCaptureContext(&ContextRecord);
00123 ControlPc = (ULONG_PTR)ContextRecord.IntRa - 4;
00124 FunctionEntry =
RtlLookupFunctionEntry(ControlPc);
00125 NextPc =
RtlVirtualUnwind(ControlPc,
00126 FunctionEntry,
00127 &ContextRecord,
00128 &InFunction,
00129 &EstablisherFrame,
00130
NULL);
00131
00132 ContextRecord.Fir = (ULONGLONG)(LONG_PTR)NextPc + 4;
00133 ExceptionRecord->ExceptionAddress = (PVOID)ContextRecord.Fir;
00134
00135
00136
00137
00138
00139
00140
if (
RtlDispatchException(ExceptionRecord, &ContextRecord)) {
00141
Status = ZwContinue(&ContextRecord,
FALSE);
00142
00143 }
else {
00144
Status = ZwRaiseException(ExceptionRecord, &ContextRecord,
FALSE);
00145 }
00146
00147
00148
00149
00150
00151
00152
00153
ExRaiseStatus(
Status);
00154 }
00155
00156
VOID
00157 ExRaiseStatus (
00158 IN NTSTATUS ExceptionCode
00159 )
00160
00161
00162
00163
00164
00165
00166
00167
00168
00169
00170
00171
00172
00173
00174
00175
00176
00177
00178
00179
00180
00181
00182
00183
00184
00185
00186 {
00187
00188
#ifdef DBGxx
00189
DbgPrint(
"ExRaiseStatus(ExceptionCode = %lx)\n", ExceptionCode);
00190
#endif
00191
ExpRaiseStatus(ExceptionCode);
00192
return;
00193 }
00194
00195
VOID
00196 ExpRaiseStatus (
00197 IN NTSTATUS ExceptionCode
00198 )
00199
00200
00201
00202
00203
00204
00205
00206
00207
00208
00209
00210
00211
00212
00213
00214
00215
00216
00217
00218
00219
00220 {
00221
00222 ULONG_PTR ControlPc;
00223 CONTEXT ContextRecord;
00224 FRAME_POINTERS EstablisherFrame;
00225 EXCEPTION_RECORD ExceptionRecord;
00226 PRUNTIME_FUNCTION FunctionEntry;
00227 BOOLEAN InFunction;
00228 ULONG_PTR NextPc;
00229
NTSTATUS Status;
00230
00231
00232
00233
00234
00235 ExceptionRecord.ExceptionCode = ExceptionCode;
00236 ExceptionRecord.ExceptionRecord = (PEXCEPTION_RECORD)
NULL;
00237 ExceptionRecord.NumberParameters = 0;
00238 ExceptionRecord.ExceptionFlags =
EXCEPTION_NONCONTINUABLE;
00239
00240
00241
00242
00243
00244
00245
00246 RtlCaptureContext(&ContextRecord);
00247 ControlPc = (ULONG_PTR)ContextRecord.IntRa - 4;
00248 FunctionEntry =
RtlLookupFunctionEntry(ControlPc);
00249 NextPc =
RtlVirtualUnwind(ControlPc,
00250 FunctionEntry,
00251 &ContextRecord,
00252 &InFunction,
00253 &EstablisherFrame,
00254
NULL);
00255
00256 ContextRecord.Fir = (ULONGLONG)(LONG_PTR)NextPc + 4;
00257 ExceptionRecord.ExceptionAddress = (PVOID)ContextRecord.Fir;
00258
RtlDispatchException(&ExceptionRecord, &ContextRecord);
00259
00260
00261
00262
00263
00264
00265
Status = ZwRaiseException(&ExceptionRecord, &ContextRecord,
FALSE);
00266
00267
00268
00269
00270
00271
00272
ExRaiseStatus(
Status);
00273 }