arsperl-devel Mailing List for ARSperl (Page 3)
Brought to you by:
jeffmurphy
Menu
▾
▴
arsperl-devel — ARSperl Internals (Developer) Discussions
You can subscribe to this list here.
| 2004 |
Jan
|
Feb
|
Mar
|
Apr
|
May
|
Jun
|
Jul
|
Aug
|
Sep
(48) |
Oct
|
Nov
|
Dec
|
|---|---|---|---|---|---|---|---|---|---|---|---|---|
| 2005 |
Jan
|
Feb
|
Mar
|
Apr
|
May
|
Jun
|
Jul
(1) |
Aug
(3) |
Sep
(10) |
Oct
|
Nov
(4) |
Dec
(2) |
| 2007 |
Jan
|
Feb
(5) |
Mar
(8) |
Apr
(2) |
May
|
Jun
|
Jul
(18) |
Aug
(22) |
Sep
(5) |
Oct
|
Nov
|
Dec
|
| 2008 |
Jan
|
Feb
|
Mar
|
Apr
|
May
(1) |
Jun
|
Jul
|
Aug
|
Sep
|
Oct
(5) |
Nov
(5) |
Dec
|
| 2009 |
Jan
(1) |
Feb
|
Mar
(14) |
Apr
(26) |
May
|
Jun
|
Jul
(2) |
Aug
|
Sep
|
Oct
|
Nov
|
Dec
(3) |
| 2010 |
Jan
|
Feb
|
Mar
|
Apr
|
May
|
Jun
|
Jul
|
Aug
|
Sep
(5) |
Oct
|
Nov
|
Dec
|
| 2011 |
Jan
|
Feb
|
Mar
|
Apr
|
May
|
Jun
|
Jul
(1) |
Aug
|
Sep
(1) |
Oct
|
Nov
|
Dec
|
| 2012 |
Jan
|
Feb
|
Mar
(1) |
Apr
|
May
|
Jun
|
Jul
|
Aug
|
Sep
|
Oct
|
Nov
|
Dec
|
| 2014 |
Jan
|
Feb
|
Mar
|
Apr
|
May
|
Jun
|
Jul
|
Aug
|
Sep
|
Oct
(1) |
Nov
|
Dec
|
|
From: Michiel B. <mb...@us...> - 2009-03-31 12:16:25
|
Update of /cvsroot/arsperl/ARSperl/html/manual In directory 23jxhf1.ch3.sourceforge.com:/tmp/cvs-serv32484 Modified Files: ars_APIVersion.html ars_ExecuteProcess.html loading.html toc.html Log Message: Updated manual files Index: ars_APIVersion.html =================================================================== RCS file: /cvsroot/arsperl/ARSperl/html/manual/ars_APIVersion.html,v retrieving revision 1.5 retrieving revision 1.6 diff -C2 -d -r1.5 -r1.6 *** ars_APIVersion.html 13 Sep 2007 22:50:25 -0000 1.5 --- ars_APIVersion.html 31 Mar 2009 12:16:11 -0000 1.6 *************** *** 1,74 **** ! <!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN"> ! <html> ! <head> ! <title>ARSperl Programmer's Manual</title> ! ! ! </head> ! ! <body style="background-color: rgb(255, 255, 255);"> ! ! <h2><code>$version = ars_APIVersion()</code></h2> ! ! This routine returns the "major" version of the API that the ARSperl ! module was compiled against. <br> ! The corresponding API and AR System versions are as follows: ! <br> ! ! <ul> ! ! <li>API 13 and AR System 7.1</li> ! ! <li>API 12 and AR System 7.0</li> ! ! <li>API 11 and AR System 6.3</li> ! ! <li>API 10 and AR System 6.0</li> ! ! <li>API 9 and AR System 5.1</li> ! ! <li>API 8 and AR System 5.0</li> ! ! <li>API 7 and AR System 4.5</li> ! ! <li>API 6 and AR System 4.0</li> ! ! <li>API 5 and AR System 3.2</li> ! ! <li>API 4 and AR System 3.0 and 3.1</li> ! ! </ul> ! ! ! <dl> ! ! <dt><b>On success</b></dt> ! ! <dd> Returns an integer. </dd> ! ! <dt><b>On failure</b></dt> ! ! <dd> Returns undef. </dd> ! ! </dl> ! ! <p>Example: </p> ! ! <pre> $v = ars_APIVersion();<br> print "This installation of ARSperl was compiled against ARS API version $v\n";<br> </pre> ! ! <i>ars_APIVersion was introduced in version 1.62 of ARSperl</i> ! <p></p> ! ! <hr width="30%"> ! <p><a href="toc.html"><img alt="<--" src="arrow.gif" align="middle"> Table of Contents </a> ! </p> ! ! <p></p> ! ! <address>Last changes to this page 24 July 2007 by mic...@ma...<br> ! ! © J.C.Murphy, J.W.Murphy 1995-2007 ar...@ar... ! </address> ! ! </body> </html> --- 1,78 ---- ! <!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" ! "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd"> ! <html xmlns="http://www.w3.org/1999/xhtml"> ! <head> ! <title> ! ARSperl Programmer's Manual ! </title> ! <style type="text/css"> ! /*<![CDATA[*/ ! body.c2 {background-color: rgb(255, 255, 255);} ! dt.c1 {font-weight: bold} ! /*]]>*/ ! </style> ! </head> ! <body class="c2"> ! <h2> ! <code>$version = ars_APIVersion()</code> ! </h2> ! <p> ! This routine returns the "major" version of the API that the ARSperl module was compiled ! against. ! </p> ! <p> ! The corresponding API and AR System versions are as follows: ! </p> ! <ul> ! <li>API 14 and AR System 7.5 ! </li> ! <li>API 13 and AR System 7.1 ! </li> ! <li>API 12 and AR System 7.0 ! </li> ! <li>API 11 and AR System 6.3 ! </li> ! <li>API 10 and AR System 6.0 ! </li> ! <li>API 9 and AR System 5.1 ! </li> ! <li>API 8 and AR System 5.0 ! </li> ! <li>API 7 and AR System 4.5 ! </li> ! <li>API 6 and AR System 4.0 ! </li> ! <li>API 5 and AR System 3.2 ! </li> ! <li>API 4 and AR System 3.0 and 3.1 ! </li> ! </ul> ! <dl> ! <dt class="c1"> ! On success ! </dt> ! <dd> ! Returns an integer. ! </dd> ! <dt class="c1"> ! On failure ! </dt> ! <dd> ! Returns undef. ! </dd> ! </dl> ! <p> ! Example: ! </p> ! <pre> ! $v = ars_APIVersion();<br /> print "This installation of ARSperl was compiled against ARS API version $v\n";<br /> ! </pre><i>ars_APIVersion was introduced in version 1.62 of ARSperl</i> ! <p> ! <a href="toc.html">Back to Table of Contents</a> ! </p> ! <address> ! Last changes to this page 24 July 2007 by mic...@ma...<br /> ! © J.C.Murphy, J.W.Murphy 1995-2007 ar...@ar... ! </address> ! </body> </html> Index: ars_ExecuteProcess.html =================================================================== RCS file: /cvsroot/arsperl/ARSperl/html/manual/ars_ExecuteProcess.html,v retrieving revision 1.3 retrieving revision 1.4 diff -C2 -d -r1.3 -r1.4 *** ars_ExecuteProcess.html 30 Mar 2003 16:36:30 -0000 1.3 --- ars_ExecuteProcess.html 31 Mar 2009 12:16:11 -0000 1.4 *************** *** 1,52 **** ! <HTML> ! <HEAD> ! <TITLE>ARSperl Manual - ars_ExecuteProcess</TITLE> ! </HEAD> ! <BODY BGCOLOR="#FFFFFF"> ! ! <H1> ARS 3.x and Higher </H1> ! ! <H2><CODE>ars_ExecuteProcess(ctrl, command, runOption=0)</CODE></H2> ! ! Execute the given command on the server host as the user-id that ! the server process is running as. ! <FONT COLOR="#FF0000">Requires Administrator privs to use.</FONT> <P> ! ! <CENTER><TABLE BORDER=1 WIDTH="50%"> ! <TR><TD><CODE>runOption</CODE></TD><TD>Explanation</TD></TR> ! <TR><TD ALIGN=CENTER>0</TD><TD>Wait for process to complete and ! then returned the process' ! returnStatus and any output that ! the process had. </TD></TR> ! <TR><TD ALIGN=CENTER>1</TD><TD>Don't wait for process to complete.</TD></TR> ! </TABLE></CENTER> ! ! <DL> ! <DT><B>On success</B><DD> ! Depending upon the runOption specified ! returns a list of <CODE>returnStatus</CODE> and ! <CODE>returnString</CODE> or <B>1</B> ! <DT><B>On failure</B><DD> ! Returns undef. ! </DL> ! ! <P>Example: ! ! <PRE> ! (($returnCode, $returnString) = ars_ExecuteProcess($ctrl, "/bin/ls -l /")) || ! die "$ars_errstr"; ! </PRE> ! ! <I>ars_ExecuteProcess was introduced in version 1.5 of ARSperl.</I> ! ! <P> ! <HR WIDTH="30%"> ! <P> ! <A HREF="toc.html"><IMG ALT="<--" SRC="arrow.gif" ALIGN=CENTER> Table of Contents </A> ! <p> ! <address> ! Last changes to this page 21st July 1997 by jcm...@ar...<BR> ! © J.C.Murphy, J.W.Murphy 1997 ar...@ar... ! </address> ! </BODY> ! </HTML> --- 1,91 ---- ! <!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" ! "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd"> ! <html xmlns="http://www.w3.org/1999/xhtml"> ! <head> ! <title> ! ARSperl Manual - ars_ExecuteProcess ! </title> ! <style type="text/css"> ! /*<![CDATA[*/ ! body { ! background-color: #FFFFFF; ! } ! dt.c1 {font-weight: bold} ! p.c1 {font-style: italic} ! /*]]>*/ ! </style> ! </head> ! <body> ! <h2> ! <code>ars_ExecuteProcess(ctrl, command, runOption=0)</code> ! </h2>Execute the given command on the server host as the user-id that the server process is ! running as. Requires Administrator privs to use. ! <table border="1" width="50%"> ! <tr> ! <td> ! <code>runOption</code> ! </td> ! <td> ! Explanation ! </td> ! </tr> ! <tr> ! <td align="center"> ! 0 ! </td> ! <td> ! Wait for process to complete and then returned the process' returnStatus and any output ! that the process had. ! </td> ! </tr> ! <tr> ! <td align="center"> ! 1 ! </td> ! <td> ! Don't wait for process to complete. ! </td> ! </tr> ! </table><br /> ! <dl> ! <dt class="c1"> ! On success ! </dt> ! <dd> ! Depending upon the runOption specified returns a list of <code>returnStatus</code> and ! <code>returnString</code> or <b>1</b> ! </dd> ! <dt class="c1"> ! On failure ! </dt> ! <dd> ! Returns undef. ! </dd> ! </dl> ! <p> ! Example: ! </p> ! <pre> ! (($returnCode, $returnString) = ars_ExecuteProcess($ctrl, "/bin/ls -l /")) || ! die "$ars_errstr"; ! ! </pre> ! <p> ! Or as an equivalent, if your server is running on Windows: ! </p> ! <pre> ! (($returnCode, $returnString) = ars_ExecuteProcess($ctrl, "cmd /c dir")) || ! die "$ars_errstr"; ! </pre> ! <p class="c1"> ! ars_ExecuteProcess was introduced in version 1.5 of ARSperl. ! </p> ! <p> ! <a href="toc.html">Back to Table of Contents</a> ! </p> ! <address> ! Last changes to this page 31st March 2009 by mic...@gm...<br /> ! © J.C.Murphy, J.W.Murphy 1997 ar...@ar... ! </address> ! </body> ! </html> Index: loading.html =================================================================== RCS file: /cvsroot/arsperl/ARSperl/html/manual/loading.html,v retrieving revision 1.4 retrieving revision 1.5 diff -C2 -d -r1.4 -r1.5 *** loading.html 30 Mar 2003 16:36:30 -0000 1.4 --- loading.html 31 Mar 2009 12:16:11 -0000 1.5 *************** *** 1,37 **** ! <HTML> ! <HEAD> ! <TITLE>ARSperl Manual - Loading the Extension</TITLE> ! </HEAD> ! <BODY BGCOLOR="#FFFFFF"> ! ! <H2>Loading the Extension</H2> ! ! To load the extension you must have ! <PRE> ! <FONT SIZE="+1"><CODE>use ARS;</CODE></FONT> ! </PRE> ! at the beginning of a perl script. ! ! <P> ! ! The added perl functions more or less match the ones in the C API. ! ! <P> ! ! It should be noted that, at present, only functions ! pertinent to client usage are integrated. Functions that would be used, for ! instance, by the admin application are not integrated <I>(i.e. functions for ! creating schemas, active links, etc. Only functions to fetch schemas, active ! links, submit and modify data are available)</I>. ! ! <P> ! <HR WIDTH="30%"> ! <P> ! <A HREF="toc.html"><IMG ALT="<--" SRC="arrow.gif" ALIGN=CENTER> Table of Contents </A> ! <p> ! <address> ! Last changes to this page 26th June 1997 by d.j...@so...<br> ! © J.C.Murphy, J.W.Murphy 1997 ar...@ar... ! </address> ! </BODY> ! </HTML> --- 1,27 ---- ! <!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" ! "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd"> ! <html xmlns="http://www.w3.org/1999/xhtml"> ! <head> ! <title> ! ARSperl Manual - Loading the Extension ! </title> ! </head> ! <body> ! <h2> ! Loading the Extension ! </h2>To load the extension you must have ! <pre> ! <code>use ARS;</code> ! </pre>at the beginning of a perl script. ! <p> ! The added perl functions more or less match the ones in the C API. ! </p> ! <p> ! <a href="toc.html">Back to Table of Contents</a> ! </p> ! <address> ! Last changes to this page 31st May 2009 by mic...@gm...<br /> ! © J.C.Murphy, J.W.Murphy 1997 ar...@ar... ! </address> ! </body> ! </html> Index: toc.html =================================================================== RCS file: /cvsroot/arsperl/ARSperl/html/manual/toc.html,v retrieving revision 1.28 retrieving revision 1.29 diff -C2 -d -r1.28 -r1.29 *** toc.html 11 Aug 2007 20:24:17 -0000 1.28 --- toc.html 31 Mar 2009 12:16:11 -0000 1.29 *************** *** 1,1062 **** ! <!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN"> ! <html> ! <head> ! ! ! ! ! ! ! [...1570 lines suppressed...] ! </li> ! <li> ! <a href="ds_shv.html">Status History Value</a> ! </li> ! <li> ! <a href="ds_verifyuser_hash.html">Verify User Structure</a> ! </li> ! <li> ! <a href="ds_getvui_hash.html">VUI Attributes Structure</a> ! </li> </ul> ! </dd> ! </dl> ! <address> ! <a href="../index.html">ARSPerl</a><br /> ! Last changes to this page 31st March 2009 by mic...@gm...<br /> ! © J.C.Murphy, J.W.Murphy 1997 <i>ar...@ar...</i> ! </address> ! </body> </html> |
|
From: Thilo S. <thi...@ap...> - 2009-03-30 10:17:00
|
Hi Michiel, sorry for the delayed response. I'm working on ARGetListEntryWithMultiSchemaFields and the AR*Image functions. I've indeed done nothing about the debug functions. At this point, I'm not really using 7.5 already, and I don't even know what they are about. On the other hand, most of them look rather easy to implement, so I might take a look at it. I'll probably do a check-in later today or tomorrow. Actually, there are lots of areas where I could need help: - The new functions will need documentation. There are also some recently added functions which are still undocumented (see changes.dat). - The test scripts could be improved. Most of them only check that no error occurs, but don't really verify the correctness of the results. - The sample scripts could need improvement, too. Some of them are probably rather outdated. - Of course I wouldn't mind if you implement some of the ARWfd* functions. Kind regards, Thilo Michiel Beijen wrote: > [moving to arsperl-devel mailinglist] > > Thilo, > > You're working on getting ARSperl to work with Remedy 7.5, thats good news! > > I only modified it a little to compile with the 7.5 libs, I changed > infra/exsi.pl to pick up some new values from ar.h - where the comments > did not indicate the variable types, and I modified the calls to > ars_GetActivelink and the like. But I did not feel that to be enough to > check into CVS. > > I've been looking at the whats-new documentation for 7.5 and saw an > awful lot of new API calls for the debug functions. I guess you are not > implementing those, right? > Are you implementing the ARGetImage/ARSetImage etc calls? > I noticed they implemented LOTS more new server information options than > the ones they specified in the what's new guide... > > Is there anything I could do to help you with? > > Kind regards, > -- > Michiel Beijen > Software Consultant > +31 6 - 457 42 418 > Bee Free IT + http://beefreeit.nl > > > On Mon, Mar 23, 2009 at 17:50, Thilo Stapff <thi...@ap... > <mailto:thi...@ap...>> wrote: > > Hi Michiel, > > as I understand it, only Jeff can create a release. > > However, I'd rather prefer to wait one or two weeks with this, since > I'm currently working on the 7.5 migration, which should definitely > make it into the next release. > > > Regards, > Thilo > > > Michiel Beijen wrote: > > ** Actually, I can confirm this problem using ARSperl 1.91 and > the 7.1 API. > > > When use the 'head' version of ARSperl this does not occur - > this is because Thilo Stapff has checked in some additions to > ARSperl that did not make it to the 1.91 release. > > I will ask Thilo if he can create a 1.92 release. In the mean > time, you can checkout the latest version from CVS and use that. > > Kind regards, > -- > Michiel Beijen > Software Consultant > +31 6 - 457 42 418 > Bee Free IT + http://beefreeit.nl > > > On Mon, Mar 23, 2009 at 02:36, Carey Matthew Black > <bla...@gm... <mailto:bla...@gm...> > <mailto:bla...@gm... <mailto:bla...@gm...>>> wrote: > > Bhupesh Gupta, > > Again.. I am guessing about this... Maybe your using a 64-bit > Perl > install? > > I have seen many references to the idea that the ARS API ( when > version is < 7.5) is only compatible with a 32 bit Perl install. > > If your using ARS 7.5 libraries, then you likely have to use > a 64 bit > Perl insteall, but I have no idea how well ARSPerl has (or > has not > yet) been adapted for v7.5. > > Again, I am only guessing based on the information you have > provided. > I may be totally wrong. > > > > For what it is worth, posting ARSPerl questions to ARSList is > fine. > However, you may get more specific ARSPerl help if you cross > post your > questions to the ARSPerl mailing list. Here is the page to > subscribe > to that list: > http://lists.sourceforge.net/mailman/listinfo/arsperl-users > Specifically that ARSPerl list wants emails that are: > " > Appropriate content for this list: > - reports of bugs > - how to use ARSperl > - how to solve a problem using ARSperl > " > > I think you at least have found what looks to me to be a > problem(bug?) > in the examples/Dump_Setup.pl script. > > So I am cross posting this response to see if we can get some > response > about at least that part of this problem. Since you may not > be a part > of the ARSPerl list I would invite any response from the > ARSPerl list > to be sent to the list and also sent directly to you too. > (Just in > case your not getting email or watching the list on the web.) > > > One other thing.... > It may be helpful for everyone who might try to help you to > know more > about your environment: > To name a few questions that may be helpful to know: > > What version of ARS are you using? > What version of ARSPerl are you using? > What platform are you installing ARSPerl on? > > Good luck. > > -- > Carey Matthew Black > BMC Remedy AR System Skilled Professional (RSP) > ARS = Action Request System(Remedy) > > Love, then teach > Solution = People + Process + Tools > Fast, Accurate, Cheap.... Pick two. > > > On Sun, Mar 22, 2009 at 10:59 AM, Bhupesh Gupta > <gup...@gm... > <mailto:gup...@gm...> > <mailto:gup...@gm... > <mailto:gup...@gm...>>> > > wrote: > > Hi Matthew, > > > > You are correct, the intial error were due to invalid > number of > arguments, > > but after correcting the script as suggested by you i am > getting the > > following error: > > > > "Free to wrong pool 265b08 not 10c015f at Dump_Setup.pl > line 65." > > > > PLease suggest > > > > Date: Sat, 21 Mar 2009 13:13:36 -0400 > Subject: Re: ars_export not returning expected output > From: Carey Matthew Black <bla...@gm... > <mailto:bla...@gm...> > <mailto:bla...@gm... <mailto:bla...@gm...>>> > To: ar...@ar... <mailto:ar...@ar...> > <mailto:ar...@ar... <mailto:ar...@ar...>> > > > Bhupesh Gupta, > > You may want to check the value of $ars_errstr after the > ars_Export > function. I hope it will give you a good error message about > what is > wrong with your current code. > > > However, to take a guess without seeing the error message. > > If I am reading your code correctly then you are seeing run time > values like this: > $type =3D "Schema" > $name =3D "A_correct_form_name_for_your_server" > and you are not getting any returned any value from the AR System > server. > > > If that is the case then I think you have two problems in > your code. > Your answer can be found here: > http://arsperl.org/manual/ars_Export.html > > The function signature is as follows: > ars_Export(ctrl, displayTag, vuiType, type1, name1, type2, > name2, ...) > > And it returns this: > On success > returns a scalar string > On failure > returns undef > > ( Your getting the undef value back. ) > > > You are calling it with values like this: > ars_Export($ctrl, "", "Schema", $name1); > ( That looks wrong to me. ) > > I do not see one of the displayTag or vuiType values in call > that you > are making. > I think the type1 value that you are passing is also wrong. > " > Valid types are: > * "schema" > * "schema_defn" > * "schema_view" > * "schema_mail" > * "filter" > * "active_link" > * "admin_ext" > * "char_menu" > * "escalation" > * "dist_map" > * "schema_view_min" > * "container" > * "dist_pool" > * "schema_view_2" > * "vui" > * "field" > * "xml_schema" > * "xml_filter" > * "xml_active_link" > * "xml_char_menu" > * "xml_escalation" > * "xml_dist_map" > * "xml_container" > * "xml_dist_pool" > * "xml_vui" > * "xml_field" > " > > In Perl ("Schema" ne "schema"). ( ne means, "not equals in a > string > sense") > > I think you need to do these two things: > > # note the change in case from Schema --> schema > dump_type("$path/schema", "schema", \@schema); > > And then also do this... > > # added a vuiType constant value from the ARS module > my $val =3D ars_Export($c,"", &ARS::AR_VUI_TYPE_NONE, > $type,$name); > > > I think that might work. > > -- > Carey Matthew Black > BMC Remedy AR System Skilled Professional (RSP) > ARS =3D Action Request System(Remedy) > > Love, then teach > Solution =3D People + Process + Tools > Fast, Accurate, Cheap.... Pick two. > > > On Wed, Mar 18, 2009 at 12:53 PM, Bhupesh Gupta > <gup...@gm... > <mailto:gup...@gm...> > <mailto:gup...@gm... > <mailto:gup...@gm...>>> > > wrote: > > ** > > > > ---------- Forwarded message ---------- > > From: Bhupesh Gupta <gup...@gm... > <mailto:gup...@gm...> > <mailto:gup...@gm... > <mailto:gup...@gm...>>> > > Date: Sat, Mar 7, 2009 at 8:18 PM > > Subject: ars_export not returning expected output > > To: AR...@li... > <mailto:AR...@li...> > <mailto:AR...@li... > <mailto:AR...@li...>> > > Cc: Bhupesh Gupta <gup...@gm... > <mailto:gup...@gm...> > <mailto:gup...@gm... > <mailto:gup...@gm...>>> > > > > > > ($ACCOUNT, $PASSWORD, $path) = @ARGV; > > #chomp($path = `pwd`) if (!$path); > > $c = ars_Login("BHUPESH-GUPTA",$ACCOUNT,$PASSWORD); > > die "login error: $ars_errstr\n" unless defined($c); > > > > @schema = ars_GetListSchema($c, 0, 1024); > > @active = ars_GetListActiveLink($c); > > @filter = ars_GetListFilter($c); > > @escal = ars_GetListEscalation($c); > > @menu = ars_GetListCharMenu($c); > > @admin_ext = ars_GetListAdminExtension($c); > > > > sub dump_type { > > my ($path, $type, $names) = @_; > > > > if (! -d "$path") { > > mkdir "$path" || die "can't create directory $path"; > > mkdir "$path/RCS" || die "can't create directory $path/RCS"; > > } > > foreach $name (@$names) { > > my $val = ars_Export($c,"",$type,$name); > > print "$type\n"; > > print "$name\n"; > > print "$val\n"; > > } > > } > > > > dump_type("$path/schema", "Schema", \@schema); > > > > Dear friends : Please suggest. > > > > when i am executing this small programm, the print $val > statement not > > printing anything. the syntax looks ok. Please help > > > > -- > > Regards, > > Bhupesh Gupta > > > _______________________________________________________________________________ > UNSUBSCRIBE or access ARSlist Archives at www.arslist.org > <http://www.arslist.org> > <http://www.arslist.org> > > Platinum Sponsor: RMI Solutions ARSlist: "Where the Answers Are" > > > __Platinum Sponsor: RMI Solutions ARSlist: "Where the Answers > Are" html___ > > > _______________________________________________________________________________ > UNSUBSCRIBE or access ARSlist Archives at www.arslist.org > <http://www.arslist.org> > Platinum Sponsor: RMI Solutions ARSlist: "Where the Answers Are" > > > > ------------------------------------------------------------------------ > > ------------------------------------------------------------------------------ > Apps built with the Adobe(R) Flex(R) framework and Flex Builder(TM) are > powering Web 2.0 with engaging, cross-platform capabilities. Quickly and > easily build your RIAs with Flex Builder, the Eclipse(TM)based development > software that enables intelligent coding and step-through debugging. > Download the free 60 day trial. http://p.sf.net/sfu/www-adobe-com > > > ------------------------------------------------------------------------ > > _______________________________________________ > Arsperl-devel mailing list > Ars...@ar... > https://lists.sourceforge.net/lists/listinfo/arsperl-devel |
|
From: Michiel B. <mi...@be...> - 2009-03-25 16:25:49
|
Dear all, I was cleaning out the tracker for ARSperl on the SourceForge site (and subscribed myself to the RSS feed as well, now I will receive notifications when new bugs are logged). I was able to solve a few issues by using my excellent mailing list searching skills and your great solutions for issues that ARSperl users post. But there is one issue left that I can not answer or solve; it needs more than just googling skill. I'm afraid I do not know the slightest thing about C and memory allocation. Can you please look at this issue and take appropriate action? Please see the link below: https://sourceforge.net/tracker/?func=detail&aid=1828538&group_id=116013&atid=673428 Kind regards, -- Michiel Beijen Software Consultant +31 6 - 457 42 418 Bee Free IT + http://beefreeit.nl |
|
From: Michiel B. <mi...@be...> - 2009-03-23 20:39:18
|
[moving to arsperl-devel mailinglist] Thilo, You're working on getting ARSperl to work with Remedy 7.5, thats good news! I only modified it a little to compile with the 7.5 libs, I changed infra/exsi.pl to pick up some new values from ar.h - where the comments did not indicate the variable types, and I modified the calls to ars_GetActivelink and the like. But I did not feel that to be enough to check into CVS. I've been looking at the whats-new documentation for 7.5 and saw an awful lot of new API calls for the debug functions. I guess you are not implementing those, right? Are you implementing the ARGetImage/ARSetImage etc calls? I noticed they implemented LOTS more new server information options than the ones they specified in the what's new guide... Is there anything I could do to help you with? Kind regards, -- Michiel Beijen Software Consultant +31 6 - 457 42 418 Bee Free IT + http://beefreeit.nl On Mon, Mar 23, 2009 at 17:50, Thilo Stapff <thi...@ap...>wrote: > Hi Michiel, > > as I understand it, only Jeff can create a release. > > However, I'd rather prefer to wait one or two weeks with this, since I'm > currently working on the 7.5 migration, which should definitely make it into > the next release. > > > Regards, > Thilo > > > Michiel Beijen wrote: > >> ** Actually, I can confirm this problem using ARSperl 1.91 and the 7.1 >> API. >> >> When use the 'head' version of ARSperl this does not occur - this is >> because Thilo Stapff has checked in some additions to ARSperl that did not >> make it to the 1.91 release. >> >> I will ask Thilo if he can create a 1.92 release. In the mean time, you >> can checkout the latest version from CVS and use that. >> >> Kind regards, >> -- >> Michiel Beijen >> Software Consultant >> +31 6 - 457 42 418 >> Bee Free IT + http://beefreeit.nl >> >> >> On Mon, Mar 23, 2009 at 02:36, Carey Matthew Black <bla...@gm...<mailto: >> bla...@gm...>> wrote: >> >> Bhupesh Gupta, >> >> Again.. I am guessing about this... Maybe your using a 64-bit Perl >> install? >> >> I have seen many references to the idea that the ARS API ( when >> version is < 7.5) is only compatible with a 32 bit Perl install. >> >> If your using ARS 7.5 libraries, then you likely have to use a 64 bit >> Perl insteall, but I have no idea how well ARSPerl has (or has not >> yet) been adapted for v7.5. >> >> Again, I am only guessing based on the information you have provided. >> I may be totally wrong. >> >> >> >> For what it is worth, posting ARSPerl questions to ARSList is fine. >> However, you may get more specific ARSPerl help if you cross post your >> questions to the ARSPerl mailing list. Here is the page to subscribe >> to that list: >> http://lists.sourceforge.net/mailman/listinfo/arsperl-users >> Specifically that ARSPerl list wants emails that are: >> " >> Appropriate content for this list: >> - reports of bugs >> - how to use ARSperl >> - how to solve a problem using ARSperl >> " >> >> I think you at least have found what looks to me to be a problem(bug?) >> in the examples/Dump_Setup.pl script. >> >> So I am cross posting this response to see if we can get some response >> about at least that part of this problem. Since you may not be a part >> of the ARSPerl list I would invite any response from the ARSPerl list >> to be sent to the list and also sent directly to you too. (Just in >> case your not getting email or watching the list on the web.) >> >> >> One other thing.... >> It may be helpful for everyone who might try to help you to know more >> about your environment: >> To name a few questions that may be helpful to know: >> >> What version of ARS are you using? >> What version of ARSPerl are you using? >> What platform are you installing ARSPerl on? >> >> Good luck. >> >> -- >> Carey Matthew Black >> BMC Remedy AR System Skilled Professional (RSP) >> ARS = Action Request System(Remedy) >> >> Love, then teach >> Solution = People + Process + Tools >> Fast, Accurate, Cheap.... Pick two. >> >> >> On Sun, Mar 22, 2009 at 10:59 AM, Bhupesh Gupta >> <gup...@gm... <mailto:gup...@gm...>> >> wrote: >> > Hi Matthew, >> > >> > You are correct, the intial error were due to invalid number of >> arguments, >> > but after correcting the script as suggested by you i am getting the >> > following error: >> > >> > "Free to wrong pool 265b08 not 10c015f at Dump_Setup.pl line 65." >> > >> > PLease suggest >> > >> >> Date: Sat, 21 Mar 2009 13:13:36 -0400 >> Subject: Re: ars_export not returning expected output >> From: Carey Matthew Black <bla...@gm... >> <mailto:bla...@gm...>> >> To: ar...@ar... <mailto:ar...@ar...> >> >> >> Bhupesh Gupta, >> >> You may want to check the value of $ars_errstr after the ars_Export >> function. I hope it will give you a good error message about what is >> wrong with your current code. >> >> >> However, to take a guess without seeing the error message. >> >> If I am reading your code correctly then you are seeing run time >> values like this: >> $type =3D "Schema" >> $name =3D "A_correct_form_name_for_your_server" >> and you are not getting any returned any value from the AR System >> server. >> >> >> If that is the case then I think you have two problems in your code. >> Your answer can be found here: >> http://arsperl.org/manual/ars_Export.html >> >> The function signature is as follows: >> ars_Export(ctrl, displayTag, vuiType, type1, name1, type2, name2, ...) >> >> And it returns this: >> On success >> returns a scalar string >> On failure >> returns undef >> >> ( Your getting the undef value back. ) >> >> >> You are calling it with values like this: >> ars_Export($ctrl, "", "Schema", $name1); >> ( That looks wrong to me. ) >> >> I do not see one of the displayTag or vuiType values in call that you >> are making. >> I think the type1 value that you are passing is also wrong. >> " >> Valid types are: >> * "schema" >> * "schema_defn" >> * "schema_view" >> * "schema_mail" >> * "filter" >> * "active_link" >> * "admin_ext" >> * "char_menu" >> * "escalation" >> * "dist_map" >> * "schema_view_min" >> * "container" >> * "dist_pool" >> * "schema_view_2" >> * "vui" >> * "field" >> * "xml_schema" >> * "xml_filter" >> * "xml_active_link" >> * "xml_char_menu" >> * "xml_escalation" >> * "xml_dist_map" >> * "xml_container" >> * "xml_dist_pool" >> * "xml_vui" >> * "xml_field" >> " >> >> In Perl ("Schema" ne "schema"). ( ne means, "not equals in a string >> sense") >> >> I think you need to do these two things: >> >> # note the change in case from Schema --> schema >> dump_type("$path/schema", "schema", \@schema); >> >> And then also do this... >> >> # added a vuiType constant value from the ARS module >> my $val =3D ars_Export($c,"", &ARS::AR_VUI_TYPE_NONE, $type,$name); >> >> >> I think that might work. >> >> -- >> Carey Matthew Black >> BMC Remedy AR System Skilled Professional (RSP) >> ARS =3D Action Request System(Remedy) >> >> Love, then teach >> Solution =3D People + Process + Tools >> Fast, Accurate, Cheap.... Pick two. >> >> >> On Wed, Mar 18, 2009 at 12:53 PM, Bhupesh Gupta >> <gup...@gm... <mailto:gup...@gm...>> >> wrote: >> > ** >> > >> > ---------- Forwarded message ---------- >> > From: Bhupesh Gupta <gup...@gm... >> <mailto:gup...@gm...>> >> > Date: Sat, Mar 7, 2009 at 8:18 PM >> > Subject: ars_export not returning expected output >> > To: AR...@li... <mailto:AR...@li...> >> > Cc: Bhupesh Gupta <gup...@gm... >> <mailto:gup...@gm...>> >> > >> > >> > ($ACCOUNT, $PASSWORD, $path) = @ARGV; >> > #chomp($path = `pwd`) if (!$path); >> > $c = ars_Login("BHUPESH-GUPTA",$ACCOUNT,$PASSWORD); >> > die "login error: $ars_errstr\n" unless defined($c); >> > >> > @schema = ars_GetListSchema($c, 0, 1024); >> > @active = ars_GetListActiveLink($c); >> > @filter = ars_GetListFilter($c); >> > @escal = ars_GetListEscalation($c); >> > @menu = ars_GetListCharMenu($c); >> > @admin_ext = ars_GetListAdminExtension($c); >> > >> > sub dump_type { >> > my ($path, $type, $names) = @_; >> > >> > if (! -d "$path") { >> > mkdir "$path" || die "can't create directory $path"; >> > mkdir "$path/RCS" || die "can't create directory $path/RCS"; >> > } >> > foreach $name (@$names) { >> > my $val = ars_Export($c,"",$type,$name); >> > print "$type\n"; >> > print "$name\n"; >> > print "$val\n"; >> > } >> > } >> > >> > dump_type("$path/schema", "Schema", \@schema); >> > >> > Dear friends : Please suggest. >> > >> > when i am executing this small programm, the print $val statement >> not >> > printing anything. the syntax looks ok. Please help >> > >> > -- >> > Regards, >> > Bhupesh Gupta >> >> >> _______________________________________________________________________________ >> UNSUBSCRIBE or access ARSlist Archives at www.arslist.org >> <http://www.arslist.org> >> Platinum Sponsor: RMI Solutions ARSlist: "Where the Answers Are" >> >> >> __Platinum Sponsor: RMI Solutions ARSlist: "Where the Answers Are" html___ >> > > > _______________________________________________________________________________ > UNSUBSCRIBE or access ARSlist Archives at www.arslist.org > Platinum Sponsor: RMI Solutions ARSlist: "Where the Answers Are" > |
|
From: Thilo S. <ts...@us...> - 2009-01-06 19:21:52
|
Update of /cvsroot/arsperl/ARSperl/html In directory 23jxhf1.ch3.sourceforge.com:/tmp/cvs-serv31525/html Modified Files: changes.html Log Message: ars_GetFieldTable performance improvement, ars_SetServerInfo bugfix Index: changes.html =================================================================== RCS file: /cvsroot/arsperl/ARSperl/html/changes.html,v retrieving revision 1.32 retrieving revision 1.33 diff -C2 -d -r1.32 -r1.33 *** changes.html 24 Nov 2008 15:40:23 -0000 1.32 --- changes.html 6 Jan 2009 19:21:46 -0000 1.33 *************** *** 1,692 **** ! <html><head><title> ARSperl: Revision History </title></head> ! ! <body bgcolor='white' text='black'><h2>Changes for ARSperl</h2> ! <table border='0'> ! <tr><td>BM</td><td>=</td><td>Bill Middleton {wjm at metronet.com}</td></tr> ! <tr><td>GDF</td><td>=</td><td>G. David Frye {gdf at uiuc.edu}</td></tr> ! <tr><td>JCM</td><td>=</td><td>Jeff Murphy {jeffmurphy at sourceforge.net}</td></tr> ! <tr><td>JWM</td><td>=</td><td>Joel Murphy {jmurphy at buffalo.edu}</td></tr> ! <tr><td>TS</td><td>=</td><td>Thilo Stapff {tstapff at sourceforge.net}</td></tr> ! <tr><td>CL</td><td>=</td><td>Chris Leach {Chris.Leach at kaz-group.com}</td></tr> [...2137 lines suppressed...] ! <TD width='100%'> ! <TABLE CELLSPACING='0' CELLPADDING='3' WIDTH='100%' BORDER='0' ! BGCOLOR='lightblue'> ! <tr><td colspan='2'> ! <table width='100%' border='0'><tr> ! <td width='50%'>Released: <B>01/12/96</B></td> ! <td width='50%'>Version: <B>1.0beta</B></td> ! </tr></table></td> ! </tr><tr bgcolor='#eeeeee'><td width='10%'>(JWM)</td><td width='90%'><font color='black'>First release ! </font></td></tr> ! <tr bgcolor='#dddddd'><td width='10%'>(JCM)</td><td width='90%'><font color='black'>Installation, history, and Gnu documentation added. ! Removed -lars from makefile (internal C library that wasn't released), not needed for arsperl. </font></td></tr> ! <tr bgcolor='#eeeeee'><td width='10%'>(JCM)</td><td width='90%'><font color='black'>Added example scripts and html documentation. ! </table></td></tr></table> ! ! <P> ! ! ! <P> ! <PRE>$Header$</PRE></body></html> |
|
From: jeff m. <jef...@us...> - 2008-11-24 15:40:31
|
Update of /cvsroot/arsperl/ARSperl In directory 23jxhf1.ch3.sourceforge.com:/tmp/cvs-serv30937 Modified Files: ARSOOform.pm ARSOOsup.pm CHANGES changes.dat Log Message: CL enhanced OO interface to handle custom enums so it works with ITSM7 Index: changes.dat =================================================================== RCS file: /cvsroot/arsperl/ARSperl/changes.dat,v retrieving revision 1.60 retrieving revision 1.61 diff -C2 -d -r1.60 -r1.61 *** changes.dat 3 Nov 2008 17:08:19 -0000 1.60 --- changes.dat 24 Nov 2008 15:40:23 -0000 1.61 *************** *** 1,3 **** --- 1,4 ---- released=xx/xx/xxx version=1.92 + !CL enhanced ARS OO interface to handle custom enum fields TS fixed return value of ars_Import TS fixed memory violation in ars_GetListContainer Index: ARSOOsup.pm =================================================================== RCS file: /cvsroot/arsperl/ARSperl/ARSOOsup.pm,v retrieving revision 1.6 retrieving revision 1.7 diff -C2 -d -r1.6 -r1.7 *** ARSOOsup.pm 15 May 2008 18:30:00 -0000 1.6 --- ARSOOsup.pm 24 Nov 2008 15:40:23 -0000 1.7 *************** *** 122,126 **** return ars_GetListSchema($this->{'ctrl'}, $changedSince, ! $schemaType, $name); } --- 122,126 ---- return ars_GetListSchema($this->{'ctrl'}, $changedSince, ! $schemaType, undef, $name); } Index: CHANGES =================================================================== RCS file: /cvsroot/arsperl/ARSperl/CHANGES,v retrieving revision 1.62 retrieving revision 1.63 diff -C2 -d -r1.62 -r1.63 *** CHANGES 20 Jul 2007 19:44:34 -0000 1.62 --- CHANGES 24 Nov 2008 15:40:23 -0000 1.63 *************** *** 6,10 **** GDF = G. David Frye <gdf at uiuc.edu> JCM = Jeff Murphy <jcmurphy at buffalo.edu> ! JWM = Joel Murphy <jmurphy at acsu.buffalo.edu> Note: items preceeded by a '!' denoted changes that are incompatible with --- 6,12 ---- GDF = G. David Frye <gdf at uiuc.edu> JCM = Jeff Murphy <jcmurphy at buffalo.edu> ! JWM = Joel Murphy <jmurphy at buffalo.edu> ! TS = Thilo Stapff <tstapff at sourceforge.net> [...1687 lines suppressed...] ! (JWM) Internal GetField call now caches results to minimize ! number of queries made. + (JCM) Examples of new functions. ! (JCM) "WhoUsesIt.pl" utility ! ! (rele version=1.0beta ! (JWM) First release + (JCM) Installation, history, and Gnu documentation added. + Removed -lars from makefile (internal C library that wasn't + released), not needed for arsperl. + (JCM) Added example scripts and html documentation. + Index: ARSOOform.pm =================================================================== RCS file: /cvsroot/arsperl/ARSperl/ARSOOform.pm,v retrieving revision 1.12 retrieving revision 1.13 diff -C2 -d -r1.12 -r1.13 *** ARSOOform.pm 20 Jul 2007 19:57:56 -0000 1.12 --- ARSOOform.pm 24 Nov 2008 15:40:23 -0000 1.13 *************** *** 64,76 **** if ($fv->{'dataType'} eq "enum") { if (ref($fv->{'limit'}->{'enumLimits'}) eq "ARRAY") { ! $enums{$_} = [@{$fv->{'limit'}->{'enumLimits'}}]; } elsif (exists $fv->{'limit'}->{'enumLimits'}->{'regularList'}) { ! $enums{$_} = [@{$fv->{'limit'}->{'enumLimits'}->{'regularList'}}]; } else { ! print "Sorry. I'm not sure what to do with non-regularLists of enums.\n"; ! print "(this enum is type \"", keys %{$fv->{'limit'}->{'enumLimits'}}, "\")\n"; ! print "listStyle = ", $fv->{'limit'}->{'enumLimits'}->{'listStyle'}, "\n"; ! die; } } --- 64,75 ---- if ($fv->{'dataType'} eq "enum") { if (ref($fv->{'limit'}->{'enumLimits'}) eq "ARRAY") { ! my $i = 0; ! $enums{$_} = { map { $i++, $_ } @{$fv->{'limit'}->{'enumLimits'}} }; } elsif (exists $fv->{'limit'}->{'enumLimits'}->{'regularList'}) { ! my $i = 0; ! $enums{$_} = { map { $i++, $_ } @{$fv->{'limit'}->{'enumLimits'}->{'regularList'}} }; } else { ! $enums{$_} = { map { $_->{itemNumber}, $_->{itemName} } @{$fv->{'limit'}->{'enumLimits'}->{customList}} }; } } *************** *** 380,385 **** "[1] unable to translate enumeration value for field '$f'"); } ! for($i = 0 ; $i <= $#{$this->{'fieldEnumValues'}->{$f}} ; $i++) { ! return $i if $this->{'fieldEnumValues'}->{$f}->[$i] eq $v; } $this->{'connection'}->pushMessage(&ARS::AR_RETURN_ERROR, --- 379,384 ---- "[1] unable to translate enumeration value for field '$f'"); } ! foreach (keys %{$this->{'fieldEnumValues'}->{$f}}) { ! return $_ if $this->{'fieldEnumValues'}->{$f}->{$_} eq $v; } $this->{'connection'}->pushMessage(&ARS::AR_RETURN_ERROR, *************** *** 420,424 **** return undef unless defined $v; if(!defined($this->{'fieldEnumValues'}->{$f}) || ! ($#{$this->{'fieldEnumValues'}->{$f}} < $v) ) { $this->{'connection'}->pushMessage(&ARS::AR_RETURN_ERROR, 81004, --- 419,423 ---- return undef unless defined $v; if(!defined($this->{'fieldEnumValues'}->{$f}) || ! (!exists($this->{'fieldEnumValues'}->{$f}->{$v})) ) { $this->{'connection'}->pushMessage(&ARS::AR_RETURN_ERROR, 81004, *************** *** 427,431 **** } ! return $this->{'fieldEnumValues'}->{$f}->[$v] } --- 426,430 ---- } ! return $this->{'fieldEnumValues'}->{$f}->{$v} } |
|
From: jeff m. <jef...@us...> - 2008-11-24 15:40:30
|
Update of /cvsroot/arsperl/ARSperl/html In directory 23jxhf1.ch3.sourceforge.com:/tmp/cvs-serv30937/html Modified Files: changes.html Log Message: CL enhanced OO interface to handle custom enums so it works with ITSM7 Index: changes.html =================================================================== RCS file: /cvsroot/arsperl/ARSperl/html/changes.html,v retrieving revision 1.31 retrieving revision 1.32 diff -C2 -d -r1.31 -r1.32 *** changes.html 20 Jul 2007 19:44:34 -0000 1.31 --- changes.html 24 Nov 2008 15:40:23 -0000 1.32 *************** *** 8,11 **** --- 8,12 ---- <tr><td>JWM</td><td>=</td><td>Joel Murphy {jmurphy at buffalo.edu}</td></tr> <tr><td>TS</td><td>=</td><td>Thilo Stapff {tstapff at sourceforge.net}</td></tr> + <tr><td>CL</td><td>=</td><td>Chris Leach {Chris.Leach at kaz-group.com}</td></tr> </table> <P> *************** *** 30,1399 **** <table width='100%' border='0'><tr> <td width='50%'>Released: <B>xx/xx/xxx</B></td> [...2011 lines suppressed...] ! <tr bgcolor='#dddddd'><td width='10%'>(JWM)</td><td width='90%'><font color='black'>Field caching code added to make some of the functions ! more efficient. </font></td></tr> ! <tr bgcolor='#eeeeee'><td width='10%'>(JCM)</td><td width='90%'><font color='black'>New functions: ars_GetFilter(), ars_GetCharMenu(), ! ars_GetServerStatistics </font></td></tr> ! <tr bgcolor='#dddddd'><td width='10%'>(JWM)</td><td width='90%'><font color='black'>Internal GetField call now caches results to minimize ! number of queries made. </font></td></tr> ! <tr bgcolor='#eeeeee'><td width='10%'>(JCM)</td><td width='90%'><font color='black'>Examples of new functions. ! </font></td></tr> ! <tr bgcolor='#dddddd'><td width='10%'>(JCM)</td><td width='90%'><font color='black'>"WhoUsesIt.pl" utility ! </font></td></tr> ! <tr bgcolor='#eeeeee'><td width='10%'>(released=01/12/96)</td><td width='90%'><font color='black'>version=1.0beta ! </font></td></tr> ! <tr bgcolor='#dddddd'><td width='10%'>(JWM)</td><td width='90%'><font color='black'>First release ! </font></td></tr> ! <tr bgcolor='#eeeeee'><td width='10%'>(JCM)</td><td width='90%'><font color='black'>Installation, history, and Gnu documentation added. ! Removed -lars from makefile (internal C library that wasn't released), not needed for arsperl. </font></td></tr> ! <tr bgcolor='#dddddd'><td width='10%'>(JCM)</td><td width='90%'><font color='black'>Added example scripts and html documentation. ! <P> <PRE>$Header$</PRE></body></html> |
|
From: jeff m. <jef...@us...> - 2008-11-24 15:40:30
|
Update of /cvsroot/arsperl/ARSperl/infra In directory 23jxhf1.ch3.sourceforge.com:/tmp/cvs-serv30937/infra Modified Files: mkchanges.pl Log Message: CL enhanced OO interface to handle custom enums so it works with ITSM7 Index: mkchanges.pl =================================================================== RCS file: /cvsroot/arsperl/ARSperl/infra/mkchanges.pl,v retrieving revision 1.8 retrieving revision 1.9 diff -C2 -d -r1.8 -r1.9 *** mkchanges.pl 13 Mar 2007 13:20:33 -0000 1.8 --- mkchanges.pl 24 Nov 2008 15:40:23 -0000 1.9 *************** *** 187,190 **** --- 187,191 ---- <tr><td>JWM</td><td>=</td><td>Joel Murphy {jmurphy at buffalo.edu}</td></tr> <tr><td>TS</td><td>=</td><td>Thilo Stapff {tstapff at sourceforge.net}</td></tr> + <tr><td>CL</td><td>=</td><td>Chris Leach {Chris.Leach at kaz-group.com}</td></tr> </table> <P> *************** *** 211,215 **** GDF = G. David Frye <gdf at uiuc.edu> JCM = Jeff Murphy <jcmurphy at buffalo.edu> ! JWM = Joel Murphy <jmurphy at acsu.buffalo.edu> Note: items preceeded by a '!' denoted changes that are incompatible with --- 212,218 ---- GDF = G. David Frye <gdf at uiuc.edu> JCM = Jeff Murphy <jcmurphy at buffalo.edu> ! JWM = Joel Murphy <jmurphy at buffalo.edu> ! TS = Thilo Stapff <tstapff at sourceforge.net> ! CL = Chris Leach <Chris.Leach at kaz-group.com> Note: items preceeded by a '!' denoted changes that are incompatible with |
|
From: Thilo S. <ts...@us...> - 2008-11-03 20:19:22
|
Update of /cvsroot/arsperl/ARSperl/html/manual In directory 23jxhf1.ch3.sourceforge.com:/tmp/cvs-serv30448/html/manual Modified Files: ars_GetListContainer.html Log Message: ars_GetListContainer improvement Index: ars_GetListContainer.html =================================================================== RCS file: /cvsroot/arsperl/ARSperl/html/manual/ars_GetListContainer.html,v retrieving revision 1.1 retrieving revision 1.2 diff -C2 -d -r1.1 -r1.2 *** ars_GetListContainer.html 4 Aug 2005 11:10:52 -0000 1.1 --- ars_GetListContainer.html 3 Nov 2008 17:08:19 -0000 1.2 *************** *** 1,57 **** ! <HTML> ! <HEAD> ! <TITLE>ARSperl Manual - ars_GetListContainer</TITLE> ! </HEAD> ! <BODY BGCOLOR="#FFFFFF"> ! ! <H2><CODE>ars_GetListContainer(ctrl, changedSince=0, attributes, containerTypes=0)</CODE></H2> ! ! <P> ! Retrieves a list of containers on the specified server. You can retrieve all ! (accessible) containers or limit the list to containers of a particular type ! or containers modified after a specified time.</P> ! ! <P> See also: ! <A HREF="ds_getlistcontainer_hash.html">GetListContainer Hash Values</A>.</P> ! ! <DL> ! <DT>attributes</DT> ! <DD>Specify &ARS::AR_HIDDEN_INCREMENT for this parameter to retrieve both ! visible and hidden containers. Specify NULL for this parameter to retrieve only ! visible containers.</DD> ! <DT>containerTypes</DT> ! <DD>Specify a list of values indicating the container types to retrieve. ! Values are: ! <ul><table width =" 75%"> ! <tr><td><B>Value</B></td><td><B>Meaning</B></td></tr> ! <tr><td>0</td><td>Retrieve all container types (ARCON_ALL).</td></tr> ! <tr><td>1</td><td>Retrieve all guide containers (ARCON_GUIDE).</td></tr> ! <tr><td>2</td><td>Retrieve all application containers (ARCON_APP).</td></tr> ! <tr><td>3</td><td>Retrieve all packing list containers (ARCON_PACK).</td></tr> ! <tr><td>4</td><td>Retrieve all filter guide containers (ARCON_FILTER_GUIDE).</td></tr> ! </table></ul></DD> ! </DL> ! <DL> ! <DT><B>On success</B></DT> ! <DD>Returns an array of HASH references.</DD> ! <DT><B>On failure</B></DT> ! <DD>Returns undef.</DD> ! </DL> ! ! <P>Example:</P> ! ! <PRE> ! (@a = ars_GetListContainer($ctrl, 0, &ARS::AR_HIDDEN_INCREMENT, ARCON_GUIDE)) || ! die "$ars_errstr"; ! </PRE> ! ! <P> ! <HR WIDTH="30%"> ! <P> ! <A HREF="toc.html"><IMG ALT="<--" SRC="arrow.gif" ALIGN=CENTER> Table of Contents </A> ! <p> ! <address> ! © Ian Trimnell 2005 i.d...@op... ! </address> ! </BODY> ! </HTML> --- 1,79 ---- ! <HTML> ! <HEAD> ! <TITLE>ARSperl Manual - ars_GetListContainer</TITLE> ! </HEAD> ! <BODY BGCOLOR="#FFFFFF"> ! ! <PRE> ! <H2><CODE>ars_GetListContainer( ! ctrl, changedSince=0, attributes=0, # standard ! [ ownerObjList ], # OPTIONAL ! containerType1,containerType2,...) # OPTIONAL</CODE></H2> ! </PRE> ! ! <P> ! Retrieves a list of containers on the specified server. You can retrieve all ! (accessible) containers or limit the list to containers of a particular type ! or containers modified after a specified time.</P> ! ! <P> See also: ! <A HREF="ds_getlistcontainer_hash.html">GetListContainer Hash Values</A>.</P> ! ! <DL> ! <DT><CODE>[ ownerObjList ]</CODE></DT> ! <DD> is an optional array reference; the list is a list of HASH references. These hash ! references must contain a <i>type</i> and an <i>ownerName</i> parameter. The <i>type</i> ! must be "none", "all" or "schema". If <i>type</i> is "schema", the <i>ownerName</i> contains ! the name of the owning schema; otherwise the <i>ownerName</i> should be an empty string ! (see example below).</DD> ! <DT>attributes</DT> ! <DD>Specify &ARS::AR_HIDDEN_INCREMENT for this parameter to retrieve both ! visible and hidden containers. Specify NULL for this parameter to retrieve only ! visible containers.</DD> ! <DT>containerTypes</DT> ! <DD>Specify a list of values indicating the container types to retrieve. ! Values are: ! <ul><table width =" 75%"> ! <tr><td><B>Value</B></td><td><B>Meaning</B></td></tr> ! <tr><td>0</td><td>Retrieve all container types (ARCON_ALL).</td></tr> ! <tr><td>1</td><td>Retrieve all guide containers (ARCON_GUIDE).</td></tr> ! <tr><td>2</td><td>Retrieve all application containers (ARCON_APP).</td></tr> ! <tr><td>3</td><td>Retrieve all packing list containers (ARCON_PACK).</td></tr> ! <tr><td>4</td><td>Retrieve all filter guide containers (ARCON_FILTER_GUIDE).</td></tr> ! <tr><td>5</td><td>Retrieve all web service containers (ARCON_WEBSERVICE).</td></tr> ! </table></ul></DD> ! </DL> ! <DL> ! <DT><B>On success</B></DT> ! <DD>Returns an array of HASH references.</DD> ! <DT><B>On failure</B></DT> ! <DD>Returns undef.</DD> ! </DL> ! ! <P>Example 1 (retrieve all active link guides):</P> ! ! <PRE> ! @list = ars_GetListContainer($ctrl, 0, &ARS::AR_HIDDEN_INCREMENT, &ARS::ARCON_GUIDE); ! die "$ars_errstr" if $ars_errstr; ! </PRE> ! ! <P>Example 2 (retrieve all globally owned containers plus all containers of a specific schema):</P> ! ! <PRE> ! @list = ars_GetListContainer($ctrl, 0, &ARS::AR_HIDDEN_INCREMENT, [ ! {type => 'all', ownerName => ''}, ! {type => 'schema', ownerName => 'Sample:Schema'}, ! ] ); ! die "$ars_errstr" if $ars_errstr; ! </PRE> ! ! <P> ! <HR WIDTH="30%"> ! <P> ! <A HREF="toc.html"><IMG ALT="<--" SRC="arrow.gif" ALIGN=CENTER> Table of Contents </A> ! <p> ! <address> ! © Ian Trimnell 2005 i.d...@op... ! </address> ! </BODY> ! </HTML> |
|
From: Thilo S. <ts...@us...> - 2008-11-03 20:19:19
|
Update of /cvsroot/arsperl/ARSperl In directory 23jxhf1.ch3.sourceforge.com:/tmp/cvs-serv30448 Modified Files: ARS.pm ARS.xs Makefile.PL changes.dat Log Message: ars_GetListContainer improvement Index: changes.dat =================================================================== RCS file: /cvsroot/arsperl/ARSperl/changes.dat,v retrieving revision 1.59 retrieving revision 1.60 diff -C2 -d -r1.59 -r1.60 *** changes.dat 24 Sep 2008 13:03:08 -0000 1.59 --- changes.dat 3 Nov 2008 17:08:19 -0000 1.60 *************** *** 1,3 **** --- 1,7 ---- released=xx/xx/xxx version=1.92 + TS fixed return value of ars_Import + TS fixed memory violation in ars_GetListContainer + TS implemented ars_qualifier_ptr function (inverse of ars_perl_qualifier) + TS added ownerObjList parameter to ars_GetListContainer TS fixed AR_SERVER_INFO type identification in infra/exsi.pl TS updated version numbers in INSTALLATION Index: ARS.xs =================================================================== RCS file: /cvsroot/arsperl/ARSperl/ARS.xs,v retrieving revision 1.119 retrieving revision 1.120 diff -C2 -d -r1.119 -r1.120 *** ARS.xs 15 May 2008 18:30:00 -0000 1.119 --- ARS.xs 3 Nov 2008 17:08:18 -0000 1.120 *************** *** 90,93 **** --- 90,137 ---- ARQualifierStruct * + ars_qualifier_ptr(ctrl, in) + ARControlStruct * ctrl + SV * in + CODE: + { + ARQualifierStruct *qual; + HV *h_dummy; + HV *h; + int rv = 0; + + AMALLOCNN(qual, 1, ARQualifierStruct); + (void) ARError_reset(); + + if( SvTYPE(SvRV(in)) != SVt_PVHV ){ + ARError_add( AR_RETURN_ERROR, AP_ERR_GENERAL, "rev_ARQualifierStruct: not a hash value" ); + RETVAL = NULL; + goto ars_qualifier_ptr_end; + } + h = (HV* ) SvRV((SV*) in); + if( ! SvTRUE(hv_scalar(h)) ){ + RETVAL = qual; + goto ars_qualifier_ptr_end; + } + + h_dummy = newHV(); + SvREFCNT_inc( in ); + hv_store( h_dummy, "_", 1, in, 0 ); + rv += rev_ARQualifierStruct( ctrl, h_dummy, "_", qual ); + hv_undef( h_dummy ); + + if( rv == 0 ){ + RETVAL = qual; + }else{ + ARError_add( AR_RETURN_ERROR, AP_ERR_PREREVFAIL ); + RETVAL = NULL; + FreeARQualifierStruct(qual, TRUE); + } + ars_qualifier_ptr_end:; + } + OUTPUT: + RETVAL + + + ARQualifierStruct * ars_LoadQualifier(ctrl,schema,qualstring,displayTag=NULL) ARControlStruct * ctrl *************** *** 1093,1104 **** { ARStatusList status; ! int i, ret; (void) ARError_reset(); Zero(&status, 1, ARStatusList); #if AR_EXPORT_VERSION >= 4 ! if(items < 4) (void) ARError_add( AR_RETURN_ERROR, AP_ERR_BAD_ARGS); ! else { ARContainerTypeList containerTypes; int count; --- 1137,1148 ---- { ARStatusList status; ! int i, ret, rv = 0; (void) ARError_reset(); Zero(&status, 1, ARStatusList); #if AR_EXPORT_VERSION >= 4 ! if(items < 1 || items > 200){ /* don't overflow clist[] */ (void) ARError_add( AR_RETURN_ERROR, AP_ERR_BAD_ARGS); ! }else{ ARContainerTypeList containerTypes; int count; *************** *** 1106,1114 **** unsigned # endif ! int clist[ARCON_LAST_RESERVED]; # if AR_EXPORT_VERSION >= 6 ARContainerOwnerObjList ownerObjList; - # else - ARContainerOwnerObj ownerObj; # endif # if AR_EXPORT_VERSION >= 8L --- 1150,1156 ---- unsigned # endif ! int clist[256]; # if AR_EXPORT_VERSION >= 6 ARContainerOwnerObjList ownerObjList; # endif # if AR_EXPORT_VERSION >= 8L *************** *** 1117,1134 **** ARContainerInfoList conList; ! count = 0; ! for(i = 3 ; i < items ; i++) { ! clist[count++] = SvIV(ST(i)); ! } ! containerTypes.numItems = count; ! containerTypes.type = clist; # if AR_EXPORT_VERSION >= 6 ! ownerObjList.numItems = 0; ! ownerObjList.ownerObjList = NULL; # endif # if AR_EXPORT_VERSION >= 8L Zero(&propList, 1, ARPropList); # endif ! ret = ARGetListContainer(ctrl, changedSince, &containerTypes, attributes, --- 1159,1194 ---- ARContainerInfoList conList; ! Zero(&containerTypes, 1, ARContainerTypeList); # if AR_EXPORT_VERSION >= 6 ! Zero(&ownerObjList, 1, ARContainerOwnerObjList); # endif # if AR_EXPORT_VERSION >= 8L Zero(&propList, 1, ARPropList); # endif ! Zero(&conList, 1, ARContainerInfoList); ! ! count = 0; ! ! if( items >= 4 ){ ! SV* st3 = ST(3); ! if( SvROK(st3) && SvTYPE(SvRV(st3)) == SVt_PVAV ){ ! HV *h_dummy = newHV(); ! SvREFCNT_inc( st3 ); ! hv_store( h_dummy, "_", 1, st3, 0 ); ! rv += rev_ARContainerOwnerObjList( ctrl, h_dummy, "_", &ownerObjList ); ! hv_undef( h_dummy ); ! }else{ ! clist[count++] = SvIV(st3); ! } ! } ! ! for(i = 4 ; i < items ; ++i){ ! clist[count++] = SvIV(ST(i)); ! } ! containerTypes.numItems = count; ! containerTypes.type = clist; ! ! if( rv == 0 ){ ! ret = ARGetListContainer(ctrl, changedSince, &containerTypes, attributes, *************** *** 1143,1147 **** &conList, &status); ! if(!ARError(ret, status)) { unsigned int i; for(i = 0 ; i < conList.numItems ; i++) { --- 1203,1211 ---- &conList, &status); ! }else{ ! ARError_add( AR_RETURN_ERROR, AP_ERR_PREREVFAIL); ! } ! ! if( rv == 0 && !ARError(ret, status)) { unsigned int i; for(i = 0 ; i < conList.numItems ; i++) { *************** *** 1169,1173 **** } # if AR_EXPORT_VERSION >= 5L ! FreeARContainerTypeList(&containerTypes, FALSE); # endif FreeARContainerInfoList(&conList, FALSE); --- 1233,1238 ---- } # if AR_EXPORT_VERSION >= 5L ! /* Don't try to FreeAR this, because clist[] is a stack variable */ ! /* FreeARContainerTypeList(&containerTypes, FALSE); */ # endif FreeARContainerInfoList(&conList, FALSE); *************** *** 2394,2398 **** CODE: { ! int ret = 1, i = 0, a = 0, c = (items - 2) / 2, ok =1; ARStructItemList *structItems = NULL; ARStatusList status; --- 2459,2463 ---- CODE: { ! int ret = 1, i = 0, a = 0, c = (items - 2) / 2, ok = 1; ARStructItemList *structItems = NULL; ARStatusList status; *************** *** 2403,2406 **** --- 2468,2472 ---- if ((items-3) % 2) { (void) ARError_add( AR_RETURN_ERROR, AP_ERR_BAD_ARGS); + ok = 0; } else { if (c > 0) { *************** *** 2447,2451 **** } } else { ! RETVAL = 1; } FreeARStructItemList(structItems, TRUE); --- 2513,2517 ---- } } else { ! RETVAL = 0; } FreeARStructItemList(structItems, TRUE); Index: Makefile.PL =================================================================== RCS file: /cvsroot/arsperl/ARSperl/Makefile.PL,v retrieving revision 1.80 retrieving revision 1.81 diff -C2 -d -r1.80 -r1.81 *** Makefile.PL 15 May 2008 18:30:01 -0000 1.80 --- Makefile.PL 3 Nov 2008 17:08:19 -0000 1.81 *************** *** 26,30 **** # STEP 1 -> Set the path to your ARS API directory ! $ARSAPI = "/usr/ar/api"; #$ARSAPI = "/u1/project/ARSperl/api/sol2/api6.0.1"; #$ARSAPI = "/u1/project/ARSperl/api/sol2/api6.3"; --- 26,30 ---- # STEP 1 -> Set the path to your ARS API directory ! $ARSAPI = "/usr/ar/api"; #$ARSAPI = "/u1/project/ARSperl/api/sol2/api6.0.1"; #$ARSAPI = "/u1/project/ARSperl/api/sol2/api6.3"; *************** *** 56,60 **** # 4.52) # ! $ARSVERSION = 7.0; # STEP 3 -> Choose whether or not to enable encryption --- 56,60 ---- # 4.52) # ! $ARSVERSION = 7.1; # STEP 3 -> Choose whether or not to enable encryption Index: ARS.pm =================================================================== RCS file: /cvsroot/arsperl/ARSperl/ARS.pm,v retrieving revision 1.74 retrieving revision 1.75 diff -C2 -d -r1.74 -r1.75 *** ARS.pm 15 May 2008 18:29:59 -0000 1.74 --- ARS.pm 3 Nov 2008 17:08:18 -0000 1.75 *************** *** 81,85 **** ars_ExpandCharMenu ars_GetField ars_simpleMenu ars_GetListActiveLink ars_SetEntry ! ars_perl_qualifier ars_Export ars_GetListFilter ars_GetListEscalation ars_GetListCharMenu ars_padEntryid ars_GetFilter ars_SetFilter --- 81,85 ---- ars_ExpandCharMenu ars_GetField ars_simpleMenu ars_GetListActiveLink ars_SetEntry ! ars_perl_qualifier ars_qualifier_ptr ars_Export ars_GetListFilter ars_GetListEscalation ars_GetListCharMenu ars_padEntryid ars_GetFilter ars_SetFilter |
|
From: G. D. F. <gd...@ui...> - 2008-10-06 21:15:42
|
jeff murphy wrote: > create a source forge account, i'll add you to the project, you can > make adjustments to the documentation and commit them back to the > project. ... Hey gang, just thought I'd tell you that I'm still here and occasionally even see some of the mailing list mail. My work has taken me pretty far afield of ARS at this point but I'm still available to answer questions about anything I've done. GDF -- G. David Frye gd...@ui... 217-840-0570 |
|
From: Michiel B. <mic...@gm...> - 2008-10-06 21:04:59
|
Great, thanks. Regards, Michiel On Mon, Oct 6, 2008 at 8:55 PM, jeff murphy <jcm...@je...> wrote: > I just checked SF and you are already on the project. So edit the html/ > * pages in CVS as you like and then we'll push them out to the web area. > > jeff > > On Oct 6, 2008, at 2:44 PM, jeff murphy wrote: > >> >> On Oct 6, 2008, at 3:46 AM, Michiel Beijen wrote: >> >>> Besides from the fact that at this moment the arsperl.org website >>> seems to be down (dns error),I would like to enhance the information >>> available on the website. How can I do this? >>> >> >> create a source forge account, i'll add you to the project, you can >> make adjustments to the documentation and commit them back to the >> project. i'll push them to the website (which is also hosted via SF). >> i maybe able to give you direct access to the arsperl web area on SF. >> make the account and we'll figure it out. >> >> >> >> >>> Are the files on the site derived from CVS? >>> >> >> yes they are >> >> >>> Kind regards, >>> -- >>> Michiel Beijen >>> Software Consultant >>> +316 - 457 42 418 >>> Bee Free IT + http://beefreeit.nl >>> >>> ------------------------------------------------------------------------- >>> This SF.Net email is sponsored by the Moblin Your Move Developer's >>> challenge >>> Build the coolest Linux based applications with Moblin SDK & win >>> great prizes >>> Grand prize is a trip for two to an Open Source event anywhere in >>> the world >>> http://moblin-contest.org/redirect.php?banner_id=100&url=/ >>> _______________________________________________ >>> Arsperl-devel mailing list >>> Ars...@ar... >>> https://lists.sourceforge.net/lists/listinfo/arsperl-devel >> >> >> ------------------------------------------------------------------------- >> This SF.Net email is sponsored by the Moblin Your Move Developer's >> challenge >> Build the coolest Linux based applications with Moblin SDK & win >> great prizes >> Grand prize is a trip for two to an Open Source event anywhere in >> the world >> http://moblin-contest.org/redirect.php?banner_id=100&url=/ >> _______________________________________________ >> Arsperl-devel mailing list >> Ars...@ar... >> https://lists.sourceforge.net/lists/listinfo/arsperl-devel > > > ------------------------------------------------------------------------- > This SF.Net email is sponsored by the Moblin Your Move Developer's challenge > Build the coolest Linux based applications with Moblin SDK & win great prizes > Grand prize is a trip for two to an Open Source event anywhere in the world > http://moblin-contest.org/redirect.php?banner_id=100&url=/ > _______________________________________________ > Arsperl-devel mailing list > Ars...@ar... > https://lists.sourceforge.net/lists/listinfo/arsperl-devel > |
|
From: jeff m. <jcm...@je...> - 2008-10-06 19:00:14
|
I just checked SF and you are already on the project. So edit the html/ * pages in CVS as you like and then we'll push them out to the web area. jeff On Oct 6, 2008, at 2:44 PM, jeff murphy wrote: > > On Oct 6, 2008, at 3:46 AM, Michiel Beijen wrote: > >> Besides from the fact that at this moment the arsperl.org website >> seems to be down (dns error),I would like to enhance the information >> available on the website. How can I do this? >> > > create a source forge account, i'll add you to the project, you can > make adjustments to the documentation and commit them back to the > project. i'll push them to the website (which is also hosted via SF). > i maybe able to give you direct access to the arsperl web area on SF. > make the account and we'll figure it out. > > > > >> Are the files on the site derived from CVS? >> > > yes they are > > >> Kind regards, >> -- >> Michiel Beijen >> Software Consultant >> +316 - 457 42 418 >> Bee Free IT + http://beefreeit.nl >> >> ------------------------------------------------------------------------- >> This SF.Net email is sponsored by the Moblin Your Move Developer's >> challenge >> Build the coolest Linux based applications with Moblin SDK & win >> great prizes >> Grand prize is a trip for two to an Open Source event anywhere in >> the world >> http://moblin-contest.org/redirect.php?banner_id=100&url=/ >> _______________________________________________ >> Arsperl-devel mailing list >> Ars...@ar... >> https://lists.sourceforge.net/lists/listinfo/arsperl-devel > > > ------------------------------------------------------------------------- > This SF.Net email is sponsored by the Moblin Your Move Developer's > challenge > Build the coolest Linux based applications with Moblin SDK & win > great prizes > Grand prize is a trip for two to an Open Source event anywhere in > the world > http://moblin-contest.org/redirect.php?banner_id=100&url=/ > _______________________________________________ > Arsperl-devel mailing list > Ars...@ar... > https://lists.sourceforge.net/lists/listinfo/arsperl-devel |
|
From: jeff m. <jcm...@je...> - 2008-10-06 18:50:40
|
On Oct 6, 2008, at 3:46 AM, Michiel Beijen wrote: > Besides from the fact that at this moment the arsperl.org website > seems to be down (dns error),I would like to enhance the information > available on the website. How can I do this? > create a source forge account, i'll add you to the project, you can make adjustments to the documentation and commit them back to the project. i'll push them to the website (which is also hosted via SF). i maybe able to give you direct access to the arsperl web area on SF. make the account and we'll figure it out. > Are the files on the site derived from CVS? > yes they are > Kind regards, > -- > Michiel Beijen > Software Consultant > +316 - 457 42 418 > Bee Free IT + http://beefreeit.nl > > ------------------------------------------------------------------------- > This SF.Net email is sponsored by the Moblin Your Move Developer's > challenge > Build the coolest Linux based applications with Moblin SDK & win > great prizes > Grand prize is a trip for two to an Open Source event anywhere in > the world > http://moblin-contest.org/redirect.php?banner_id=100&url=/ > _______________________________________________ > Arsperl-devel mailing list > Ars...@ar... > https://lists.sourceforge.net/lists/listinfo/arsperl-devel |
|
From: Michiel B. <mi...@be...> - 2008-10-06 17:35:37
|
Besides from the fact that at this moment the arsperl.org website seems to be down (dns error), I would like to enhance the information available on the website. How can I do this? Are the files on the site derived from CVS? Kind regards, -- Michiel Beijen Software Consultant +316 - 457 42 418 Bee Free IT + http://beefreeit.nl |
|
From: Thilo S. <ts...@us...> - 2008-05-15 18:30:57
|
Update of /cvsroot/arsperl/ARSperl/example In directory sc8-pr-cvs11.sourceforge.net:/tmp/cvs-serv5631/example Modified Files: ars_GetListGroup.pl Log Message: arsystem 7.1 port completed, new functions Index: ars_GetListGroup.pl =================================================================== RCS file: /cvsroot/arsperl/ARSperl/example/ars_GetListGroup.pl,v retrieving revision 1.1 retrieving revision 1.2 diff -C2 -d -r1.1 -r1.2 *** ars_GetListGroup.pl 23 Jul 1997 18:21:29 -0000 1.1 --- ars_GetListGroup.pl 15 May 2008 18:30:07 -0000 1.2 *************** *** 1,50 **** ! #!/usr/local/bin/perl ! # ! # $Header$ ! # ! # NAME ! # ars_GetListGroup.pl ! # ! # USAGE ! # ars_GetListGroup.pl [server] [username] [password] ! # ! # DESCRIPTION ! # Demo of said function. See web page for details or ARS Programmers ! # Manual. ! # ! # AUTHOR ! # Jeff Murphy ! # # $Log$ ! # Revision 1.1 1997/07/23 18:21:29 jcmurphy ! # Initial revision ! # ! # ! # ! ! use ARS; ! ! ($c = ars_Login(shift, shift, shift)) || die "login: $ars_errstr"; ! ! ! print "Calling GetListGroup..\n"; ! ! ($h = ars_GetListGroup($c)) || die "ERR: $ars_errstr\n"; ! print "errstr=$ars_errstr\n"; ! ! print "GetListGroup returned the following groups:\n"; ! ! $num = $#{$h->{groupId}}; ! printf("%4.4s %4.4s %s\n", "ID", "Type", "Names.."); ! for($i = 0; $i < $num; $i++) { ! printf("%4d %4d ", ! @{$h->{groupId}}[$i], ! @{$h->{groupType}}[$i]); ! printf("[%d] ", $#{@{$h->{groupName}}[$i]}); ! for($v=0; $v <= $#{@{$h->{groupName}}[$i]}; $v++) { ! printf("<%s> ", @{@{$h->{groupName}}[$i]}[$v]); ! } ! print "\n"; ! } ! ! ars_Logoff($c); --- 1,67 ---- ! #!/usr/local/bin/perl ! # ! # $Header$ ! # ! # NAME ! # ars_GetListGroup.pl ! # ! # USAGE ! # ars_GetListGroup.pl [server] [username] [password] ! # ! # DESCRIPTION ! # Demo of said function. See web page for details or ARS Programmers ! # Manual. ! # ! # AUTHOR ! # Jeff Murphy ! # # $Log$ ! # Revision 1.2 2008/05/15 18:30:07 tstapff ! # arsystem 7.1 port completed, new functions ! # ! # Revision 1.1 1997/07/23 18:21:29 jcmurphy ! # Initial revision ! # ! # ! # ! ! use ARS; ! ! ($c = ars_Login(shift, shift, shift)) || die "login: $ars_errstr"; ! ! ! print "Calling GetListGroup..\n"; ! ! (@groups = ars_GetListGroup($c)) || die "ERR: $ars_errstr\n"; ! print "errstr=$ars_errstr\n"; ! ! print "GetListGroup returned the following groups:\n"; ! ! $num = scalar(@groups); ! printf("%4.4s %4.4s %s\n", "ID", "Type", "Names.."); ! foreach my $h (@groups) { ! printf("%4d %4d [%d]", $h->{groupId}, $h->{groupType}, scalar(@{$h->{groupName}}) ); ! foreach my $name ( @{$h->{groupName}} ){ ! printf(" <%s>", $name); ! } ! print "\n"; ! } ! ! ! ! # use the following block if your ARSperl was compiled with GETLISTGROUP_OLD_STYLE ! ! #$num = $#{$h->{groupId}}; ! #printf("%4.4s %4.4s %s\n", "ID", "Type", "Names.."); ! #for($i = 0; $i < $num; $i++) { ! # printf("%4d %4d ", ! # @{$h->{groupId}}[$i], ! # @{$h->{groupType}}[$i]); ! # printf("[%d] ", $#{@{$h->{groupName}}[$i]}); ! # for($v=0; $v <= $#{@{$h->{groupName}}[$i]}; $v++) { ! # printf("<%s> ", @{@{$h->{groupName}}[$i]}[$v]); ! # } ! # print "\n"; ! #} ! ! ars_Logoff($c); |
|
From: Michiel B. <mb...@us...> - 2007-09-25 19:36:46
|
Update of /cvsroot/arsperl/ARSperl/html/manual In directory sc8-pr-cvs11.sourceforge.net:/tmp/cvs-serv4773 Modified Files: ars_CreateEntry.html ars_GetListField.html ars_GetListGroup.html Log Message: updated docs - minor edits Index: ars_CreateEntry.html =================================================================== RCS file: /cvsroot/arsperl/ARSperl/html/manual/ars_CreateEntry.html,v retrieving revision 1.1 retrieving revision 1.2 diff -C2 -d -r1.1 -r1.2 *** ars_CreateEntry.html 13 Feb 1997 19:49:55 -0000 1.1 --- ars_CreateEntry.html 25 Sep 2007 19:36:46 -0000 1.2 *************** *** 1,32 **** ! <HTML> ! <HEAD> ! <TITLE>ARSperl Programmer's Manual</TITLE> ! </HEAD> ! <BODY BGCOLOR="#FFFFFF"> - <H2><CODE>ars_CreateEntry(ctrl, schema, field_name1, value1, ...)</CODE></H2> ! This function creates a new entry (row) in the schema. This is ! the same as ``submitting a new ticket''. Pairs of field ids and ! values should follow the schema name. Data types are automatically ! converted. <P> ! <DL> ! <DT><B>On success</B><DD> ! Returns the new entry id. ! <DT><B>On failure</B><DD> ! Returns <CODE>undef</CODE>. ! </DL> ! <P>Example: ! <PRE> ! ($entry_id = ars_CreateEntry($c, "Schema01", $id, $val)) || ! die $ars_errstr; ! </PRE> ! <P> ! <A HREF="toc.html"><IMG ALT="<--" SRC="arrow.gif" ALIGN=CENTER> Back to Table of Contents </A> ! </BODY> ! </HTML> \ No newline at end of file --- 1,48 ---- ! <!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN"> ! <html> ! <head> ! <title>ars_CreateEntry</title> ! </head> ! <body style="background-color: rgb(255, 255, 255);"> ! <h2><code>ars_CreateEntry(ctrl, schema, field_id1, value1, ! ...)</code></h2> ! This function creates a new entry (row) in the schema. This is the same ! as ``submitting a new ticket''. Pairs of field ids and values should ! follow the schema name. Data types are automatically converted. ! <dl> ! <dt><b>On success</b></dt> ! <dd> Returns the new entry id. </dd> ! ! <dt><b>On failure</b></dt> ! ! <dd> Returns <code>undef</code>. </dd> ! ! </dl> ! ! <p>Example 1: </p> ! ! <pre> ($entry_id = ars_CreateEntry($c, "Schema01", $id, $val)) || <br> die $ars_errstr;<br></pre> ! ! <p>Example 2:</p> ! ! <pre> my %fieldname_to_id = ars_GetFieldTable($c, "User") || <br> die $ars_errstr;<br> my $entry_id = ars_CreateEntry($c, "User",<br> $fieldname_to_id{"Login Name"}, "johnd",<br> $fieldname_to_id{"Full Name"}, "John Doe",<br> $fieldname_to_id{"Password"}, "xyz",<br> ) || die $ars_errstr;</pre> ! ! <p> ! <a href="toc.html"><img alt="<--" src="arrow.gif" align="middle"> Back to Table of Contents</a></p> ! ! ! <address> ! Last changes to this page 13th August 2007 by Michiel Beijen<br> ! ! © J.C.Murphy, J.W.Murphy 1997 ar...@ar... ! </address> ! ! </body> ! </html> Index: ars_GetListGroup.html =================================================================== RCS file: /cvsroot/arsperl/ARSperl/html/manual/ars_GetListGroup.html,v retrieving revision 1.3 retrieving revision 1.4 diff -C2 -d -r1.3 -r1.4 *** ars_GetListGroup.html 16 Apr 2003 01:40:02 -0000 1.3 --- ars_GetListGroup.html 25 Sep 2007 19:36:46 -0000 1.4 *************** *** 1,41 **** ! <HTML> ! <HEAD> ! <TITLE>ARSperl Manual - ars_GetListGroup</TITLE> ! </HEAD> ! <BODY BGCOLOR="#FFFFFF"> - <H2><CODE>ars_GetListGroup(ctrl, userName=NULL, password=NULL)</CODE></H2> ! Fetch information about the available groups on a server, optionally ! restricting the list to a particular username/password combination. ! <P> See also: ! <A HREF="ds_getlistgroup_hash.html">GetListGroup Hash Values</A>. ! <P> - <DL> - <DT><B>On success</B><DD> - Returns a HASH. - <DT><B>On failure</B><DD> - Returns undef. - </DL> ! <P>Example: ! <PRE> ! ($a = ars_GetListGroup($ctrl)) || ! die "$ars_errstr"; ! </PRE> ! <I>ars_GetListGroup was introduced in version 1.5 of ARSperl</I> - <P> - <HR WIDTH="30%"> - <P> - <A HREF="toc.html"><IMG ALT="<--" SRC="arrow.gif" ALIGN=CENTER> Table of Contents </A> <p> <address> ! Last changes to this page 21st July 1997 by jcm...@ar...<BR> ! © J.C.Murphy, J.W.Murphy 1997 ar...@ar... </address> ! </BODY> ! </HTML> --- 1,62 ---- ! <!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN"> ! <html> ! <head> ! <title>ars_GetListGroup</title> ! </head> ! <body style="background-color: rgb(255, 255, 255);"> ! <h2><code>ars_GetListGroup(ctrl, userName=NULL, ! password=NULL)</code></h2> ! Fetch information about the available groups on a server, optionally ! restricting the list to a particular username/password combination.<br> ! ! <br> ! ! If you do not specify the userName string, the call requires ! Administrator privilleges and it returns all groups on the system. If ! you do specify the userName, only the groups that the userName belongs ! to are returned. The password string is optional; and is used to ! further specify the user. This is because on pre-7.0 Remedy servers ! more than one user with the same login name can exist. ! <p> See also: <a href="ds_getlistgroup_hash.html">GetListGroup ! Hash Values</a>. </p> ! ! <dl> ! ! <dt><b>On success</b></dt> ! ! <dd> Returns a HASH. </dd> ! ! <dt><b>On failure</b></dt> ! ! <dd> Returns undef. </dd> ! ! </dl> ! ! <p>Example: </p> ! ! <pre> ($a = ars_GetListGroup($ctrl)) || <br> die "$ars_errstr";<br><br>See for another, more detailed example the ars_GetListGroup.pl script in the examples directory of the ARSperl distribution. </pre> ! ! <i>ars_GetListGroup was introduced in version 1.5 of ARSperl</i> ! <p></p> ! ! <hr width="30%"> ! <p><a href="toc.html"><img alt="<--" src="arrow.gif" align="middle"> Table of Contents </a> ! </p> <p> + </p> + <address> ! Last changes to this page 13th August 2007 by Michiel Beijen<br> ! ! © J.C.Murphy, J.W.Murphy 1997 ar...@ar... </address> ! ! </body> ! </html> Index: ars_GetListField.html =================================================================== RCS file: /cvsroot/arsperl/ARSperl/html/manual/ars_GetListField.html,v retrieving revision 1.2 retrieving revision 1.3 diff -C2 -d -r1.2 -r1.3 *** ars_GetListField.html 5 Nov 1998 17:31:39 -0000 1.2 --- ars_GetListField.html 25 Sep 2007 19:36:46 -0000 1.3 *************** *** 1,40 **** ! <HTML> ! <HEAD> ! <TITLE>ARSperl Programmer's Manual</TITLE> ! </HEAD> ! <BODY BGCOLOR="#FFFFFF"> - <H2><CODE>ars_GetListField(control,schema,changedsince=0,fieldType)</CODE></H2> ! Fetches the Field ID's for all fields in the schema ! specified. <CODE>changedsince</CODE> is an optional unix timestamp ! and defaults to 0.<P> ! <B>3.x and above</B> ! <UL> ! In 3.x and above, the <code>fieldType</code> parameter allows you ! to specify what field type(s) to retrieve. This is a bitmask. ! <UL> ! 1 = Retrieve data fields <BR> ! 2 = Retrieve trim fields <BR> ! 4 = Retrieve control fields <BR> ! </UL> ! Ergo, fieldType = 6 will return trim and control fields. ! </UL> ! <DL> ! <DT><B>On success</B><DD> ! Returns an array of field ids. ! <DT><B>On failure</B><DD> ! Returns <CODE>undef</CODE>. ! </DL> ! <P>Example: ! <PRE> ! @fields = ars_GetListField($c, "User"); ! </PRE> ! <P> ! <A HREF="toc.html"><IMG ALT="<--" SRC="arrow.gif" ALIGN=CENTER> Back to Table of Contents </A> ! </BODY> ! </HTML> \ No newline at end of file --- 1,90 ---- ! <!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN"> ! <html> ! <head> ! <title>ARSperl Manual - ars_GetListField</title> ! </head> ! <body style="background-color: rgb(255, 255, 255);"> ! <h2><code>ars_GetListField(control,schema,changedsince=0,fieldType)</code></h2> ! Fetches the Field ID's for all fields in the schema specified. <code>changedsince</code> ! is an optional unix timestamp and defaults to 0. ! <ul> ! The <code>fieldType</code> parameter allows you to specify ! what field type(s) to retrieve. This is a bitmask. ! <ul> ! ! <li>Bit 0: Retrieve data fields (AR_FIELD_TYPE_DATA). ! </li> ! ! <li>Bit 1: Retrieve trim fields (AR_FIELD_TYPE_TRIM). ! </li> ! ! <li>Bit 2: Retrieve control fields (AR_FIELD_TYPE_CONTROL). ! </li> ! ! <li>Bit 3: Retrieve page fields (AR_FIELD_TYPE_PAGE). ! </li> ! ! <li>Bit 4: Retrieve page holder fields ! (AR_FIELD_TYPE_PAGE_HOLDER). ! </li> ! ! <li>Bit 5: Retrieve table fields (AR_FIELD_TYPE_TABLE). ! </li> ! ! <li>Bit 6: Retrieve column fields (AR_FIELD_TYPE_COLUMN). ! </li> ! ! <li>Bit 8: Retrieve vendor type fields ! (AR_FIELD_TYPE_VENDOR). ! </li> ! ! <li>Bit 128: Retrieve attachment type fields ! (AR_FIELD_TYPE_ATTACH). ! </li> ! ! <li>Bit 256: Retrieve attachement pool type fields ! (AR_FIELD_TYPE_ATTACH_POOL) ! </li> ! ! </ul> ! ! <br> ! ! Ergo, fieldType = 6 will return trim and control fields. ! </ul> ! ! <dl> ! ! <dt><b>On success</b></dt> ! ! <dd> Returns an array of field ids. </dd> ! ! <dt><b>On failure</b></dt> ! ! <dd> Returns <code>undef</code>. </dd> ! ! </dl> ! ! <p>Example: </p> ! ! <pre> @fields = ars_GetListField($c, "User");<br> </pre> ! ! <p> ! <a href="toc.html"><img alt="<--" src="arrow.gif" align="middle"> Back to Table of Contents</a></p> ! ! <p><a href="toc.html"> </a></p> ! <p></p> ! ! <address>Last changes to this page August 23 2007 by ! mic...@ma...<br> ! ! © J.C.Murphy, J.W.Murphy 1997 ar...@ar... ! </address> ! </body> ! </html> |
Update of /cvsroot/arsperl/ARSperl In directory sc8-pr-cvs11.sourceforge.net:/tmp/cvs-serv24285 Modified Files: ARS.pm ARS.xs MANIFEST Makefile.PL changes.dat rev_AR_template.pl support.c supportrev.c supportrev_generated.c Log Message: arsystem 7.1 port Index: rev_AR_template.pl =================================================================== RCS file: /cvsroot/arsperl/ARSperl/rev_AR_template.pl,v retrieving revision 1.3 retrieving revision 1.4 diff -C2 -d -r1.3 -r1.4 *** rev_AR_template.pl 21 Apr 2007 22:22:06 -0000 1.3 --- rev_AR_template.pl 13 Sep 2007 22:50:25 -0000 1.4 *************** *** 78,81 **** --- 78,89 ---- + /* #if defined(malloc) && defined(_WIN32) + #undef malloc + #undef calloc + #undef realloc + #undef free + #endif */ + + @> foreach my $class ( @classes_C ){ @> my $obj = $CONVERT{$class}; Index: changes.dat =================================================================== RCS file: /cvsroot/arsperl/ARSperl/changes.dat,v retrieving revision 1.56 retrieving revision 1.57 diff -C2 -d -r1.56 -r1.57 *** changes.dat 11 Aug 2007 20:24:39 -0000 1.56 --- changes.dat 13 Sep 2007 22:50:25 -0000 1.57 *************** *** 1,9 **** MB removed legacy ars_NT Notifier and ars_AdminExtension calls !MB added ars_VerifyUser implementation by Thilo Stapff !MB changed ars_APIVersion to use AR_CURRENT_API_VERSION rather than AR_EXPORT_VERSION ! MB fixed ars_GetActiveLink, ars_GetFilter, ars_GetEscalation, ars_GetField so they ! return undef on failure. ! ! released=xx/xx/xxx version=1.91 JCM buffer overflow in perl_BuildEntryList JCM malloc-on-windows patch by John Unsworth --- 1,13 ---- + released=xx/xx/xxx version=1.91 + TS fixed ars_padEntryid to work correctly if entry ID prefix is defined + TS malloc-on-windows patch commented out because of crash with API 6.3.0 + TS fixed pointer initialization error in ars_SetVUI + TS modified ars_Create/Get/SetFilter for API 7.1 + TS fixed ars_GetAlertCount MB removed legacy ars_NT Notifier and ars_AdminExtension calls !MB added ars_VerifyUser implementation by Thilo Stapff !MB changed ars_APIVersion to use AR_CURRENT_API_VERSION rather than AR_EXPORT_VERSION ! MB fixed ars_GetActiveLink, ars_GetFilter, ars_GetEscalation, ars_GetField so they ! return undef on failure. JCM buffer overflow in perl_BuildEntryList JCM malloc-on-windows patch by John Unsworth Index: ARS.xs =================================================================== RCS file: /cvsroot/arsperl/ARSperl/ARS.xs,v retrieving revision 1.117 retrieving revision 1.118 diff -C2 -d -r1.117 -r1.118 *** ARS.xs 11 Aug 2007 20:22:00 -0000 1.117 --- ARS.xs 13 Sep 2007 22:50:25 -0000 1.118 *************** *** 32,35 **** --- 32,44 ---- #endif + + /* #if defined(malloc) && defined(_WIN32) + #undef malloc + #undef calloc + #undef realloc + #undef free + #endif */ + + MODULE = ARS PACKAGE = ARS PREFIX = ARS *************** *** 351,385 **** HV* ars_VerifyUser(ctrl) ! ARControlStruct * ctrl ! CODE: ! { ! int ret = 0; ! ARBoolean adminFlag = 0, ! subAdminFlag = 0, ! customFlag = 0; ! ARStatusList status; ! (void) ARError_reset(); ! Zero(&status, 1, ARStatusList); ! ret = ARVerifyUser( ctrl, &adminFlag, &subAdminFlag, &customFlag, ! &status ); ! if(! ARError(ret, status)) { ! RETVAL = newHV(); ! sv_2mortal( (SV*) RETVAL ); ! hv_store( RETVAL, "adminFlag", strlen("adminFlag"), ! newSViv(adminFlag), 0); ! hv_store( RETVAL, "subAdminFlag", strlen("subAdminFlag"), ! newSViv(subAdminFlag), 0); ! hv_store( RETVAL, "customFlag", strlen("customFlag"), ! newSViv(customFlag), 0); ! }else{ ! XSRETURN_UNDEF; ! } ! } ! OUTPUT: ! RETVAL void --- 360,393 ---- HV* ars_VerifyUser(ctrl) ! ARControlStruct * ctrl ! CODE: ! { ! int ret = 0; ! ARBoolean adminFlag = 0, ! subAdminFlag = 0, ! customFlag = 0; ! ARStatusList status; ! (void) ARError_reset(); ! Zero(&status, 1, ARStatusList); ! ret = ARVerifyUser( ctrl, &adminFlag, &subAdminFlag, &customFlag, &status ); ! /* printf( "ret = %d, adminFlag = %d, subAdminFlag = %d, customFlag = %d\n", ! ret, adminFlag, subAdminFlag, customFlag ); */ ! if(! ARError(ret, status)) { ! RETVAL = newHV(); ! sv_2mortal( (SV*) RETVAL ); ! ! hv_store( RETVAL, "adminFlag", strlen("adminFlag"), newSViv(adminFlag), 0); ! hv_store( RETVAL, "subAdminFlag", strlen("subAdminFlag"), newSViv(subAdminFlag), 0); ! hv_store( RETVAL, "customFlag", strlen("customFlag"), newSViv(customFlag), 0); ! }else{ ! XSRETURN_UNDEF; ! } ! } ! OUTPUT: ! RETVAL void *************** *** 1475,1478 **** --- 1483,1490 ---- ARWorkflowConnectStruct schemaList; ARPropList objPropList; + #if AR_CURRENT_API_VERSION >= 13 + unsigned int errorFilterOptions; + ARNameType errorFilterName; + #endif AMALLOCNN(query,1,ARQualifierStruct); *************** *** 1486,1489 **** --- 1498,1504 ---- Zero(&diaryList, 1, ARDiaryList); Zero(&status, 1,ARStatusList); + #if AR_CURRENT_API_VERSION >= 13 + Zero(&errorFilterName, 1,ARNameType); + #endif ret = ARGetFilter(ctrl, name, &order, &schemaList, *************** *** 1492,1495 **** --- 1507,1514 ---- ×tamp, owner, lastChanged, &changeDiary, &objPropList, + #if AR_CURRENT_API_VERSION >= 13 + &errorFilterOptions, + errorFilterName, + #endif &status); #ifdef PROFILE *************** *** 1536,1539 **** --- 1555,1562 ---- } } + #if AR_CURRENT_API_VERSION >= 13 + hv_store(RETVAL, "errorFilterOptions", strlen("errorFilterOptions") , newSViv(errorFilterOptions), 0); + hv_store(RETVAL, "errorFilterName", strlen("errorFilterName") , newSVpv(errorFilterName, 0), 0); + #endif FreeARFilterActionList(&actionList,FALSE); FreeARFilterActionList(&elseList,FALSE); *************** *** 2104,2108 **** --- 2127,2135 ---- Zero(lastChanged, 1, ARAccessNameType); Zero(&diaryList, 1, ARDiaryList); + #if AR_EXPORT_VERSION >= 9 ret = ARGetFieldCached(ctrl, schema, id, fieldName, &fieldMap, &dataType, &option, &createMode, &fieldOption, &defaultVal, NULL /* &permissions */, &limit, &displayList, &helpText, ×tamp, owner, lastChanged, &changeDiary, &Status); + #else + ret = ARGetFieldCached(ctrl, schema, id, fieldName, &fieldMap, &dataType, &option, &createMode, &defaultVal, NULL /* &permissions */, &limit, &displayList, &helpText, ×tamp, owner, lastChanged, &changeDiary, &Status); + #endif #ifdef PROFILE ((ars_ctrl *)ctrl)->queries++; *************** *** 2162,2166 **** --- 2189,2197 ---- AP_FREE(changeDiary); } + #if AR_EXPORT_VERSION >= 9L ret = ARGetField(ctrl, schema, id, NULL, NULL, NULL, NULL, NULL, NULL, NULL, &permissions, NULL, NULL, NULL, NULL, NULL, NULL, NULL, &Status); + #else + ret = ARGetField(ctrl, schema, id, NULL, NULL, NULL, NULL, NULL, NULL, &permissions, NULL, NULL, NULL, NULL, NULL, NULL, NULL, &Status); + #endif #ifdef PROFILE ((ars_ctrl *)ctrl)->queries++; *************** *** 4638,4642 **** int ret = 0, rv = 0; ARNameType vuiName; ! char *vuiNamePtr; ARLocaleType locale; char *localePtr = NULL; --- 4669,4673 ---- int ret = 0, rv = 0; ARNameType vuiName; ! char *vuiNamePtr = NULL; ARLocaleType locale; char *localePtr = NULL; *************** *** 5455,5458 **** --- 5486,5493 ---- ARWorkflowConnectStruct schemaList; ARPropList objPropList; + #if AR_CURRENT_API_VERSION >= 13 + unsigned int errorFilterOptions = 0; + ARNameType errorFilterName; + #endif RETVAL = 0; /* assume error */ *************** *** 5467,5470 **** --- 5502,5508 ---- Zero(&schemaList, 1, ARWorkflowConnectStruct); Zero(&schemaNameList, 1, ARNameList); + #if AR_CURRENT_API_VERSION >= 13 + Zero(errorFilterName, 1, ARNameType); + #endif schemaList.type = AR_WORKFLOW_CONN_SCHEMA_LIST; schemaList.u.schemaList = &schemaNameList; *************** *** 5523,5526 **** --- 5561,5571 ---- rv += rev_ARPropList(ctrl, objDef, "objPropList", &objPropList); + #if AR_CURRENT_API_VERSION >= 13 + if( hv_exists(objDef, "errorFilterOptions", strlen("errorFilterOptions")) ) + rv += uintcpyHVal( objDef, "errorFilterOptions", &errorFilterOptions ); + + if( hv_exists(objDef, "errorFilterName", strlen("errorFilterName")) ) + rv += strcpyHVal( objDef, "errorFilterName", errorFilterName, sizeof(ARNameType) ); + #endif /* at this point all datastructures (hopefully) are *************** *** 5534,5538 **** &actionList, &elseList, helpText, owner, changeDiary, ! &objPropList, &status); if(!ARError( ret, status)) RETVAL = 1; --- 5579,5588 ---- &actionList, &elseList, helpText, owner, changeDiary, ! &objPropList, ! #if AR_CURRENT_API_VERSION >= 13 ! errorFilterOptions, ! errorFilterName, ! #endif ! &status); if(!ARError( ret, status)) RETVAL = 1; *************** *** 5585,5588 **** --- 5635,5643 ---- ARWorkflowConnectStruct *schemaList = NULL; ARPropList *objPropList = NULL; + #if AR_CURRENT_API_VERSION >= 13 + unsigned int *errorFilterOptions = NULL; + ARNameType errorFilterName; + char *errorFilterNamePtr = NULL; + #endif RETVAL = 0; /* assume error */ *************** *** 5591,5594 **** --- 5646,5652 ---- Zero(newName, 1, ARNameType); Zero(owner, 1, ARAccessNameType); + #if AR_CURRENT_API_VERSION >= 13 + Zero(errorFilterName, 1, ARNameType); + #endif if(SvTYPE((SV *)SvRV(objDefRef)) != SVt_PVHV) { *************** *** 5665,5668 **** --- 5723,5737 ---- rv += rev_ARFilterActionList(ctrl, objDef, "elseList", elseList); } + #if AR_CURRENT_API_VERSION >= 13 + if( hv_exists(objDef,"errorFilterOptions",18) ){ + errorFilterOptions = (unsigned int*) MALLOCNN(sizeof(unsigned int)); + rv += uintcpyHVal( objDef, "errorFilterOptions", errorFilterOptions); + } + + if(hv_exists(objDef, "errorFilterName", strlen("errorFilterName") )){ + rv += strcpyHVal( objDef, "errorFilterName", errorFilterName, sizeof(ARNameType)); + errorFilterNamePtr = errorFilterName; + } + #endif /* at this point all datastructures (hopefully) are *************** *** 5675,5679 **** actionList, elseList, helpText, ownerPtr, changeDiary, ! objPropList, &status); if(!ARError( ret, status)) RETVAL = 1; --- 5744,5753 ---- actionList, elseList, helpText, ownerPtr, changeDiary, ! objPropList, ! #if AR_CURRENT_API_VERSION >= 13 ! errorFilterOptions, ! errorFilterNamePtr, ! #endif ! &status); if(!ARError( ret, status)) RETVAL = 1; *************** *** 6367,6371 **** unsigned long whereToWriteMask = AR_WRITE_TO_STATUS_LIST; int ret; ! FILE *logFilePtr; (void) ARError_reset(); --- 6441,6445 ---- unsigned long whereToWriteMask = AR_WRITE_TO_STATUS_LIST; int ret; ! FILE *logFilePtr = NULL; (void) ARError_reset(); *************** *** 6648,6652 **** SV * ! ars_GetAlertCount(ctrl,qualifier) ARControlStruct * ctrl ARQualifierStruct * qualifier --- 6722,6726 ---- SV * ! ars_GetAlertCount(ctrl,qualifier=NULL) ARControlStruct * ctrl ARQualifierStruct * qualifier *************** *** 6664,6668 **** &status); if( !ARError(ret, status) ) { ! RETVAL=sv_2mortal(newSViv(count)); } #else --- 6738,6743 ---- &status); if( !ARError(ret, status) ) { ! /* RETVAL=sv_2mortal(newSViv(count)); */ ! RETVAL = newSViv(count); } #else Index: Makefile.PL =================================================================== RCS file: /cvsroot/arsperl/ARSperl/Makefile.PL,v retrieving revision 1.78 retrieving revision 1.79 diff -C2 -d -r1.78 -r1.79 *** Makefile.PL 20 Jul 2007 19:44:34 -0000 1.78 --- Makefile.PL 13 Sep 2007 22:50:25 -0000 1.79 *************** *** 31,35 **** #$ARSAPI = "/u1/project/ARSperl/api/linux/4.0"; #$ARSAPI = "/u1/project/ARSperl/api/sol2/api6.3"; ! $ARSAPI = "/u1/project/ARSperl/api/linux/7.0.1p1"; #$ARSAPI = "/u1/project/ARSperl/api/sol2/api5.1.1"; # $ARSAPI = "/home/jcmurphy/arsperl/api/5.1"; --- 31,35 ---- #$ARSAPI = "/u1/project/ARSperl/api/linux/4.0"; #$ARSAPI = "/u1/project/ARSperl/api/sol2/api6.3"; ! #$ARSAPI = "/u1/project/ARSperl/api/linux/7.0.1p1"; #$ARSAPI = "/u1/project/ARSperl/api/sol2/api5.1.1"; # $ARSAPI = "/home/jcmurphy/arsperl/api/5.1"; *************** *** 50,54 **** # STEP 2 -> Choose your version of ARS FROM THE FOLLOWING LIST # ! # 2.0 2.1 3.0 3.1 3.2 4.0 4.52 5.0 6.0 6.01 6.3 7.0 # # notes --- 50,54 ---- # STEP 2 -> Choose your version of ARS FROM THE FOLLOWING LIST # ! # 2.0 2.1 3.0 3.1 3.2 4.0 4.52 5.0 6.0 6.01 6.3 7.0 7.1 # # notes *************** *** 61,65 **** # 4.52) # ! $ARSVERSION = 7.0; # STEP 3 -> Choose whether or not to enable encryption --- 61,65 ---- # 4.52) # ! $ARSVERSION = 7.1; # STEP 3 -> Choose whether or not to enable encryption Index: support.c =================================================================== RCS file: /cvsroot/arsperl/ARSperl/support.c,v retrieving revision 1.64 retrieving revision 1.65 diff -C2 -d -r1.64 -r1.65 *** support.c 20 Jul 2007 19:44:34 -0000 1.64 --- support.c 13 Sep 2007 22:50:25 -0000 1.65 *************** *** 36,39 **** --- 36,48 ---- #include "supportrev.h" + + /* #if defined(malloc) && defined(_WIN32) + #undef malloc + #undef calloc + #undef realloc + #undef free + #endif */ + + int compmem(MEMCAST * m1, MEMCAST * m2, int size) *************** *** 69,75 **** mallocnn(int s) { ! #if defined(malloc) && defined(_WIN32) #undef malloc ! #endif void *m = malloc(s ? s : 1); --- 78,84 ---- mallocnn(int s) { ! /* #if defined(malloc) && defined(_WIN32) #undef malloc ! #endif */ void *m = malloc(s ? s : 1); Index: MANIFEST =================================================================== RCS file: /cvsroot/arsperl/ARSperl/MANIFEST,v retrieving revision 1.32 retrieving revision 1.33 diff -C2 -d -r1.32 -r1.33 *** MANIFEST 20 Jul 2007 19:44:34 -0000 1.32 --- MANIFEST 13 Sep 2007 22:50:25 -0000 1.33 *************** *** 72,81 **** html/manual/ars_APIVersion.html html/manual/ars_CreateActiveLink.html - html/manual/ars_CreateAdminExtension.html html/manual/ars_CreateAlertEvent.html html/manual/ars_CreateEntry.html html/manual/ars_DecodeAlertMessage.html html/manual/ars_DeleteActiveLink.html - html/manual/ars_DeleteAdminExtension.html html/manual/ars_DeleteCharMenu.html html/manual/ars_DeleteContainer.html --- 72,79 ---- *************** *** 89,97 **** html/manual/ars_DeregisterForAlerts.html html/manual/ars_EncodeDiary.html - html/manual/ars_ExecuteAdminExtension.html html/manual/ars_ExecuteProcess.html html/manual/ars_Export.html html/manual/ars_GetActiveLink.html - html/manual/ars_GetAdminExtension.html html/manual/ars_GetAlertCount.html html/manual/ars_GetCharMenu.html --- 87,93 ---- *************** *** 109,113 **** html/manual/ars_GetFullTextInfo.html html/manual/ars_GetListActiveLink.html - html/manual/ars_GetListAdminExtension.html html/manual/ars_GetListAlertUser.html html/manual/ars_GetListCharMenu.html --- 105,108 ---- *************** *** 135,154 **** html/manual/ars_Logoff.html html/manual/ars_MergeEntry.html - html/manual/ars_NTCheckRegisteredClient.html - html/manual/ars_NTDeregisterClient.html - html/manual/ars_NTDeregisterServer.html - html/manual/ars_NTGetListServer.html - html/manual/ars_NTInitializationClient.html - html/manual/ars_NTInitializationServer.html - html/manual/ars_NTNotificationClient.html - html/manual/ars_NTNotificationServer.html - html/manual/ars_NTRegisterClient.html - html/manual/ars_NTRegisterServer.html - html/manual/ars_NTTerminationClient.html - html/manual/ars_NTTerminationServer.html html/manual/ars_RegisterForAlerts.html html/manual/ars_SetEntry.html html/manual/ars_SetLogging.html html/manual/ars_SetServerInfo.html html/manual/ars_decodeStatusHistory.html html/manual/ars_encodeStatusHistory.html --- 130,138 ---- html/manual/ars_Logoff.html html/manual/ars_MergeEntry.html html/manual/ars_RegisterForAlerts.html html/manual/ars_SetEntry.html html/manual/ars_SetLogging.html html/manual/ars_SetServerInfo.html + html/manual/ars_VerifyUser.html html/manual/ars_decodeStatusHistory.html html/manual/ars_encodeStatusHistory.html *************** *** 184,188 **** html/manual/ds_fls.html html/manual/ds_fncas.html - html/manual/ds_getadminext_hash.html html/manual/ds_getcharmenu_hash.html html/manual/ds_getescalation_hash.html --- 168,171 ---- *************** *** 206,209 **** --- 189,193 ---- html/manual/ds_shv.html html/manual/ds_statstruct_hash.html + html/manual/ds_verifyuser_hash.html html/manual/ds_vs.html html/manual/loading.html Index: supportrev_generated.c =================================================================== RCS file: /cvsroot/arsperl/ARSperl/supportrev_generated.c,v retrieving revision 1.3 retrieving revision 1.4 diff -C2 -d -r1.3 -r1.4 *** supportrev_generated.c 21 Apr 2007 22:22:06 -0000 1.3 --- supportrev_generated.c 13 Sep 2007 22:50:25 -0000 1.4 *************** *** 8,11 **** --- 8,19 ---- + /* #if defined(malloc) && defined(_WIN32) + #undef malloc + #undef calloc + #undef realloc + #undef free + #endif */ + + Index: supportrev.c =================================================================== RCS file: /cvsroot/arsperl/ARSperl/supportrev.c,v retrieving revision 1.29 retrieving revision 1.30 diff -C2 -d -r1.29 -r1.30 *** supportrev.c 21 Apr 2007 22:22:06 -0000 1.29 --- supportrev.c 13 Sep 2007 22:50:25 -0000 1.30 *************** *** 41,44 **** --- 41,53 ---- #include "supportrev_generated.h" + + /* #if defined(malloc) && defined(_WIN32) + #undef malloc + #undef calloc + #undef realloc + #undef free + #endif */ + + /* * forward declarations Index: ARS.pm =================================================================== RCS file: /cvsroot/arsperl/ARSperl/ARS.pm,v retrieving revision 1.72 retrieving revision 1.73 diff -C2 -d -r1.72 -r1.73 *** ARS.pm 11 Aug 2007 20:22:00 -0000 1.72 --- ARS.pm 13 Sep 2007 22:50:25 -0000 1.73 *************** *** 265,277 **** sub ars_padEntryid { ! my($c) = shift; ! my($schema) = shift; ! my($entry_id) = shift; ! my($field); ! # entry id field is field id #1 ! ($field = ars_GetField($c, $schema, 1)) || return undef; ! return ("0"x($field->{limit}{maxLength}-length($entry_id))).$entry_id; } --- 265,281 ---- sub ars_padEntryid { ! my($c) = shift; ! my($schema) = shift; ! my($entry_id) = shift; ! my($field); ! # entry id field is field id #1 ! ($field = ars_GetField($c, $schema, 1)) || return undef; ! if( $field->{defaultVal} ){ ! return $field->{defaultVal}.("0"x($field->{limit}{maxLength}-length($field->{defaultVal})-length($entry_id))).$entry_id; ! }else{ ! return ("0"x($field->{limit}{maxLength}-length($entry_id))).$entry_id; ! } } |
|
From: Thilo S. <ts...@us...> - 2007-09-13 22:50:26
|
Update of /cvsroot/arsperl/ARSperl/html In directory sc8-pr-cvs11.sourceforge.net:/tmp/cvs-serv24285/html Modified Files: index.html Log Message: arsystem 7.1 port Index: index.html =================================================================== RCS file: /cvsroot/arsperl/ARSperl/html/index.html,v retrieving revision 1.31 retrieving revision 1.32 diff -C2 -d -r1.31 -r1.32 *** index.html 31 Jul 2007 06:28:50 -0000 1.31 --- index.html 13 Sep 2007 22:50:25 -0000 1.32 *************** *** 12,16 **** <h2> Overview </h2> ! <b>ARSperl</b> is an integration kit for <a href="http://www.perl.com/perl">Perl5</a> and <a href="http://www.remedy.com">Remedy ARS</a> version 2 - version 7 API. It provides a large subset of the functionality found in the ARS C API. The source code to the integration kit and example --- 12,16 ---- <h2> Overview </h2> ! <b>ARSperl</b> is an integration kit for <a href="http://www.perl.com/perl">Perl5</a> and <a href="http://www.remedy.com">Remedy ARS</a> version 5 - version 7 API. It provides a large subset of the functionality found in the ARS C API. The source code to the integration kit and example *************** *** 22,26 **** The current release is version 1.91 and has support for the AR 5.0 ! through 7.01 API. <p> </p> --- 22,26 ---- The current release is version 1.91 and has support for the AR 5.0 ! through 7.1 API. <p> </p> |
|
From: Thilo S. <ts...@us...> - 2007-09-13 22:50:25
|
Update of /cvsroot/arsperl/ARSperl/html/manual In directory sc8-pr-cvs11.sourceforge.net:/tmp/cvs-serv24285/html/manual Modified Files: ars_APIVersion.html ars_GetField.html ars_decodeStatusHistory.html Log Message: arsystem 7.1 port Index: ars_GetField.html =================================================================== RCS file: /cvsroot/arsperl/ARSperl/html/manual/ars_GetField.html,v retrieving revision 1.9 retrieving revision 1.10 diff -C2 -d -r1.9 -r1.10 *** ars_GetField.html 2 Aug 2007 14:26:42 -0000 1.9 --- ars_GetField.html 13 Sep 2007 22:50:26 -0000 1.10 *************** *** 52,63 **** </p> ! <pre> ($field = ars_GetField($c, "User", 8)) || die $ars_errstr;<br> print $field->{"helpText"};<br></pre> Example of how to retrieve enumerated field labels (e.g. the Status (core field 7) field labels): ! <pre> ($field_info = ars_GetField($c, $s, 7})) ||<br> die "GetField: $ars_errstr (no Status field in this schema?)";<br><br> @enum_vals = @{$field_info->{limit}{enumLimits}{regularList}};<br><br> print "Status values: ".join(', ', @enum_vals)."\n";<br></pre> ! <hr width="30%"> --- 52,75 ---- </p> ! <pre> ! ($field = ars_GetField($c, "User", 8)) || die $ars_errstr; ! print $field->{"helpText"}; ! </pre> Example of how to retrieve enumerated field labels (e.g. the Status (core field 7) field labels): ! <pre> ! ($field_info = ars_GetField($c, $s, 7})) || ! die "GetField: $ars_errstr (no Status field in this schema?)"; + if( exists $field_info->{limit}{enumLimits}{regularList} ){ + @enum_vals = @{$field_info->{limit}{enumLimits}{regularList}}; + }else{ + @enum_vals = @{$field_info->{limit}{enumLimits}{customList}}; + } + + print "Status values: ".join(', ', @enum_vals)."\n"; + </pre> <hr width="30%"> Index: ars_decodeStatusHistory.html =================================================================== RCS file: /cvsroot/arsperl/ARSperl/html/manual/ars_decodeStatusHistory.html,v retrieving revision 1.4 retrieving revision 1.5 diff -C2 -d -r1.4 -r1.5 *** ars_decodeStatusHistory.html 2 Aug 2007 14:26:42 -0000 1.4 --- ars_decodeStatusHistory.html 13 Sep 2007 22:50:26 -0000 1.5 *************** *** 22,26 **** <a href="ars_GetField.html">ars_GetField()</a> to map from labels (open, held, closed, etc) to enumerations (0, 1, 2, etc).<br> ! The Status History field is a core field. That means it is present on all Regular forms. It has field ID 15. --- 22,27 ---- <a href="ars_GetField.html">ars_GetField()</a> to map from labels (open, held, closed, etc) to enumerations (0, 1, 2, etc).<br> ! The Status History field (field ID 15) is a core field. That means it is present on all Regular forms, ! even if Status History logging ist disabled (in ARS 7.1.0 or higher). Index: ars_APIVersion.html =================================================================== RCS file: /cvsroot/arsperl/ARSperl/html/manual/ars_APIVersion.html,v retrieving revision 1.4 retrieving revision 1.5 diff -C2 -d -r1.4 -r1.5 *** ars_APIVersion.html 24 Jul 2007 20:49:25 -0000 1.4 --- ars_APIVersion.html 13 Sep 2007 22:50:25 -0000 1.5 *************** *** 18,21 **** --- 18,23 ---- <ul> + <li>API 13 and AR System 7.1</li> + <li>API 12 and AR System 7.0</li> |
|
From: Thilo S. <ts...@us...> - 2007-09-13 22:50:25
|
Update of /cvsroot/arsperl/ARSperl/infra In directory sc8-pr-cvs11.sourceforge.net:/tmp/cvs-serv24285/infra Modified Files: exsi.pl Log Message: arsystem 7.1 port Index: exsi.pl =================================================================== RCS file: /cvsroot/arsperl/ARSperl/infra/exsi.pl,v retrieving revision 1.1 retrieving revision 1.2 diff -C2 -d -r1.1 -r1.2 *** exsi.pl 27 Mar 2003 18:00:04 -0000 1.1 --- exsi.pl 13 Sep 2007 22:50:26 -0000 1.2 *************** *** 16,19 **** --- 16,22 ---- # # $Log$ + # Revision 1.2 2007/09/13 22:50:26 tstapff + # arsystem 7.1 port + # # Revision 1.1 2003/03/27 18:00:04 jcmurphy # exsi.pl *************** *** 59,62 **** --- 62,69 ---- # AR_SERVER_INFO_SVR_EVENT_LIST [141] is an list + $sit = "int" if $sin eq "AR_SERVER_INFO_DB_MAX_ATTACH_SIZE"; + $sit = "int" if $sin eq "AR_SERVER_INFO_DB_MAX_TEXT_SIZE"; + $sit = "char" if $sin eq "AR_SERVER_INFO_GUID_PREFIX"; + #print "\t/*$sin [$siv] is an $sit*/\n"; |
|
From: Michiel B. <mic...@gm...> - 2007-08-14 12:56:27
|
Thilo, Thanks; I already figured it had something to do with me rather than ARSperl... ;-) Regards, Michiel On 8/14/07, Thilo Stapff <thi...@ap...> wrote: > The ars_GetFieldTable function probably works correctly in both cases. > The observed behaviour is due to the fact that the "||" operator has > higher precedence than "=", for further information see: > > http://perldoc.perl.org/perlop.html#C-style-Logical-Or-%7c%7c-operator%2c-logical%2c-or > > > Perl has also an "or" operator (with lower precedence), which works as > expected: > > my %fieldname_to_id = ars_GetFieldTable($c, "User") or die $ars_errstr; > > > Regards, > Thilo > > > Michiel Beijen wrote: > > The ars_GetFieldTable call behaves strange. > > > > When I do > > > > my %fieldname_to_id = ars_GetFieldTable($c, "User") || > > die $ars_errstr; > > the hash is almost empty but when I put the statement between () the > > hash is nicely populated: > > > > (my %fieldname_to_id = ars_GetFieldTable($c, "User")) || > > die $ars_errstr; > > > > Does this make sense? > > > > Regards, > > > > Michiel > > > > ------------------------------------------------------------------------- > > This SF.net email is sponsored by: Splunk Inc. > > Still grepping through log files to find problems? Stop. > > Now Search log events and configuration files using AJAX and a browser. > > Download your FREE copy of Splunk now >> http://get.splunk.com/ > > _______________________________________________ > > Arsperl-devel mailing list > > Ars...@ar... > > https://lists.sourceforge.net/lists/listinfo/arsperl-devel > > > > > ------------------------------------------------------------------------- > This SF.net email is sponsored by: Splunk Inc. > Still grepping through log files to find problems? Stop. > Now Search log events and configuration files using AJAX and a browser. > Download your FREE copy of Splunk now >> http://get.splunk.com/ > _______________________________________________ > Arsperl-devel mailing list > Ars...@ar... > https://lists.sourceforge.net/lists/listinfo/arsperl-devel > |
|
From: Thilo S. <thi...@ap...> - 2007-08-14 11:23:39
|
The ars_GetFieldTable function probably works correctly in both cases. The observed behaviour is due to the fact that the "||" operator has higher precedence than "=", for further information see: http://perldoc.perl.org/perlop.html#C-style-Logical-Or-%7c%7c-operator%2c-logical%2c-or Perl has also an "or" operator (with lower precedence), which works as expected: my %fieldname_to_id = ars_GetFieldTable($c, "User") or die $ars_errstr; Regards, Thilo Michiel Beijen wrote: > The ars_GetFieldTable call behaves strange. > > When I do > > my %fieldname_to_id = ars_GetFieldTable($c, "User") || > die $ars_errstr; > the hash is almost empty but when I put the statement between () the > hash is nicely populated: > > (my %fieldname_to_id = ars_GetFieldTable($c, "User")) || > die $ars_errstr; > > Does this make sense? > > Regards, > > Michiel > > ------------------------------------------------------------------------- > This SF.net email is sponsored by: Splunk Inc. > Still grepping through log files to find problems? Stop. > Now Search log events and configuration files using AJAX and a browser. > Download your FREE copy of Splunk now >> http://get.splunk.com/ > _______________________________________________ > Arsperl-devel mailing list > Ars...@ar... > https://lists.sourceforge.net/lists/listinfo/arsperl-devel > |
|
From: Michiel B. <mic...@gm...> - 2007-08-13 19:45:40
|
The ars_GetFieldTable call behaves strange.
When I do
my %fieldname_to_id = ars_GetFieldTable($c, "User") ||
die $ars_errstr;
the hash is almost empty but when I put the statement between () the
hash is nicely populated:
(my %fieldname_to_id = ars_GetFieldTable($c, "User")) ||
die $ars_errstr;
Does this make sense?
Regards,
Michiel
|
|
From: Michiel B. <mb...@us...> - 2007-08-11 20:24:37
|
Update of /cvsroot/arsperl/ARSperl In directory sc8-pr-cvs11.sourceforge.net:/tmp/cvs-serv22086 Modified Files: changes.dat Log Message: Index: changes.dat =================================================================== RCS file: /cvsroot/arsperl/ARSperl/changes.dat,v retrieving revision 1.55 retrieving revision 1.56 diff -C2 -d -r1.55 -r1.56 *** changes.dat 20 Jul 2007 19:44:34 -0000 1.55 --- changes.dat 11 Aug 2007 20:24:39 -0000 1.56 *************** *** 1,2 **** --- 1,8 ---- + MB removed legacy ars_NT Notifier and ars_AdminExtension calls + !MB added ars_VerifyUser implementation by Thilo Stapff + !MB changed ars_APIVersion to use AR_CURRENT_API_VERSION rather than AR_EXPORT_VERSION + MB fixed ars_GetActiveLink, ars_GetFilter, ars_GetEscalation, ars_GetField so they + return undef on failure. + released=xx/xx/xxx version=1.91 JCM buffer overflow in perl_BuildEntryList |
