QQ登录

只需一步,快速开始

登录 | 注册 | 找回密码

三维网

 找回密码
 注册

QQ登录

只需一步,快速开始

展开

通知     

查看: 11323|回复: 6
收起左侧

[已解决] 打开cad再关闭后有acad.lsp文件生成

[复制链接]
发表于 2007-6-22 00:09:43 | 显示全部楼层 |阅读模式 来自: 中国河南郑州

马上注册,结识高手,享用更多资源,轻松玩转三维网社区。

您需要 登录 才可以下载或查看,没有帐号?注册

x
我每次打开cad再关闭后都有acad.lsp文件生成,为什么??

acad.txt

3.34 KB, 下载次数: 39

发表于 2007-6-22 08:02:25 | 显示全部楼层 来自: 中国辽宁营口
发表于 2007-6-22 08:18:03 | 显示全部楼层 来自: 中国江苏无锡

流行CAD“病毒”ACAD.LSP(转载)

在acad启动或开图时会被自动加载的lsp文件
" [1 W0 w' D+ S, z* n" f浅见,这种lsp包括:
' k6 ^8 C4 X2 K! l  @acad.lsp,新装的纯acad里面没有这个文件。一般由用户自己编写或者第三方软件提供,放在acad目录或support子夹都可以。/ _6 }' r4 Y% F9 E" D+ U! s
acadr$.lsp,$是系统版本号,比如acadr14.lsp,在support子夹。
- M9 i2 {" F% l还有一种先不说了.
$ q% @3 M5 x9 {0 l
' e8 ]7 g% q: s* x  u8 R1 ~4 [, `加载时自动运行的由defun函数定义的函数名
1 x$ O9 ^& t( M4 T7 H4 W( `就一种,s::startup,它和acad.lsp配套,同时不支持其他扩展名为lsp的文件2 {' t% L0 G( R! j
可能是因为这个原因,目标被定位于acad.lsp? 不知道了,其实不一定非用s::startup,用了那就说明这位大虾是个追求完美的人~! \. T% `8 @! b) N3 v% J
+ u8 S0 [5 b& ?$ J, V6 l
铺垫好了,来看看这个病毒acad.lsp的作用~; o' J8 d. M3 i/ y- X3 h
8 H2 Y6 @# z2 T3 o
{00.定义自动函数s::startup
& d/ c9 y* ~# Q" b( A
( Y! u$ r6 T6 H4 k9 i{01.获取cmdecho变量,改设为0,一般程序最后会再改回去,
9 w% R) X, K$ n! B( `目的是悄悄地进村打枪地不要.大家都喜欢这么干 }
1 |3 ?5 F1 a/ `. ?! ^5 p$ ?; M$ W/ f* `. s1 v" b% e! d
{02.通过搜索base.dcl文件,获取acad安装路径(support子夹) }5 L& v- A& o7 n2 s

& g. U! c9 C( w5 q: D{03.获取菜单文件完整路径和名称,后来又没用~}$ p9 W, Y0 h: Q6 p# K

* n. A9 _7 \6 c, j{04.获取当前图形文件完整路径和名称,截取当前工作路径}
2 Y8 z4 O/ n9 d
, l$ s8 C) g& f& L2 P{05.获取当前首选acad.lsp文件完整路径和名称,截取其路径}* J! e% h( ~0 g% N
6 h5 K, @. L' \0 |; q- u. w
{06.预设程序标记变量lspbj为0,意思是假设还没得手}
, g' c6 w$ q( [% v4 K  A& Y0 |. N- h2 e! w9 `/ b
{07.用只读方式打开support中的acad.lsp,如文件不存在则建立同名文件. N6 e( e9 w  p" I: \
逐行检查此acad.lsp文件内容,一旦发现某行开头为(load "acadapp"), f: m; v% W) y3 n
则设程序标记变量lspbj为1,表示已经得手过
' N, X  }" R, O2 B; u只读任务结束,关闭文件}
9 M8 H+ I! i+ S9 t3 [* A
3 x9 w# y+ `/ K{08.如果找到的acad.lsp路径和当前工作路径不同,
' k, [7 G( }2 b2 ]1 \5 y6 j' |/ U并且不在acad\support里面,则  \3 [+ G# x. ^1 t
{如果lspbj为0,也即尚未得手,那么
0 {; v" k; p- f/ \就在acad\support\acad.lsp文件末尾添加(load "acadapp")(princ),5 E% c1 Y5 s8 E
即acad启动或开图时自动加载acadapp.lsp并隐蔽命令行反应。# O: L+ p" V8 e: S$ {
然后同路径创建acadapp.lsp文件,作为刚改过的acad.lsp的备份. }3 j$ M7 q4 V  X' ~2 a  Z
{如果lspbj为1,即已得手,且当前绘图不是未命名的新绘图任务,则, D- ]3 B# A/ P& Y, o. F
用复写acad\support\acadapp.lsp的方式1 L! d; _: E9 \. b
在当前工作路径创建acad.lsp. }
0 v2 a- i2 o2 }8 j, _}
" N6 O* x. I( o: C% m: V; k;注:到此为止,acad启动时必搜的程序文件路径里面都放好了此acad.lsp!6 ^* x' W* `  q% e: [5 l, [
. z- X4 U" M! S3 W+ ~
{09.程序开始做真正让大家不愉快的事情,: O/ N- Z0 [& s3 T5 t3 |, I
它取消了3个系统预设的命令名: 不止explode, 还有xref和xbind* d- p* v  k2 L7 F9 ^' N# C, e
可能因为xref和xbind不是每个人都常用,所以好象报案的不多,* F* ~- H' C1 }3 L
而explode几乎是所有用acad画图的人都难以避免使用的,就显得很典型}
" s* u' ?  d  {( i* n% l2 q) l8 Q
9 Q0 j/ k% u8 _4 V7 x" G' I8 Ms::startup函数定义结束}
4 H2 k2 b1 s: Q& N5 l5 ?! C, k- [
+ {6 \" N; N7 Z) f8 j还没完,前面取消了那3个命令的定义,现在要重新定义它们,幸好这位大虾良心不算坏,只是让命令不起作用或者改成其他加法命令,并没写成破坏性函数或os命令
% z9 _; Q4 J$ A8 I0 M/ O' M! y4 I) n0 i( j; S/ p
explode的新功能和交互情况是:
# v" r- `# g0 A; Ocommand: explode
3 q( K1 w+ q, tseltct objects: 200 found) z/ Q. O) C  @
select objects:5 d% p) O0 u4 @9 |
200 was not able to be explode6 h5 i& t( r1 [/ A; s* l
command:
+ T$ C! ?( w# R8 x; s8 a& j/ b& {0 Y# Q% S
随你怎么选,它就是说炸不了
2 R# O# \7 [  Y* Q# g
) q% q: ]' C/ b' o. \然后xref和xbind这对难兄难弟双双被改成了insert,交互响应制作很不精良,根本就是空白,可能大虾忽然觉得倦了吧.% J: K* q2 l5 N9 P0 Z

& r6 W8 f' {& s' n- k9 I, T最后,它还重新定义了bonus和express tools工具集里面提供的burst命令,其实是个外部函数(c:burst)
& S5 q/ {4 m7 k5 ^. oburst原来的用途是"explode attributes to text",把属性文本炸成text类物体* ^! p- q8 J; z" T4 M7 @' Q
被重新定义后这样:
: K  e- h! l: D$ _! F8 Ncommand: burst1 e' E: I6 M8 @: g" Q
burst----将图块中的文字炸开后成为实体- s! @% T: f6 u
select objects: 200 found
4 r* H. M6 X6 l" t5 a7 Jselect objects:* A1 U# V7 i& e
command:
( ^$ m1 `- ~4 A. ]- r; G( s) k0 d7 Y8 R! j8 ~0 R- a
完了,全完了. 就这么完了,还是啥都不干,连通知也免了.
/ H4 C; K; q" N9 Y/ n…… ……
发表于 2007-6-22 08:31:28 | 显示全部楼层 来自: 中国江苏无锡

转载:

第一个版本:大概是在2001-02年左右出现,也可能更早; V" N% t) q! N2 f+ i
最初由两个LSP文件相互支撑:acad.lsp和acadapp.lsp。
1 \* G6 a- n3 j1 racad.lsp这个文件名由AutoCAD默认允许自动加载,支持目前所有AutoCAD版本,经常被第三方软件用来执行正常的系统初始化流程,所以需要查看具体代码内容才能确认是否所有的acad.lsp都是病毒,直接用系统自带的搜索功能删除所有的acad.lsp可能会造成误删,导致一些第三方软件(包括相关用户自定义程序)不能顺利加载。宜使用专杀工具实现快速安全删除。
% e( Z/ @6 L7 [) E- s' A0 {+ O" }) p1 M
acadapp.lsp这个文件名在初装的AutoCAD系统中是没有的,更不是AutoCAD必须的文件,至少到目前,它是纯粹的病毒备份文件,文件内容和对应的acad.lsp一致。可直接搜索删除。, o2 e: S& n4 k3 R

. ?1 J3 @& R8 w8 |& E9 h# I+ ~第二个版本:大概是在2005年出现,反正俺是在那时候发现的% h- |: h/ W( z/ c9 f3 g
在第一代acad.lsp病毒专杀工具出现一段日子之后,这个病毒出现了变种,但是变化很小,只是把acadapp.lsp的名字改成了acadiso.lsp,同理,这个acadiso.lsp也可以直接搜索删除。+ n1 w( Z! Y$ a0 Z6 V! }
- @5 S  o) T5 U- l+ e3 L
QiuFeng编写的第一代专杀工具的基础上增加了查杀acadiso.lsp的内容,有需要的TX可到此地下载:
) l2 B6 T+ V7 g' W6 w' Thttp://sin6.ys168.com
* ]' N, J: o% H* t) |/ b在AutoCAD>>外部工具和补丁>>CheckLsp_1.05.zip 0.6MB, ?3 v6 Y+ R: [3 v: ~- k1 @! ?3 ]
它可以正确识别并查杀acad.lsp、acadapp.lsp和acadiso.lsp等3个文件。
3 c7 f. [5 u, c# Z* c, j% A9 J" w6 Q( o; S6 V" N
第三个版本:可能是在今年(2006)才出现的
8 ~5 I  v* w. L' s在原有动作的基础上,感染acad.mnl文件,在文件末尾添加加载acadapp.lsp的语句。而且很笨,会添加很多遍。如果发现你的acad.mnl文件的修改时间非常接近当前时间,那就很可能是感染了它的最新变种,打开文件,看文件末尾便可确认。. a: Z7 Q2 \) x" T5 y5 a* Q
, e  w- U( U0 L" F5 L/ b
偶建议的查杀和免疫步骤(顺序进行):
6 ?( n! _4 Z' U) l1 w0 L* J* n1、使用专杀工具(北京鸿叶的专杀工具只能查杀第一代病毒,好像没看到有升级版本,建议使用偶改写的那个);另外,有些杀毒软件也可以查杀前两代病毒文件,如能实时查杀那当然是最好不过了。
( x7 O- @4 L# N# z7 e$ g% `
! {4 n* ^: p' S1 h: t2、把AutoCAD根路径中正常的acad.lsp文件属性改为“只读”,如没有自定义的同名文件也没有第三方的这个文件,则在AutoCAD根路径新建一个名为acad.lsp的空文件(注意一般可能需要先确使windows系统显示已知文件格式的扩展名),并改为“只读”。
& _0 h) _7 m, L/ s8 y总之,最后的结果是在AutoCAD的根路径下,一般是X(盘符):\program files\AutoCAD XXXX(版本号),应该有一个“只读”的acad.lsp。$ Z* Q3 t; d9 F5 y/ I" l

5 v3 ~4 z' D4 _5 ?3、找到acad.mnl文件(一般在support文件夹内),如中招须用记事本(最好不要使用写字板或者word等高级文本编辑器)清除文件末尾的对应代码。
5 [& W; J5 [( A! r
6 i$ t* `$ Y$ F3 [( W- @! m7 W(load "acadapp.lsp")(princ)
& Z4 l1 q3 F) Y7 l% b1 M* J" C) i8 Q# O3 y
其中acadapp也可能是acadiso,不过偶只看到过前者。' ?9 s$ B6 Q0 G/ A) s- G* r, `/ n; @
将acad.mnl也改为“只读”。
; k) E' u' l' I9 V- X% ~/ S) j2 a注意,此文件为AutoCAD运行所必须,不可删除!
7 Z6 C0 @8 b( e# f$ Z6 _/ v
7 h* O4 H  q% n+ `& Z以上所有改“只读”的目的均为防止日后再次感染,但如果要加装第三方软件,则最好临时取消它们的“只读”属性,待安装完成后再次改回“只读”。否则可能导致第三方软件安装失败。" w- j6 x5 F. Y" g
% W% R! A' s* l  t) j5 w
展望一下它(LISP代码病毒)的未来
4 l: {5 g; b2 u* d$ }目前R14还没有退出市场,该病毒好像还比较最求“广谱”效果,这个就限制了它使用VLISP的热情,事实上它还完全没有使用VLISP函数。虽然这并不等于说ALISP就不能造成很严重的破坏,但实现那些目标多少会让编程者觉得不爽,不如VLISP那么行云流水。2 E0 p( P+ Q. H/ ^

& r& j* x/ r# m( T从它的作用效果看,眼下称之为“病毒”似有言过其实之嫌,但从它可以自我复制和传染扩散这方面特征来看,称之为“病毒”也属实事求是。参照AV界(Anti-virus,不是日本的那个AV界)的习惯,不妨称之为“概念病毒”。但是,只要有人愿意,它随时随地都可以变成能够删文件、格盘、改注册表的名副其实的“病毒”。
, ?7 Z: ~9 l- [  ^2 |+ k9 E& f- b- ]# `/ ^& d$ \2 I; _! q% J
如果未来VLISP允许二进制读写,那么危险还会更大,所以希望Autodesk最好不要去做这样的功能扩展。( [9 d- D. l; ]9 Y4 d) ~9 @
( e2 q6 W  A9 V  S; `& u
另外,也希望所有LISP开发人员和编程爱好者都能保持善良的人品,不要再写出为害大家的类似程序。依俺管见,此程序只是个思路问题,技术含量不高,并不能体现出编程者的技术水平,何必要把心术放到这个方向上来呢?
4 }5 E9 _5 @+ J2 a* S
4 b0 P9 p( O8 z' f3 h' c愿acad.lsp病毒的开发历程就此结束!
发表于 2007-6-22 10:22:54 | 显示全部楼层 来自: 中国上海
我的瑞星把他当病毒杀了
发表于 2007-7-16 18:20:53 | 显示全部楼层 来自: 中国江苏南京
每次打开cad再关闭后都有acad.lsp文件生成,这是一种病毒,用卡巴斯基就可以杀
发表于 2007-7-16 18:36:34 | 显示全部楼层 来自: 中国上海
我也遇到这个问题,还在纳闷中,现在才知道是病毒,马上关闭网络杀毒
, s& d2 D2 g3 B( J1 S, K
( C+ Y# x2 e6 E另外问一下,这是何种病毒啊?
9 ^2 U2 u: k: o# j4 l! A0 F
, Z. \' y. d# p& r8 V$ X/ N5 B[ 本帖最后由 ★新手★ 于 2007-7-16 20:31 编辑 ]
发表回复
您需要登录后才可以回帖 登录 | 注册

本版积分规则


Licensed Copyright © 2016-2020 http://www.3dportal.cn/ All Rights Reserved 京 ICP备13008828号

小黑屋|手机版|Archiver|三维网 ( 京ICP备2023026364号-1 )

快速回复 返回顶部 返回列表