From owner-pups@minnie.cs.adfa.edu.au Wed Jan 26 11:55:08 2000
Received: (from major@localhost)
	by minnie.cs.adfa.edu.au (8.9.3/8.9.3) id LAA13342
	for pups-liszt; Wed, 26 Jan 2000 11:52:34 +1100 (EST)
Received: from henry.cs.adfa.edu.au (henry.cs.adfa.edu.au [131.236.21.158])
	by minnie.cs.adfa.edu.au (8.9.3/8.9.3) with ESMTP id LAA13338
	for <pups@minnie.cs.adfa.edu.au>; Wed, 26 Jan 2000 11:52:29 +1100 (EST)
Received: (from wkt@localhost)
	by henry.cs.adfa.edu.au (8.9.2/8.9.3) id LAA08670
	for pups@minnie.cs.adfa.edu.au; Wed, 26 Jan 2000 11:52:28 +1100 (EST)
From: Warren Toomey <wkt@cs.adfa.edu.au>
Message-Id: <200001260052.LAA08670@henry.cs.adfa.edu.au>
Subject: More Mail from Alexey: anohrt Unix for Pro350
To: pups@minnie.cs.adfa.edu.au (Unix Heritage Society)
Date: Wed, 26 Jan 2000 11:52:28 +1100 (EST)
Reply-To: wkt@cs.adfa.edu.au
X-Mailer: ELM [version 2.4ME+ PL43 (25)]
MIME-Version: 1.0
Content-Type: multipart/mixed; boundary=ELM948847948-8648-0_
Content-Transfer-Encoding: 7bit
Sender: owner-pups@minnie.cs.adfa.edu.au
Precedence: bulk


--ELM948847948-8648-0_
Content-Type: text/plain; charset=US-ASCII
Content-Transfer-Encoding: 7bit

Hi all, I've received another e-mail from Alexey about some Y2K software
for Venix and 2BSD. He's also given me a copy of a Russian UNIX called
Demos. This is based on something like V7M, but Alexey says that its
better than Venix. I've only got a tar file with bins & src,  no disk
images. Anyone with a pro350 or 380 interested in looking at this?

Anyway, here's his latest e-mail and Date.c.		Warren

   From: Alexey Chupahin <achupahi@uic.rsu.ru>


Hello Warren, I just receive letter from John Rosenberg. He
recommended me to resend date2 program. May be, my previous letter
didn't go to you, but to John? I just try to resend you date2.
The Date2 is good for first. Now I'm hacking RT-11 DIR (analogue
ls in Unix :-), unlike to Unix one,  DIR is very bad for Y2k.)
program with system library SYSLIB.OBJ.  When I finish it, I just
try to test and fix BSD system. Unfortunatly, I haven't any documents
described BSD library with utilites to see what subroutines/utilites
to be needed to fix. May be, I can find it on the Web? But I have
documentation for Inmos (Russian version7). I use it to see in
first time. Unlike to poor (but very good!) standard Version 7,
Russian one has 2 screen editors, including vi, and one Russian
multiscreen edit RED, editor like small MSWord for Pro, screen
menu-making/control programs and library, graphic, bisness programs
and libraries for Pro.  Unfortunatly, I have only documentation,
no any distributive...

When I finish BSD ( I hope to will finish it soon ) I'll just go
to Unix7 and 6.  I've got it from your site yet, Version 7 is booted
Ok... May be, vi from BSD still works in Unix7?


> Also, I am still not sure what to do about Demos. It's a pity that
> you don't have a bootable disk image for it.

Ok... Demos was very good-organized Unix for Pro-350/380... more
good then Inmos, how I'm hear...

Unfortunatly, I'm not rich student, but I wish to small used Alpha
for a long time.  I find ready to use Multia in Moscow for 450$.
In Russia we have a nearly 18$ per month (Crysis :-(   ) I have
360$ yet.  May be, anybody can help me for 90$...  ;-)

regards,

Alex

--ELM948847948-8648-0_
Content-Type: *unknown*/x-csh
Content-Disposition: attachment; filename=Date2.c
Content-Description: Date2.c
Content-Transfer-Encoding: 7bit

/* Y2k date program for all Unix systems V0.2.2000, beta version. 
   (c) Alex Chupakhin, 17-Jun-2000
   tested on Venix, 2BSD
   Next better version will comes soon.
*/

#include <ctype.h>

main(argc,argv)
int argc;
char **argv;
{
int year,month,day,hour,minutes,sec;
long mjd();
long Time,time();
char *ctime();

if (argc==1) { Time=time(); printf("%s",ctime(&Time) ); exit(); }
if (argc<4) { printf("Y2k date\nusage\n%s year month day [hour min] [sec]\n",
	        	argv[0]);exit(); }

year =atoi(argv[1]);
month=atoi(argv[2]);
day  =atoi(argv[3]);
if(argc>=6)
 {
   hour   = atoi(argv[4]);
   minutes= atoi(argv[5]);
 }
if(argc==7) sec = atoi(argv[6]);

Time = mjd(year,month,day)-mjd(1970,1,1);
Time = Time*3600L*24 + (hour+4)*3600L + minutes*60 + sec;

printf("%sJD=%D\n",ctime(&Time),mjd(year,month,day));
stime(&Time);
}



long mjd(y,m,d)
int y,m,d;
{
long a,a4,e,c,b;

if(m<=2) { y--; m+=12; }

a=(long) y/100; 
a4=a/4; 
b=2-a+a4;  
c = (long) (365.25*y);
e = (long) (30.6001*(m+1));
return ( c+e+b+d+1720994L );
}

--ELM948847948-8648-0_--

