2017-05-27 13:46:34 +02:00
< ? php
/* Copyright ( C ) 2015 Jean - François Ferry < jfefe @ aternatik . fr >
2017-06-27 20:14:48 +02:00
* Copyright ( C ) --- Put here your own copyright and developer email ---
2017-05-27 13:46:34 +02:00
*
* This program is free software ; you can redistribute it and / or modify
* it under the terms of the GNU General Public License as published by
* the Free Software Foundation ; either version 3 of the License , or
* ( at your option ) any later version .
*
* This program is distributed in the hope that it will be useful ,
* but WITHOUT ANY WARRANTY ; without even the implied warranty of
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE . See the
* GNU General Public License for more details .
*
* You should have received a copy of the GNU General Public License
2019-09-23 21:55:30 +02:00
* along with this program . If not , see < https :// www . gnu . org / licenses />.
2017-05-27 13:46:34 +02:00
*/
use Luracast\Restler\RestException ;
2017-11-05 18:15:59 +01:00
dol_include_once ( '/mymodule/class/myobject.class.php' );
2017-05-27 13:46:34 +02:00
/**
2017-11-05 18:15:59 +01:00
* \file htdocs / modulebuilder / template / class / api_mymodule . class . php
2017-05-27 13:46:34 +02:00
* \ingroup mymodule
* \brief File for API management of myobject .
*/
2017-06-27 20:14:48 +02:00
2017-05-27 13:46:34 +02:00
/**
* API class for mymodule myobject
*
2017-06-27 20:14:48 +02:00
* @ access protected
2017-05-27 13:46:34 +02:00
* @ class DolibarrApiAccess { @ requires user , external }
*/
2017-11-05 18:15:59 +01:00
class MyModuleApi extends DolibarrApi
2017-05-27 13:46:34 +02:00
{
2020-05-01 08:40:55 +02:00
/**
* @ var MyObject $myobject { @ type MyObject }
*/
public $myobject ;
/**
* Constructor
*
* @ url GET /
*
*/
public function __construct ()
{
global $db , $conf ;
$this -> db = $db ;
$this -> myobject = new MyObject ( $this -> db );
}
/**
* Get properties of a myobject object
*
* Return an array with myobject informations
*
* @ param int $id ID of myobject
* @ return array | mixed data without useless information
*
* @ url GET myobjects / { id }
*
* @ throws RestException
*/
public function get ( $id )
{
if ( ! DolibarrApiAccess :: $user -> rights -> mymodule -> read ) {
throw new RestException ( 401 );
}
$result = $this -> myobject -> fetch ( $id );
if ( ! $result ) {
throw new RestException ( 404 , 'MyObject not found' );
}
if ( ! DolibarrApi :: _checkAccessToResource ( 'myobject' , $this -> myobject -> id , 'mymodule_myobject' )) {
throw new RestException ( 401 , 'Access to instance id=' . $this -> myobject -> id . ' of object not allowed for login ' . DolibarrApiAccess :: $user -> login );
}
return $this -> _cleanObjectDatas ( $this -> myobject );
}
/**
* List myobjects
*
* Get a list of myobjects
*
* @ param string $sortfield Sort field
* @ param string $sortorder Sort order
* @ param int $limit Limit for list
* @ param int $page Page number
* @ param string $sqlfilters Other criteria to filter answers separated by a comma . Syntax example " (t.ref:like:'SO-%') and (t.date_creation:<:'20160101') "
* @ return array Array of order objects
*
* @ throws RestException
*
* @ url GET / myobjects /
*/
public function index ( $sortfield = " t.rowid " , $sortorder = 'ASC' , $limit = 100 , $page = 0 , $sqlfilters = '' )
{
global $db , $conf ;
$obj_ret = array ();
$tmpobject = new MyObject ( $db );
if ( ! DolibarrApiAccess :: $user -> rights -> bbb -> read ) {
throw new RestException ( 401 );
}
$socid = DolibarrApiAccess :: $user -> socid ? DolibarrApiAccess :: $user -> socid : '' ;
$restrictonsocid = 0 ; // Set to 1 if there is a field socid in table of object
// If the internal user must only see his customers, force searching by him
$search_sale = 0 ;
if ( $restrictonsocid && ! DolibarrApiAccess :: $user -> rights -> societe -> client -> voir && ! $socid ) $search_sale = DolibarrApiAccess :: $user -> id ;
$sql = " SELECT t.rowid " ;
if ( $restrictonsocid && ( ! DolibarrApiAccess :: $user -> rights -> societe -> client -> voir && ! $socid ) || $search_sale > 0 ) $sql .= " , sc.fk_soc, sc.fk_user " ; // We need these fields in order to filter by sale (including the case where the user can only see his prospects)
$sql .= " FROM " . MAIN_DB_PREFIX . $tmpobject -> table_element . " as t " ;
if ( $restrictonsocid && ( ! DolibarrApiAccess :: $user -> rights -> societe -> client -> voir && ! $socid ) || $search_sale > 0 ) $sql .= " , " . MAIN_DB_PREFIX . " societe_commerciaux as sc " ; // We need this table joined to the select in order to filter by sale
$sql .= " WHERE 1 = 1 " ;
// Example of use $mode
//if ($mode == 1) $sql.= " AND s.client IN (1, 3)";
//if ($mode == 2) $sql.= " AND s.client IN (2, 3)";
if ( $tmpobject -> ismultientitymanaged ) $sql .= ' AND t.entity IN (' . getEntity ( 'myobject' ) . ')' ;
if ( $restrictonsocid && ( ! DolibarrApiAccess :: $user -> rights -> societe -> client -> voir && ! $socid ) || $search_sale > 0 ) $sql .= " AND t.fk_soc = sc.fk_soc " ;
if ( $restrictonsocid && $socid ) $sql .= " AND t.fk_soc = " . $socid ;
if ( $restrictonsocid && $search_sale > 0 ) $sql .= " AND t.rowid = sc.fk_soc " ; // Join for the needed table to filter by sale
// Insert sale filter
if ( $restrictonsocid && $search_sale > 0 ) {
$sql .= " AND sc.fk_user = " . $search_sale ;
}
if ( $sqlfilters )
{
if ( ! DolibarrApi :: _checkFilters ( $sqlfilters )) {
throw new RestException ( 503 , 'Error when validating parameter sqlfilters ' . $sqlfilters );
}
$regexstring = '\(([^:\'\(\)]+:[^:\'\(\)]+:[^:\(\)]+)\)' ;
$sql .= " AND ( " . preg_replace_callback ( '/' . $regexstring . '/' , 'DolibarrApi::_forge_criteria_callback' , $sqlfilters ) . " ) " ;
}
$sql .= $db -> order ( $sortfield , $sortorder );
if ( $limit ) {
if ( $page < 0 ) {
$page = 0 ;
}
$offset = $limit * $page ;
$sql .= $db -> plimit ( $limit + 1 , $offset );
}
$result = $db -> query ( $sql );
if ( $result )
{
$num = $db -> num_rows ( $result );
while ( $i < $num )
{
$obj = $db -> fetch_object ( $result );
$myobject_static = new MyObject ( $db );
if ( $myobject_static -> fetch ( $obj -> rowid )) {
$obj_ret [] = $this -> _cleanObjectDatas ( $myobject_static );
}
$i ++ ;
}
}
else {
throw new RestException ( 503 , 'Error when retrieving myobject list: ' . $db -> lasterror ());
}
if ( ! count ( $obj_ret )) {
throw new RestException ( 404 , 'No myobject found' );
}
return $obj_ret ;
}
/**
* Create myobject object
*
* @ param array $request_data Request datas
* @ return int ID of myobject
*
* @ throws RestException
*
* @ url POST myobjects /
*/
public function post ( $request_data = null )
{
if ( ! DolibarrApiAccess :: $user -> rights -> mymodule -> write ) {
throw new RestException ( 401 );
}
// Check mandatory fields
$result = $this -> _validate ( $request_data );
foreach ( $request_data as $field => $value ) {
$this -> myobject -> $field = $value ;
}
if ( ! $this -> myobject -> create ( DolibarrApiAccess :: $user )) {
throw new RestException ( 500 , " Error creating MyObject " , array_merge ( array ( $this -> myobject -> error ), $this -> myobject -> errors ));
}
return $this -> myobject -> id ;
}
/**
* Update myobject
*
* @ param int $id Id of myobject to update
* @ param array $request_data Datas
* @ return int
*
* @ throws RestException
*
* @ url PUT myobjects / { id }
*/
public function put ( $id , $request_data = null )
{
if ( ! DolibarrApiAccess :: $user -> rights -> mymodule -> write ) {
throw new RestException ( 401 );
}
$result = $this -> myobject -> fetch ( $id );
if ( ! $result ) {
throw new RestException ( 404 , 'MyObject not found' );
}
if ( ! DolibarrApi :: _checkAccessToResource ( 'myobject' , $this -> myobject -> id , 'mymodule_myobject' )) {
throw new RestException ( 401 , 'Access to instance id=' . $this -> myobject -> id . ' of object not allowed for login ' . DolibarrApiAccess :: $user -> login );
}
foreach ( $request_data as $field => $value ) {
if ( $field == 'id' ) continue ;
$this -> myobject -> $field = $value ;
}
if ( $this -> myobject -> update ( $id , DolibarrApiAccess :: $user ) > 0 )
{
return $this -> get ( $id );
}
else
{
throw new RestException ( 500 , $this -> myobject -> error );
}
}
/**
* Delete myobject
*
* @ param int $id MyObject ID
* @ return array
*
* @ throws RestException
*
* @ url DELETE myobjects / { id }
*/
public function delete ( $id )
{
if ( ! DolibarrApiAccess :: $user -> rights -> mymodule -> delete ) {
throw new RestException ( 401 );
}
$result = $this -> myobject -> fetch ( $id );
if ( ! $result ) {
throw new RestException ( 404 , 'MyObject not found' );
}
if ( ! DolibarrApi :: _checkAccessToResource ( 'myobject' , $this -> myobject -> id , 'mymodule_myobject' )) {
throw new RestException ( 401 , 'Access to instance id=' . $this -> myobject -> id . ' of object not allowed for login ' . DolibarrApiAccess :: $user -> login );
}
if ( ! $this -> myobject -> delete ( DolibarrApiAccess :: $user ))
{
throw new RestException ( 500 , 'Error when deleting MyObject : ' . $this -> myobject -> error );
}
return array (
'success' => array (
'code' => 200 ,
'message' => 'MyObject deleted'
)
);
}
// phpcs:disable PEAR.NamingConventions.ValidFunctionName.PublicUnderscore
/**
* Clean sensible object datas
*
* @ param object $object Object to clean
* @ return array Array of cleaned object properties
*/
protected function _cleanObjectDatas ( $object )
{
// phpcs:enable
$object = parent :: _cleanObjectDatas ( $object );
unset ( $object -> rowid );
unset ( $object -> canvas );
/* unset ( $object -> name );
unset ( $object -> lastname );
unset ( $object -> firstname );
unset ( $object -> civility_id );
unset ( $object -> statut );
unset ( $object -> state );
unset ( $object -> state_id );
unset ( $object -> state_code );
unset ( $object -> region );
unset ( $object -> region_code );
unset ( $object -> country );
unset ( $object -> country_id );
unset ( $object -> country_code );
unset ( $object -> barcode_type );
unset ( $object -> barcode_type_code );
unset ( $object -> barcode_type_label );
unset ( $object -> barcode_type_coder );
unset ( $object -> total_ht );
unset ( $object -> total_tva );
unset ( $object -> total_localtax1 );
unset ( $object -> total_localtax2 );
unset ( $object -> total_ttc );
unset ( $object -> fk_account );
unset ( $object -> comments );
unset ( $object -> note );
unset ( $object -> mode_reglement_id );
unset ( $object -> cond_reglement_id );
unset ( $object -> cond_reglement );
unset ( $object -> shipping_method_id );
unset ( $object -> fk_incoterms );
unset ( $object -> label_incoterms );
unset ( $object -> location_incoterms );
2019-11-02 14:49:26 +01:00
*/
2020-05-01 08:40:55 +02:00
// If object has lines, remove $db property
if ( isset ( $object -> lines ) && is_array ( $object -> lines ) && count ( $object -> lines ) > 0 ) {
$nboflines = count ( $object -> lines );
for ( $i = 0 ; $i < $nboflines ; $i ++ )
{
$this -> _cleanObjectDatas ( $object -> lines [ $i ]);
unset ( $object -> lines [ $i ] -> lines );
unset ( $object -> lines [ $i ] -> note );
}
}
return $object ;
}
/**
* Validate fields before create or update object
*
* @ param array $data Array of data to validate
* @ return array
*
* @ throws RestException
*/
private function _validate ( $data )
{
$myobject = array ();
foreach ( $this -> myobject -> fields as $field => $propfield ) {
if ( in_array ( $field , array ( 'rowid' , 'entity' , 'date_creation' , 'tms' , 'fk_user_creat' )) || $propfield [ 'notnull' ] != 1 ) continue ; // Not a mandatory field
if ( ! isset ( $data [ $field ]))
throw new RestException ( 400 , " $field field missing " );
$myobject [ $field ] = $data [ $field ];
}
return $myobject ;
}
2017-05-27 13:46:34 +02:00
}