| File: | src/gnu/usr.bin/texinfo/info/m-x.c |
| Warning: | line 154, column 7 Use of memory after it is freed |
Press '?' to see keyboard shortcuts
Keyboard shortcuts:
| 1 | /* m-x.c -- Meta-x minibuffer reader. | |||
| 2 | $Id: m-x.c,v 1.5 2006/07/17 16:12:36 espie Exp $ | |||
| 3 | ||||
| 4 | Copyright (C) 1993, 1997, 1998, 2001, 2002, 2004 Free Software | |||
| 5 | Foundation, Inc. | |||
| 6 | ||||
| 7 | This program is free software; you can redistribute it and/or modify | |||
| 8 | it under the terms of the GNU General Public License as published by | |||
| 9 | the Free Software Foundation; either version 2, or (at your option) | |||
| 10 | any later version. | |||
| 11 | ||||
| 12 | This program is distributed in the hope that it will be useful, | |||
| 13 | but WITHOUT ANY WARRANTY; without even the implied warranty of | |||
| 14 | MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the | |||
| 15 | GNU General Public License for more details. | |||
| 16 | ||||
| 17 | You should have received a copy of the GNU General Public License | |||
| 18 | along with this program; if not, write to the Free Software | |||
| 19 | Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. | |||
| 20 | ||||
| 21 | Originally written by Brian Fox (bfox@ai.mit.edu). */ | |||
| 22 | ||||
| 23 | #include "info.h" | |||
| 24 | #include "funs.h" | |||
| 25 | ||||
| 26 | /* **************************************************************** */ | |||
| 27 | /* */ | |||
| 28 | /* Reading Named Commands */ | |||
| 29 | /* */ | |||
| 30 | /* **************************************************************** */ | |||
| 31 | ||||
| 32 | /* Read the name of an Info function in the echo area and return the | |||
| 33 | name. A return value of NULL indicates that no function name could | |||
| 34 | be read. */ | |||
| 35 | char * | |||
| 36 | read_function_name (char *prompt, WINDOW *window) | |||
| 37 | { | |||
| 38 | register int i; | |||
| 39 | char *line; | |||
| 40 | REFERENCE **array = (REFERENCE **)NULL((void *)0); | |||
| 41 | int array_index = 0, array_slots = 0; | |||
| 42 | ||||
| 43 | /* Make an array of REFERENCE which actually contains the names of | |||
| 44 | the functions available in Info. */ | |||
| 45 | for (i = 0; function_doc_array[i].func; i++) | |||
| 46 | { | |||
| 47 | REFERENCE *entry; | |||
| 48 | ||||
| 49 | entry = (REFERENCE *)xmalloc (sizeof (REFERENCE)); | |||
| 50 | entry->label = xstrdup (function_doc_array[i].func_name); | |||
| 51 | entry->nodename = (char *)NULL((void *)0); | |||
| 52 | entry->filename = (char *)NULL((void *)0); | |||
| 53 | ||||
| 54 | add_pointer_to_arraydo { if (array_index + 2 >= array_slots) array = (REFERENCE * *)(xrealloc (array, (array_slots += 200) * sizeof (REFERENCE *))); array[array_index++] = (REFERENCE *)entry; array[array_index ] = (REFERENCE *)((void *)0); } while (0) | |||
| 55 | (entry, array_index, array, array_slots, 200, REFERENCE *)do { if (array_index + 2 >= array_slots) array = (REFERENCE * *)(xrealloc (array, (array_slots += 200) * sizeof (REFERENCE *))); array[array_index++] = (REFERENCE *)entry; array[array_index ] = (REFERENCE *)((void *)0); } while (0); | |||
| 56 | } | |||
| 57 | ||||
| 58 | line = info_read_completing_in_echo_area (window, prompt, array); | |||
| 59 | ||||
| 60 | info_free_references (array); | |||
| 61 | ||||
| 62 | if (!echo_area_is_active) | |||
| 63 | window_clear_echo_area (); | |||
| 64 | ||||
| 65 | return (line); | |||
| 66 | } | |||
| 67 | ||||
| 68 | DECLARE_INFO_COMMAND (describe_command,void describe_command (WINDOW *window, int count, unsigned char key) | |||
| 69 | _("Read the name of an Info command and describe it"))void describe_command (WINDOW *window, int count, unsigned char key) | |||
| 70 | { | |||
| 71 | char *line; | |||
| 72 | ||||
| 73 | line = read_function_name ((char *) _("Describe command: ")((const char *) ("Describe command: ")), window); | |||
| 74 | ||||
| 75 | if (!line) | |||
| 76 | { | |||
| 77 | info_abort_key (active_window, count, key); | |||
| 78 | return; | |||
| 79 | } | |||
| 80 | ||||
| 81 | /* Describe the function named in "LINE". */ | |||
| 82 | if (*line) | |||
| 83 | { | |||
| 84 | InfoCommand *cmd = named_function (line); | |||
| 85 | ||||
| 86 | if (!cmd) | |||
| 87 | return; | |||
| 88 | ||||
| 89 | window_message_in_echo_area ("%s: %s.", | |||
| 90 | line, function_documentation (cmd)); | |||
| 91 | } | |||
| 92 | free (line); | |||
| 93 | } | |||
| 94 | ||||
| 95 | DECLARE_INFO_COMMAND (info_execute_command,void info_execute_command (WINDOW *window, int count, unsigned char key) | |||
| 96 | _("Read a command name in the echo area and execute it"))void info_execute_command (WINDOW *window, int count, unsigned char key) | |||
| 97 | { | |||
| 98 | char *line; | |||
| 99 | char *keys; | |||
| 100 | char *prompt; | |||
| 101 | ||||
| 102 | prompt = (char *)xmalloc (20); | |||
| 103 | ||||
| 104 | keys = where_is (info_keymap, InfoCmd(info_execute_command)(&function_doc_array[101])); | |||
| 105 | /* If the where_is () function thinks that this command doesn't exist, | |||
| 106 | there's something very wrong! */ | |||
| 107 | if (!keys) | |||
| ||||
| 108 | abort(); | |||
| 109 | ||||
| 110 | if (info_explicit_arg || count != 1) | |||
| 111 | sprintf (prompt, "%d %s ", count, keys); | |||
| 112 | else | |||
| 113 | sprintf (prompt, "%s ", keys); | |||
| 114 | ||||
| 115 | /* Ask the completer to read a reference for us. */ | |||
| 116 | line = read_function_name (prompt, window); | |||
| 117 | ||||
| 118 | /* User aborted? */ | |||
| 119 | if (!line) | |||
| 120 | { | |||
| 121 | info_abort_key (active_window, count, key); | |||
| 122 | return; | |||
| 123 | } | |||
| 124 | ||||
| 125 | /* User accepted "default"? (There is none.) */ | |||
| 126 | if (!*line) | |||
| 127 | { | |||
| 128 | free (line); | |||
| 129 | return; | |||
| 130 | } | |||
| 131 | ||||
| 132 | /* User wants to execute a named command. Do it. */ | |||
| 133 | { | |||
| 134 | InfoCommand *command; | |||
| 135 | ||||
| 136 | if ((active_window != the_echo_area) && | |||
| 137 | (strncmp (line, "echo-area-", 10) == 0)) | |||
| 138 | { | |||
| 139 | free (line); | |||
| 140 | info_error ((char *) _("Cannot execute an `echo-area' command here.")((const char *) ("Cannot execute an `echo-area' command here." )), | |||
| 141 | NULL((void *)0), NULL((void *)0)); | |||
| 142 | return; | |||
| 143 | } | |||
| 144 | ||||
| 145 | command = named_function (line); | |||
| 146 | free (line); | |||
| 147 | ||||
| 148 | if (!command) | |||
| 149 | return; | |||
| 150 | ||||
| 151 | if (InfoFunction(command)((command) ? (command)->func : (VFunction *) ((void *)0))) | |||
| 152 | (*InfoFunction(command)((command) ? (command)->func : (VFunction *) ((void *)0))) (active_window, count, 0); | |||
| 153 | else | |||
| 154 | info_error ((char *) _("Undefined command: %s")((const char *) ("Undefined command: %s")), line, NULL((void *)0)); | |||
| ||||
| 155 | } | |||
| 156 | } | |||
| 157 | ||||
| 158 | /* Okay, now that we have M-x, let the user set the screen height. */ | |||
| 159 | DECLARE_INFO_COMMAND (set_screen_height,void set_screen_height (WINDOW *window, int count, unsigned char key) | |||
| 160 | _("Set the height of the displayed window"))void set_screen_height (WINDOW *window, int count, unsigned char key) | |||
| 161 | { | |||
| 162 | int new_height, old_height = screenheight; | |||
| 163 | ||||
| 164 | if (info_explicit_arg || count != 1) | |||
| 165 | new_height = count; | |||
| 166 | else | |||
| 167 | { | |||
| 168 | char prompt[80]; | |||
| 169 | char *line; | |||
| 170 | ||||
| 171 | new_height = screenheight; | |||
| 172 | ||||
| 173 | sprintf (prompt, _("Set screen height to (%d): ")((const char *) ("Set screen height to (%d): ")), new_height); | |||
| 174 | ||||
| 175 | line = info_read_in_echo_area (window, prompt); | |||
| 176 | ||||
| 177 | /* If the user aborted, do that now. */ | |||
| 178 | if (!line) | |||
| 179 | { | |||
| 180 | info_abort_key (active_window, count, 0); | |||
| 181 | return; | |||
| 182 | } | |||
| 183 | ||||
| 184 | /* Find out what the new height is supposed to be. */ | |||
| 185 | if (*line) | |||
| 186 | new_height = atoi (line); | |||
| 187 | ||||
| 188 | /* Clear the echo area if it isn't active. */ | |||
| 189 | if (!echo_area_is_active) | |||
| 190 | window_clear_echo_area (); | |||
| 191 | ||||
| 192 | free (line); | |||
| 193 | } | |||
| 194 | ||||
| 195 | terminal_clear_screen (); | |||
| 196 | display_clear_display (the_display); | |||
| 197 | screenheight = new_height; | |||
| 198 | #ifdef SET_SCREEN_SIZE_HELPER | |||
| 199 | SET_SCREEN_SIZE_HELPER; | |||
| 200 | #endif | |||
| 201 | if (screenheight == old_height) | |||
| 202 | { | |||
| 203 | /* Display dimensions didn't actually change, so | |||
| 204 | window_new_screen_size won't do anything, but we've | |||
| 205 | already cleared the display above. Undo the damage. */ | |||
| 206 | window_mark_chain (windows, W_UpdateWindow0x01); | |||
| 207 | display_update_display (windows); | |||
| 208 | } | |||
| 209 | else | |||
| 210 | { | |||
| 211 | display_initialize_display (screenwidth, screenheight); | |||
| 212 | window_new_screen_size (screenwidth, screenheight); | |||
| 213 | } | |||
| 214 | } |