Return to suncore.c CVS log

Up to [CSRG BSD Unix] / 43BSD / ucb / lisp / franz / 68k

Annotation of 43BSD/ucb/lisp/franz/68k/suncore.c, revision 1.1

1.1     ! root        1: /*
        !             2:  *$Header: qfuncl.c,v 1.9 84/02/29 17:23:24 sklower Exp $
        !             3:  *$Locker:  $
        !             4:  *
        !             5:  * Copyright (c) 1982, by the Regents, University of California
        !             6:  *
        !             7:  *                     -[Tue Apr 10 08:32:07 1984 by jkf]-
        !             8:  *
        !             9:  * Interface to sun core graphics.
        !            10:  *
        !            11:  * 
        !            12:  * 
        !            13:  *
        !            14:  */
        !            15: 
        !            16: int inquire_detectability();
        !            17: int set_detectability();
        !            18: int inquire_highlighting();
        !            19: int set_highlighting();
        !            20: int inquire_image_transformation_2();
        !            21: int set_image_transformation_2();
        !            22: int inquire_image_transformation_3();
        !            23: int set_image_transformation_3();
        !            24: int inquire_visibility();
        !            25: int set_visibility();
        !            26: int inquire_image_translate_2();
        !            27: int set_image_translate_2();
        !            28: int inquire_image_translate_3();
        !            29: int set_image_translate_3();
        !            30: int print_error();
        !            31: int report_most_recent_error();
        !            32: int initialize_core();
        !            33: int terminate_core();
        !            34: int set_pick_id();
        !            35: int set_charup_2();
        !            36: int set_charup_3();
        !            37: int set_charjust();
        !            38: int define_color_indices();
        !            39: int set_primitive_attributes();
        !            40: int set_marker_symbol();
        !            41: int set_text_index();
        !            42: int set_fill_index();
        !            43: int set_rasterop();
        !            44: int set_polygon_edge_style();
        !            45: int set_linestyle();
        !            46: int set_charspace();
        !            47: int set_line_index();
        !            48: int set_drag();
        !            49: int set_polygon_interior_style();
        !            50: int set_charsize();
        !            51: int set_charprecision();
        !            52: int set_charpath_2();
        !            53: int set_linewidth();
        !            54: int set_charpath_3();
        !            55: int set_font();
        !            56: int set_pen();
        !            57: int inquire_pick_id();
        !            58: int inquire_charup_2();
        !            59: int inquire_charup_3();
        !            60: int inquire_charjust();
        !            61: int inquire_color_indices();
        !            62: int inquire_primitive_attributes();
        !            63: int inquire_marker_symbol();
        !            64: int inquire_text_index();
        !            65: int inquire_fill_index();
        !            66: int inquire_rasterop();
        !            67: int inquire_polygon_edge_style();
        !            68: int inquire_linestyle();
        !            69: int inquire_charspace();
        !            70: int inquire_line_index();
        !            71: int inquire_pen();
        !            72: int inquire_polygon_interior_style();
        !            73: int inquire_font();
        !            74: int inquire_charsize();
        !            75: int inquire_charprecision();
        !            76: int inquire_charpath_2();
        !            77: int inquire_linewidth();
        !            78: int inquire_charpath_3();
        !            79: int terminate_view_surface();
        !            80: int deselect_view_surface();
        !            81: int select_view_surface();
        !            82: int initialize_view_surface();
        !            83: int polymarker_abs_2();
        !            84: int marker_abs_2();
        !            85: int polymarker_abs_3();
        !            86: int marker_abs_3();
        !            87: int polymarker_rel_2();
        !            88: int marker_rel_2();
        !            89: int polymarker_rel_3();
        !            90: int marker_rel_3();
        !            91: int text();
        !            92: int inquire_text_extent_2();
        !            93: int inquire_text_extent_3();
        !            94: int inquire_current_position_2();
        !            95: int polyline_abs_2();
        !            96: int move_abs_2();
        !            97: int line_abs_2();
        !            98: int polyline_rel_2();
        !            99: int move_rel_2();
        !           100: int line_rel_2();
        !           101: int inquire_current_position_3();
        !           102: int polyline_abs_3();
        !           103: int move_abs_3();
        !           104: int line_abs_3();
        !           105: int polyline_rel_3();
        !           106: int move_rel_3();
        !           107: int line_rel_3();
        !           108: int set_echo();
        !           109: int await_pick();
        !           110: int await_stroke_2();
        !           111: int await_any_button();
        !           112: int set_valuator();
        !           113: int await_any_button_get_valuator();
        !           114: int set_echo_surface();
        !           115: int set_echo_position();
        !           116: int set_stroke();
        !           117: int set_locator_2();
        !           118: int await_any_button_get_locator_2();
        !           119: int set_echo_group();
        !           120: int get_mouse_state();
        !           121: int terminate_device();
        !           122: int initialize_device();
        !           123: int set_keyboard();
        !           124: int await_keyboard();
        !           125: int inquire_valuator();
        !           126: int inquire_echo_surface();
        !           127: int inquire_echo_position();
        !           128: int inquire_locator_2();
        !           129: int inquire_stroke();
        !           130: int inquire_echo();
        !           131: int inquire_keyboard();
        !           132: int polygon_abs_2();
        !           133: int polygon_rel_2();
        !           134: int set_vertex_indices();
        !           135: int polygon_abs_3();
        !           136: int polygon_rel_3();
        !           137: int set_shading_parameters();
        !           138: int set_light_direction();
        !           139: int set_vertex_normals();
        !           140: int get_raster();
        !           141: int put_raster();
        !           142: int free_raster();
        !           143: int allocate_raster();
        !           144: int size_raster();
        !           145: int raster_to_file();
        !           146: int file_to_raster();
        !           147: int set_zbuffer_cut();
        !           148: int delete_all_retained_segments();
        !           149: int rename_retained_segment();
        !           150: int delete_retained_segment();
        !           151: int set_image_transformation_type();
        !           152: int close_retained_segment();
        !           153: int close_temporary_segment();
        !           154: int create_temporary_segment();
        !           155: int create_retained_segment();
        !           156: int inquire_segment_image_transformation_3();
        !           157: int set_segment_image_transformation_3();
        !           158: int inquire_segment_image_translate_3();
        !           159: int set_segment_image_translate_3();
        !           160: int set_segment_detectability();
        !           161: int set_segment_highlighting();
        !           162: int set_segment_image_transformation_2();
        !           163: int set_segment_visibility();
        !           164: int set_segment_image_translate_2();
        !           165: int inquire_segment_detectability();
        !           166: int inquire_segment_highlighting();
        !           167: int inquire_segment_image_transformation_type();
        !           168: int inquire_image_transformation_type();
        !           169: int inquire_segment_image_transformation_2();
        !           170: int inquire_segment_visibility();
        !           171: int inquire_segment_image_translate_2();
        !           172: int inquire_view_plane_normal();
        !           173: int inquire_view_depth();
        !           174: int inquire_retained_segment_names();
        !           175: int inquire_viewing_control_parameters();
        !           176: int inquire_viewing_parameters();
        !           177: int inquire_projection();
        !           178: int inquire_world_coordinate_matrix_2();
        !           179: int inquire_world_coordinate_matrix_3();
        !           180: int inquire_retained_segment_surfaces();
        !           181: int inquire_ndc_space_2();
        !           182: int inquire_ndc_space_3();
        !           183: int inquire_view_reference_point();
        !           184: int inquire_view_plane_distance();
        !           185: int inquire_inverse_composite_matrix();
        !           186: int inquire_viewport_2();
        !           187: int inquire_viewport_3();
        !           188: int inquire_window();
        !           189: int inquire_view_up_2();
        !           190: int inquire_view_up_3();
        !           191: int inquire_open_temporary_segment();
        !           192: int inquire_open_retained_segment();
        !           193: int end_batch_of_updates();
        !           194: int begin_batch_of_updates();
        !           195: int new_frame();
        !           196: int restore_segment();
        !           197: int save_segment();
        !           198: int set_view_plane_normal();
        !           199: int set_view_depth();
        !           200: int set_viewing_parameters();
        !           201: int set_projection();
        !           202: int set_window();
        !           203: int set_ndc_space_2();
        !           204: int set_ndc_space_3();
        !           205: int set_view_reference_point();
        !           206: int set_view_plane_distance();
        !           207: int set_viewport_2();
        !           208: int set_viewport_3();
        !           209: int set_view_up_2();
        !           210: int set_view_up_3();
        !           211: int map_world_to_ndc_2();
        !           212: int map_world_to_ndc_3();
        !           213: int map_ndc_to_world_2();
        !           214: int map_ndc_to_world_3();
        !           215: int set_world_coordinate_matrix_2();
        !           216: int set_world_coordinate_matrix_3();
        !           217: int set_back_plane_clipping();
        !           218: int set_front_plane_clipping();
        !           219: int set_window_clipping();
        !           220: int set_output_clipping();
        !           221: int set_coordinate_system_type();
        !           222: 
        !           223: static char *disc = "c-function";
        !           224: static struct cftab {
        !           225:        char *name;
        !           226:        int (*cfn)();
        !           227:        char **discipline;
        !           228: } corefuns[] = {
        !           229: {"_inquire_detectability", inquire_detectability, &disc},
        !           230: {"_set_detectability", set_detectability, &disc},
        !           231: {"_inquire_highlighting", inquire_highlighting, &disc},
        !           232: {"_set_highlighting", set_highlighting, &disc},
        !           233: {"_inquire_image_transformation_2", inquire_image_transformation_2, &disc},
        !           234: {"_set_image_transformation_2", set_image_transformation_2, &disc},
        !           235: {"_inquire_image_transformation_3", inquire_image_transformation_3, &disc},
        !           236: {"_set_image_transformation_3", set_image_transformation_3, &disc},
        !           237: {"_inquire_visibility", inquire_visibility, &disc},
        !           238: {"_set_visibility", set_visibility, &disc},
        !           239: {"_inquire_image_translate_2", inquire_image_translate_2, &disc},
        !           240: {"_set_image_translate_2", set_image_translate_2, &disc},
        !           241: {"_inquire_image_translate_3", inquire_image_translate_3, &disc},
        !           242: {"_set_image_translate_3", set_image_translate_3, &disc},
        !           243: {"_print_error", print_error, &disc},
        !           244: {"_report_most_recent_error", report_most_recent_error, &disc},
        !           245: {"_initialize_core", initialize_core, &disc},
        !           246: {"_terminate_core", terminate_core, &disc},
        !           247: {"_set_pick_id", set_pick_id, &disc},
        !           248: {"_set_charup_2", set_charup_2, &disc},
        !           249: {"_set_charup_3", set_charup_3, &disc},
        !           250: {"_set_charjust", set_charjust, &disc},
        !           251: {"_define_color_indices", define_color_indices, &disc},
        !           252: {"_set_primitive_attributes", set_primitive_attributes, &disc},
        !           253: {"_set_marker_symbol", set_marker_symbol, &disc},
        !           254: {"_set_text_index", set_text_index, &disc},
        !           255: {"_set_fill_index", set_fill_index, &disc},
        !           256: {"_set_rasterop", set_rasterop, &disc},
        !           257: {"_set_polygon_edge_style", set_polygon_edge_style, &disc},
        !           258: {"_set_linestyle", set_linestyle, &disc},
        !           259: {"_set_charspace", set_charspace, &disc},
        !           260: {"_set_line_index", set_line_index, &disc},
        !           261: {"_set_drag", set_drag, &disc},
        !           262: {"_set_polygon_interior_style", set_polygon_interior_style, &disc},
        !           263: {"_set_charsize", set_charsize, &disc},
        !           264: {"_set_charprecision", set_charprecision, &disc},
        !           265: {"_set_charpath_2", set_charpath_2, &disc},
        !           266: {"_set_linewidth", set_linewidth, &disc},
        !           267: {"_set_charpath_3", set_charpath_3, &disc},
        !           268: {"_set_font", set_font, &disc},
        !           269: {"_set_pen", set_pen, &disc},
        !           270: {"_inquire_pick_id", inquire_pick_id, &disc},
        !           271: {"_inquire_charup_2", inquire_charup_2, &disc},
        !           272: {"_inquire_charup_3", inquire_charup_3, &disc},
        !           273: {"_inquire_charjust", inquire_charjust, &disc},
        !           274: {"_inquire_color_indices", inquire_color_indices, &disc},
        !           275: {"_inquire_primitive_attributes", inquire_primitive_attributes, &disc},
        !           276: {"_inquire_marker_symbol", inquire_marker_symbol, &disc},
        !           277: {"_inquire_text_index", inquire_text_index, &disc},
        !           278: {"_inquire_fill_index", inquire_fill_index, &disc},
        !           279: {"_inquire_rasterop", inquire_rasterop, &disc},
        !           280: {"_inquire_polygon_edge_style", inquire_polygon_edge_style, &disc},
        !           281: {"_inquire_linestyle", inquire_linestyle, &disc},
        !           282: {"_inquire_charspace", inquire_charspace, &disc},
        !           283: {"_inquire_line_index", inquire_line_index, &disc},
        !           284: {"_inquire_pen", inquire_pen, &disc},
        !           285: {"_inquire_polygon_interior_style", inquire_polygon_interior_style, &disc},
        !           286: {"_inquire_font", inquire_font, &disc},
        !           287: {"_inquire_charsize", inquire_charsize, &disc},
        !           288: {"_inquire_charprecision", inquire_charprecision, &disc},
        !           289: {"_inquire_charpath_2", inquire_charpath_2, &disc},
        !           290: {"_inquire_linewidth", inquire_linewidth, &disc},
        !           291: {"_inquire_charpath_3", inquire_charpath_3, &disc},
        !           292: {"_terminate_view_surface", terminate_view_surface, &disc},
        !           293: {"_deselect_view_surface", deselect_view_surface, &disc},
        !           294: {"_select_view_surface", select_view_surface, &disc},
        !           295: {"_initialize_view_surface", initialize_view_surface, &disc},
        !           296: {"_polymarker_abs_2", polymarker_abs_2, &disc},
        !           297: {"_marker_abs_2", marker_abs_2, &disc},
        !           298: {"_polymarker_abs_3", polymarker_abs_3, &disc},
        !           299: {"_marker_abs_3", marker_abs_3, &disc},
        !           300: {"_polymarker_rel_2", polymarker_rel_2, &disc},
        !           301: {"_marker_rel_2", marker_rel_2, &disc},
        !           302: {"_polymarker_rel_3", polymarker_rel_3, &disc},
        !           303: {"_marker_rel_3", marker_rel_3, &disc},
        !           304: {"_text", text, &disc},
        !           305: {"_inquire_text_extent_2", inquire_text_extent_2, &disc},
        !           306: {"_inquire_text_extent_3", inquire_text_extent_3, &disc},
        !           307: {"_inquire_current_position_2", inquire_current_position_2, &disc},
        !           308: {"_polyline_abs_2", polyline_abs_2, &disc},
        !           309: {"_move_abs_2", move_abs_2, &disc},
        !           310: {"_line_abs_2", line_abs_2, &disc},
        !           311: {"_polyline_rel_2", polyline_rel_2, &disc},
        !           312: {"_move_rel_2", move_rel_2, &disc},
        !           313: {"_line_rel_2", line_rel_2, &disc},
        !           314: {"_inquire_current_position_3", inquire_current_position_3, &disc},
        !           315: {"_polyline_abs_3", polyline_abs_3, &disc},
        !           316: {"_move_abs_3", move_abs_3, &disc},
        !           317: {"_line_abs_3", line_abs_3, &disc},
        !           318: {"_polyline_rel_3", polyline_rel_3, &disc},
        !           319: {"_move_rel_3", move_rel_3, &disc},
        !           320: {"_line_rel_3", line_rel_3, &disc},
        !           321: {"_set_echo", set_echo, &disc},
        !           322: {"_await_pick", await_pick, &disc},
        !           323: {"_await_stroke_2", await_stroke_2, &disc},
        !           324: {"_await_any_button", await_any_button, &disc},
        !           325: {"_set_valuator", set_valuator, &disc},
        !           326: {"_await_any_button_get_valuator", await_any_button_get_valuator, &disc},
        !           327: {"_set_echo_surface", set_echo_surface, &disc},
        !           328: {"_set_echo_position", set_echo_position, &disc},
        !           329: {"_set_stroke", set_stroke, &disc},
        !           330: {"_set_locator_2", set_locator_2, &disc},
        !           331: {"_await_any_button_get_locator_2", await_any_button_get_locator_2, &disc},
        !           332: {"_set_echo_group", set_echo_group, &disc},
        !           333: {"_get_mouse_state", get_mouse_state, &disc},
        !           334: {"_terminate_device", terminate_device, &disc},
        !           335: {"_initialize_device", initialize_device, &disc},
        !           336: {"_set_keyboard", set_keyboard, &disc},
        !           337: {"_await_keyboard", await_keyboard, &disc},
        !           338: {"_inquire_valuator", inquire_valuator, &disc},
        !           339: {"_inquire_echo_surface", inquire_echo_surface, &disc},
        !           340: {"_inquire_echo_position", inquire_echo_position, &disc},
        !           341: {"_inquire_locator_2", inquire_locator_2, &disc},
        !           342: {"_inquire_stroke", inquire_stroke, &disc},
        !           343: {"_inquire_echo", inquire_echo, &disc},
        !           344: {"_inquire_keyboard", inquire_keyboard, &disc},
        !           345: {"_polygon_abs_2", polygon_abs_2, &disc},
        !           346: {"_polygon_rel_2", polygon_rel_2, &disc},
        !           347: {"_set_vertex_indices", set_vertex_indices, &disc},
        !           348: {"_polygon_abs_3", polygon_abs_3, &disc},
        !           349: {"_polygon_rel_3", polygon_rel_3, &disc},
        !           350: {"_set_shading_parameters", set_shading_parameters, &disc},
        !           351: {"_set_light_direction", set_light_direction, &disc},
        !           352: {"_set_vertex_normals", set_vertex_normals, &disc},
        !           353: {"_get_raster", get_raster, &disc},
        !           354: {"_put_raster", put_raster, &disc},
        !           355: {"_free_raster", free_raster, &disc},
        !           356: {"_allocate_raster", allocate_raster, &disc},
        !           357: {"_size_raster", size_raster, &disc},
        !           358: {"_raster_to_file", raster_to_file, &disc},
        !           359: {"_file_to_raster", file_to_raster, &disc},
        !           360: {"_set_zbuffer_cut", set_zbuffer_cut, &disc},
        !           361: {"_delete_all_retained_segments", delete_all_retained_segments, &disc},
        !           362: {"_rename_retained_segment", rename_retained_segment, &disc},
        !           363: {"_delete_retained_segment", delete_retained_segment, &disc},
        !           364: {"_set_image_transformation_type", set_image_transformation_type, &disc},
        !           365: {"_close_retained_segment", close_retained_segment, &disc},
        !           366: {"_close_temporary_segment", close_temporary_segment, &disc},
        !           367: {"_create_temporary_segment", create_temporary_segment, &disc},
        !           368: {"_create_retained_segment", create_retained_segment, &disc},
        !           369: {"_inquire_segment_image_transformation_3", inquire_segment_image_transformation_3, &disc},
        !           370: {"_set_segment_image_transformation_3", set_segment_image_transformation_3, &disc},
        !           371: {"_inquire_segment_image_translate_3", inquire_segment_image_translate_3, &disc},
        !           372: {"_set_segment_image_translate_3", set_segment_image_translate_3, &disc},
        !           373: {"_set_segment_detectability", set_segment_detectability, &disc},
        !           374: {"_set_segment_highlighting", set_segment_highlighting, &disc},
        !           375: {"_set_segment_image_transformation_2", set_segment_image_transformation_2, &disc},
        !           376: {"_set_segment_visibility", set_segment_visibility, &disc},
        !           377: {"_set_segment_image_translate_2", set_segment_image_translate_2, &disc},
        !           378: {"_inquire_segment_detectability", inquire_segment_detectability, &disc},
        !           379: {"_inquire_segment_highlighting", inquire_segment_highlighting, &disc},
        !           380: {"_inquire_segment_image_transformation_type", inquire_segment_image_transformation_type, &disc},
        !           381: {"_inquire_image_transformation_type", inquire_image_transformation_type, &disc},
        !           382: {"_inquire_segment_image_transformation_2", inquire_segment_image_transformation_2, &disc},
        !           383: {"_inquire_segment_visibility", inquire_segment_visibility, &disc},
        !           384: {"_inquire_segment_image_translate_2", inquire_segment_image_translate_2, &disc},
        !           385: {"_inquire_view_plane_normal", inquire_view_plane_normal, &disc},
        !           386: {"_inquire_view_depth", inquire_view_depth, &disc},
        !           387: {"_inquire_retained_segment_names", inquire_retained_segment_names, &disc},
        !           388: {"_inquire_viewing_control_parameters", inquire_viewing_control_parameters, &disc},
        !           389: {"_inquire_viewing_parameters", inquire_viewing_parameters, &disc},
        !           390: {"_inquire_projection", inquire_projection, &disc},
        !           391: {"_inquire_world_coordinate_matrix_2", inquire_world_coordinate_matrix_2, &disc},
        !           392: {"_inquire_world_coordinate_matrix_3", inquire_world_coordinate_matrix_3, &disc},
        !           393: {"_inquire_retained_segment_surfaces", inquire_retained_segment_surfaces, &disc},
        !           394: {"_inquire_ndc_space_2", inquire_ndc_space_2, &disc},
        !           395: {"_inquire_ndc_space_3", inquire_ndc_space_3, &disc},
        !           396: {"_inquire_view_reference_point", inquire_view_reference_point, &disc},
        !           397: {"_inquire_view_plane_distance", inquire_view_plane_distance, &disc},
        !           398: {"_inquire_inverse_composite_matrix", inquire_inverse_composite_matrix, &disc},
        !           399: {"_inquire_viewport_2", inquire_viewport_2, &disc},
        !           400: {"_inquire_viewport_3", inquire_viewport_3, &disc},
        !           401: {"_inquire_window", inquire_window, &disc},
        !           402: {"_inquire_view_up_2", inquire_view_up_2, &disc},
        !           403: {"_inquire_view_up_3", inquire_view_up_3, &disc},
        !           404: {"_inquire_open_temporary_segment", inquire_open_temporary_segment, &disc},
        !           405: {"_inquire_open_retained_segment", inquire_open_retained_segment, &disc},
        !           406: {"_end_batch_of_updates", end_batch_of_updates, &disc},
        !           407: {"_begin_batch_of_updates", begin_batch_of_updates, &disc},
        !           408: {"_new_frame", new_frame, &disc},
        !           409: {"_restore_segment", restore_segment, &disc},
        !           410: {"_save_segment", save_segment, &disc},
        !           411: {"_set_view_plane_normal", set_view_plane_normal, &disc},
        !           412: {"_set_view_depth", set_view_depth, &disc},
        !           413: {"_set_viewing_parameters", set_viewing_parameters, &disc},
        !           414: {"_set_projection", set_projection, &disc},
        !           415: {"_set_window", set_window, &disc},
        !           416: {"_set_ndc_space_2", set_ndc_space_2, &disc},
        !           417: {"_set_ndc_space_3", set_ndc_space_3, &disc},
        !           418: {"_set_view_reference_point", set_view_reference_point, &disc},
        !           419: {"_set_view_plane_distance", set_view_plane_distance, &disc},
        !           420: {"_set_viewport_2", set_viewport_2, &disc},
        !           421: {"_set_viewport_3", set_viewport_3, &disc},
        !           422: {"_set_view_up_2", set_view_up_2, &disc},
        !           423: {"_set_view_up_3", set_view_up_3, &disc},
        !           424: {"_map_world_to_ndc_2", map_world_to_ndc_2, &disc},
        !           425: {"_map_world_to_ndc_3", map_world_to_ndc_3, &disc},
        !           426: {"_map_ndc_to_world_2", map_ndc_to_world_2, &disc},
        !           427: {"_map_ndc_to_world_3", map_ndc_to_world_3, &disc},
        !           428: {"_set_world_coordinate_matrix_2", set_world_coordinate_matrix_2, &disc},
        !           429: {"_set_world_coordinate_matrix_3", set_world_coordinate_matrix_3, &disc},
        !           430: {"_set_back_plane_clipping", set_back_plane_clipping, &disc},
        !           431: {"_set_front_plane_clipping", set_front_plane_clipping, &disc},
        !           432: {"_set_window_clipping", set_window_clipping, &disc},
        !           433: {"_set_output_clipping", set_output_clipping, &disc},
        !           434: {"_set_coordinate_system_type", set_coordinate_system_type, &disc},
        !           435: {0}
        !           436: };
        !           437: hookupcore() {mftab(corefuns);}

This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.