It's amazing how my simple little question initiated such a conversation!
I've spent quite a lot of time developing the Perl scripts I use to monitor
and process ADSM functions. I've never thought of using the APIs, but I
thought the APIs were just for backup/archive functions. Are the admin API
functions?
Perhaps a few of us can "get together" via e-mail and work out some
requirements for adsm/perl functions and then work on the implementation
together. Unfortunately, I haven't had that much experience at this type of
work, but I would certainly volunteer to take it on if there is nobody more
experienced that is willing to.
Dan Giles
Application Specialist
Manulife Financial, Corporate
Phone: 416-341-7587 Fax: 416-341-7600
From: Mark Devine <Mark_Devine AT CSGSYSTEMS DOT COM> on 10/01/98 03:16 PM GMT
Please respond to "ADSM: Dist Stor Manager" <ADSM-L AT VM.MARIST DOT EDU>
To: ADSM-L AT VM.MARIST DOT EDU
cc: (bcc: ADSM)
Subject: Re: ADSM Perl Scripts
I agree that this is a good start, but along with this activity, "Wouldn't
it be nice if..."
It's plain to see that there will be a lot of ADSM'ers crafting there own
perl scripts deep into the future. Analogous to 'oraperl', wouldn't it be
nice if some entity (with a financial interest in ADSM's market share,
perhaps) married the ADSM API with perl: dsmperl!
Because PERL is a defacto standard Unix systems management scripting tool
for "heavier" scripting jobs/prototyping (no flames please), I'm sure that
the native perl development will continue full steam ahead. I just think
that an extended perl would be more elegant & reduce the collective effort
exerted by ADSM customers for the long term.
I've started> ADSM::Util::AIX # utility methods (I.e. parse
dsm.sys, etc.)
ADSM::Server::AIX # dsmadmc
ADSM::Client::AIX # dsmcdfs
but I can see that it's a large effort & I'm never going to be able to do
it
justice with my resources. If some entity did provide portable extensions,
I think a lot of people could leap ahead with native perl sys mgt
automation
(& share, of course).
Mark.Devine AT usa DOT net <mailto:Mark.Devine AT usa DOT net>
--> -----Original Message-----
--> From: ADSM: Dist Stor Manager
--> From: ADSM: Dist Stor Manager
--> [mailto:ADSM-L AT VM.MARIST DOT EDU]On Behalf Of
--> [mailto:ADSM-L AT VM.MARIST DOT EDU]On Behalf Of
--> Pat Wilson
--> Pat Wilson
--> Sent: Thursday, October 01, 1998 3:52 AM
--> Sent: Thursday, October 01, 1998 3:52 AM
--> To: ADSM-L AT VM.MARIST DOT EDU
--> To: ADSM-L AT VM.MARIST DOT EDU
--> Subject: Re: ADSM Perl Scripts
--> Subject: Re: ADSM Perl Scripts
-->
-->
-->
-->
--> It'd be neat to have a repository of scripts and such that folks
--> It'd be neat to have a repository of scripts and such that folks
--> are willing to share. I'll volunteer web space, if folks want to
--> are willing to share. I'll volunteer web space, if folks want to
--> contribute things.
--> contribute things.
-->
-->
--> Pat Wilson
--> Pat Wilson
--> paw AT dartmouth DOT edu
--> paw AT dartmouth DOT edu
-->
-->
-->
-->
--> Daniel Whicker <heimdall AT MAIL DOT ORG> writes:
--> Daniel Whicker <heimdall AT MAIL DOT ORG> writes:
-->
-->
--> > I'd be interested in any ADSM perl scripts that you may
--> > I'd be interested in any ADSM perl scripts that you may
--> have written. I've
--> have written. I've
--> > also got one that will compact all the ADSM tape
--> > also got one that will compact all the ADSM tape
--> information into one spot.
--> information into one spot.
--> >
--> >
--> > At 11:27 PM 9/30/98 , you wrote:
--> > At 11:27 PM 9/30/98 , you wrote:
--> > >> > I have written some Perl routines that use the
--> > >> > I have written some Perl routines that use the
--> -commadelimited option.
--> -commadelimited option.
--> > >>
--> > >>
--> > >> > Now if I can just convience the ADSM NOT to put
--> > >> > Now if I can just convience the ADSM NOT to put
--> commas into numbers ;)
--> commas into numbers ;)
--> > >
--> > >
--> > >> Try -tabdelimited instead.
--> > >> Try -tabdelimited instead.
--> > >
--> > >
--> > >It still formats numbers as "60,437.5". This is
--> > >It still formats numbers as "60,437.5". This is
--> trivial but annoying
--> trivial but annoying
--> > >to fix in Perl. You can then multiply, sum etc that by another
--> > >to fix in Perl. You can then multiply, sum etc that by another
--> > >number.
--> > >number.
--> > >
--> > >
--> > >ADSM is smart enough to put quote marks around any
--> > >ADSM is smart enough to put quote marks around any
--> field that would
--> field that would
--> > >have commas when it is comma delimited, and I found the
--> > >have commas when it is comma delimited, and I found the
--> right Perl
--> right Perl
--> > >regexp to split the line correctly.
--> > >regexp to split the line correctly.
--> > >
--> > >
--> > >As for useful Perl scripts: I have so far..
--> > >As for useful Perl scripts: I have so far..
--> > >
--> > >
--> > >- for our operations staff one that says which COPY
--> > >- for our operations staff one that says which COPY
--> POOL volumes have
--> POOL volumes have
--> > >filled over night, which need to be returned and how much spare
--> > >filled over night, which need to be returned and how much spare
--> > >capacity the tape pools have.
--> > >capacity the tape pools have.
--> > >
--> > >
--> > >- a "is ADSM feeling healthy" (db mirrors on line,
--> > >- a "is ADSM feeling healthy" (db mirrors on line,
--> volumes in error
--> volumes in error
--> > >state, ...)
--> > >state, ...)
--> > >
--> > >
--> > >- and one that produces daily emails to the end users
--> > >- and one that produces daily emails to the end users
--> saying what
--> saying what
--> > >happened last night and a summary to me as ADSM admin.
--> > >happened last night and a summary to me as ADSM admin.
--> > >
--> > >
--> > >- periodically reads the activity log and emails me any new and
--> > >- periodically reads the activity log and emails me any new and
--> > >"interesting" messages
--> > >"interesting" messages
--> > >
--> > >
--> > >I could share these if there are any takers.
--> > >I could share these if there are any takers.
--> > >
--> > >
--> > >Russell
--> > >Russell
--> >
--> >
--> >
--> >
--> -Dan
--> -Dan
--> iel
--> iel
--> > ------------------------------------------
--> > ------------------------------------------
--> > Daniel Whicker (heimdall AT mail DOT org)
--> > Daniel Whicker (heimdall AT mail DOT org)
-->
-->
=========================================================================
|