self-service Drupal module, RT#9380
[freeside.git] / fs_selfservice / drupal / admin.inc
1 <?php
2
3 function freeside_admin() {
4   return drupal_get_form('freeside_admin_form');
5 }
6
7 function freeside_admin_form() {
8   $hostname = variable_get('freeside_hostname','');
9
10   $form = array(
11     'freeside_hostname'=> array(
12       '#type'   => 'textfield',
13       '#title'  => t('Freeside server address'),
14       '#default_value'=>variable_get('freeside_hostname',''),
15       '#required'=>1,
16     ),
17   );
18
19   if($hostname) {
20     $freeside = new FreesideSelfService();
21     $signup_info = $freeside->signup_info(); // no agent in this request
22
23     $agents = array();
24     foreach((array)$signup_info['agent'] as $a) {
25       $agents[$a['agentnum']] = $a['agent'];
26     }
27
28     $form['freeside_agentnum'] = array(
29       '#type'   => 'select',
30       '#title'  => t('Signup agent'),
31       '#default_value'=>variable_get('freeside_agentnum',''),
32       '#required'=>1,
33       '#options'=> $agents,
34     );
35
36     $form['freeside_debug'] = array(
37       '#type'   => 'checkbox',
38       '#title'  => t('Enable debugging'),
39       '#default_value'=>variable_get('freeside_debug',0),
40     );
41   }
42
43   return system_settings_form($form);
44 }
45
46 ?>