1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
15
16
17
18
 int
 saf_describe_basis(SAF_ParMode pmode,
                    SAF_Basis *basis,             /* Basis to describe */
                    char **name,                  /* [OUT] If non-null, on return points to malloc'd basis name if any */
                    char **url                    /* [OUT] If non-null, on return points to malloc'd URL if any */
                    )
 {
     SAF_ENTER(saf_describe_basis, SAF_PRECONDITION_ERROR);

     if (!_saf_is_participating_proc(pmode)) SAF_RETURN(-1);
     SAF_REQUIRE(SS_BASIS(basis), SAF_LOW_CHK_COST, SAF_PRECONDITION_ERROR,
                 _saf_errmsg("BASIS must be a valid basis handle"));

     _saf_setupReturned_string(name, ss_string_ptr(SS_BASIS_P(basis,name)));
     _saf_setupReturned_string(url, ss_string_ptr(SS_BASIS_P(basis,url)));

     SAF_LEAVE(SAF_SUCCESS);
 }