arsperl-users — Discussions regarding the use of ARSperl

Re: Problem with ars_GetSchema (schema name with space embeded)..

[Joel M. <jm...@ca...>]

I've tried with perl5.001 and perl5.002 and still can't duplicate the
problem. :-( I have no idea what could cause this since ars perl just
passes a pointer to the schema name to the c api.  Who knows, maybe
perl isn't terminating the strings with a null in your perl version?
I'm looking into it.

> 
> I am having problem accessing schema names with spaces using ars_GetEntry. It
> did not coredump on me. It just die quietly. However, Joel Murphy said he has
> no problem manipulating schema names with spaces. I am still trying to figure
> it out.
> 
> On Mar 1,  2:31pm, Win...@at... wrote:
> > Subject: Problem with ars_GetSchema (schema name with space embeded)..
> > If the schema name contain a space, e.g. "Customer Ticket", it seems
> > that the ars_GetSchema would choke and core dump on you.  Have anyone
> > seen this problem?
> >
> > I am running on Solaris 2.4 with ARS 2.0.  (I have flat file in the
> > back end instead of Oracle, not sure whether that make any difference).
> > I will eventually get the Oracle back end in several weeks.
> >
> > Thanks for any information.
> >
> > 	Wing Choy
> > 	AT&T
> > 	wh...@es...
> >
> >-- End of excerpt from Win...@at...
> 
> 
> 
> -- 
> 
> +-------------------------------------------------------------------+
> | ~~~   Michael San                  | Voice: 212-902-9844          |
> | 0-0   Goldman, Sachs & Co.         | Fax:   212-346-3471          |
> |  L    Equities User Support Group  | Email: mic...@eq... |
> |       1 New York Plaza, 50th Floor |                              |
> |  ~    New York, NY 10004           |                              |
> +-------------------------------------------------------------------+
> 

Re: Problem with ars_GetSchema (schema name with space embeded)..

[Michael S. <mic...@gs...>]

I am having problem accessing schema names with spaces using ars_GetEntry. It
did not coredump on me. It just die quietly. However, Joel Murphy said he has
no problem manipulating schema names with spaces. I am still trying to figure
it out.

On Mar 1,  2:31pm, Win...@at... wrote:
> Subject: Problem with ars_GetSchema (schema name with space embeded)..
> If the schema name contain a space, e.g. "Customer Ticket", it seems
> that the ars_GetSchema would choke and core dump on you.  Have anyone
> seen this problem?
>
> I am running on Solaris 2.4 with ARS 2.0.  (I have flat file in the
> back end instead of Oracle, not sure whether that make any difference).
> I will eventually get the Oracle back end in several weeks.
>
> Thanks for any information.
>
> 	Wing Choy
> 	AT&T
> 	wh...@es...
>
>-- End of excerpt from Win...@at...



-- 

+-------------------------------------------------------------------+
| ~~~   Michael San                  | Voice: 212-902-9844          |
| 0-0   Goldman, Sachs & Co.         | Fax:   212-346-3471          |
|  L    Equities User Support Group  | Email: mic...@eq... |
|       1 New York Plaza, 50th Floor |                              |
|  ~    New York, NY 10004           |                              |
+-------------------------------------------------------------------+

Problem with ars_GetSchema (schema name with space embeded)..

[<Win...@at...>]

If the schema name contain a space, e.g. "Customer Ticket", it seems
that the ars_GetSchema would choke and core dump on you.  Have anyone
seen this problem?

I am running on Solaris 2.4 with ARS 2.0.  (I have flat file in the
back end instead of Oracle, not sure whether that make any difference).
I will eventually get the Oracle back end in several weeks.

Thanks for any information.

	Wing Choy
	AT&T
	wh...@es...

Re: Compiling under SunOs 4.1.3

[Joel M. <jm...@ca...>]

According to the ars programmers guide, if you don't compile with the sys v
compiler, you need to link with libarcat.a.  so just add -larcat to the 
$ARS_LIBS line in Makefile.PL.

> I finally compiled ARSperl extension successfully on SunOs 4.1.3_U1. I have to
> recompile perl5 to make it work. I think the previous version of perl5 I used
> was bad.
> 
> Then I tried to run the example script List_Entries.pl with the new perl5. I
> got the following error as soon as I 'use ARS;'
> 
> 	ld.so: Undefined symbol: _catopen
> 
> Please help.
> 

bug in create entry

[Joel M. <jm...@ca...>]

I've fixed a bug in CreateEntry that called free twice on a structure.
here's the diff.


*** 1.1	1996/02/21 20:17:26
--- ARS.xs	1996/02/22 21:36:46
***************
*** 1350,1361 ****
  	      }
  	    }
  	    ret = ARCreateEntry(ctrl, schema, &fieldList, entryId, &status);
- 	    FreeARFieldValueList(&fieldList,FALSE);
  	    if (! ARError(ret, status)) {
  	      RETVAL = entryId;
  	    }
  	  create_entry_end:;
! 	    free(fieldList.fieldValueList);
  	  }
  	}
  	OUTPUT:
--- 1350,1360 ----
  	      }
  	    }
  	    ret = ARCreateEntry(ctrl, schema, &fieldList, entryId, &status);
  	    if (! ARError(ret, status)) {
  	      RETVAL = entryId;
  	    }
  	  create_entry_end:;
! 	    FreeARFieldValueList(&fieldList,FALSE);
  	  }
  	}
  	OUTPUT:

Re: Compiling under SunOs 4.1.3

[Joel M. <jm...@ca...>]

> 
> I use gcc to compile instead and it did not give me any error. However, after
> did a make, I didn't see any binary created. make install didn't do anything
> either.
> 

no actual 'binary' is created.  just a shared library ARS.so.  the perl
executable knows how to load this in dynamically when you have 'use ARS;'
in a script.

> Here's the output from the compilation:
> 
> /home/aims/ARSperl-1.1> make
> umask 0 && cp ARS.pm blib/lib//ARS.pm
> AutoSplitting ARS (./blib/lib//auto/ARS)
> /usr/local/bin/perl5 -I/usr/local/lib/perl5/sun4-sunos/5.002
> -I/usr/local/lib/perl5 /usr/local/lib/perl5/ExtUtils/xsubpp  -typemap
> /usr/local/lib/perl5/ExtUtils/typemap -typemap typemap ARS.xs >ARS.tc && mv
> ARS.tc ARS.c

> Please specify prototyping behavior for ARS.xs (see perlxs manual)
   ^
   `-----I've never seen this message before.  keep in mind that
         perl 5.002 is still in beta.  I can't find anything about
         prototyping behavior in 5.001.

> gcc -c -I/home/aims/AR/api/include -I/usr/local/include -I/opt/local/include
> -O2 -DVERSION=\"1.0beta\" -DXS_VERSION=\"1.0beta\" -fpic
> -I/usr/local/lib/perl5/sun4-sunos/5.002/CORE/  ARS.c
> Running Mkbootstrap for ARS ()
> chmod 644 ARS.bs
> LD_RUN_PATH="/home/aims/AR/api/lib:/lib" ld -o blib/arch//auto/ARS/ARS.so
> -assert nodefinitions -L/usr/local/lib -L/opt/local/lib ARS.o
>   -L/home/aims/AR/api/lib -lar -lnsl
> chmod 755 blib/arch//auto/ARS/ARS.so
> cp ARS.bs ./blib/arch//auto/ARS/ARS.bs
> chmod 644 blib/arch//auto/ARS/ARS.bs

So it re-built ARS.o, but didn't link it into ARS.so.  Try removing
blib/ and re-running make, or do 'make clean' to start fresh.

> 
> /home/aims/ARSperl-1.1> make install
> Skipping /home/aims/local/lib/perl5/site_perl/sun4-sunos/auto/ARS/ARS.bs
> (unchanged)
> Skipping /home/aims/local/lib/perl5/site_perl/sun4-sunos/auto/ARS/ARS.so
> (unchanged)
> Skipping /home/aims/local/lib/perl5/site_perl/auto/ARS/autosplit.ix (unchanged)
> Skipping /home/aims/local/lib/perl5/site_perl/ARS.pm (unchanged)
> Writing /home/aims/local/lib/perl5/site_perl/sun4-sunos/auto/ARS/.packlist
> Appending installation info to
> /home/aims/local/lib/perl5/sun4-sunos/5.002/perllocal.pod
> 

diff

[Joel M. <jm...@ca...>]

fixed the hard coded 15 character entry id problem

--------------------------------cut here-------------------------------
*** 1.1	1996/02/21 20:17:26
--- ARSperl/ARS.xs	1996/02/21 19:56:07
***************
*** 1402,1422 ****
  	  int c = items - 3, i, ret;
  	  ARInternalIdList  idList;
  	  int id_len;
- 	  AREntryIdType pad_entry;
  	  ARFieldValueList  fieldList;
  	  ARStatusList      status;
  	  ARTimestamp       v;
  	  
- 	  /* pad left of entry_id with zeros */
- 	  memset(pad_entry, '0', AR_MAX_ENTRYID_SIZE);
- 	  pad_entry[AR_MAX_ENTRYID_SIZE] = '\0';
- 	  id_len = strlen(entry_id);
- 	  if (id_len > AR_MAX_ENTRYID_SIZE) {
- 	    ars_errstr = "entry id is too long";
- 	    goto get_entry_end;
- 	  }
- 	  sprintf(pad_entry+(AR_MAX_ENTRYID_SIZE-id_len), "%s", entry_id);
- 	
  	  if (c < 1) {
  	    idList.numItems = 0; /* get all fields */
  	  } else {
--- 1402,1411 ----
***************
*** 1426,1432 ****
  	    for (i=0; i<c; i++)
  	      idList.internalIdList[i] = SvIV(ST(i+3));
  	  }
! 	  ret = ARGetEntry(ctrl, schema, pad_entry, &idList, &fieldList, &status); 
  	  if (ARError(ret, status)) {
  	    FreeARInternalIdList(&idList, FALSE);
  	    goto get_entry_end;
--- 1415,1421 ----
  	    for (i=0; i<c; i++)
  	      idList.internalIdList[i] = SvIV(ST(i+3));
  	  }
! 	  ret = ARGetEntry(ctrl, schema, entry_id, &idList, &fieldList, &status); 
  	  if (ARError(ret, status)) {
  	    FreeARInternalIdList(&idList, FALSE);
  	    goto get_entry_end;
*** 1.1	1996/02/21 20:17:54
--- ARSperl/ARS.pm	1996/02/21 20:34:28
***************
*** 54,59 ****
--- 54,61 ----
  $AR_EXECUTE_ON_SET_DEFAULT = 512;
  $AR_EXECUTE_ON_QUERY =      1024;
  
+ $field_entryId = 1;
+ 
  sub ars_simpleMenu {
      # merges all sub-menus into a single level menu
      my $m = shift;
***************
*** 75,80 ****
--- 77,93 ----
  	}
      }
      @ret;
+ }
+ 
+ sub pad_entryid {
+     my $c = shift;
+     my $schema = shift;
+     my $entry_id = shift;
+     my $field;
+     
+     ($field = ars_GetField($c, $schema, $field_entryId)) ||
+ 	return undef;
+     return ("0"x($field->{limit}{maxLength}-length($entry_id))).$entry_id;
  }
  
  ARS::__ars_init();
*** 1.1	1996/02/21 20:43:06
--- ARSperl/html/usage.html	1996/02/21 20:40:45
***************
*** 41,46 ****
--- 41,47 ----
          <LI><A HREF="#ars_GetListActiveLink">ars_GetListActiveLink</A>
          <LI><A HREF="#ars_GetField">ars_GetField</A>
          <LI><A HREF="#ars_SetEntry">ars_SetEntry</A>
+ 	<LI><A HREF="#pad_entryid">ARS::pad_entryid</A>
      </UL>
      <LI><A HREF="#helper">Perl helper functions</A>
      <UL>
***************
*** 485,491 ****
--- 486,496 ----
  
        <PRE>
        </PRE>
+    
+    <A NAME="pad_entryid"></A>
+    <DT><CODE>ARS::pad_entryid(ctrl,schema,entry_id)</CODE><DD>
  
+       Pads entry_id with the required number of zeroes.
  
  </DL>
  

Re: ARGetEntry entryId length

[Joel M. <jm...@ca...>]

> Hi there,
> 
> I have successfully built arsperl on IRIX 6.2 (alpha), with some
> very minor changes, which I think were just issues with the
> latest compiler.  At some point I will try compiling on 5.3 and
> see if I have more fluid (change-free) luck.
> 
> The problem I was having before (if any of you recall) was that
> the version of perl was a pruned one, which did not contain all
> the header files and the like, but rather only the files needed
> for run-time.

glad to here it works...

> Anyway, on to the main topic of this particular mailing...
> 
> in the ARGetEntry call in ARS.c, (line 1621 of the version I
> have), the third argument is ``pad_entry'', which is of type
> AREntryIdType, and which is set up to be padded with 0's to the
> length of 15 characters.
> 
> This probably ought to be dynamic, based on the
> ARFieldLimitStruct returned by ARGetField.  I have a schema with
> a 10 character long entryId, and it seems that it is impossible
> to get any records out of it using arsperl.

Hmm, I never used entry ids other than the default 15 numeric characters
so I didn't catch this one.  Apparently, entry-ids can have text as well,
so I just removed the zero padding hack.  I'll add a ARS::pad_entryid
function that will do the right amount of padding, and post a diff.

ARGetEntry entryId length

[<li...@re...>]

Hi there,

I have successfully built arsperl on IRIX 6.2 (alpha), with some
very minor changes, which I think were just issues with the
latest compiler.  At some point I will try compiling on 5.3 and
see if I have more fluid (change-free) luck.

The problem I was having before (if any of you recall) was that
the version of perl was a pruned one, which did not contain all
the header files and the like, but rather only the files needed
for run-time.


Anyway, on to the main topic of this particular mailing...

in the ARGetEntry call in ARS.c, (line 1621 of the version I
have), the third argument is ``pad_entry'', which is of type
AREntryIdType, and which is set up to be padded with 0's to the
length of 15 characters.

This probably ought to be dynamic, based on the
ARFieldLimitStruct returned by ARGetField.  I have a schema with
a 10 character long entryId, and it seems that it is impossible
to get any records out of it using arsperl.


I imagine that my description here is sufficient information
for a code change, but if you (the developers that are on this
list) would like further information, please let me know.

Cheers.

	David

-- 
	David Lindes
	li...@co...
	+1-415/933-4749

Compile Problems

[Jeff M. <jcm...@sm...>]

majordomo bounced this too me.. here is the original message...

>Sender: xo...@il...
>Message-Id: <312...@em...>
>Date: Fri, 16 Feb 1996 07:36:41 -0600
>From: Charles Nguyen <xo...@em...>
>X-Mailer: Mozilla 2.0b5 (X11; I; AIX 1)
>Mime-Version: 1.0
>To: ar...@lu...
>Subject: Compile Problems
>Content-Type: text/plain; charset=us-ascii
>Content-Transfer-Encoding: 7bit
>
>
>When I try to compile ARSperl I get the following errors:
>
>Any help would be much appreciated...
>
>Thanks,
>Charles
>
>cc -c -O -pic -I/usr/local/lib/perl5/sun4-sunos/CORE -g
>-I/remedy/ar/api/include ARS.c
>cc: Warning: -O conflicts with -g. -O turned off.
>"ARS.c", line 49: syntax error at or near type word "void"
>"ARS.c", line 51: syntax error at or near symbol *
>"ARS.c", line 51: ARStatusStruct declared as parameter to non-function
>"ARS.c", line 51: ARS_fn undefined
>"ARS.c", line 52: syntax error at or near symbol *
>"ARS.c", line 52: ARInternalId declared as parameter to non-function
>"ARS.c", line 53: syntax error at or near symbol *
>"ARS.c", line 53: ARNameType declared as parameter to non-function
>"ARS.c", line 54: syntax error at or near symbol *
>"ARS.c", line 55: ARValueStruct declared as parameter to non-function
>"ARS.c", line 56: syntax error at or near type word "unsigned"
>"ARS.c", line 57: syntax error at or near symbol *
>"ARS.c", line 57: ARStatHistoryValue declared as parameter to
>non-function
>"ARS.c", line 58: syntax error at or near symbol *
>"ARS.c", line 58: ARAssignFieldStruct declared as parameter to
>non-function
>"ARS.c", line 59: syntax error at or near symbol *
>"ARS.c", line 59: ARAssignStruct declared as parameter to non-function
>"ARS.c", line 60: syntax error at or near symbol *
>"ARS.c", line 60: ARFieldAssignStruct declared as parameter to
>non-function
>"ARS.c", line 61: syntax error at or near symbol *
>"ARS.c", line 61: ARDisplayStruct declared as parameter to non-function
>"ARS.c", line 62: syntax error at or near symbol *
>"ARS.c", line 62: ARMacroParmStruct declared as parameter to
>non-function
>"ARS.c", line 63: syntax error at or near symbol *
>"ARS.c", line 63: ARActiveLinkMacroStruct declared as parameter to
>non-function
>"ARS.c", line 64: syntax error at or near symbol *
>"ARS.c", line 64: ARFieldCharacteristics declared as parameter to
>non-function
>"ARS.c", line 64: fatal error: too many errors
>*** Error code 1
>make: Fatal error: Command failed for target `ARS.o'
>
>-- 
>Charles Nguyen
>Motorola Corporate Telecommunication
>Email: xo...@em...
>Phone: 512-891-3566
>


we havent been able to test it out under AIX (i dont have access to an
AIX machine with the remedy libraries). if you are relatively familiar
with C code, i would suggest running the ARS.c file thru the C preprocessor
and see exactly what the line it is trying to compile looks like...
look for suspicious or non-standard type declarations that might not
have been included correctly. does AIX support the void type? i've never
used AIX before.. (i'm assuming you are building it under AIX because your
mailer said it was on AIX)

jeff

Re: ARSperl for HP-UX

[Joel M. <jm...@ca...>]

> 
> As noted, ARSperl has only been "officially" tested on Solaris 2.X.  I tried
> installing it for HP-UX 9.04 but get the following error:
> 
> ld: DP-Relative Code in file /ford/thishost/u/remedy/api/lib/libar.a(ar.o) - Sha
> red Library must be Position-Independent
> *** Error code 1
> 
> Anybody working on an HP-UX version?

The problem is that it is unable to create a shared library from the
distributed ars static library.  On a typical system with elf
binaries, each object file must be compiled with -fpic to be position
independant in memory.  Since we can't recompile libar.a, the next
best thing would be to build the extension right into the perl
executable.  I'll haven't done that before, but it shouldn't require
too many modifications.

joel murphy

ARSperl for HP-UX

[<wm...@fo...>]

As noted, ARSperl has only been "officially" tested on Solaris 2.X.  I tried
installing it for HP-UX 9.04 but get the following error:

ld: DP-Relative Code in file /ford/thishost/u/remedy/api/lib/libar.a(ar.o) - Sha
red Library must be Position-Independent
*** Error code 1

Anybody working on an HP-UX version?
--
Bill Meahan  Technical Lead, Help Desk Support (wm...@fo...)
Ford Motor Company,  End User Support - North America
Information and opinions expressed herein are those of the author and 
do not represent any official statement by Ford Motor Company

Re: Installing ARSperl

[Jeff M. <jcm...@sm...>]

i was able to build perl5.001 under "IRIX 5.2 02282016 IP22 mips"
with dynamic loading. when the Configure script asked what sort of
dynamic loading to use, choose "ext/DynaLoader/dlopen.xs" (i think that
is the path.. definately choose "dlopen.xs").

after that i was able to to a "perl Makefile.PL" and compile ARSperl to
an object file. since i dont have libar.a for irix, i was unable to test
it further. however, it did appear to compile without problems. 

i only had to add this to the DEFINE='' line in "Makefile.PL":

	'DEFINE' => '-D_SVR4_SOURCE -U_POSIX_SOURCE -U_XOPEN_SOURCE'

and add

	#include <string.h>

right beneathe "#include <stdio.h>" in ARS.xs (this should have been there
for the standard distribution.. which I just updated, since Solaris uses
string.h as well).

try compiling perl5.001 and then do the ARSperl installation.. it *should*
work..

jeff

Re: Installing ARSperl

[Jeff M. <jcm...@sm...>]

ok. i've checked into it.. apparently irix ships with perl4 .. not perl5.
so you will need to compile perl5 first before you use this extension.

i've obtained an account on a local sgi and i'm seeing if perl5 compiles on
it. i'll let you know what options i used for getting the DynaLoader to 
work (assuming i get it to work :). and then i'll see if i can build the
ARSperl extension on it. 

jeff

Re: Installing ARSperl

[Jeff M. <jcm...@sm...>]

>2)	After fixing the above, I can still not successfully run
>	Makefile.PL, as it complains that it can't find the
>	subroutine called WriteMakefile.  This is fixed when I
>	change that call to writeMakefile. (lower case w)
>
>3)	next, it complains about the absence of a "config.sh".
>	If I set 'TOP' in the call to writeMakefile, this seems
>	to be fixed.


this is strange. perl shouldnt need a config.sh file... it should read
the Makefile.PL and generate a makefile on its own.. check your perl
version. make sure it is the latest (5.001m is the latest i think).

TOP should be set to the top of your perl source code directory. 
for example, on our system:

TOP = /utiloss/lib/perl5

also: be sure that module support and dynamic linking are compiled into
your perl binary. by default i dont think it is. 

Installing ARSperl

[<li...@da...>]

Hi all (how many of us are there as yet?)...

I hope I'm not spamming you with something that's been asked,
but my impression is that this list is very new, and that that
is unlikely, so here I go:


I'm trying to install ARSperl on an SGI box...  yeah, I know,
not supported...  but that's what BETA means, right?  so
anyway...  here's what I'm running into:

1)	Some of the filenames (locations for things) are a bit
	weird...  This I can cope with, but here's what I've
	changed:

	problem file	old			new
	------------	--------------------	----------------
	Makefile.PL	/utiloss/bin/perl	/usr/local/bin/perl

	Makefile.PL	/ware/ars/api/lib	/usr/ar/api/lib
	Makefile.PL	/ware/ars/api/include	/usr/ar/api/include

	(Yes, these second two are documented in INSTALL as needing
	changes, but I think the defaults that Remedy supplies
	(/usr/ar, for me, anyway) would be good ones to go with.)

2)	After fixing the above, I can still not successfully run
	Makefile.PL, as it complains that it can't find the
	subroutine called WriteMakefile.  This is fixed when I
	change that call to writeMakefile. (lower case w)

3)	next, it complains about the absence of a "config.sh".
	If I set 'TOP' in the call to writeMakefile, this seems
	to be fixed.

4)	with TOP set to the directory I'm working in, running
	Makefile.PL causes a problem finding ext/util/extliblist
	in that directory.  It still seems to create a Makefile,
	though.

5)	and now I get:

	don't know how to make $(TOP)/EXTERN.h (bu42).

	($(TOP) is expanded in the error message)

So...  it looks like I'm missing something serious.  Any
idea what that might be?

Hope I'm not just being brain dead...  (very possible, I've not
been having the best day...)


Cheers.

	David

-- 
	David Lindes
	li...@sg...
	+1/415-933-4749