Artifact 6a74b1fe7d1dc70d68482bd83b8e1cc429eec835:


0000: 3c 3f 70 68 70 0a 6e 61 6d 65 73 70 61 63 65 20  <?php.namespace 
0010: 47 61 72 72 61 64 69 6e 3b 0a 0a 72 65 71 75 69  Garradin;..requi
0020: 72 65 5f 6f 6e 63 65 20 5f 5f 44 49 52 5f 5f 20  re_once __DIR__ 
0030: 2e 20 27 2f 2e 2e 2f 5f 69 6e 63 2e 70 68 70 27  . '/../_inc.php'
0040: 3b 0a 0a 24 63 61 74 73 20 3d 20 6e 65 77 20 4d  ;..$cats = new M
0050: 65 6d 62 72 65 73 5c 43 61 74 65 67 6f 72 69 65  embres\Categorie
0060: 73 3b 0a 0a 71 76 28 5b 27 69 64 27 20 3d 3e 20  s;..qv(['id' => 
0070: 27 72 65 71 75 69 72 65 64 7c 6e 75 6d 65 72 69  'required|numeri
0080: 63 27 5d 29 3b 0a 0a 24 69 64 20 3d 20 28 69 6e  c']);..$id = (in
0090: 74 29 20 71 67 28 27 69 64 27 29 3b 0a 0a 24 63  t) qg('id');..$c
00a0: 61 74 20 3d 20 24 63 61 74 73 2d 3e 67 65 74 28  at = $cats->get(
00b0: 24 69 64 29 3b 0a 0a 69 66 20 28 21 24 63 61 74  $id);..if (!$cat
00c0: 29 0a 7b 0a 20 20 20 20 74 68 72 6f 77 20 6e 65  ).{.    throw ne
00d0: 77 20 55 73 65 72 45 78 63 65 70 74 69 6f 6e 28  w UserException(
00e0: 22 43 65 74 74 65 20 63 61 74 c3 a9 67 6f 72 69  "Cette cat..gori
00f0: 65 20 6e 27 65 78 69 73 74 65 20 70 61 73 2e 22  e n'existe pas."
0100: 29 3b 0a 7d 0a 0a 69 66 20 28 66 28 27 73 61 76  );.}..if (f('sav
0110: 65 27 29 29 0a 7b 0a 20 20 20 20 24 64 72 6f 69  e')).{.    $droi
0120: 74 73 20 3d 20 69 6d 70 6c 6f 64 65 28 27 2c 27  ts = implode(','
0130: 2c 20 5b 0a 20 20 20 20 20 20 20 20 4d 65 6d 62  , [.        Memb
0140: 72 65 73 3a 3a 44 52 4f 49 54 5f 41 55 43 55 4e  res::DROIT_AUCUN
0150: 2c 0a 20 20 20 20 20 20 20 20 4d 65 6d 62 72 65  ,.        Membre
0160: 73 3a 3a 44 52 4f 49 54 5f 41 43 43 45 53 2c 0a  s::DROIT_ACCES,.
0170: 20 20 20 20 20 20 20 20 4d 65 6d 62 72 65 73 3a          Membres:
0180: 3a 44 52 4f 49 54 5f 45 43 52 49 54 55 52 45 2c  :DROIT_ECRITURE,
0190: 0a 20 20 20 20 20 20 20 20 4d 65 6d 62 72 65 73  .        Membres
01a0: 3a 3a 44 52 4f 49 54 5f 41 44 4d 49 4e 2c 0a 20  ::DROIT_ADMIN,. 
01b0: 20 20 20 5d 29 3b 0a 0a 20 20 20 20 24 66 6f 72     ]);..    $for
01c0: 6d 2d 3e 63 68 65 63 6b 28 27 65 64 69 74 5f 63  m->check('edit_c
01d0: 61 74 5f 27 20 2e 20 24 69 64 2c 20 5b 0a 20 20  at_' . $id, [.  
01e0: 20 20 20 20 20 20 27 6e 6f 6d 27 20 20 20 20 20        'nom'     
01f0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
0200: 20 20 3d 3e 20 27 72 65 71 75 69 72 65 64 27 2c    => 'required',
0210: 0a 20 20 20 20 20 20 20 20 27 64 72 6f 69 74 5f  .        'droit_
0220: 77 69 6b 69 27 20 20 20 20 20 20 20 20 20 20 20  wiki'           
0230: 20 20 20 20 20 3d 3e 20 27 69 6e 3a 27 20 2e 20       => 'in:' . 
0240: 24 64 72 6f 69 74 73 2c 0a 20 20 20 20 20 20 20  $droits,.       
0250: 20 27 64 72 6f 69 74 5f 63 6f 6d 70 74 61 27 20   'droit_compta' 
0260: 20 20 20 20 20 20 20 20 20 20 20 20 20 3d 3e 20               => 
0270: 27 69 6e 3a 27 20 2e 20 24 64 72 6f 69 74 73 2c  'in:' . $droits,
0280: 0a 20 20 20 20 20 20 20 20 27 64 72 6f 69 74 5f  .        'droit_
0290: 6d 65 6d 62 72 65 73 27 20 20 20 20 20 20 20 20  membres'        
02a0: 20 20 20 20 20 3d 3e 20 27 69 6e 3a 27 20 2e 20       => 'in:' . 
02b0: 24 64 72 6f 69 74 73 2c 0a 20 20 20 20 20 20 20  $droits,.       
02c0: 20 27 64 72 6f 69 74 5f 63 6f 6e 66 69 67 27 20   'droit_config' 
02d0: 20 20 20 20 20 20 20 20 20 20 20 20 20 3d 3e 20               => 
02e0: 73 70 72 69 6e 74 66 28 27 69 6e 3a 25 73 2c 25  sprintf('in:%s,%
02f0: 73 27 2c 20 4d 65 6d 62 72 65 73 3a 3a 44 52 4f  s', Membres::DRO
0300: 49 54 5f 41 44 4d 49 4e 2c 20 4d 65 6d 62 72 65  IT_ADMIN, Membre
0310: 73 3a 3a 44 52 4f 49 54 5f 41 55 43 55 4e 29 2c  s::DROIT_AUCUN),
0320: 0a 20 20 20 20 20 20 20 20 27 64 72 6f 69 74 5f  .        'droit_
0330: 63 6f 6e 6e 65 78 69 6f 6e 27 20 20 20 20 20 20  connexion'      
0340: 20 20 20 20 20 3d 3e 20 73 70 72 69 6e 74 66 28       => sprintf(
0350: 27 69 6e 3a 25 73 2c 25 73 27 2c 20 4d 65 6d 62  'in:%s,%s', Memb
0360: 72 65 73 3a 3a 44 52 4f 49 54 5f 41 43 43 45 53  res::DROIT_ACCES
0370: 2c 20 4d 65 6d 62 72 65 73 3a 3a 44 52 4f 49 54  , Membres::DROIT
0380: 5f 41 55 43 55 4e 29 2c 0a 20 20 20 20 20 20 20  _AUCUN),.       
0390: 20 27 64 72 6f 69 74 5f 69 6e 73 63 72 69 70 74   'droit_inscript
03a0: 69 6f 6e 27 20 20 20 20 20 20 20 20 20 3d 3e 20  ion'         => 
03b0: 73 70 72 69 6e 74 66 28 27 69 6e 3a 25 73 2c 25  sprintf('in:%s,%
03c0: 73 27 2c 20 4d 65 6d 62 72 65 73 3a 3a 44 52 4f  s', Membres::DRO
03d0: 49 54 5f 41 43 43 45 53 2c 20 4d 65 6d 62 72 65  IT_ACCES, Membre
03e0: 73 3a 3a 44 52 4f 49 54 5f 41 55 43 55 4e 29 2c  s::DROIT_AUCUN),
03f0: 0a 20 20 20 20 20 20 20 20 27 63 61 63 68 65 72  .        'cacher
0400: 27 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20  '               
0410: 20 20 20 20 20 3d 3e 20 27 62 6f 6f 6c 65 61 6e       => 'boolean
0420: 27 2c 0a 20 20 20 20 20 20 20 20 27 69 64 5f 63  ',.        'id_c
0430: 6f 74 69 73 61 74 69 6f 6e 5f 6f 62 6c 69 67 61  otisation_obliga
0440: 74 6f 69 72 65 27 20 3d 3e 20 27 6e 75 6d 65 72  toire' => 'numer
0450: 69 63 27 2c 0a 20 20 20 20 5d 29 3b 0a 0a 20 20  ic',.    ]);..  
0460: 20 20 69 66 20 28 21 24 66 6f 72 6d 2d 3e 68 61    if (!$form->ha
0470: 73 45 72 72 6f 72 73 28 29 29 0a 20 20 20 20 7b  sErrors()).    {
0480: 0a 20 20 20 20 20 20 20 20 24 64 61 74 61 20 3d  .        $data =
0490: 20 5b 0a 20 20 20 20 20 20 20 20 20 20 20 20 27   [.            '
04a0: 6e 6f 6d 27 20 20 20 20 20 20 20 20 20 20 20 3d  nom'           =
04b0: 3e 20 20 66 28 27 6e 6f 6d 27 29 2c 0a 20 20 20  >  f('nom'),.   
04c0: 20 20 20 20 20 20 20 20 20 27 64 72 6f 69 74 5f           'droit_
04d0: 77 69 6b 69 27 20 20 20 20 3d 3e 20 20 28 69 6e  wiki'    =>  (in
04e0: 74 29 20 66 28 27 64 72 6f 69 74 5f 77 69 6b 69  t) f('droit_wiki
04f0: 27 29 2c 0a 20 20 20 20 20 20 20 20 20 20 20 20  '),.            
0500: 27 64 72 6f 69 74 5f 63 6f 6d 70 74 61 27 20 20  'droit_compta'  
0510: 3d 3e 20 20 28 69 6e 74 29 20 66 28 27 64 72 6f  =>  (int) f('dro
0520: 69 74 5f 63 6f 6d 70 74 61 27 29 2c 0a 20 20 20  it_compta'),.   
0530: 20 20 20 20 20 20 20 20 20 27 64 72 6f 69 74 5f           'droit_
0540: 63 6f 6e 66 69 67 27 20 20 3d 3e 20 20 28 69 6e  config'  =>  (in
0550: 74 29 20 66 28 27 64 72 6f 69 74 5f 63 6f 6e 66  t) f('droit_conf
0560: 69 67 27 29 2c 0a 20 20 20 20 20 20 20 20 20 20  ig'),.          
0570: 20 20 27 64 72 6f 69 74 5f 6d 65 6d 62 72 65 73    'droit_membres
0580: 27 20 3d 3e 20 20 28 69 6e 74 29 20 66 28 27 64  ' =>  (int) f('d
0590: 72 6f 69 74 5f 6d 65 6d 62 72 65 73 27 29 2c 0a  roit_membres'),.
05a0: 20 20 20 20 20 20 20 20 20 20 20 20 27 64 72 6f              'dro
05b0: 69 74 5f 63 6f 6e 6e 65 78 69 6f 6e 27 20 3d 3e  it_connexion' =>
05c0: 20 28 69 6e 74 29 20 66 28 27 64 72 6f 69 74 5f   (int) f('droit_
05d0: 63 6f 6e 6e 65 78 69 6f 6e 27 29 2c 0a 20 20 20  connexion'),.   
05e0: 20 20 20 20 20 20 20 20 20 27 64 72 6f 69 74 5f           'droit_
05f0: 69 6e 73 63 72 69 70 74 69 6f 6e 27 20 3d 3e 20  inscription' => 
0600: 28 69 6e 74 29 20 66 28 27 64 72 6f 69 74 5f 69  (int) f('droit_i
0610: 6e 73 63 72 69 70 74 69 6f 6e 27 29 2c 0a 20 20  nscription'),.  
0620: 20 20 20 20 20 20 20 20 20 20 27 63 61 63 68 65            'cache
0630: 72 27 20 20 20 20 20 20 20 20 3d 3e 20 20 28 69  r'        =>  (i
0640: 6e 74 29 20 66 28 27 63 61 63 68 65 72 27 29 2c  nt) f('cacher'),
0650: 0a 20 20 20 20 20 20 20 20 20 20 20 20 27 69 64  .            'id
0660: 5f 63 6f 74 69 73 61 74 69 6f 6e 5f 6f 62 6c 69  _cotisation_obli
0670: 67 61 74 6f 69 72 65 27 20 3d 3e 20 28 69 6e 74  gatoire' => (int
0680: 29 20 66 28 27 69 64 5f 63 6f 74 69 73 61 74 69  ) f('id_cotisati
0690: 6f 6e 5f 6f 62 6c 69 67 61 74 6f 69 72 65 27 29  on_obligatoire')
06a0: 2c 0a 20 20 20 20 20 20 20 20 5d 3b 0a 0a 20 20  ,.        ];..  
06b0: 20 20 20 20 20 20 2f 2f 20 4e 65 20 70 61 73 20        // Ne pas 
06c0: 70 65 72 6d 65 74 74 72 65 20 64 65 20 6d 6f 64  permettre de mod
06d0: 69 66 69 65 72 20 6c 61 20 63 6f 6e 6e 65 78 69  ifier la connexi
06e0: 6f 6e 2c 20 6c 27 61 63 63 c3 a8 73 20 c3 a0 20  on, l'acc..s .. 
06f0: 6c 61 20 63 6f 6e 66 69 67 20 65 74 20 c3 a0 20  la config et .. 
0700: 6c 61 20 67 65 73 74 69 6f 6e 20 64 65 73 20 6d  la gestion des m
0710: 65 6d 62 72 65 73 0a 20 20 20 20 20 20 20 20 2f  embres.        /
0720: 2f 20 70 6f 75 72 20 6c 61 20 63 61 74 c3 a9 67  / pour la cat..g
0730: 6f 72 69 65 20 64 75 20 6d 65 6d 62 72 65 20 71  orie du membre q
0740: 75 69 20 c3 a9 64 69 74 65 20 6c 65 73 20 63 61  ui ..dite les ca
0750: 74 c3 a9 67 6f 72 69 65 73 2c 20 73 69 6e 6f 6e  t..gories, sinon
0760: 20 69 6c 20 70 6f 75 72 72 61 69 74 20 73 27 65   il pourrait s'e
0770: 6d 70 c3 aa 63 68 65 72 0a 20 20 20 20 20 20 20  mp..cher.       
0780: 20 2f 2f 20 64 65 20 73 65 20 63 6f 6e 6e 65 63   // de se connec
0790: 74 65 72 20 6f 75 20 6e 27 61 76 6f 69 72 20 61  ter ou n'avoir a
07a0: 75 63 75 6e 65 20 63 61 74 c3 a9 67 6f 72 69 65  ucune cat..gorie
07b0: 20 61 76 65 63 20 6c 65 20 64 72 6f 69 74 20 64   avec le droit d
07c0: 65 20 6d 6f 64 69 66 69 65 72 20 6c 65 73 20 63  e modifier les c
07d0: 61 74 c3 a9 67 6f 72 69 65 73 20 21 0a 20 20 20  at..gories !.   
07e0: 20 20 20 20 20 69 66 20 28 24 63 61 74 2d 3e 69       if ($cat->i
07f0: 64 20 3d 3d 20 24 75 73 65 72 2d 3e 69 64 5f 63  d == $user->id_c
0800: 61 74 65 67 6f 72 69 65 29 0a 20 20 20 20 20 20  ategorie).      
0810: 20 20 7b 0a 20 20 20 20 20 20 20 20 20 20 20 20    {.            
0820: 24 64 61 74 61 5b 27 64 72 6f 69 74 5f 63 6f 6e  $data['droit_con
0830: 6e 65 78 69 6f 6e 27 5d 20 3d 20 4d 65 6d 62 72  nexion'] = Membr
0840: 65 73 3a 3a 44 52 4f 49 54 5f 41 43 43 45 53 3b  es::DROIT_ACCES;
0850: 0a 20 20 20 20 20 20 20 20 20 20 20 20 24 64 61  .            $da
0860: 74 61 5b 27 64 72 6f 69 74 5f 63 6f 6e 66 69 67  ta['droit_config
0870: 27 5d 20 3d 20 4d 65 6d 62 72 65 73 3a 3a 44 52  '] = Membres::DR
0880: 4f 49 54 5f 41 44 4d 49 4e 3b 0a 20 20 20 20 20  OIT_ADMIN;.     
0890: 20 20 20 20 20 20 20 24 64 61 74 61 5b 27 64 72         $data['dr
08a0: 6f 69 74 5f 6d 65 6d 62 72 65 73 27 5d 20 3d 20  oit_membres'] = 
08b0: 4d 65 6d 62 72 65 73 3a 3a 44 52 4f 49 54 5f 41  Membres::DROIT_A
08c0: 44 4d 49 4e 3b 0a 20 20 20 20 20 20 20 20 7d 0a  DMIN;.        }.
08d0: 0a 20 20 20 20 20 20 20 20 74 72 79 20 7b 0a 20  .        try {. 
08e0: 20 20 20 20 20 20 20 20 20 20 20 24 63 61 74 73             $cats
08f0: 2d 3e 65 64 69 74 28 24 69 64 2c 20 24 64 61 74  ->edit($id, $dat
0900: 61 29 3b 0a 0a 20 20 20 20 20 20 20 20 20 20 20  a);..           
0910: 20 69 66 20 28 24 69 64 20 3d 3d 20 24 75 73 65   if ($id == $use
0920: 72 2d 3e 69 64 5f 63 61 74 65 67 6f 72 69 65 29  r->id_categorie)
0930: 0a 20 20 20 20 20 20 20 20 20 20 20 20 7b 0a 20  .            {. 
0940: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2f                 /
0950: 2f 20 4d 69 73 65 20 c3 a0 20 6a 6f 75 72 20 64  / Mise .. jour d
0960: 65 20 6c 61 20 73 65 73 73 69 6f 6e 20 63 6f 75  e la session cou
0970: 72 61 6e 74 65 0a 20 20 20 20 20 20 20 20 20 20  rante.          
0980: 20 20 20 20 20 20 24 73 65 73 73 69 6f 6e 2d 3e        $session->
0990: 72 65 66 72 65 73 68 28 29 3b 0a 20 20 20 20 20  refresh();.     
09a0: 20 20 20 20 20 20 20 7d 0a 0a 20 20 20 20 20 20         }..      
09b0: 20 20 20 20 20 20 55 74 69 6c 73 3a 3a 72 65 64        Utils::red
09c0: 69 72 65 63 74 28 41 44 4d 49 4e 5f 55 52 4c 20  irect(ADMIN_URL 
09d0: 2e 20 27 63 6f 6e 66 69 67 2f 63 61 74 65 67 6f  . 'config/catego
09e0: 72 69 65 73 2f 27 29 3b 0a 20 20 20 20 20 20 20  ries/');.       
09f0: 20 7d 0a 20 20 20 20 20 20 20 20 63 61 74 63 68   }.        catch
0a00: 20 28 55 73 65 72 45 78 63 65 70 74 69 6f 6e 20   (UserException 
0a10: 24 65 29 0a 20 20 20 20 20 20 20 20 7b 0a 20 20  $e).        {.  
0a20: 20 20 20 20 20 20 20 20 20 20 24 66 6f 72 6d 2d            $form-
0a30: 3e 61 64 64 45 72 72 6f 72 28 24 65 2d 3e 67 65  >addError($e->ge
0a40: 74 4d 65 73 73 61 67 65 28 29 29 3b 0a 20 20 20  tMessage());.   
0a50: 20 20 20 20 20 7d 0a 20 20 20 20 7d 0a 7d 0a 0a       }.    }.}..
0a60: 24 74 70 6c 2d 3e 61 73 73 69 67 6e 28 27 63 61  $tpl->assign('ca
0a70: 74 27 2c 20 24 63 61 74 29 3b 0a 0a 24 74 70 6c  t', $cat);..$tpl
0a80: 2d 3e 61 73 73 69 67 6e 28 27 72 65 61 64 6f 6e  ->assign('readon
0a90: 6c 79 27 2c 20 24 63 61 74 2d 3e 69 64 20 3d 3d  ly', $cat->id ==
0aa0: 20 24 75 73 65 72 2d 3e 69 64 5f 63 61 74 65 67   $user->id_categ
0ab0: 6f 72 69 65 20 3f 20 27 64 69 73 61 62 6c 65 64  orie ? 'disabled
0ac0: 3d 22 64 69 73 61 62 6c 65 64 22 27 20 3a 20 27  ="disabled"' : '
0ad0: 27 29 3b 0a 0a 24 63 6f 74 69 73 61 74 69 6f 6e  ');..$cotisation
0ae0: 73 20 3d 20 6e 65 77 20 43 6f 74 69 73 61 74 69  s = new Cotisati
0af0: 6f 6e 73 3b 0a 24 74 70 6c 2d 3e 61 73 73 69 67  ons;.$tpl->assig
0b00: 6e 28 27 63 6f 74 69 73 61 74 69 6f 6e 73 27 2c  n('cotisations',
0b10: 20 24 63 6f 74 69 73 61 74 69 6f 6e 73 2d 3e 6c   $cotisations->l
0b20: 69 73 74 43 75 72 72 65 6e 74 28 29 29 3b 0a 0a  istCurrent());..
0b30: 24 74 70 6c 2d 3e 61 73 73 69 67 6e 28 27 6d 65  $tpl->assign('me
0b40: 6d 62 72 65 73 27 2c 20 6e 65 77 20 4d 65 6d 62  mbres', new Memb
0b50: 72 65 73 29 3b 0a 0a 24 74 70 6c 2d 3e 64 69 73  res);..$tpl->dis
0b60: 70 6c 61 79 28 27 61 64 6d 69 6e 2f 63 6f 6e 66  play('admin/conf
0b70: 69 67 2f 63 61 74 65 67 6f 72 69 65 73 2f 6d 6f  ig/categories/mo
0b80: 64 69 66 69 65 72 2e 74 70 6c 27 29 3b 0a        difier.tpl');.