Skip to content
GitLab
Switch branch/tag
Find file Normal viewHistoryPermalink
theme.inc 4.43 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
72 
    print $output;
  }

  function footer() {
Kjartan Mannes's avatar
- adding doctype to basic theme.    
Kjartan Mannes committed
73 
    $output = "</td></tr></table>";
Dries Buytaert's avatar
   
Dries Buytaert committed
74
75
76
77 
    $output .= "</body></html>";
    print $output;
  }
Kjartan Mannes's avatar
Changes    
Kjartan Mannes committed
78
79 
}
Dries Buytaert's avatar
   
Dries Buytaert committed
80
81
82
83
84
85
86
87 
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
88 
function theme_item_list($items = array(), $title = NULL) {
Dries Buytaert's avatar
   
Dries Buytaert committed
89
90
91
92 
  /*
  ** Return a formatted array of items.
  */
Dries Buytaert's avatar
   
Dries Buytaert committed
93 
  if (isset($title)) {
Dries Buytaert's avatar
   
Dries Buytaert committed
94
95
96 
    $output .= "<b>$title</b><br />";
  }
Dries Buytaert's avatar
   
Dries Buytaert committed
97
98
99
100 
  if (isset($items)) {
    foreach ($items as $item) {
      $output .= "- $item<br />";
    }
Dries Buytaert's avatar
   
Dries Buytaert committed
101
102
103
104
105 
  }

  return $output;
}
Dries Buytaert's avatar
   
Dries Buytaert committed
106
107
108
109
110
111
112 
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
113
114 
function theme_list() {
  static $list;
Dries Buytaert's avatar
   
Dries Buytaert committed
115
Kjartan Mannes's avatar
This is a major change to the system, needs more testing!    
Kjartan Mannes committed
116
117
118
119 
  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
120
121
122 
      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
123 
    }
Dries Buytaert's avatar
   
Dries Buytaert committed
124 
  }
Kjartan Mannes's avatar
This is a major change to the system, needs more testing!    
Kjartan Mannes committed
125
126
127
128 

  return $list;
}
Dries Buytaert's avatar
   
Dries Buytaert committed
129
130 
function theme_head($main = 0) {
  $head = module_invoke_all("head", $main);
Dries Buytaert's avatar
   
Dries Buytaert committed
131 
  return implode($head, "\n");
Dries Buytaert's avatar
   
Dries Buytaert committed
132
133 
}
Kjartan Mannes's avatar
This is a major change to the system, needs more testing!    
Kjartan Mannes committed
134
135
136
137
138
139
140 
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
141 
    $theme_class = "Theme_$name";
Kjartan Mannes's avatar
- changing theme patch. Now Drupal will init the $this->path automatically.    
Kjartan Mannes committed
142
143 
    @$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
144 
    return $obj;
Dries Buytaert's avatar
   
Dries Buytaert committed
145 
  }
Kjartan Mannes's avatar
- applying patches from Axel Kollmorgen. See    
Kjartan Mannes committed
146
Kjartan Mannes's avatar
This is a major change to the system, needs more testing!    
Kjartan Mannes committed
147
148 
  @$obj =& new BaseTheme;
  return $obj;
Dries Buytaert's avatar
   
Dries Buytaert committed
149
150 
}
Dries Buytaert's avatar
   
Dries Buytaert committed
151 
function theme_blocks($region, &$theme) {
Dries Buytaert's avatar
   
Dries Buytaert committed
152 
  global $user, $PHP_SELF;
Dries Buytaert's avatar
   
Dries Buytaert committed
153
Dries Buytaert's avatar
   
Dries Buytaert committed
154 
  $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
155
Kjartan Mannes's avatar
- moved user block from theme.inc to user.module.    
Kjartan Mannes committed
156 
  while ($result && ($block = db_fetch_object($result))) {
Dries Buytaert's avatar
   
Dries Buytaert committed
157
158
159
160 
    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"]) {
        $theme->box($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
161 
      }
Dries Buytaert's avatar
   
Dries Buytaert committed
162
163
164 
    }
  }
}
Kjartan Mannes's avatar
- added a path field to the blocks. Its a regexp to define which pages you    
Kjartan Mannes committed
165
Dries Buytaert's avatar
   
Dries Buytaert committed
166
167
168 
function theme_invoke() {
  global $theme;
  $args = func_get_args();
Dries Buytaert's avatar
   
Dries Buytaert committed
169
Dries Buytaert's avatar
   
Dries Buytaert committed
170
171
172
173 
  $function = array_shift($args);

  if (method_exists($theme, $function)) {
    return call_user_method_array($function, $theme, $args);
Dries Buytaert's avatar
   
Dries Buytaert committed
174 
  }
Dries Buytaert's avatar
   
Dries Buytaert committed
175
176
177
178
179 
  else {
    return call_user_func_array($function, $args);
  }
}
Dries Buytaert's avatar
   
Dries Buytaert committed
180 
?>