NAME

RDF::Base::Utils - Utility functions for RDFBase

FUNCTIONS

Exportable.

TODO: Move most if not all of these functions to another place...

Please think about _not_ using these...

cache_clear

  cache_clear()

  cache_clear( $time )

Sats the time of the cache clearing to $time that defaults to now().

Clears caches with nodes.

TODO: Broken. FIXME

Returns:

valclean

  valclean( $value )

Exceptions: Will die if encountered a "Malformed UTF-8 character (fatal)"

Returns: The new value after a lot of transformation

    $value = lc($value);
    $value =~ s/(aa)/Ã¥/g;
    $value =~ s/(æ|ae)/ä/g;
    $value =~ s/(ø|oe)/ö/g;
    $value =~ tr[àáâäãåéèêëíìïîóòöôõúùüûýÿðþß]
                [aaaaaaeeeeiiiiooooouuuuyydps];
    $value =~ tr/`'/'/;
    $value =~ tr/qwz/kvs/;
    $value =~ s/\b(och|and|o|o\.|og)\b/&/g;
    $value =~ s/\s\'n\b/&/g;
    $value =~ s/hote(ls|ller|lli|llin|llit|ll|l)/hotel/g;

    $value =~ s/[^\w&]//g;

name2url

  name2url( $name )

Converts a name to a reasonable string to use in an url

format_phone

Deprecated

format_zip

Deprecated

parse_query_props

  parse_query_props( $string )

Splits the string to a list of values if separated by LF.

The first part of each element should be a predicate and the rest, after the first space, should be the value.

Returns:

a props hash with pred/value pairs.

NB! Previously also split on ,.

Example:

  name Jonas Liljegren
  age 33

  becomes:

  {
    name => 'Jonas Liljegren',
    age  => '33',
  }

TODO: Handle things like: val (p1 val1, p2 val2 (ps1 vals1, ps2, vals2), p3 val3)

parse_query_value

used by parse_query_props

Format:

In list context, returns ( $value, $arclim )

In scalar context, returns either $value or $arclim. (Throws exception if both are provided.)

parse_form_field_prop

  parse_form_field_prop( $string )

Splits the string into an arg list.

The format is name1_val1__name2_val2__name3_val3...

Vals can be empty: name1___name2_val2...

Vals can contain underscore: pred_in_region...

The string can begin with check_.

If a second property with the same name is encountered, it will return the values as an arrayref.

Returns:

a props hash with pred/value pairs.

Example:

  arc___revpred_has_member__type_marketing_group__if_a__if_b

  becomes:

  {
    arc     => undef,
    revpred => 'has_member',
    type    => 'marketing_group',
    if      => ['a','b'],
  }

parse_arc_add_box

  parse_arc_add_box( $string, \%args )

Splits the string up with one property for each row.

The first part of each element should be a predicate and the rest, after the first space, should be the value.

Value nodes can be created by giving adding the value props after an ->. Those props are parsed using /parse_query_props.

Returns:

a props hash with pred/value pairs.

Example:

  name Sverige -> is_of_language sv (code)
  is country

This would create a node with the properties

  $sverige =
  {
    is_of_language => 'sv (code)',
  }

And then return the hashref

  {
    name => $sverige,
    is   => 'country',
  }

Note that the value node is created even if you don't use the returned hashref for creating the arcs using that value node.

The sv (code) part will be parsed by RDF::Base::Resource/find_by_anything, as will all the values.

parse_query_pred

  parse_query_pred( $predstring, \%args )

Internal use...

parse_query_prop

  parse_query_prop( \%props, \%args )

Internal use...

convert_query_prop_for_creation

  convert_query_prop_for_creation( \%props, \%args )

Accepts _clean part.

Internal use...

is_undef

  is_undef()

Returns:

An RDF::Base::Undef object.

arc_lock

  arc_lock()

Calls RDF::Base::Arc/lock

arc_unlock

  arc_unlock()

Calls RDF::Base::Arc/unlock

truncstring

  truncstring( $string, $length )

The string may be a string ref or an RDF::Base::Object. It doesnt touch the string, but returns a string with a maximum of $length chars. If shortened, ends with '...'.

Returns:

The shortened string.

string

  string($string)

Calls RDF::Base::Literal::String/new with $string.

html

  html($string)

Calls RDF::Base::Literal::String/new with $string and valtype text_html.

query_desig

  query_desig($query, \%args, $ident)

parse_propargs

  parse_propargs()

  parse_propargs( \%args )

  parse_propargs( $special )

  parse_propargs( $arclim )

\%args holds any extra arguments to the method as name/value pairs. The arclim argument is always parsed and converted to a RDF::Base::Arc::Lim object. This will modify the args variable in cases when arclim isn't already a valid object.

$arclim is given, in the right position, as anything other than a hashref. It will be given to RDF::Base::Arc::Lim/parse, that takes many alternative forms, including arrayrefs and scalar strings. $arclim may instead be given as a named parameter in \%args. The given $arclim will be placed in a constructed $args and returned.

0 represents here a false argument, including undef or no argument. This will generate an empty \%props.

$special can be a couple of standard configurations:

auto: If user has root access, sets arclim to ['not_old'] and unique_arcs_prio to ['new', 'submitted', 'active']. Otherwise, sets special to 'relative'.

relative: Sets arclim to ['active', ['not_old', 'created_by_me']] and unique_arcs_prio to ['new', 'submitted', 'active'].

solid: Sets arclim to ['active] and unique_arcs_prio to ['active'].

all: Sets arclim to [['active'], ['inactive']] and unique_arcs_prio to ['active'].

Arguments from RDF::Base::User/default_propargs are used for any UNEXISTING argument given. You can for example override the use of a default unique_arcs_prio by explicitly setting unique_arcs_prio to undef.

Returns in array context: ($arg, $arclim, $res)

Returns in scalar context: $arg

The returned arclim is also found as the arclim named parameter in arg, so that's just syntactic sugar. With no input, the return will be the two values {}, [], there [] is an empty RDF::Base::Arc::Lim object (that can be generated by parsing []).

solid_propargs

  solid_propargs( \%args )

proplim_to_arclim

  proplim_to_arclim( \%proplim, $is_rev )

Converts a proplim for use in arclist by adding obj top criterions.

aais

  aais( \%args, $limit )

Stands for args_arclim_intersect.

Returns: A new clone of args hashref, with a clone of the arclim modified with RDF::Base::Arc::Lim/add_intersect

alphanum_to_id

  alphanum_to_id( $alphanum )

range_pred

  my( $range, $range_pred ) = range_pred(\%args)