Skip to content
GitLab
Switch branch/tag
Find file Normal viewHistoryPermalink
theme.inc 4.7 KB
Newer Older
Dries Buytaert's avatar
   
Dries Buytaert committed
1 
<?php
Kjartan Mannes's avatar
- added the CVS keyword $Id$ to all files to make future version tracking    
Kjartan Mannes committed
2 
// $Id$
Dries Buytaert's avatar
Huge update - I don't have time to write everything down but the directory  
Dries Buytaert committed
3
Kjartan Mannes's avatar
This is a major change to the system, needs more testing!    
Kjartan Mannes committed
4
5
6
7
8 
/**
* Basic theme
*
* @package theme system
*/
Kjartan Mannes's avatar
Changes    
Kjartan Mannes committed
9 
class BaseTheme {
Kjartan Mannes's avatar
- adding missing $bacground/$foreground variables.    
Kjartan Mannes committed
10
11 
  var $background = "#ffffff";
  var $foreground = "#000000";
Dries Buytaert's avatar
   
Dries Buytaert committed
12
Kjartan Mannes's avatar
This is a major change to the system, needs more testing!    
Kjartan Mannes committed
13 
  function system($field) {
Kjartan Mannes's avatar
- adding missing $bacground/$foreground variables.    
Kjartan Mannes committed
14
15
16 
    $system["name"] = "Basic theme";
    $system["author"] = "Drupal";
    $system["description"] = "Basic theme. Lynx friendly";
Kjartan Mannes's avatar
This is a major change to the system, needs more testing!    
Kjartan Mannes committed
17
18
19
20 

    return $system[$field];
  }
Steven Wittens's avatar
- Updated BaseTheme and the Drupal themes to have header($title = "") as the...    
Steven Wittens committed
21 
  function header($title = "") {
Kjartan Mannes's avatar
- adding doctype to basic theme.    
Kjartan Mannes committed
22 
    $output = "<!DOCTYPE html PUBLIC \"-//W3C//DTD XHTML 1.0 Transitional//EN\" \"DTD/xhtml1-transitional.dtd\">\n";
Dries Buytaert's avatar
   
Dries Buytaert committed
23
24
25 
    $output .= "<html><head><title>". variable_get(site_name, "drupal") ."</title>";
    $output .= theme_head($main);
    $output .= "</head><body bgcolor=\"$this->background\" text=\"$this->foreground\">";
Dries Buytaert's avatar
   
Dries Buytaert committed
26
27
28 
    $output .= "<table border=\"0\" cellspacing=\"4\" cellpadding=\"4\"><tr><td valign=\"top\" width=\"170\">";

    print $output;
Kjartan Mannes's avatar
- removed some warnings caused by implode.    
Kjartan Mannes committed
29 
    $this->box(t("Navigation"), @implode("<br />", link_page())); theme_blocks("all", $this);
Dries Buytaert's avatar
   
Dries Buytaert committed
30 
    print "</td><td valign=\"top\">";
Dries Buytaert's avatar
   
Dries Buytaert committed
31
32
33 

  }
Dries Buytaert's avatar
   
Dries Buytaert committed
34 
  function links($links, $delimiter = " | ") {
Kjartan Mannes's avatar
- adding missing $bacground/$foreground variables.    
Kjartan Mannes committed
35 
    return implode($delimiter, $links);
Dries Buytaert's avatar
   
Dries Buytaert committed
36 
  }
Dries Buytaert's avatar
   
Dries Buytaert committed
37
Dries Buytaert's avatar
   
Dries Buytaert committed
38
39 
  function image($name) {
    return "misc/$name";
Dries Buytaert's avatar
   
Dries Buytaert committed
40 
  }
Dries Buytaert's avatar
   
Dries Buytaert committed
41
Dries Buytaert's avatar
   
Dries Buytaert committed
42 
  function node($node, $main) {
Kjartan Mannes's avatar
- added taxonomy output to BaseTheme.    
Kjartan Mannes committed
43
44 
    if (function_exists("taxonomy_node_get_terms")) {
      foreach (taxonomy_node_get_terms($node->nid) as $term) {
Dries Buytaert's avatar
   
Dries Buytaert committed
45 
        $terms[] = l($term->name, NULL, array(), "or=$term->tid");
Kjartan Mannes's avatar
- added taxonomy output to BaseTheme.    
Kjartan Mannes committed
46
47 
      }
    }
Dries Buytaert's avatar
   
Dries Buytaert committed
48
Dries Buytaert's avatar
   
Dries Buytaert committed
49 
    $output = "<b>$node->title</b> by ". format_name($node) ."<br />";
Kjartan Mannes's avatar
- added taxonomy output to BaseTheme.    
Kjartan Mannes committed
50
51
52 
    if (count($terms)) {
      $output .= "<small>(". $this->links($terms) .")</small><br />";
    }
Dries Buytaert's avatar
   
Dries Buytaert committed
53 
    if ($main && $node->teaser) {
Dries Buytaert's avatar
   
Dries Buytaert committed
54 
      $output .= check_output($node->teaser);
Dries Buytaert's avatar
   
Dries Buytaert committed
55
56 
    }
    else {
Dries Buytaert's avatar
   
Dries Buytaert committed
57 
      $output .= check_output($node->body);
Dries Buytaert's avatar
   
Dries Buytaert committed
58 
    }
Kjartan Mannes's avatar
- modified node_save so that revisions are not validated using check_input,    
Kjartan Mannes committed
59
60 
    if ($links = link_node($node, $main)) {
      $output .= "<br />[ ". $this->links($links) ." ]";
Dries Buytaert's avatar
   
Dries Buytaert committed
61
62
63
64 
    }
    $output .= "<hr />";

    print $output;
Dries Buytaert's avatar
   
Dries Buytaert committed
65
66 
  }
Dries Buytaert's avatar
   
Dries Buytaert committed
67 
  function box($subject, $content, $region = "main") {
Dries Buytaert's avatar
   
Dries Buytaert committed
68 
    $output = "<p><b>$subject</b><br />$content</p>";
Dries Buytaert's avatar
   
Dries Buytaert committed
69
70
71 
    print $output;
  }
Dries Buytaert's avatar
   
Dries Buytaert committed
72
73
74
75
76
77 
  function block($subject, $content, $region = "main") {
    global $theme;

    $theme->box($subject, $content, $region);
  }
Dries Buytaert's avatar
   
Dries Buytaert committed
78 
  function footer() {
Kjartan Mannes's avatar
- adding doctype to basic theme.    
Kjartan Mannes committed
79 
    $output = "</td></tr></table>";
Dries Buytaert's avatar
   
Dries Buytaert committed
80
81
82
83 
    $output .= "</body></html>";
    print $output;
  }
Kjartan Mannes's avatar
Changes    
Kjartan Mannes committed
84
85 
}
Dries Buytaert's avatar
   
Dries Buytaert committed
86
87
88
89
90
91
92
93 
function theme_mark() {
  /*
  ** Return a marker.  Used to indicate new comments or required form
  ** fields.
  */
  return "<span style=\"color: red;\">*</span>";
}
Dries Buytaert's avatar
   
Dries Buytaert committed
94 
function theme_item_list($items = array(), $title = NULL) {
Dries Buytaert's avatar
   
Dries Buytaert committed
95
96
97
98 
  /*
  ** Return a formatted array of items.
  */
Dries Buytaert's avatar
   
Dries Buytaert committed
99 
  if (isset($title)) {
Dries Buytaert's avatar
   
Dries Buytaert committed
100
101
102 
    $output .= "<b>$title</b><br />";
  }
Dries Buytaert's avatar
   
Dries Buytaert committed
103
104
105
106 
  if (isset($items)) {
    foreach ($items as $item) {
      $output .= "- $item<br />";
    }
Dries Buytaert's avatar
   
Dries Buytaert committed
107
108
109
110
111 
  }

  return $output;
}
Dries Buytaert's avatar
   
Dries Buytaert committed
112
113
114
115
116
117
118 
function theme_error($message) {
  /*
  ** Return an error message.
  */
  return "<div style=\"color: red;\">$message</div>";
}
Kjartan Mannes's avatar
This is a major change to the system, needs more testing!    
Kjartan Mannes committed
119
120 
function theme_list() {
  static $list;
Dries Buytaert's avatar
   
Dries Buytaert committed
121
Kjartan Mannes's avatar
This is a major change to the system, needs more testing!    
Kjartan Mannes committed
122
123
124
125 
  if (!$list) {
    $list = array();
    $result = db_query("SELECT * FROM system where type = 'theme' AND status = '1' ORDER BY name");
    while ($theme = db_fetch_object($result)) {
Dries Buytaert's avatar
   
Dries Buytaert committed
126
127
128 
      if (file_exists($theme->filename)) {
        $list[$theme->name] = $theme;
      }
Kjartan Mannes's avatar
This is a major change to the system, needs more testing!    
Kjartan Mannes committed
129 
    }
Dries Buytaert's avatar
   
Dries Buytaert committed
130 
  }
Kjartan Mannes's avatar
This is a major change to the system, needs more testing!    
Kjartan Mannes committed
131
132
133
134 

  return $list;
}
Dries Buytaert's avatar
   
Dries Buytaert committed
135
136 
function theme_head($main = 0) {
  $head = module_invoke_all("head", $main);
Dries Buytaert's avatar
   
Dries Buytaert committed
137 
  return implode($head, "\n");
Dries Buytaert's avatar
   
Dries Buytaert committed
138
139 
}
Kjartan Mannes's avatar
This is a major change to the system, needs more testing!    
Kjartan Mannes committed
140
141
142
143
144
145
146 
function theme_init() {
  global $user;

  $themes = theme_list();
  $name = $user->theme ? $user->theme : variable_get("theme_default", 0);
  if (is_object($themes[$name])) {
    include_once($themes[$name]->filename);
Kjartan Mannes's avatar
- fixing bug reported by Remco.    
Kjartan Mannes committed
147 
    $theme_class = "Theme_$name";
Kjartan Mannes's avatar
- changing theme patch. Now Drupal will init the $this->path automatically.    
Kjartan Mannes committed
148
149 
    @$obj =& new $theme_class();
    $obj->path = dirname($themes[$name]->filename);
Kjartan Mannes's avatar
This is a major change to the system, needs more testing!    
Kjartan Mannes committed
150 
    return $obj;
Dries Buytaert's avatar
   
Dries Buytaert committed
151 
  }
Kjartan Mannes's avatar
- applying patches from Axel Kollmorgen. See    
Kjartan Mannes committed
152
Kjartan Mannes's avatar
This is a major change to the system, needs more testing!    
Kjartan Mannes committed
153
154 
  @$obj =& new BaseTheme;
  return $obj;
Dries Buytaert's avatar
   
Dries Buytaert committed
155
156 
}
Dries Buytaert's avatar
   
Dries Buytaert committed
157
158
159
160
161
162
163 
/**
 * Render blocks available for $user and $region calling $theme->block($region).
 *
 * @param   string  $region   main|left|right
 * @param
 */
function theme_blocks($region) {
Dries Buytaert's avatar
   
Dries Buytaert committed
164 
  global $user, $PHP_SELF;
Dries Buytaert's avatar
   
Dries Buytaert committed
165
Dries Buytaert's avatar
   
Dries Buytaert committed
166 
  $result = db_query("SELECT * FROM blocks WHERE (status = '1' OR custom = '1') ". ($region != "all" ? "AND region = '%s' " : "") ."ORDER BY weight, module", $region == "left" ? 0 : 1);
Dries Buytaert's avatar
   
Dries Buytaert committed
167
Kjartan Mannes's avatar
- moved user block from theme.inc to user.module.    
Kjartan Mannes committed
168 
  while ($result && ($block = db_fetch_object($result))) {
Dries Buytaert's avatar
   
Dries Buytaert committed
169
170
171 
    if ((($block->status && (!$user->uid || !$block->custom)) || ($block->custom && $user->block[$block->module][$block->delta])) && (!$block->path || preg_match("|$block->path|", $PHP_SELF))) {
      $block_data = module_invoke($block->module, "block", "view", $block->delta);
      if ($block_data["content"]) {
Dries Buytaert's avatar
   
Dries Buytaert committed
172 
        theme_invoke("block", $block_data["subject"], $block_data["content"], $region);
Kjartan Mannes's avatar
- merged block and box modules. modules/box.module should be removed    
Kjartan Mannes committed
173 
      }
Dries Buytaert's avatar
   
Dries Buytaert committed
174
175
176 
    }
  }
}
Kjartan Mannes's avatar
- added a path field to the blocks. Its a regexp to define which pages you    
Kjartan Mannes committed
177
Dries Buytaert's avatar
   
Dries Buytaert committed
178
179
180 
function theme_invoke() {
  global $theme;
  $args = func_get_args();
Dries Buytaert's avatar
   
Dries Buytaert committed
181
Dries Buytaert's avatar
   
Dries Buytaert committed
182
183
184
185 
  $function = array_shift($args);

  if (method_exists($theme, $function)) {
    return call_user_method_array($function, $theme, $args);
Dries Buytaert's avatar
   
Dries Buytaert committed
186 
  }
Dries Buytaert's avatar
   
Dries Buytaert committed
187
188
189
190
191 
  else {
    return call_user_func_array($function, $args);
  }
}
Dries Buytaert's avatar
   
Dries Buytaert committed
192 
?>